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