mods/ITEMS/REDSTONE/mesecons_pressureplates/init.lua

   1 local S = minetest.get_translator("mesecons_pressureplates")
   2
   3 local PRESSURE_PLATE_INTERVAL = 0.04
   4
   5 local pp_box_off = {
   6         type = "fixed",
   7         fixed = { -7/16, -8/16, -7/16, 7/16, -7/16, 7/16 },
   8 }
   9
  10 local pp_box_on = {
  11         type = "fixed",
  12         fixed = { -7/16, -8/16, -7/16, 7/16, -7.5/16, 7/16 },
  13 }
  14
  15 local function pp_on_timer(pos, elapsed)
  16         local node = minetest.get_node(pos)
  17         local basename = minetest.registered_nodes[node.name].pressureplate_basename
  18         local activated_by = minetest.registered_nodes[node.name].pressureplate_activated_by
  19
  20         -- This is a workaround for a strange bug that occurs when the server is started
  21         -- For some reason the first time on_timer is called, the pos is wrong
  22         if not basename then return end
  23
  24         if activated_by == nil then
  25                 activated_by = { any = true }
  26         end
  27
  28         local obj_does_activate = function(obj, activated_by)
  29                 if activated_by.any then
  30                         return true
  31                 elseif activated_by.mob and obj:get_luaentity() and obj:get_luaentity()._cmi_is_mob == true then
  32                         return true
  33                 elseif activated_by.player and obj:is_player() then
  34                         return true
  35                 else
  36                         return false
  37                 end
  38         end
  39
  40         local objs = minetest.get_objects_inside_radius(pos, 1)
  41
  42         if node.name == basename .. "_on" then
  43                 local disable
  44                 if #objs == 0 then
  45                         disable = true
  46                 elseif not activated_by.any then
  47                         disable = true
  48                         for k, obj in pairs(objs) do
  49                                 if obj_does_activate(obj, activated_by) then
  50                                         disable = false
  51                                         break
  52                                 end
  53                         end
  54                 end
  55                 if disable then
  56                         minetest.set_node(pos, {name = basename .. "_off"})
  57                         mesecon.receptor_off(pos, mesecon.rules.pplate)
  58                 end
  59         elseif node.name == basename .. "_off" then
  60                 for k, obj in pairs(objs) do
  61                         local objpos = obj:get_pos()
  62                         if obj_does_activate(obj, activated_by) then
  63                                 if objpos.y > pos.y-1 and objpos.y < pos.y then
  64                                         minetest.set_node(pos, {name = basename .. "_on"})
  65                                         mesecon.receptor_on(pos, mesecon.rules.pplate)
  66                                         break
  67                                 end
  68                         end
  69                 end
  70         end
  71         return true
  72 end
  73
  74 -- Register a Pressure Plate
  75 -- basename:    base name of the pressure plate
  76 -- description: description displayed in the player's inventory
  77 -- textures_off:textures of the pressure plate when inactive
  78 -- textures_on: textures of the pressure plate when active
  79 -- image_w:     wield image of the pressure plate
  80 -- image_i:     inventory image of the pressure plate
  81 -- recipe:      crafting recipe of the pressure plate
  82 -- sounds:      sound table (like in minetest.register_node)
  83 -- plusgroups:  group memberships (attached_node=1 and not_in_creative_inventory=1 are already used)
  84 -- activated_by: optinal table with elements denoting by which entities this pressure plate is triggered
  85 --              Possible table fields:
  86 --              * player=true: Player
  87 --              * mob=true: Mob
  88 --              By default, is triggered by all entities
  89 -- longdesc:    Customized long description for the in-game help (if omitted, a dummy text is used)
  90
  91 function mesecon.register_pressure_plate(basename, description, textures_off, textures_on, image_w, image_i, recipe, sounds, plusgroups, activated_by, longdesc)
  92         local groups_off = table.copy(plusgroups)
  93         groups_off.attached_node = 1
  94         groups_off.dig_by_piston = 1
  95         groups_off.pressure_plate = 1
  96         local groups_on = table.copy(groups_off)
  97         groups_on.not_in_creative_inventory = 1
  98         groups_on.pressure_plate = 2
  99         if not longdesc then
 100                 longdesc = S("A pressure plate is a redstone component which supplies its surrounding blocks with redstone power while someone or something rests on top of it.")
 101         end
 102         local tt = S("Provides redstone power when pushed")
 103         if not activated_by then
 104                 tt = tt .. "\n" .. S("Pushable by players, mobs and objects")
 105         elseif activated_by.mob and activated_by.player then
 106                 tt = tt .. "\n" .. S("Pushable by players and mobs")
 107         elseif activated_by.mob then
 108                 tt = tt .. "\n" .. S("Pushable by mobs")
 109         elseif activated_by.player then
 110                 tt = tt .. "\n" .. S("Pushable by players")
 111         end
 112
 113         mesecon.register_node(basename, {
 114                 drawtype = "nodebox",
 115                 inventory_image = image_i,
 116                 wield_image = image_w,
 117                 paramtype = "light",
 118                 walkable = false,
 119                 description = description,
 120                 on_timer = pp_on_timer,
 121                 on_construct = function(pos)
 122                         minetest.get_node_timer(pos):start(PRESSURE_PLATE_INTERVAL)
 123                 end,
 124                 sounds = sounds,
 125                 is_ground_content = false,
 126                 pressureplate_basename = basename,
 127                 pressureplate_activated_by = activated_by,
 128                 _mcl_blast_resistance = 0.5,
 129                 _mcl_hardness = 0.5,
 130         },{
 131                 node_box = pp_box_off,
 132                 selection_box = pp_box_off,
 133                 groups = groups_off,
 134                 tiles = textures_off,
 135
 136                 mesecons = {receptor = { state = mesecon.state.off, rules = mesecon.rules.pplate }},
 137                 _doc_items_longdesc = longdesc,
 138                 _tt_help = tt,
 139         },{
 140                 node_box = pp_box_on,
 141                 selection_box = pp_box_on,
 142                 groups = groups_on,
 143                 tiles = textures_on,
 144                 description = "",
 145
 146                 mesecons = {receptor = { state = mesecon.state.on, rules = mesecon.rules.pplate }},
 147                 _doc_items_create_entry = false,
 148         })
 149
 150         minetest.register_craft({
 151                 output = basename .. "_off",
 152                 recipe = recipe,
 153         })
 154
 155         if minetest.get_modpath("doc") then
 156                 doc.add_entry_alias("nodes", basename .. "_off", "nodes", basename .. "_on")
 157         end
 158 end
 159
 160 local woods = {
 161         { "wood", "mcl_core:wood", "default_wood.png", S("Oak Pressure Plate") },
 162         { "acaciawood", "mcl_core:acaciawood", "default_acacia_wood.png", S("Acacia Pressure Plate") },
 163         { "birchwood", "mcl_core:birchwood", "mcl_core_planks_birch.png", S("Birch Pressure Plate") },
 164         { "darkwood", "mcl_core:darkwood", "mcl_core_planks_big_oak.png", S("Dark Oak Pressure Plate" )},
 165         { "sprucewood", "mcl_core:sprucewood", "mcl_core_planks_spruce.png", S("Spruce Pressure Plate") },
 166         { "junglewood", "mcl_core:junglewood", "default_junglewood.png", S("Jungle Pressure Plate") },
 167 }
 168
 169 for w=1, #woods do
 170         mesecon.register_pressure_plate(
 171                 "mesecons_pressureplates:pressure_plate_"..woods[w][1],
 172                 woods[w][4],
 173                 {woods[w][3]},
 174                 {woods[w][3]},
 175                 woods[w][3],
 176                 nil,
 177                 {{woods[w][2], woods[w][2]}},
 178                 mcl_sounds.node_sound_wood_defaults(),
 179                 {axey=1, material_wood=1},
 180                 nil,
 181                 S("A wooden pressure plate is a redstone component which supplies its surrounding blocks with redstone power while any movable object (including dropped items, players and mobs) rests on top of it."))
 182
 183         minetest.register_craft({
 184                 type = "fuel",
 185                 recipe = "mesecons_pressureplates:pressure_plate_"..woods[w][1].."_off",
 186                 burntime = 15
 187         })
 188
 189 end
 190
 191 mesecon.register_pressure_plate(
 192         "mesecons_pressureplates:pressure_plate_stone",
 193         S("Stone Pressure Plate"),
 194         {"default_stone.png"},
 195         {"default_stone.png"},
 196         "default_stone.png",
 197         nil,
 198         {{"mcl_core:stone", "mcl_core:stone"}},
 199         mcl_sounds.node_sound_stone_defaults(),
 200         {pickaxey=1, material_stone=1},
 201         { player = true, mob = true },
 202         S("A stone pressure plate is a redstone component which supplies its surrounding blocks with redstone power while a player or mob stands on top of it. It is not triggered by anything else."))
 203
 204