-- Hedgewars - Knockball for 2+ Players HedgewarsScriptLoad("/Scripts/Locale.lua") local ball = nil function onGameInit() GameFlags = gfSolidLand + gfInvulnerable + gfDivideTeams TurnTime = 20000 CaseFreq = 0 MinesNum = 0 Explosives = 0 Delay = 500 -- Disable Sudden Death WaterRise = 0 HealthDecrease = 0 end function onGameStart() ShowMission(loc("Knockball"), loc("Not So Friendly Match"), loc("Bat balls at your enemies and|push them into the sea!"), -amBaseballBat, 0) SetAmmoTexts(amBaseballBat, loc("Baseball Bat with Ball"), loc("Knockball weapon"), loc("Throw a baseball at your foes|and send them flying!") .. "|" .. loc("Attack: Throw ball")) end function onGameTick() if ball ~= nil and GetFollowGear() ~= nil then FollowGear(ball) end end function onAmmoStoreInit() SetAmmo(amBaseballBat, 9, 0, 0, 0) SetAmmo(amSkip, 9, 0, 0, 0) end function onGearAdd(gear) if GetGearType(gear) == gtShover then ball = AddGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog), gtBall, 0, 0, 0, 0) if ball ~= nil then local dx, dy = GetGearVelocity(gear) SetGearVelocity(ball, dx * 2, dy * 2) SetState(ball, 0x200) -- temporary - might change! SetTag(ball, 8) -- baseball skin FollowGear(ball) end end end function onGearDelete(gear) if gear == ball then ball = nil end end function onNewTurn() SetWeapon(amBaseballBat) end