RealBadAngel
2013-04-15 595ed5045171ac45c92551e093fe582e0ca2508e
commit | author | age
82cba9 1 grinder_recipes ={}
R 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
41af01 10 if unified_inventory then
R 11     unified_inventory.register_craft({
82cba9 12     type = "grinding",
R 13     output = string2,
41af01 14     items = {string1},
R 15     width = 0,
82cba9 16     })
R 17     end
18 end
19
20 register_grinder_recipe("default:stone","default:sand")
21 register_grinder_recipe("default:cobble","default:gravel")
22 register_grinder_recipe("default:gravel","default:dirt")
23 register_grinder_recipe("default:desert_stone","default:desert_sand")
24 register_grinder_recipe("default:iron_lump","technic:iron_dust 2") 
25 register_grinder_recipe("default:coal_lump","technic:coal_dust 2") 
8d092c 26 register_grinder_recipe("default:copper_lump","technic:copper_dust 2")
82cba9 27 register_grinder_recipe("moreores:tin_lump","technic:tin_dust 2") 
R 28 register_grinder_recipe("moreores:silver_lump","technic:silver_dust 2")
8d092c 29 register_grinder_recipe("default:gold_lump","technic:gold_dust 2") 
82cba9 30 register_grinder_recipe("moreores:mithril_lump","technic:mithril_dust 2") 
R 31 register_grinder_recipe("technic:chromium_lump","technic:chromium_dust 2") 
32 register_grinder_recipe("technic:zinc_lump","technic:zinc_dust 2") 
33 register_grinder_recipe("technic:coal_dust","dye:black 2") 
34 register_grinder_recipe("default:cactus","dye:green 2") 
35 register_grinder_recipe("default:dry_shrub","dye:brown 2") 
36 register_grinder_recipe("flowers:flower_geranium","dye:blue 2") 
37 register_grinder_recipe("flowers:flower_dandelion_white","dye:white 2") 
38 register_grinder_recipe("flowers:flower_dandelion_yellow","dye:yellow 2") 
39 register_grinder_recipe("flowers:flower_tulip","dye:orange 2") 
40 register_grinder_recipe("flowers:flower_rose","dye:red 2") 
41 register_grinder_recipe("flowers:flower_viola","dye:violet 2") 
42
43 minetest.register_craftitem( "technic:coal_dust", {
44     description = "Coal Dust",
45     inventory_image = "technic_coal_dust.png",
46     on_place_on_ground = minetest.craftitem_place_item,
47     })
48
49 minetest.register_craftitem( "technic:iron_dust", {
50     description = "Iron Dust",
51     inventory_image = "technic_iron_dust.png",
52     on_place_on_ground = minetest.craftitem_place_item,
53     })
54
55 minetest.register_craft({
56     type = "cooking",
57     output = "default:steel_ingot",
58     recipe = "technic:iron_dust",
59 }) 
60
61 minetest.register_craftitem( "technic:copper_dust", {
62     description = "Copper Dust",
63     inventory_image = "technic_copper_dust.png",
64     on_place_on_ground = minetest.craftitem_place_item,
65     })
66 minetest.register_craft({
67     type = "cooking",
68     output = "moreores:copper_ingot",
69     recipe = "technic:copper_dust",
70 }) 
71
72 minetest.register_craftitem( "technic:tin_dust", {
73     description = "Tin Dust",
74     inventory_image = "technic_tin_dust.png",
75     on_place_on_ground = minetest.craftitem_place_item,
76     })
77 minetest.register_craft({
78     type = "cooking",
79     output = "moreores:tin_ingot",
80     recipe = "technic:tin_dust",
81 }) 
82
83 minetest.register_craftitem( "technic:silver_dust", {
84     description = "Silver Dust",
85     inventory_image = "technic_silver_dust.png",
86     on_place_on_ground = minetest.craftitem_place_item,
87     })
88 minetest.register_craft({
89     type = "cooking",
90     output = "moreores:silver_ingot",
91     recipe = "technic:silver_dust",
92 }) 
93
94 minetest.register_craftitem( "technic:gold_dust", {
95     description = "Gold Dust",
96     inventory_image = "technic_gold_dust.png",
97     on_place_on_ground = minetest.craftitem_place_item,
98     })
99 minetest.register_craft({
100     type = "cooking",
101     output = "moreores:gold_ingot",
102     recipe = "technic:gold_dust",
103 }) 
104
105 minetest.register_craftitem( "technic:mithril_dust", {
106     description = "Mithril Dust",
107     inventory_image = "technic_mithril_dust.png",
108     on_place_on_ground = minetest.craftitem_place_item,
109     })
110 minetest.register_craft({
111     type = "cooking",
112     output = "moreores:mithril_ingot",
113     recipe = "technic:mithril_dust",
114 }) 
115
116 minetest.register_craftitem( "technic:chromium_dust", {
117     description = "Chromium Dust",
118     inventory_image = "technic_chromium_dust.png",
119     on_place_on_ground = minetest.craftitem_place_item,
120     })
121 minetest.register_craft({
122     type = "cooking",
123     output = "technic:chromium_ingot",
124     recipe = "technic:chromium_dust",
125 }) 
126
127 minetest.register_craftitem( "technic:bronze_dust", {
128     description = "Bronze Dust",
129     inventory_image = "technic_bronze_dust.png",
130     on_place_on_ground = minetest.craftitem_place_item,
131     })
132 minetest.register_craft({
133     type = "cooking",
134     output = "moreores:bronze_ingot",
135     recipe = "technic:bronze_dust",
136 }) 
137
138 minetest.register_craftitem( "technic:brass_dust", {
139     description = "Brass Dust",
140     inventory_image = "technic_brass_dust.png",
141     on_place_on_ground = minetest.craftitem_place_item,
142     })
143 minetest.register_craft({
144     type = "cooking",
145     output = "technic:brass_ingot",
146     recipe = "technic:brass_dust",
147 }) 
148
149 minetest.register_craftitem( "technic:stainless_steel_dust", {
150     description = "Stainless Steel Dust",
151     inventory_image = "technic_stainless_steel_dust.png",
152     })
153
154 minetest.register_craft({
155     type = "cooking",
156     output = "technic:stainless_steel_ingot",
157     recipe = "technic:stainless_steel_dust",
158 }) 
159
160 minetest.register_craftitem( "technic:zinc_dust", {
161     description = "Zinc Dust",
162     inventory_image = "technic_zinc_dust.png",
163     })
164
165 minetest.register_craft({
166     type = "cooking",
167     output = "technic:zinc_ingot",
168     recipe = "technic:zinc_dust",
169 }) 
170
171 minetest.register_alias("grinder", "technic:grinder")
172 minetest.register_craft({
173     output = 'technic:grinder',
174     recipe = {
175         {'default:desert_stone', 'default:desert_stone', 'default:desert_stone'},
279776 176         {'default:desert_stone', 'default:diamond', 'default:desert_stone'},
82cba9 177         {'default:stone', 'moreores:copper_ingot', 'default:stone'},
R 178     }
179 })
180
181 minetest.register_craftitem("technic:grinder", {
182     description = "Grinder",
183     stack_max = 99,
184 }) 
185
186 grinder_formspec =
187     "invsize[8,9;]"..
188     "image[1,1;1,2;technic_power_meter_bg.png]"..
189     "label[0,0;Grinder]"..
190     "label[1,3;Power level]"..
191     "list[current_name;src;3,1;1,1;]"..
192     "list[current_name;dst;5,1;2,2;]"..
193     "list[current_player;main;0,5;8,4;]"
612349 194
82cba9 195
R 196 minetest.register_node("technic:grinder", {
197     description = "Grinder",
86f39a 198     tiles = {"technic_lv_grinder_top.png", "technic_lv_grinder_bottom.png", "technic_lv_grinder_side.png",
R 199         "technic_lv_grinder_side.png", "technic_lv_grinder_side.png", "technic_lv_grinder_front.png"},
82cba9 200     paramtype2 = "facedir",
a2aef2 201     groups = {cracky=2},
82cba9 202     legacy_facedir_simple = true,
R 203     sounds = default.node_sound_wood_defaults(),
204     technic_power_machine=1,
205     internal_EU_buffer=0;
206     internal_EU_buffer_size=5000;
207     grind_time=0;
208     grinded = nil;
209     src_time = 0;
210     on_construct = function(pos)
211         local meta = minetest.env:get_meta(pos)
212         meta:set_string("infotext", "Grinder")
213         meta:set_float("technic_power_machine", 1)
214         meta:set_float("internal_EU_buffer", 0)
215         meta:set_float("internal_EU_buffer_size", 5000)
216         meta:set_string("formspec", grinder_formspec)
217         meta:set_float("grind_time", 0)
218         local inv = meta:get_inventory()
219         inv:set_size("src", 1)
220         inv:set_size("dst", 4)
612349 221         end,
82cba9 222     can_dig = function(pos,player)
R 223         local meta = minetest.env:get_meta(pos);
224         local inv = meta:get_inventory()
225         if not inv:is_empty("src") then
226             return false
227         end
228         if not inv:is_empty("dst") then
229             return false
230         end
231         return true
232         end,
a2aef2 233 })
82cba9 234
a2aef2 235 minetest.register_node("technic:grinder_active", {
R 236     description = "Grinder",
237     tiles = {"technic_lv_grinder_top.png", "technic_lv_grinder_bottom.png", "technic_lv_grinder_side.png",
238         "technic_lv_grinder_side.png", "technic_lv_grinder_side.png", "technic_lv_grinder_front_active.png"},
239     paramtype2 = "facedir",
240     groups = {cracky=2,not_in_creative_inventory=1},
241     legacy_facedir_simple = true,
242     sounds = default.node_sound_wood_defaults(),
243     can_dig = function(pos,player)
244         local meta = minetest.env:get_meta(pos);
245         local inv = meta:get_inventory()
246         if not inv:is_empty("src") then
247             return false
248         end
249         if not inv:is_empty("dst") then
250             return false
251         end
252         return true
253         end,
82cba9 254 })
R 255
256 minetest.register_abm({
a2aef2 257     nodenames = {"technic:grinder","technic:grinder_active"},
82cba9 258     interval = 1,
R 259     chance = 1,
260     action = function(pos, node, active_object_count, active_object_count_wider)
261
262     local meta = minetest.env:get_meta(pos)
263     local charge= meta:get_float("internal_EU_buffer")
264     local max_charge= meta:get_float("internal_EU_buffer_size")
265     local grind_cost=200
266
267     local load = math.floor((charge/max_charge)*100)
268     meta:set_string("formspec",
269                 "invsize[8,9;]"..
270                 "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
271                         (load)..":technic_power_meter_fg.png]"..
272                 "label[0,0;Grinder]"..
273                 "label[1,3;Power level]"..
274                 "list[current_name;src;3,1;1,1;]"..
275                 "list[current_name;dst;5,1;2,2;]"..
276                 "list[current_player;main;0,5;8,4;]"
277                 )
612349 278
82cba9 279         local inv = meta:get_inventory()
R 280         local srclist = inv:get_list("src")
281         if inv:is_empty("src") then meta:set_float("grinder_on",0) end 
612349 282
82cba9 283         if (meta:get_float("grinder_on") == 1) then
R 284             if charge>=grind_cost then
285             charge=charge-grind_cost;
286             meta:set_float("internal_EU_buffer",charge)
287             meta:set_float("src_time", meta:get_float("src_time") + 1)
288             if meta:get_float("src_time") >= meta:get_float("grind_time") then
289                 -- check if there's room for output in "dst" list
290                 grinded = get_grinded_item (inv:get_stack("src", 1))        
291                 if inv:room_for_item("dst",grinded) then
292                     -- Put result in "dst" list
293                     inv:add_item("dst", grinded)
294                     -- take stuff from "src" list
295                     srcstack = inv:get_stack("src", 1)
296                     srcstack:take_item()
297                     inv:set_stack("src", 1, srcstack)
298                     if inv:is_empty("src") then meta:set_float("grinder_on",0) end 
299                 else
300                     print("Grinder inventory full!")
301                 end
302                 meta:set_float("src_time", 0)
303             end
612349 304             end
82cba9 305         end
R 306         if (meta:get_float("grinder_on")==0) then
307         local grinded=nil 
308         if not inv:is_empty("src") then
a2aef2 309             grinded = get_grinded_item (inv:get_stack("src", 1))
R 310             if grinded then 
311                 meta:set_float("grinder_on",1)
312                 hacky_swap_node(pos,"technic:grinder_active")
313                 meta:set_string("infotext", "Grinder Active")
314                 grind_time=4
315                 meta:set_float("grind_time",grind_time)
316                 meta:set_float("src_time", 0)
317                 return
318             end
319             else 
320                 hacky_swap_node(pos,"technic:grinder")
321                 meta:set_string("infotext", "Grinder Inactive")
82cba9 322         end
R 323         end
324     end
325 }) 
326
327 function get_grinded_item (items)
328 new_item =nil
329 src_item=items:to_table()
330 item_name=src_item["name"]
331
332 local counter=registered_grinder_recipes_count-1
333 for i=1, counter,1 do
612349 334     if    grinder_recipes[i].src_name==item_name then return ItemStack(grinder_recipes[i].dst_name) end
82cba9 335 end
R 336 return nil
337 end
612349 338
R 339 register_LV_machine ("technic:grinder","RE")
a2aef2 340 register_LV_machine ("technic:grinder_active","RE")