Maciej Kasatkin
2012-09-11 4c99769df0997dc18acdec7868eefeee6028f602
commit | author | age
a48621 1 grinder_recipes ={}
MK 2
3 registered_grinder_recipes_count=1
4
5 function register_grinder_recipe (string1,string2)
6 grinder_recipes[registered_grinder_recipes_count]={}
7 grinder_recipes[registered_grinder_recipes_count].src_name=string1
8 grinder_recipes[registered_grinder_recipes_count].dst_name=string2
9 registered_grinder_recipes_count=registered_grinder_recipes_count+1
10 end
11
12 register_grinder_recipe("default:stone","default:sand")
13 register_grinder_recipe("default:cobble","default:gravel")
14 register_grinder_recipe("default:gravel","default:dirt")
15 register_grinder_recipe("default:desert_stone","default:desert_sand")
16 register_grinder_recipe("default:iron_lump","technic:iron_dust 2") 
17 register_grinder_recipe("default:coal_lump","technic:coal_dust 2") 
18 register_grinder_recipe("moreores:copper_lump","technic:copper_dust 2")
19 register_grinder_recipe("moreores:tin_lump","technic:tin_dust 2") 
20 register_grinder_recipe("moreores:silver_lump","technic:silver_dust 2")
21 register_grinder_recipe("moreores:gold_lump","technic:gold_dust 2") 
22 register_grinder_recipe("moreores:mithril_lump","technic:mithril_dust 2") 
23
24
167434 25 minetest.register_craftitem( "technic:coal_dust", {
MK 26     description = "Coal Dust",
27     inventory_image = "technic_coal_dust.png",
28     on_place_on_ground = minetest.craftitem_place_item,
29     })
30
31 minetest.register_craftitem( "technic:iron_dust", {
32     description = "Iron Dust",
33     inventory_image = "technic_iron_dust.png",
34     on_place_on_ground = minetest.craftitem_place_item,
35     })
36
37 minetest.register_craft({
38     type = "cooking",
39     output = "default:steel_ingot",
40     recipe = "technic:iron_dust",
41 }) 
42
43 minetest.register_craftitem( "technic:copper_dust", {
44     description = "Copper Dust",
45     inventory_image = "technic_copper_dust.png",
46     on_place_on_ground = minetest.craftitem_place_item,
47     })
48 minetest.register_craft({
49     type = "cooking",
50     output = "moreores:copper_ingot",
51     recipe = "technic:copper_dust",
52 }) 
53
54 minetest.register_craftitem( "technic:tin_dust", {
55     description = "Tin Dust",
56     inventory_image = "technic_tin_dust.png",
57     on_place_on_ground = minetest.craftitem_place_item,
58     })
59 minetest.register_craft({
60     type = "cooking",
61     output = "moreores:tin_ingot",
62     recipe = "technic:tin_dust",
63 }) 
64
65 minetest.register_craftitem( "technic:silver_dust", {
66     description = "Silver Dust",
67     inventory_image = "technic_silver_dust.png",
68     on_place_on_ground = minetest.craftitem_place_item,
69     })
70 minetest.register_craft({
71     type = "cooking",
72     output = "moreores:silver_ingot",
73     recipe = "technic:silver_dust",
74 }) 
75
76 minetest.register_craftitem( "technic:gold_dust", {
77     description = "Gold Dust",
78     inventory_image = "technic_gold_dust.png",
79     on_place_on_ground = minetest.craftitem_place_item,
80     })
81 minetest.register_craft({
82     type = "cooking",
83     output = "moreores:gold_ingot",
84     recipe = "technic:gold_dust",
85 }) 
86
87 minetest.register_craftitem( "technic:mithril_dust", {
88     description = "Mithril Dust",
89     inventory_image = "technic_mithril_dust.png",
90     on_place_on_ground = minetest.craftitem_place_item,
91     })
92 minetest.register_craft({
93     type = "cooking",
94     output = "moreores:mithril_ingot",
95     recipe = "technic:mithril_dust",
96 }) 
97
1f1562 98 minetest.register_craftitem( "technic:chromium_dust", {
MK 99     description = "Chromium Dust",
100     inventory_image = "technic_chromium_dust.png",
101     on_place_on_ground = minetest.craftitem_place_item,
102     })
103 minetest.register_craft({
104     type = "cooking",
105     output = "technic:chromium_ingot",
106     recipe = "technic:chromium_dust",
107 }) 
108
109 minetest.register_craftitem( "technic:bronze_dust", {
110     description = "Bronze Dust",
111     inventory_image = "technic_bronze_dust.png",
112     on_place_on_ground = minetest.craftitem_place_item,
113     })
114 minetest.register_craft({
115     type = "cooking",
116     output = "moreores:bronze_ingot",
117     recipe = "technic:bronze_dust",
118 }) 
119
120 minetest.register_craftitem( "technic:stainless_steel_dust", {
121     description = "Stainless Steel Dust",
122     inventory_image = "technic_stainless_steel_dust.png",
123     on_place_on_ground = minetest.craftitem_place_item,
124     })
125
126 minetest.register_craft({
127     type = "cooking",
128     output = "technic:stainless_steel_ingot",
129     recipe = "technic:stainless_steel_dust",
130 }) 
131
167434 132 minetest.register_alias("grinder", "technic:grinder")
MK 133 minetest.register_craft({
134     output = 'technic:grinder',
135     recipe = {
136         {'default:desert_stone', 'default:desert_stone', 'default:desert_stone'},
137         {'default:desert_stone', 'technic:diamond', 'default:desert_stone'},
138         {'default:stone', 'moreores:copper_ingot', 'default:stone'},
139     }
140 })
141
142 minetest.register_craftitem("technic:grinder", {
143     description = "Grinder",
144     stack_max = 99,
145 }) 
146
147 grinder_formspec =
148     "invsize[8,9;]"..
149     "image[1,1;1,2;technic_power_meter_bg.png]"..
150     "label[0,0;Grinder]"..
151     "label[1,3;Power level]"..
152     "list[current_name;src;3,1;1,1;]"..
153     "list[current_name;dst;5,1;2,2;]"..
154     "list[current_player;main;0,5;8,4;]"
155     
156
157 minetest.register_node("technic:grinder", {
158     description = "Grinder",
159     tiles = {"technic_grinder_top.png", "technic_machine_bottom.png", "technic_grinder_side.png",
160         "technic_grinder_side.png", "technic_grinder_side.png", "technic_grinder_front.png"},
161     paramtype2 = "facedir",
162     groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
163     legacy_facedir_simple = true,
164     sounds = default.node_sound_wood_defaults(),
165     technic_power_machine=1,
166     internal_EU_buffer=0;
167     internal_EU_buffer_size=5000;
168     grind_time=0;
169     grinded = nil;
170     src_time = 0;
171     on_construct = function(pos)
172         local meta = minetest.env:get_meta(pos)
173         meta:set_string("infotext", "Grinder")
174         meta:set_float("technic_power_machine", 1)
175         meta:set_float("internal_EU_buffer", 0)
176         meta:set_float("internal_EU_buffer_size", 5000)
177         meta:set_string("formspec", grinder_formspec)
178         meta:set_float("grind_time", 0)
179         
180         local inv = meta:get_inventory()
181         inv:set_size("src", 1)
182         inv:set_size("dst", 4)
183         
184         end,    
185     can_dig = function(pos,player)
186         local meta = minetest.env:get_meta(pos);
187         local inv = meta:get_inventory()
188         if not inv:is_empty("src") then
189             return false
190         end
191         if not inv:is_empty("dst") then
192             return false
193         end
194
195         return true
196         end,
197
198 })
199
200 minetest.register_abm({
201     nodenames = {"technic:grinder"},
202     interval = 1,
203     chance = 1,
204     action = function(pos, node, active_object_count, active_object_count_wider)
205
206     local meta = minetest.env:get_meta(pos)
207     local charge= meta:get_float("internal_EU_buffer")
208     local max_charge= meta:get_float("internal_EU_buffer_size")
209     local grind_cost=200
210
211     local load = math.floor((charge/max_charge)*100)
212     meta:set_string("formspec",
213                 "invsize[8,9;]"..
214                 "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
215                         (load)..":technic_power_meter_fg.png]"..
216                 "label[0,0;Grinder]"..
217                 "label[1,3;Power level]"..
218                 "list[current_name;src;3,1;1,1;]"..
219                 "list[current_name;dst;5,1;2,2;]"..
220                 "list[current_player;main;0,5;8,4;]"
221                 )
222                 
223         
224
225         local inv = meta:get_inventory()
226         
227 --        local grinder_on = meta:get_float("grinder_on")
228         
229         
230         local srclist = inv:get_list("src")
231         if inv:is_empty("src") then meta:set_float("grinder_on",0) end 
232     
233         
234         if (meta:get_float("grinder_on") == 1) then
235             if charge>=grind_cost then
236             charge=charge-grind_cost;
237             meta:set_float("internal_EU_buffer",charge)
238             meta:set_float("src_time", meta:get_float("src_time") + 1)
239             if meta:get_float("src_time") >= meta:get_float("grind_time") then
240                 -- check if there's room for output in "dst" list
241                 grinded = get_grinded_item (inv:get_stack("src", 1))        
242                 if inv:room_for_item("dst",grinded) then
243                     -- Put result in "dst" list
244                     inv:add_item("dst", grinded)
245                     -- take stuff from "src" list
246                     srcstack = inv:get_stack("src", 1)
247                     srcstack:take_item()
248                     inv:set_stack("src", 1, srcstack)
249                     if inv:is_empty("src") then meta:set_float("grinder_on",0) end 
250
251
252
253                 else
254                     print("Grinder inventory full!")
255                 end
256                 meta:set_float("src_time", 0)
257             end
258             end        
259         end
260         
261         if (meta:get_float("grinder_on")==0) then
262         local grinded=nil 
263         if not inv:is_empty("src") then
264          grinded = get_grinded_item (inv:get_stack("src", 1))
265          if grinded then meta:set_float("grinder_on",1) end
266          grind_time=4
267          meta:set_float("grind_time",grind_time)
268          meta:set_float("src_time", 0)
269         end
270         end
271         
272     
273     end
274 }) 
275
276 function get_grinded_item (items)
277 new_item =nil
278 src_item=items:to_table()
279 item_name=src_item["name"]
280
a48621 281 local counter=registered_grinder_recipes_count-1
MK 282 for i=1, counter,1 do
283 if    grinder_recipes[i].src_name==item_name then return ItemStack(grinder_recipes[i].dst_name) end
284 end
167434 285 return nil
a48621 286         
167434 287 end