All pastes #330597 Raw Edit

Miscellany

public lua v1 · immutable
#330597 ·published 2007-01-28 01:45 UTC
rendered paste body
-- Event function for Artilleryfunction ArtilleryStrike(coordinates)	local mydelay = event_get_delay()	-- Spawn some artillery!	g_arena:explosion_create("Child - Missle", coordinates.x + math.random(-245, 245), coordinates.y + math.random(-170, 170), 0)	if (mydelay > 1500) then		return true			elseif (mydelay < 300) then		mydelay = mydelay - 3		else	mydelay = mydelay + math.pow(mydelay, 0.6)	end	event_change_delay(mydelay)	return falseend			-- Event function for SupplyDropfunction SupplyInform(coordinates)	local coords = g_suploc[g_person.m_name]	local dropx = coords.x	local dropy = coords.y		-- Spawn the items	g_arena:item_create("Ammo", 5000, dropx, dropy)	g_arena:item_create("Medikit", 50, dropx + 50, dropy)		local lettercoord = "A"	dropx = math.floor((dropx / 80) / 16)	dropy = ((dropy / 80) / 16) + 1			if (dropx == 0) then					lettercoord = "A"			elseif (dropx == 1) then					lettercoord = "B"			elseif (dropx == 2) then					lettercoord = "C"			elseif (dropx == 3) then 					lettercoord = "D"			elseif (dropx == 4) then					lettercoord = "E"			elseif (dropx == 5) then					lettercoord = "F"			elseif (dropx == 6) then					lettercoord = "G"			else					lettercoord = "H"	end		g_arena:message("!There has been a supply drop at " .. lettercoord .. math.floor(dropy) .. "!")	return trueendfunction UAV()	local mydelay = event_get_delay()	local c = g_uavloc[g_person.m_name]	g_arena:vehicle_create(409, c.x + math.random(-500, 500), c.y + math.random(-500, 500), 0)		if (mydelay > 3000) then		return true			elseif (mydelay < 200) then		mydelay = mydelay - 3		else	mydelay = mydelay + math.pow(mydelay, 0.6)	end	event_change_delay(mydelay)	return falseend