2018-05-29 14:25:25 +03:00
-- Core mcl_stairs API
2017-11-18 21:57:41 +02:00
-- Wrapper around mintest.pointed_thing_to_face_pos.
local function get_fpos ( placer , pointed_thing )
local fpos
-- Workaround: minetest.pointed_thing_to_face_pos crashes in MT 0.4.16 if
-- pointed_thing.under and pointed_thing.above are equal
-- FIXME: Remove this when MT got fixed.
if not vector.equals ( pointed_thing.under , pointed_thing.above ) then
-- The happy case: Everything is normal
local finepos = minetest.pointed_thing_to_face_pos ( placer , pointed_thing )
fpos = finepos.y % 1
else
-- Fallback if both above and under are equal
fpos = 0
end
return fpos
end
2017-06-05 20:11:01 +03:00
local function place_slab_normal ( itemstack , placer , pointed_thing )
2017-07-24 21:10:13 +03:00
-- Use pointed node's on_rightclick function first, if present
local node = minetest.get_node ( pointed_thing.under )
if placer and not placer : get_player_control ( ) . sneak then
if minetest.registered_nodes [ node.name ] and minetest.registered_nodes [ node.name ] . on_rightclick then
return minetest.registered_nodes [ node.name ] . on_rightclick ( pointed_thing.under , node , placer , itemstack ) or itemstack
end
end
2017-06-05 20:11:01 +03:00
local p0 = pointed_thing.under
local p1 = pointed_thing.above
local placer_pos = placer : getpos ( )
2017-11-18 21:57:41 +02:00
local fpos = get_fpos ( placer , pointed_thing )
2017-06-05 20:11:01 +03:00
local place = ItemStack ( itemstack )
local origname = itemstack : get_name ( )
if p0.y - 1 == p1.y or ( fpos > 0 and fpos < 0.5 )
or ( fpos < - 0.5 and fpos > - 0.999999999 ) then
place : set_name ( origname .. " _top " )
end
local ret = minetest.item_place ( place , placer , pointed_thing , 0 )
ret : set_name ( origname )
return ret
end
local function place_stair ( itemstack , placer , pointed_thing )
2017-07-24 21:10:13 +03:00
-- Use pointed node's on_rightclick function first, if present
local node = minetest.get_node ( pointed_thing.under )
if placer and not placer : get_player_control ( ) . sneak then
if minetest.registered_nodes [ node.name ] and minetest.registered_nodes [ node.name ] . on_rightclick then
return minetest.registered_nodes [ node.name ] . on_rightclick ( pointed_thing.under , node , placer , itemstack ) or itemstack
end
end
2017-06-05 20:11:01 +03:00
local p0 = pointed_thing.under
local p1 = pointed_thing.above
local param2 = 0
local placer_pos = placer : getpos ( )
if placer_pos then
param2 = minetest.dir_to_facedir ( vector.subtract ( p1 , placer_pos ) )
end
2017-11-20 04:26:34 +02:00
local fpos = get_fpos ( placer , pointed_thing )
2017-06-05 20:11:01 +03:00
if p0.y - 1 == p1.y or ( fpos > 0 and fpos < 0.5 )
or ( fpos < - 0.5 and fpos > - 0.999999999 ) then
param2 = param2 + 20
if param2 == 21 then
param2 = 23
elseif param2 == 23 then
param2 = 21
end
end
return minetest.item_place ( itemstack , placer , pointed_thing , param2 )
end
2018-05-29 14:25:25 +03:00
-- Register stairs.
2017-06-05 20:11:01 +03:00
-- Node will be called mcl_stairs:stair_<subname>
2018-05-29 14:25:25 +03:00
function mcl_stairs . register_stair ( subname , recipeitem , groups , images , description , sounds , hardness , corner_texture_override )
2017-06-05 20:11:01 +03:00
groups.stair = 1
groups.building_block = 1
2017-12-08 20:03:20 +02:00
if recipeitem then
if not images then
images = minetest.registered_items [ recipeitem ] . tiles
end
if not groups then
groups = minetest.registered_items [ recipeitem ] . groups
end
if not sounds then
sounds = minetest.registered_items [ recipeitem ] . sounds
end
if not hardness then
hardness = minetest.registered_items [ recipeitem ] . _mcl_hardness
end
end
2017-06-05 20:11:01 +03:00
minetest.register_node ( " :mcl_stairs:stair_ " .. subname , {
description = description ,
_doc_items_longdesc = " Stairs are useful to reach higher places by walking over them; jumping is not required. Placing stairs in a corner pattern will create corner stairs. Stairs placed on the bottom or at the upper half of the side of a block will be placed upside down. " ,
drawtype = " mesh " ,
mesh = " stairs_stair.obj " ,
tiles = images ,
paramtype = " light " ,
paramtype2 = " facedir " ,
is_ground_content = false ,
groups = groups ,
sounds = sounds ,
selection_box = {
type = " fixed " ,
fixed = {
{ - 0.5 , - 0.5 , - 0.5 , 0.5 , 0 , 0.5 } ,
{ - 0.5 , 0 , 0 , 0.5 , 0.5 , 0.5 } ,
} ,
} ,
collision_box = {
type = " fixed " ,
fixed = {
{ - 0.5 , - 0.5 , - 0.5 , 0.5 , 0 , 0.5 } ,
{ - 0.5 , 0 , 0 , 0.5 , 0.5 , 0.5 } ,
} ,
} ,
on_place = function ( itemstack , placer , pointed_thing )
if pointed_thing.type ~= " node " then
return itemstack
end
return place_stair ( itemstack , placer , pointed_thing )
end ,
_mcl_hardness = hardness ,
} )
if recipeitem then
minetest.register_craft ( {
output = ' mcl_stairs:stair_ ' .. subname .. ' 4 ' ,
recipe = {
{ recipeitem , " " , " " } ,
{ recipeitem , recipeitem , " " } ,
{ recipeitem , recipeitem , recipeitem } ,
} ,
} )
-- Flipped recipe
minetest.register_craft ( {
output = ' mcl_stairs:stair_ ' .. subname .. ' 4 ' ,
recipe = {
{ " " , " " , recipeitem } ,
{ " " , recipeitem , recipeitem } ,
{ recipeitem , recipeitem , recipeitem } ,
} ,
} )
end
2018-05-29 14:25:25 +03:00
mcl_stairs.cornerstair . add ( " mcl_stairs:stair_ " .. subname , corner_texture_override )
2017-06-05 20:11:01 +03:00
end
-- Slab facedir to placement 6d matching table
local slab_trans_dir = { [ 0 ] = 8 , 0 , 2 , 1 , 3 , 4 }
-- Register slabs.
-- Node will be called mcl_stairs:slab_<subname>
-- double_description: NEW argument, not supported in Minetest Game
-- double_description: Description of double slab
function mcl_stairs . register_slab ( subname , recipeitem , groups , images , description , sounds , hardness , double_description )
local lower_slab = " mcl_stairs:slab_ " .. subname
local upper_slab = lower_slab .. " _top "
local double_slab = lower_slab .. " _double "
2017-12-08 20:03:20 +02:00
if recipeitem then
if not images then
images = minetest.registered_items [ recipeitem ] . tiles
end
if not groups then
groups = minetest.registered_items [ recipeitem ] . groups
end
if not sounds then
sounds = minetest.registered_items [ recipeitem ] . sounds
end
if not hardness then
hardness = minetest.registered_items [ recipeitem ] . _mcl_hardness
end
end
2017-06-05 20:11:01 +03:00
-- Automatically generate double slab description
if not double_description then
double_description = string.format ( " Double %s " , description )
minetest.log ( " warning " , " [stairs] No explicit description for double slab ' " .. double_slab .. " ' added. Using auto-generated description. " )
end
groups.slab = 1
groups.building_block = 1
local longdesc = " Slabs are half as high as their full block counterparts and occupy either the lower or upper part of a block, depending on how it was placed. Slabs can be easily stepped on without needing to jump. When a slab is placed on another slab of the same type, a double slab is created. "
local slabdef = {
description = description ,
_doc_items_longdesc = longdesc ,
drawtype = " nodebox " ,
tiles = images ,
paramtype = " light " ,
-- Facedir intentionally left out (see below)
is_ground_content = false ,
groups = groups ,
sounds = sounds ,
node_box = {
type = " fixed " ,
fixed = { - 0.5 , - 0.5 , - 0.5 , 0.5 , 0 , 0.5 } ,
} ,
on_place = function ( itemstack , placer , pointed_thing )
local under = minetest.get_node ( pointed_thing.under )
local wield_item = itemstack : get_name ( )
2017-08-09 17:17:00 +03:00
local creative_enabled = minetest.settings : get_bool ( " creative_mode " )
2017-06-05 20:11:01 +03:00
-- place slab using under node orientation
local dir = vector.subtract ( pointed_thing.above , pointed_thing.under )
local p2 = under.param2
-- combine two slabs if possible
-- Requirements: Same slab material, must be placed on top of lower slab, or on bottom of upper slab
2017-06-29 14:02:53 +03:00
if ( wield_item == under.name or ( minetest.registered_nodes [ under.name ] and wield_item == minetest.registered_nodes [ under.name ] . _mcl_other_slab_half ) ) and
2017-06-05 20:11:01 +03:00
not ( ( dir.y >= 0 and minetest.get_item_group ( under.name , " slab_top " ) == 1 ) or
( dir.y <= 0 and minetest.get_item_group ( under.name , " slab_top " ) == 0 ) ) then
local player_name = placer : get_player_name ( )
if minetest.is_protected ( pointed_thing.under , player_name ) and not
minetest.check_player_privs ( placer , " protection_bypass " ) then
minetest.record_protection_violation ( pointed_thing.under ,
player_name )
return
end
local newnode = double_slab
minetest.set_node ( pointed_thing.under , { name = newnode , param2 = p2 } )
if not creative_enabled then
itemstack : take_item ( )
end
return itemstack
-- No combination possible: Place slab normally
else
return place_slab_normal ( itemstack , placer , pointed_thing )
end
end ,
_mcl_hardness = hardness ,
_mcl_other_slab_half = upper_slab ,
}
minetest.register_node ( " : " .. lower_slab , slabdef )
-- Register the upper slab.
-- Using facedir is not an option, as this would rotate the textures as well and would make
-- e.g. upper sandstone slabs look completely wrong.
local topdef = table.copy ( slabdef )
topdef.groups . slab = 1
topdef.groups . slab_top = 1
topdef.groups . not_in_creative_inventory = 1
topdef.groups . not_in_craft_guide = 1
topdef.description = string.format ( " Upper %s " , description )
topdef._doc_items_create_entry = false
topdef._doc_items_longdesc = nil
topdef._doc_items_usagehelp = nil
topdef.drop = lower_slab
topdef._mcl_other_slab_half = lower_slab
topdef.node_box = {
type = " fixed " ,
fixed = { - 0.5 , 0 , - 0.5 , 0.5 , 0.5 , 0.5 } ,
}
topdef.selection_box = {
type = " fixed " ,
fixed = { - 0.5 , 0 , - 0.5 , 0.5 , 0.5 , 0.5 } ,
}
minetest.register_node ( " : " .. upper_slab , topdef )
-- Double slab node
local dgroups = table.copy ( groups )
dgroups.not_in_creative_inventory = 1
dgroups.not_in_craft_guide = 1
dgroups.slab = nil
dgroups.double_slab = 1
minetest.register_node ( " : " .. double_slab , {
description = double_description ,
_doc_items_longdesc = " Double slabs are full blocks which are created by placing two slabs of the same kind on each other. " ,
tiles = images ,
is_ground_content = false ,
groups = dgroups ,
sounds = sounds ,
drop = lower_slab .. " 2 " ,
_mcl_hardness = hardness ,
} )
if recipeitem then
minetest.register_craft ( {
output = lower_slab .. " 6 " ,
recipe = {
{ recipeitem , recipeitem , recipeitem } ,
} ,
} )
end
-- Help alias for the upper slab
if minetest.get_modpath ( " doc " ) then
doc.add_entry_alias ( " nodes " , lower_slab , " nodes " , upper_slab )
end
end
-- Stair/slab registration function.
-- Nodes will be called mcl_stairs:{stair,slab}_<subname>
function mcl_stairs . register_stair_and_slab ( subname , recipeitem ,
groups , images , desc_stair , desc_slab , sounds , hardness ,
double_description )
mcl_stairs.register_stair ( subname , recipeitem , groups , images , desc_stair , sounds , hardness )
mcl_stairs.register_slab ( subname , recipeitem , groups , images , desc_slab , sounds , hardness , double_description )
end
-- Very simple registration function
-- Makes stair and slab out of a source node
function mcl_stairs . register_stair_and_slab_simple ( subname , sourcenode , desc_stair , desc_slab , desc_double_slab )
local def = minetest.registered_nodes [ sourcenode ]
local groups = { }
-- Only allow a strict set of groups to be added to stairs and slabs for more predictable results
local allowed_groups = { " dig_immediate " , " handy " , " pickaxey " , " axey " , " shovely " , " shearsy " , " shearsy_wool " , " swordy " , " swordy_wool " }
for a = 1 , # allowed_groups do
if def.groups [ allowed_groups [ a ] ] then
groups [ allowed_groups [ a ] ] = def.groups [ allowed_groups [ a ] ]
end
end
mcl_stairs.register_stair_and_slab ( subname , sourcenode , groups , def.tiles , desc_stair , desc_slab , def.sounds , def._mcl_hardness , desc_double_slab )
end