minetest-stuffs/dragonfire-client-waspsaliva
minetest-stuffs/dragonfire-client-waspsaliva
1
0
Fork 0
Code Issues 2 Pull Requests Releases 2 Wiki Activity

add missing files

Browse Source
This commit is contained in:
cora 2021-03-27 22:25:11 +01:00 committed by Schmappie Eldress
parent b2bf5e5b63
commit 8884c81f08
12 changed files with 385 additions and 87 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
clientmods/autoeat/init.lua
View File

@ -58,11 +58,11 @@ minetest.register_globalstep(function(dtime)
autoeat.eat()
end
end)
minetest.after(3, function()
local function get_hud()
local player = minetest.localplayer
local def
local i = -1
if not player then minetest.after(5,get_hud) end
repeat
i = i + 1
def = player:hud_get(i)
@ -70,6 +70,7 @@ minetest.after(3, function()
if def then
hud_id = i
end
end)
end
minetest.after(15,get_hud )
minetest.register_cheat("AutoEat", "Player", "autoeat")

69
clientmods/autofly/init.lua
View File

@ -78,9 +78,47 @@ function autofly.get2ddst(pos1,pos2)
end
local last_sprint = false
local hud_ah=nil
function autofly.update_ah()
local pos=vector.new(0,0,0)
local ppos=minetest.localplayer:get_pos()
local yaw=math.floor(minetest.localplayer:get_yaw())
local theta =(yaw * math.pi / 180)
pos.x= math.floor( 100 * math.cos(theta) )
pos.z= math.floor( 100 * math.sin(theta) )
pos=vector.add(ppos,pos)
pos.y=ppos.y
local nname=pos_to_string(pos).."\n"..yaw.."\n"..'__________________________________________________________________________________________________________________________________________________'
if hud_ah then
minetest.display_chat_message(pos.x..","..pos.z)
minetest.localplayer:hud_change(hud_ah, 'world_pos', pos)
minetest.localplayer:hud_change(hud_ah, 'name', nname)
else
hud_ah = minetest.localplayer:hud_add({
hud_elem_type = 'waypoint',
name = nname,
title = pos_to_string(pos),
text = '',
number = 0x00ff00,
world_pos = pos,
precision = 0,
width = 1000
})
end
end
minetest.register_globalstep(function()
if not minetest.localplayer then return end
-- autofly.update_ah()
end)
minetest.register_globalstep(function()
if not minetest.localplayer then return end
autofly.axissnap()
if minetest.settings:get_bool("autosprint") or (minetest.settings:get_bool("continuous_forward") and minetest.settings:get_bool("autofsprint")) then
core.set_keypress("special1", true)
@ -121,6 +159,10 @@ minetest.register_globalstep(function()
autofly.cruise()
end)
function autofly.get_speed()
return speed
end
function autofly.set_hud_wp(pos, title)
if hud_wp then
@ -153,8 +195,8 @@ function autofly.get_quad()
local lp=minetest.localplayer:get_pos()
local quad=""
if lp.z < 0 then quad="Q: South"
else quad="Q: North" end
if lp.z < 0 then quad="South"
else quad="North" end
if lp.x < 0 then quad=quad.."-west"
else quad=quad.."-east" end
@ -162,6 +204,13 @@ function autofly.get_quad()
return quad
end
function autofly.get_wdir()
local qd=autofly.get_quad()
end
function autofly.get_local_name()
local ww=autofly.getwps()
local lp=minetest.localplayer:get_pos()
@ -352,21 +401,7 @@ function autofly.cruise()
end
function autofly.aim(tpos)
local ppos=minetest.localplayer:get_pos()
--local dir=tpos
local dir=vector.direction(ppos,tpos)
local yyaw=0;
local pitch=0;
if dir.x < 0 then
yyaw = math.atan2(-dir.x, dir.z) + (math.pi * 2)
else
yyaw = math.atan2(-dir.x, dir.z)
end
yyaw = ws.round2(math.deg(yyaw),2)
pitch = ws.round2(math.deg(math.asin(-dir.y) * 1),2);
minetest.localplayer:set_yaw(yyaw)
minetest.localplayer:set_pitch(pitch)
return ws.aim(tpos)
end
function autofly.autotp(tpname)

11
clientmods/dragonfire/world/init.lua
View File

@ -119,6 +119,16 @@ minetest.register_globalstep(function(dtime)
elseif minetest.settings:get_bool("block_lava") then
local positions = minetest.find_nodes_near(pos, 5, {"mcl_core:lava_source", "mcl_core:lava_flowing"}, true)
for i, p in pairs(positions) do
if i > nodes_per_tick then return end
minetest.place_node(p)
end
elseif minetest.settings:get_bool("block_sources") then
local positions = minetest.find_nodes_near(pos, 5, {"mcl_core:lava_source","mcl_nether:nether_lava_source","mcl_core:water_source"}, true)
for i, p in pairs(positions) do
if p.y<2 then
if p.x>500 and p.z>500 then return end
end
if i > nodes_per_tick then return end
minetest.place_node(p)
end
@ -154,6 +164,7 @@ minetest.register_cheat("Scaffold", "World", "scaffold")
minetest.register_cheat("HighwayZ", "World", "highway_z")
minetest.register_cheat("BlockWater", "World", "block_water")
minetest.register_cheat("BlockLava", "World", "block_lava")
minetest.register_cheat("BlockSrc", "World", "block_sources")
minetest.register_cheat("PlaceOnTop", "World", "autotnt")
minetest.register_cheat("Replace", "World", "replace")
minetest.register_cheat("Nuke", "World", "nuke")

2
clientmods/hignore/init.lua
View File

@ -111,7 +111,7 @@ local function display(message)
-- strip title
if not is_dm and (hignore.strip[player] or minetest.settings:get_bool("hignore_strip_all")) then
message = message:match(".- | (.*)") or message
message = message:match(".- (.*)") or message
if hignore.highlight[player] == nil then
minetest.display_chat_message(message)
return true

21
clientmods/incrementaltp/init.lua
View File

@ -7,11 +7,11 @@ incremental_tp.tpactive=false
-- for Clamity
incremental_tp.max_instantaneous_tp = {
x = 9,
y = 55,
z = 9
x = 6,
y = 50,
z = 6
}
local wason=false
local function sign(n)
if n == 0 then
return 0
@ -35,8 +35,13 @@ local function tpstep(target, time, second, variance,sfunc)
local pos = minetest.localplayer:get_pos()
local vec = vector.subtract(target, pos)
minetest.settings:set_bool("free_move",true)
if math.abs(vec.x) + math.abs(vec.y) + math.abs(vec.z) < 1 then
if not incremental_tp.tpactive and wason then
wason=false
return
end
wason=true
incremental_tp.tpactive=true
if math.abs(vec.x) + math.abs(vec.y) + math.abs(vec.z) < 1 then
minetest.localplayer:set_pos(target)
incremental_tp.tpactive=false
minetest.display_chat_message("Arrived at " .. minetest.pos_to_string(target))
@ -68,12 +73,12 @@ local function tpstep(target, time, second, variance,sfunc)
end
function incremental_tp.tp(target, time, variance)
incremental_tp.tpactive=true
if incremental_tp.tpactive then return end
tpstep(target, time, 1, variance)
end
function incremental_tp.tpafter(target,time,variance,sfunc)
incremental_tp.tpactive=true
if incremental_tp.tpactive then return end
tpstep(target,time,1,variance,sfunc)
end

5
clientmods/mods.conf
View File

@ -46,7 +46,6 @@ load_mod_invrefill = true
load_mod_haxnotify = true
load_mod_incrementaltp = true
load_mod_test = true
load_mod_waller = false
load_mod_posman = false
load_mod_dodgebot = false
load_mod_aquarius = false
load_mod_furrybot = false
load_mod_antigone = false

28
clientmods/optimize/init.lua
View File

@ -10,7 +10,8 @@ local function remove_ents(texture)
for i, v in ipairs(obj) do
-- CAOs with water/lava textures are droplets
--minetest.log("ERROR",v:get_item_textures())
if v:get_item_textures():find("^" .. texture) then
--ws.dcm(v:get_item_textures())
if v:get_item_textures():find(texture) then
v:set_visible(false)
v:remove_from_scene(true)
end
@ -18,6 +19,22 @@ local function remove_ents(texture)
end
local function remove_hud()
local player = minetest.localplayer
local def
local i = -1
if not player then return end
repeat
i = i + 1
def = player:hud_get(i)
until not def or def.text:find("fire") or def.text:find("burning")
if def and type(def) == "string" then
minetest.localplayer:hud_remove(def)
end
end
core.register_on_spawn_particle(function(particle)
if minetest.settings:get_bool("noparticles") then return true end
end)
@ -25,10 +42,17 @@ end)
local epoch = os.clock()
minetest.register_globalstep(function()
if not minetest.localplayer then return end
if os.clock() > epoch + 1 then
if minetest.settings:get_bool("optimize_water_drops") then
remove_ents("default_water_source")
end
if minetest.settings:get_bool("optimize_burning") then
remove_ents("mcl_burning")
remove_ents("mcl_fire")
remove_ents("_animated")
remove_hud()
end
epoch = os.clock()
end
end)
@ -36,4 +60,4 @@ end)
minetest.register_cheat("NoParticles", "Render", "noparticles")
minetest.register_cheat("NoDroplets", "Render", "optimize_water_drops")
minetest.register_cheat("NoHearts", "Render", "optimize_hearts")
minetest.register_cheat("NoBurning", "Render", "optimize_burning")

2
clientmods/scaffold/depends.txt Normal file
View File

@ -0,0 +1,2 @@
nlist
turtle

2
clientmods/scaffold/init.lua
View File

@ -151,9 +151,7 @@ local lastdig=0
local actint=10
function scaffold.place_if_needed(items, pos, place)
if not inside_constraints(pos) then return end
--if lastplc + actint > os.time() then return end
if not pos then return end
lastplc=os.time()
place = place or minetest.place_node

18
clientmods/scaffold/ow2bot.lua Normal file
View File

@ -0,0 +1,18 @@
local Y=1337
local plnodes={'mcl_core:cobble','mcl_core:dirt','mcl_core:dirt_with_grass','mcl_core:obsidian'}
ws.rg("OW2Bot","Bots","ow2bot", function(pos)
local lp=minetest.localplayer:get_pos()
local r=3
local pos1=vector.add(lp,{x=r,y=0,z=r})
local pos2=vector.add(lp,{x=-r,y=0,z=-r})
pos1.y=Y
pos2.y=Y
ws.do_area(3,function(pos)
ws.place(pos,plnodes)
end,true)
end,function()
end)

152
clientmods/scaffold/railscaffold.lua
View File

@ -1,5 +1,10 @@
-- CC0/Unlicense Emilia/cora 2020
-- south:5,1.5
--west:-x,1.5,-5
--east:-x,1.5,5
-- north 5,1.5(3096:2.5,25025:1.5),z
local storage = minetest.get_mod_storage()
local ground = {
"mesecons_torch:redstoneblock"
}
@ -12,15 +17,64 @@ local rails = {
local tunnelmaterial = {
'mcl_core:glass_light_blue',
'mcl_core:cobble',
'mcl_core:stone',
'mcl_nether:netherrack',
'mcl_core:dirt',
'mcl_core:andesite',
'mcl_core:diorite',
'mcl_core:granite',
"mesecons_torch:redstoneblock"
'mcl_core:granite'
--"mesecons_torch:redstoneblock"
}
local function is_rail(pos)
pos=vector.round(pos)
if pos.y ~= 1 then return false end
if pos.z > 5 then
if pos.x == -5 then return "north" end
elseif pos.z < -5 then
if pos.x == 5 then return "south" end
end
if pos.x > 5 then
if pos.z == 5 then return "east" end
elseif pos.x < -5 then
if pos.z == -5 then return "west" end
end
return false
end
local function get_railnode(pos)
if is_rail(pos) then
return "mcl_minecarts:golden_rail"
end
if is_rail(vector.add(pos,{x=0,y=1,x=0})) then
return "mesecons_torch:redstoneblock"
end
return false
end
local function is_lantern(pos)
local dir=ws.getdir()
pos=vector.round(pos)
if dir == "north" or dir == "south" then
if pos.z % 8 == 0 then
return true
end
else
if pos.x % 8 == 0 then
return true
end
end
return false
end
ws.rg('RailTool','Scaffold','railtool',function()
local poss=ws.get_reachable_positions(5)
for k,p in pairs(poss) do
local n=get_railnode(p)
if n then ws.place(p,n) end
end
end)
minetest.register_cheat("RailT",'Bots','scaffold_railtunnel')
@ -48,75 +102,71 @@ local function invcheck(item)
refill.refill_at(ws.dircoord(1,1,0),'railkit')
end
ws.rg("RailBot","Bots", "scaffold_rails", function()
local direction="north"
ws.rg("RailBot","Bots", "railbot", function()
local lp = ws.dircoord(0,0,0)
local below = ws.dircoord(0,-1,0)
blockliquids()
local dpos= {
ws.dircoord(0,1,0),
ws.dircoord(0,0,0),
ws.dircoord(0,-1,0),
ws.dircoord(1,1,0),
ws.dircoord(1,0,0),
ws.dircoord(1,-1,0),
ws.dircoord(2,1,0),
ws.dircoord(2,0,0),
ws.dircoord(2,-1,0)
}
dignodes(dpos)
local bln=minetest.get_node_or_nil(below)
local lpn=minetest.get_node_or_nil(lp)
if bln and bln.name=="mesecons_torch:redstoneblock" and lpn and lpn.name == "mcl_minecarts:golden_rail_on" then
minetest.settings:set_bool('continuous_forward',true)
else
minetest.settings:set_bool('continuous_forward',false)
local goon=true
for i=-4,4,1 do
ws.dig(ws.dircoord(i,1,0))
if checknode(ws.dircoord(i,0,0)) then ws.dig(ws.dircoord(i,0,0)) end
if checknode(ws.dircoord(i,-1,0)) then ws.dig(ws.dircoord(i,-1,0)) end
scaffold.place_if_needed(ground, ws.dircoord(i,-1,0))
scaffold.place_if_needed(rails, ws.dircoord(i,0,0))
local lpn=minetest.get_node_or_nil(ws.dircoord(i,0,0))
local bln=minetest.get_node_or_nil(ws.dircoord(i,-1,0))
if not ( bln and bln.name=="mesecons_torch:redstoneblock" and lpn and lpn.name == "mcl_minecarts:golden_rail_on" ) then
goon=false
end
local lpos=ws.dircoord(i,2,0)
if is_lantern(lpos) then
local ln=minetest.get_node_or_nil(lpos)
if not ln or ln.name ~= 'mcl_ocean:sea_lantern' then
goon=false
ws.dig(lpos)
scaffold.place_if_needed({'mcl_ocean:sea_lantern'}, lpos)
end
end
end
minetest.after("0",function()
local frpos=ws.dircoord(1,0,0)
local fgpos=ws.dircoord(1,-1,0)
local rpos=ws.dircoord(0,0,0)
local gpos=ws.dircoord(0,-1,0)
scaffold.place_if_needed(ground, gpos)
scaffold.place_if_needed(rails, rpos)
scaffold.place_if_needed(ground, fgpos)
scaffold.place_if_needed(rails, frpos)
if (goon) then minetest.settings:set_bool('continuous_forward',true)
else minetest.settings:set_bool('continuous_forward',false) end
end)
if minetest.settings:get_bool('scaffold_railtunnel') then
scaffold.place_if_needed(tunnelmaterial, ws.dircoord(0,2,0))
scaffold.place_if_needed(tunnelmaterial, ws.dircoord(0,1,1))
scaffold.place_if_needed(tunnelmaterial, ws.dircoord(0,0,1))
scaffold.place_if_needed(tunnelmaterial, ws.dircoord(0,1,-1))
scaffold.place_if_needed(tunnelmaterial, ws.dircoord(0,0,-1))
end
end,
function()--startfunc
direction=ws.get_dir()
storage:set_string('BOTDIR', direction)
end,function() --stopfunc
direction=""
storage:set_string('BOTDIR',direction)
end,{'afly_axissnap','continuous_forward','autorefill'}) --'scaffold_ltbm'
end,{'scaffold_ltbm','snapyaw','continuous_forward'})
ws.on_connect(function()
sdir=storage:get_string('BOTDIR')
if sdir ~= "" then
ws.set_dir(sdir)
else
minetest.settings:set_bool('railbot',false)
end
end)
scaffold.register_template_scaffold("LanternTBM", "scaffold_ltbm", function()
local dir=ws.getdir()
local lp=vector.round(ws.dircoord(0,0,0))
local pl=false
if dir == "north" or dir == "south" then
if lp.z % 8 < 1 then
pl=true
end
else
if lp.x % 8 < 1 then
pl=true
end
end
local pl=is_lantern(lp)
if pl then
local lpos=ws.dircoord(0,2,0)
local nd=minetest.get_node_or_nil(lpos)
if nd and nd.name ~= 'mcl_ocean:sea_lantern' then
ws.dig(lpos)
minetest.after("0",function()
scaffold.place_if_needed({'mcl_ocean:sea_lantern'}, lpos)
ws.place(lpos,'mcl_ocean:sea_lantern')
end)
end

155
clientmods/scaffold/squarry.lua Normal file
View File

@ -0,0 +1,155 @@
local sq_pos1={x=-30800,y=1,z=-30800}
local sq_pos2={x=-30880,y=80,z=-30880}
local digging=false
local flying=false
local target=vector.new(0,0,0)
local function between(x, y, z) return y <= x and x <= z end -- x is between y and z (inclusive)
local function in_cube(tpos,wpos1,wpos2)
local xmax=wpos2.x
local xmin=wpos1.x
local ymax=wpos2.y
local ymin=wpos1.y
local zmax=wpos2.z
local zmin=wpos1.z
if wpos1.x > wpos2.x then
xmax=wpos1.x
xmin=wpos2.x
end
if wpos1.y > wpos2.y then
ymax=wpos1.y
ymin=wpos2.y
end
if wpos1.z > wpos2.z then
zmax=wpos1.z
zmin=wpos2.z
end
if between(tpos.x,xmin,xmax) and between(tpos.y,ymin,ymax) and between(tpos.z,zmin,zmax) then
return true
end
return false
end
local function get_nodes_in_range(range,air)
local lp=minetest.localplayer:get_pos()
local p1=vector.add(lp,{x=range,y=range,z=range})
local p2=vector.add(lp,{x=-range,y=-range,z=-range})
local nn=nlist.get_mclnodes()
if air then table.insert(nn,'air') end
local nds,cnt=minetest.find_nodes_in_area(p1,p2,nn,true)
local rt={}
for k,v in pairs(nds) do for kk,vv in pairs(v) do
local nd=minetest.get_node_or_nil(vv)
if nd then table.insert(rt,vv) end
end end
return rt
end
local function get_randompos(wpos1,wpos2)
local xmax=wpos2.x
local xmin=wpos1.x
local ymax=wpos2.y
local ymin=wpos1.y
local zmax=wpos2.z
local zmin=wpos1.z
if wpos1.x > wpos2.x then
xmax=wpos1.x
xmin=wpos2.x
end
if wpos1.y > wpos2.y then
ymax=wpos1.y
ymin=wpos2.y
end
if wpos1.z > wpos2.z then
zmax=wpos1.z
zmin=wpos2.z
end
return vector.new(math.random(xmin,xmax),math.random(ymin,ymax),math.random(zmin,zmax))
end
local nextdig=0
local function flythere(pos)
flying=true
minetest.settings:set_bool('noclip',false)
minetest.settings:set_bool('scaffold_quarrytool',true)
minetest.settings:set_bool("pitch_move",true)
minetest.settings:set_bool("free_move",true)
minetest.settings:set_bool("continuous_forward",true)
autofly.aim(pos)
core.set_keypress("special1", true)
end
local function stopflight()
flying=false
digging=true
minetest.settings:set_bool("continuous_forward",false)
minetest.settings:set_bool('scaffold_walltool',false)
minetest.settings:set_bool("noclip",false)
minetest.settings:set_bool("pitch_move",false)
core.set_keypress("special1", false)
end
local function do_nodes_in_range(action)
local nds={}
if action == 'dig' then nds=get_nodes_in_range(6)
else nds=get_nodes_in_range(6,true) end
if #nds > 0 then diggin=true else diggin=false end
for k,v in pairs(nds) do
if v then
--minetest.switch_to_item("mcl_books:book_written")
if action == 'dig' then
minetest.select_best_tool(minetest.get_node_or_nil(v).name)
minetest.dig_node(v)
else
local headpos=vector.add(minetest.localplayer:get_pos(),{x=0,y=0,z=0})
if vector.distance(headpos,v) == 0 then return end
scaffold.place_if_able(v)
end
end
end
end
--randomseed(os.clock())
scaffold.register_template_scaffold("QuarryTool", "scaffold_quarrytool", function(pos)
do_nodes_in_range('dig')
end)
scaffold.register_template_scaffold("PlaceRange", "scaffold_placer", function(pos)
do_nodes_in_range()
local headpos=vector.add(minetest.localplayer:get_pos(),vector.new(0,1,0))
local headnod=minetest.get_node_or_nil(headpos)
if headnod.name ~= 'air' then scaffold.dig(headpos) end
end)
local qbot_wason=false
ws.register_globalhacktemplate("QuarryBot", "Bots", "scaffold_quarrybot", function(pos)
local lp=minetest.localplayer:get_pos()
if not digging and not flying then
local nds=get_nodes_in_range(50)
if #nds == 0 then
target=get_randompos(sq_pos1,sq_pos2)
else
target=nds[math.random(#nds)]
end
flythere(target)
elseif vector.distance(lp,target) < 5 then
stopflight()
end
end,function()
scaffold.set_pos1(sq_pos1)
scaffold.set_pos2(sq_pos2)
minetest.settings:set_bool('scaffold_constrain',true)
minetest.settings:set_bool('scaffold_quarrytool',true)
end,function()
qbot_wason=false
flying=false
digging=false
minetest.settings:set_bool('scaffold_quarrytool',false)
stopflight()
end)