share/hedgewars/Data/Scripts/Multiplayer/No_Jumping.lua
author mikade
Fri, 09 Sep 2011 03:21:16 +0200
changeset 5821 afb988c1a2fe
parent 5571 434ec40070e0
child 5827 a416f1070fdf
permissions -rw-r--r--
Allow limited form of SuddenDeath (WaterRise = 0) in both CTF modes Fix missing case of support for more players in CTF_Blizzard

--------------------------------
-- NO JUMPING
--------------------------------

loadfile(GetDataPath() .. "Scripts/Locale.lua")()

local specialGear = nil

function onGameInit()
    Goals = loc("Jumping is disabled")
end

function onNewTurn()
	SetInputMask(band(0xFFFFFFFF, bnot(gmLJump + gmHJump)))
end

function onGearAdd(gear)
	
	if (GetGearType(gear) == gtJetpack) or (GetGearType(gear) == gtRope) or (GetGearType(gear) == gtParachute) then
		specialGear = gear
		SetInputMask(band(0xFFFFFFFF, bnot(gmHJump)))
	end

end

function onGearDelete(gear)

	if (GetGearType(gear) == gtJetpack) or (GetGearType(gear) == gtRope) or (GetGearType(gear) == gtParachute) then
		specialGear = nil
		SetInputMask(band(0xFFFFFFFF, bnot(gmLJump + gmHJump)))
	end

end