All pastes #479238 Raw Edit

Untitled

public text v1 · immutable
·published 2007-05-09 17:01 UTC
rendered paste body
-- This is so the script can be reloaded without destroying the g_arena variable
if g_arena == nil then
--- [[ Globals ]] --------

g_state = nil		-- The global GameState class
g_arena = nil		-- The global arena class, to avoid having to pass it around functions
g_bGameRunning = false	-- Is the game running?

dofile("../sharedlua/utility.lua")
dofile("../sharedlua/Modstuff.lua")
dofile("../sharedlua/Survey.lua")
dofile("../sharedlua/LcStuff.lua")

g_accessfile = "../Conquest_Resources/ScriptAccess.txt"

end

function Arena_OnCreate(arena)
	-- Set our global value
	g_arena = arena

	-- Initialize random
	math.randomseed(os.time())
end

-- Begin modifications
function Msg_OnCommand(player, command, payload, recipient, msg_type)
	local cmd = string.lower(command)
	if(cmd == "?coord" or cmd == "?coords" ) then
		local pos = player:coords()
		player:message("Your coordinates are x= " .. pos.x .. ", y= " .. pos.y .. ", z= " .. pos.z .. ", rotation= " ..pos.rotation)
	else
		survey(player, command, payload, recipient, msg_type)
		LcStuff(player, command, payload, recipient, msg_type)
		ModStuff(player, command, payload, recipient, msg_type)
	end
	if isonmodlist(player.m_name) then
		if(cmd == "?hello") then
			logcmd(g_arena.m_name, player, command, payload, recipient, msg_type)
			g_arena:message("Hello world")
		end
	end
end

-- end modifications

-- Begin modifications
function Item_OnPickUp(looter, loot, loot_type, amounttopickup)
	local vid = nil
	vid = looter:getVehicle():vehicletypeid()
	if (vid == nil) then
		vid = looter:getVehicle():vehicletypeid()
	end
	if (vid == nil) then
		return false
		print("Script unable to get player's vehicle ID")
	end
	
	--Collective
	if (((vid == 103)  
	or (vid == 100)   
	or (vid == 109)   
	or (vid == 107)   
	or (vid == 106)   
	or (vid == 105))  
	and (looter:inventory_find("Equip Agile Combat Suit") > 0)   
	and (loot_type.m_name == "Agile Combat Suit Change"))   
	then   
	   looter:setVehicle(103)
	 
	elseif (((vid == 103)  
	or (vid == 100)   
	or (vid == 109)   
	or (vid == 107)   
	or (vid == 106)   
	or (vid == 105))  
	and (looter:inventory_find("Equip Assault Combat Suit") > 0)   
	and (loot_type.m_name == "Assault Combat Suit Change"))   
	then   
	   looter:setVehicle(100)
	 
	elseif (((vid == 103)  
	or (vid == 100)   
	or (vid == 109)   
	or (vid == 107)   
	or (vid == 106)   
	or (vid == 105))  
	and (looter:inventory_find("Equip Camoflage Combat Suit") > 0)   
	and (loot_type.m_name == "Camoflage Combat Suit Change"))   
	then   
	   looter:setVehicle(109)
	 
	elseif (((vid == 103)  
	or (vid == 100)   
	or (vid == 109)   
	or (vid == 107)   
	or (vid == 106)   
	or (vid == 105))  
	and (looter:inventory_find("Equip Infilitration Combat Suit") > 0)   
	and (loot_type.m_name == "Infil. Combat Suit Change"))   
	then   
	   looter:setVehicle(107)
	 
	elseif (((vid == 103)  
	or (vid == 100)   
	or (vid == 109)   
	or (vid == 107)   
	or (vid == 106)   
	or (vid == 105))  
	and (looter:inventory_find("Equip Reinforced Combat Suit") > 0)   
	and (loot_type.m_name == "Agile Reinforced Suit Change"))   
	then   
	   looter:setVehicle(106)
	 
	elseif (((vid == 103)  
	or (vid == 100)   
	or (vid == 109)   
	or (vid == 107)   
	or (vid == 106)   
	or (vid == 105))  
	and (looter:inventory_find("Equip Standard Combat Suit") > 0)   
	and (loot_type.m_name == "Standard Combat Suit Change"))   
	then   
	   looter:setVehicle(105)
	 
	--Titan
	elseif (((vid == 113)  
	or (vid == 112)   
	or (vid == 116)   
	or (vid == 117)   
	or (vid == 115)   
	or (vid == 12)) 
	and (looter:inventory_find("Equip Agile Combat Suit") > 0)   
	and (loot_type.m_name == "Agile Combat Suit Change"))   
	then   
	   looter:setVehicle(113)
	  
	elseif (((vid == 113)  
	or (vid == 112)   
	or (vid == 116)   
	or (vid == 117)   
	or (vid == 115)   
	or (vid == 12))   
	and (looter:inventory_find("Equip Assault Combat Suit") > 0)   
	and (loot_type.m_name == "Assault Combat Suit Change"))   
	then   
	   looter:setVehicle(112)
	 
	elseif (((vid == 113)  
	or (vid == 112)   
	or (vid == 116)   
	or (vid == 117)   
	or (vid == 115)   
	or (vid == 12))  
	and (looter:inventory_find("Equip Camoflage Combat Suit") > 0)   
	and (loot_type.m_name == "Camoflage Combat Suit Change"))   
	then   
	   looter:setVehicle(116)
	 	 
	elseif (((vid == 113)  
	or (vid == 112)   
	or (vid == 116)   
	or (vid == 117)   
	or (vid == 115)   
	or (vid == 12))   
	and (looter:inventory_find("Equip Infilitration Combat Suit") > 0)   
	and (loot_type.m_name == "Infil. Combat Suit Change"))   
	then   
	   looter:setVehicle(117)
	 
	elseif (((vid == 113)  
	or (vid == 112)   
	or (vid == 116)   
	or (vid == 117)   
	or (vid == 115)   
	or (vid == 12))  
	and (looter:inventory_find("Equip Reinforced Combat Suit") > 0)   
	and (loot_type.m_name == "Agile Reinforced Suit Change"))   
	then   
	   looter:setVehicle(115)
	  
	elseif (((vid == 113)  
	or (vid == 112)   
	or (vid == 116)   
	or (vid == 117)   
	or (vid == 115)   
	or (vid == 12)) 
	and (looter:inventory_find("Equip Standard Combat Suit") > 0)   
	and (loot_type.m_name == "Standard Combat Suit Change"))   
	then   
	   looter:setVehicle(12)
	   
	end
	return true
end

-- end modifications