Public feed
#531820
-- 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?
g_deadplayer = {{ }}
g_unspecplayer = {{ }}
dofile("../sharedlua/utility.lua")
dofile("../sharedlua/Modstuff.lua")
dofile("../sharedlua/Survey.lua")
dofile("../sharedlua/LcStuff.lua")
dofile("../Conquest_Resources/teams.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)
elseif (cmd == "?teamcreate") then
PlayerTeamCreate(player, command, payload, recipient, msg_type)
elseif (cmd == "?invite") then
PlayerInvite(player, command, payload, recipient, msg_type)
elseif (cmd == "?accept") then
PlayerAccept(player, command, payload, recipient, msg_type)
elseif (cmd == "?reject") then
PlayerReject(player, command, payload, recipient, msg_type)
elseif (cmd == "?list") then
PlayerList(player, command, payload, recipient, msg_type)
elseif (cmd == "?veh") then
player:message("" .. player:getVehicle():vehicletypeid())
elseif (cmd == "?unspec") then
vid = player:getVehicle():vehicletypeid()
if team_fromname(g_arena, "Titan Alpha"):exists() then
Talpha = team_fromname(g_arena, "Titan Alpha"):num()
else
Talpha = 0
end
if team_fromname(g_arena, "Titan Bravo"):exists() then
Tbravo = team_fromname(g_arena, "Titan Bravo"):num()
else
Tbravo = 0
end
if team_fromname(g_arena, "Titan Charlie"):exists() then
Tcharlie = team_fromname(g_arena, "Titan Charlie"):num()
else
Tcharlie = 0
end
if team_fromname(g_arena, "Titan Delta"):exists() then
Tdelta = team_fromname(g_arena, "Titan Delta"):num()
else
Tdelta = 0
end
if team_fromname(g_arena, "Titan Echo"):exists() then
Techo = team_fromname(g_arena, "Titan Echo"):num()
else
Techo = 0
end
if team_fromname(g_arena, "Titan Foxtrot"):exists() then
Tfoxtrot = team_fromname(g_arena, "Titan Foxtrot"):num()
else
Tfoxtrot = 0
end
if team_fromname(g_arena, "Titan Gamma"):exists() then
Tgamma = team_fromname(g_arena, "Titan Gamma"):num()
else
Tgamma = 0
end
if team_fromname(g_arena, "Titan Hostel"):exists() then
Thostel = team_fromname(g_arena, "Titan Hostel"):num()
else
Thostel = 0
end
if team_fromname(g_arena, "Titan Kapa"):exists() then
Tkapa = team_fromname(g_arena, "Titan Kapa"):num()
else
Tkapa = 0
end
if team_fromname(g_arena, "Titan Lamba"):exists() then
Tlamba = team_fromname(g_arena, "Titan Lamba"):num()
else
Tlamba = 0
end
if team_fromname(g_arena, "Titan Mu"):exists() then
Tmu = team_fromname(g_arena, "Titan Mu"):num()
else
Tmu = 0
end
if team_fromname(g_arena, "Titan Nu"):exists() then
Tnu = team_fromname(g_arena, "Titan Nu"):num()
else
Tnu = 0
end
if team_fromname(g_arena, "Titan Omicron"):exists() then
Tomicron = team_fromname(g_arena, "Titan Omicron"):num()
else
Tomicron = 0
end
if team_fromname(g_arena, "Titan Sigma"):exists() then
Tsigma = team_fromname(g_arena, "Titan Sigma"):num()
else
Tsigma = 0
end
if team_fromname(g_arena, "Titan Theta"):exists() then
Ttheta = team_fromname(g_arena, "Titan Theta"):num()
else
Ttheta = 0
end
if team_fromname(g_arena, "Titan Rogue 1"):exists() then
Trogue1 = team_fromname(g_arena, "Titan Rogue 1"):num()
else
Trogue1 = 0
end
if team_fromname(g_arena, "Titan Rogue 2"):exists() then
Trogue2 = team_fromname(g_arena, "Titan Rogue 2"):num()
else
Trogue2 = 0
end
if team_fromname(g_arena, "Titan Rogue 3"):exists() then
Trogue3 = team_fromname(g_arena, "Titan Rogue 3"):num()
else
Trogue3 = 0
end
if team_fromname(g_arena, "Titan Rogue 4"):exists() then
Trogue4 = team_fromname(g_arena, "Titan Rogue 4"):num()
else
Trogue4 = 0
end
if team_fromname(g_arena, "Titan Rogue 5"):exists() then
Trogue5 = team_fromname(g_arena, "Titan Rogue 5"):num()
else
Trogue5 = 0
end
if team_fromname(g_arena, "Titan Rogue 6"):exists() then
Trogue6 = team_fromname(g_arena, "Titan Rogue 6"):num()
else
Trogue6 = 0
end
if team_fromname(g_arena, "Titan Rogue 7"):exists() then
local Trogue7 = team_fromname(g_arena, "Titan Rogue 7"):num()
else
Trogue7 = 0
end
if team_fromname(g_arena, "Titan Rogue 8"):exists() then
Trogue8 = team_fromname(g_arena, "Titan Rogue 8"):num()
else
Trogue8 = 0
end
if team_fromname(g_arena, "Titan Rogue 9"):exists() then
Trogue9 = team_fromname(g_arena, "Titan Rogue 9"):num()
else
Trogue9 = 0
end
if team_fromname(g_arena, "Titan Rogue 10"):exists() then
Trogue10 = team_fromname(g_arena, "Titan Rogue 10"):num()
else
Trogue10 = 0
end
if team_fromname(g_arena, "Titan Rogue 11"):exists() then
Trogue11 = team_fromname(g_arena, "Titan Rogue 11"):num()
else
Trogue11 = 0
end
if team_fromname(g_arena, "Titan Rogue 12"):exists() then
Trogue12 = team_fromname(g_arena, "Titan Rogue 12"):num()
else
Trogue12 = 0
end
if team_fromname(g_arena, "Titan Rogue 13"):exists() then
Trogue13 = team_fromname(g_arena, "Titan Rogue 13"):num()
else
Trogue13 = 0
end
if team_fromname(g_arena, "Titan Rogue 14"):exists() then
Trogue14 = team_fromname(g_arena, "Titan Rogue 14"):num()
else
Trogue14 = 0
end
if team_fromname(g_arena, "Titan Rogue 15"):exists() then
Trogue15 = team_fromname(g_arena, "Titan Rogue 15"):num()
else
Trogue15 = 0
end
if team_fromname(g_arena, "Europa Alpha"):exists() then
Ealpha = team_fromname(g_arena, "Europa Alpha"):num()
else
Ealpha = 0
end
if team_fromname(g_arena, "Europa Bravo"):exists() then
Ebravo = team_fromname(g_arena, "Europa Bravo"):num()
else
Ebravo = 0
end
if team_fromname(g_arena, "Europa Charlie"):exists() then
Echarlie = team_fromname(g_arena, "Europa Charlie"):num()
else
Echarlie = 0
end
if team_fromname(g_arena, "Europa Delta"):exists() then
Edelta = team_fromname(g_arena, "Europa Delta"):num()
else
Edelta = 0
end
if team_fromname(g_arena, "Europa Echo"):exists() then
local Eecho = team_fromname(g_arena, "Europa Echo"):num()
else
Eecho = 0
end
if team_fromname(g_arena, "Europa Foxtrot"):exists() then
Efoxtrot = team_fromname(g_arena, "Europa Foxtrot"):num()
else
Efoxtrot = 0
end
if team_fromname(g_arena, "Europa Gamma"):exists() then
Egamma = team_fromname(g_arena, "Europa Gamma"):num()
else
Egamma = 0
end
if team_fromname(g_arena, "Europa Hostel"):exists() then
Ehostel = team_fromname(g_arena, "Europa Hostel"):num()
else
Ehostel = 0
end
if team_fromname(g_arena, "Europa Kapa"):exists() then
Ekapa = team_fromname(g_arena, "Europa Kapa"):num()
else
Ekapa = 0
end
if team_fromname(g_arena, "Europa Lamba"):exists() then
Elamba = team_fromname(g_arena, "Europa Lamba"):num()
else
Elamba = 0
end
if team_fromname(g_arena, "Europa Mu"):exists() then
Emu = team_fromname(g_arena, "Europa Mu"):num()
else
Emu = 0
end
if team_fromname(g_arena, "Europa Nu"):exists() then
Enu = team_fromname(g_arena, "Europa Nu"):num()
else
Enu = 0
end
if team_fromname(g_arena, "Europa Omicron"):exists() then
Eomicron = team_fromname(g_arena, "Europa Omicron"):num()
else
Eomicron = 0
end
if team_fromname(g_arena, "Europa Sigma"):exists() then
Esigma = team_fromname(g_arena, "Europa Sigma"):num()
else
Esigma = 0
end
if team_fromname(g_arena, "Europa Theta"):exists() then
Etheta = team_fromname(g_arena, "Europa Theta"):num()
else
Etheta = 0
end
if team_fromname(g_arena, "Europa Rogue 1"):exists() then
Erogue1 = team_fromname(g_arena, "Europa Rogue 1"):num()
else
Erogue1 = 0
end
if team_fromname(g_arena, "Europa Rogue 2"):exists() then
Erogue2 = team_fromname(g_arena, "Europa Rogue 2"):num()
else
Erogue2 = 0
end
if team_fromname(g_arena, "Europa Rogue 3"):exists() then
Erogue3 = team_fromname(g_arena, "Europa Rogue 3"):num()
else
Erogue3 = 0
end
if team_fromname(g_arena, "Europa Rogue 4"):exists() then
Erogue4 = team_fromname(g_arena, "Europa Rogue 4"):num()
else
Erogue4 = 0
end
if team_fromname(g_arena, "Europa Rogue 5"):exists() then
Erogue5 = team_fromname(g_arena, "Europa Rogue 5"):num()
else
Erogue5 = 0
end
if team_fromname(g_arena, "Europa Rogue 6"):exists() then
Erogue6 = team_fromname(g_arena, "Europa Rogue 6"):num()
else
Erogue6 = 0
end
if team_fromname(g_arena, "Europa Rogue 7"):exists() then
Erogue7 = team_fromname(g_arena, "Europa Rogue 7"):num()
else
Erogue7 = 0
end
if team_fromname(g_arena, "Europa Rogue 8"):exists() then
Erogue8 = team_fromname(g_arena, "Europa Rogue 8"):num()
else
Erogue8 = 0
end
if team_fromname(g_arena, "Europa Rogue 9"):exists() then
Erogue9 = team_fromname(g_arena, "Europa Rogue 9"):num()
else
Erogue9 = 0
end
if team_fromname(g_arena, "Europa Rogue 10"):exists() then
Erogue10 = team_fromname(g_arena, "Europa Rogue 10"):num()
else
Erogue10 = 0
end
if team_fromname(g_arena, "Europa Rogue 11"):exists() then
Erogue11 = team_fromname(g_arena, "Europa Rogue 11"):num()
else
Erogue11 = 0
end
if team_fromname(g_arena, "Europa Rogue 12"):exists() then
local Erogue12 = team_fromname(g_arena, "Europa Rogue 12"):num()
else
Erogue12 = 0
end
if team_fromname(g_arena, "TEuropa Rogue 13"):exists() then
Erogue13 = team_fromname(g_arena, "TEuropa Rogue 13"):num()
else
Erogue13 = 0
end
if team_fromname(g_arena, "TEuropa Rogue 14"):exists() then
Erogue14 = team_fromname(g_arena, "TEuropa Rogue 14"):num()
else
Erogue14 = 0
end
if team_fromname(g_arena, "Europa Rogue 15"):exists() then
Erogue15 = team_fromname(g_arena, "Europa Rogue 15"):num()
else
Erogue15 = 0
end
if ((Talpha + Tbravo + Tcharlie + Tdelta + Techo + Tfoxtrot + Tgamma + Thostel + Tkapa + Tlamba + Tmu + Tnu + Tomicron + Tsigma + Ttheta + Trogue1 + Trogue2 + Trogue3 + Trogue4 + Trogue5 + Trogue6 + Trogue7 + Trogue8 + Trogue9 + Trogue10 + Trogue11 + Trogue12 + Trogue13 + Trogue14 + Trogue15) <= (Ealpha + Ebravo + Echarlie + Edelta + Eecho + Efoxtrot + Egamma + Ehostel + Ekapa + Elamba + Emu + Enu + Eomicron + Esigma + Etheta + Erogue1 + Erogue2 + Erogue3 + Erogue4 + Erogue5 + Erogue6 + Erogue7 + Erogue8 + Erogue9 + Erogue10 + Erogue11 + Erogue12 + Erogue13 + Erogue14 + Erogue15)) then
g_arena:message("player added to titan")
table.insert(g_unspecplayer, {player.m_name, vid, titan})
elseif ((Talpha + Tbravo + Tcharlie + Tdelta + Techo + Tfoxtrot + Tgamma + Thostel + Tkapa + Tlamba + Tmu + Tnu + Tomicron + Tsigma + Ttheta + Trogue1 + Trogue2 + Trogue3 + Trogue4 + Trogue5 + Trogue6 + Trogue7 + Trogue8 + Trogue9 + Trogue10 + Trogue11 + Trogue12 + Trogue13 + Trogue14 + Trogue15) > (Ealpha + Ebravo + Echarlie + Edelta + Eecho + Efoxtrot + Egamma + Ehostel + Ekapa + Elamba + Emu + Enu + Eomicron + Esigma + Etheta + Erogue1 + Erogue2 + Erogue3 + Erogue4 + Erogue5 + Erogue6 + Erogue7 + Erogue8 + Erogue9 + Erogue10 + Erogue11 + Erogue12 + Erogue13 + Erogue14 + Erogue15)) then
g_arena:message("player added to europa")
table.insert(g_unspecplayer, {player.m_name, vid, europa})
end
event_create(unspec_Check, 100)
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
-- end modifications
function Vehicle_OnProduce(user, menuitem)
local vid = user:getVehicle():vehicletypeid()
---Clear Access granted
if (menuitem == 0)
then
user:inventory_modify("Access Granted-B", -1)
user:inventory_modify("Access Granted-LA", -1)
user:inventory_modify("Access Granted-MA", -1)
user:inventory_modify("Access Granted-HA", -1)
user:inventory_modify("Access Granted-SA", -1)
user:inventory_modify("Access Granted-C", -1)
user:inventory_modify("Access Granted-AC", -1)
end
--- Europa
if ((vid == 103)
or (vid == 100)
or (vid == 109)
or (vid == 107)
or (vid == 106)
or (vid == 105))
then
---Start Vehicle Change
if ((user:inventory_find("Access Granted-CSS") > 0))
then
if (menuitem == 1)
then user:setVehicle(105)
elseif (menuitem == 2)
then user:setVehicle(100)
elseif (menuitem == 3)
then user:setVehicle(103)
elseif (menuitem == 4)
then user:setVehicle(106)
elseif (menuitem == 5)
then user:setVehicle(109)
elseif (menuitem == 6)
then user:setVehicle(107)
end
--- End Vehicle Change
---Start Armory Scripts
--Basic
elseif ((user:inventory_find("Access Granted-B") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Glock .", 1)
user:inventory_modify("Glock-B .", 1)
elseif (menuitem == 2)
then user:inventory_modify("EP-362 .", 1)
user:inventory_modify("EP-362 Charge .", 1)
elseif (menuitem == 3)
then user:inventory_modify("Glock .", -1)
user:inventory_modify("Glock-B .", -1)
elseif (menuitem == 4)
then user:inventory_modify("EP-362 .", -1)
user:inventory_modify("EP-362 Charge .", -1)
end
--Light assault
elseif ((user:inventory_find("Access Granted-LA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("PKvAR 606 .", 1)
user:inventory_modify("PKvAR 606-3RB .", 1)
elseif (menuitem == 2)
then user:inventory_modify("Submachinegun .", 1)
elseif (menuitem == 3)
then user:inventory_modify("PKvAR 606 .", -1)
user:inventory_modify("PKvAR 606-3RB .", -1)
elseif (menuitem == 4)
then user:inventory_modify("Submachinegun .", -1)
end
--Medium Assault
elseif ((user:inventory_find("Access Granted-MA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Gauss Rifle .", 1)
user:inventory_modify("Gauss Rifle-PS .", 1)
elseif (menuitem == 2)
then user:inventory_modify("SK-ARv35 .", 1)
elseif (menuitem == 3)
then user:inventory_modify("TCOx2 PR .", 1)
user:inventory_modify("TCOx2 PR-FBM .", 1)
elseif (menuitem == 4)
then user:inventory_modify("AVRL .", 1)
user:inventory_modify("AVRL-AA .", 1)
elseif (menuitem == 5)
then user:inventory_modify("Gauss Rifle .", -1)
user:inventory_modify("Gauss Rifle-PS .", -1)
elseif (menuitem == 6)
then user:inventory_modify("SK-ARv35 .", -1)
elseif (menuitem == 7)
then user:inventory_modify("TCOx2 PR .", -1)
user:inventory_modify("TCOx2 PR-FBM .", -1)
elseif (menuitem == 8)
then user:inventory_modify("AVRL .", -1)
user:inventory_modify("AVRL-AA .", -1)
end
-- Heavy Assault
elseif ((user:inventory_find("Access Granted-HA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Chaingun .", 1)
user:inventory_modify("Chaingun-LRS .", 1)
elseif (menuitem == 2)
then user:inventory_modify("HPR mk7 .", 1)
user:inventory_modify("HPR mk7-Charge .", 1)
elseif (menuitem == 3)
then user:inventory_modify("M-B 'Swiss' Shotgun .", 1)
user:inventory_modify("M-B 'Swiss' Shotgun-B .", 1)
elseif (menuitem == 4)
then user:inventory_modify("Chaingun .", -1)
user:inventory_modify("Chaingun-LRS .", -1)
elseif (menuitem == 5)
then user:inventory_modify("HPR mk7 .", -1)
user:inventory_modify("HPR mk7-Charge .", -1)
elseif (menuitem == 6)
then user:inventory_modify("M-B 'Swiss' Shotgun .", -1)
user:inventory_modify("M-B 'Swiss' Shotgun-B .", -1)
end
-- Special Assault
elseif ((user:inventory_find("Access Granted-SA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("KNOC GL 6 .", 1)
elseif (menuitem == 2)
then user:inventory_modify("UCRL 25 .", 1)
user:inventory_modify("UCRL 25-6S .", 1)
elseif (menuitem == 3)
then user:inventory_modify("KNOC GL 6 .", -1)
elseif (menuitem == 4)
then user:inventory_modify("UCRL 25 .", -1)
user:inventory_modify("UCRL 25-6S .", -1)
end
--Covert
elseif ((user:inventory_find("Access Granted-C") > 0))
then
if (menuitem == 1)
then user:inventory_modify("GlockSM .", 1)
user:inventory_modify("GlockSM-B .", 1)
elseif (menuitem == 2)
then user:inventory_modify("Camoflage", 1)
elseif (menuitem == 3)
then user:inventory_modify("Cloak", 1)
elseif (menuitem == 4)
then user:inventory_modify("GlockSM .", -1)
user:inventory_modify("GlockSM-B .", -1)
elseif (menuitem == 5)
then user:inventory_modify("Camoflage", -1)
elseif (menuitem == 6)
then user:inventory_modify("Cloak", -1)
end
--Advanced Covert
elseif ((user:inventory_find("Access Granted-AC") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Phantom mk47 .", 1)
elseif (menuitem == 2)
then user:inventory_modify("Phantom mk47 .", -1)
end
--End Armory Scripts
end
--Titan Vehicle Produdcer Script
elseif ((vid == 113)
or (vid == 112)
or (vid == 116)
or (vid == 117)
or (vid == 115)
or (vid == 12))
then
---Start Vehicle Change
if ((user:inventory_find("Access Granted-CSS") > 0))
then
if (menuitem == 1)
then user:setVehicle(12)
elseif (menuitem == 2)
then user:setVehicle(112)
elseif (menuitem == 3)
then user:setVehicle(113)
elseif (menuitem == 4)
then user:setVehicle(115)
elseif (menuitem == 5)
then user:setVehicle(116)
elseif (menuitem == 6)
then user:setVehicle(117)
end
--- End Vehicle Change
---Start Armory Scripts
--Basic
elseif ((user:inventory_find("Access Granted-B") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Glock", 1)
user:inventory_modify("Glock-B", 1)
elseif (menuitem == 2)
then user:inventory_modify("EP-362", 1)
user:inventory_modify("EP-362 Charge", 1)
elseif (menuitem == 3)
then user:inventory_modify("Glock", -1)
user:inventory_modify("Glock-B", -1)
elseif (menuitem == 4)
then user:inventory_modify("EP-362", -1)
user:inventory_modify("EP-362 Charge", -1)
end
--Light assault
elseif ((user:inventory_find("Access Granted-LA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("PKvAR 606", 1)
user:inventory_modify("PKvAR 606-3RB", 1)
elseif (menuitem == 2)
then user:inventory_modify("Submachinegun", 1)
elseif (menuitem == 3)
then user:inventory_modify("PKvAR 606", -1)
user:inventory_modify("PKvAR 606-3RB", -1)
elseif (menuitem == 4)
then user:inventory_modify("Submachinegun", -1)
end
--Medium Assault
elseif ((user:inventory_find("Access Granted-MA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Gauss Rifle", 1)
user:inventory_modify("Gauss Rifle-PS", 1)
elseif (menuitem == 2)
then user:inventory_modify("SK-ARv35", 1)
elseif (menuitem == 3)
then user:inventory_modify("TCOx2 PR", 1)
user:inventory_modify("TCOx2 PR-FBM", 1)
elseif (menuitem == 4)
then user:inventory_modify("AVRL", 1)
user:inventory_modify("AVRL-AA", 1)
elseif (menuitem == 5)
then user:inventory_modify("Gauss Rifle", -1)
user:inventory_modify("Gauss Rifle-PS", -1)
elseif (menuitem == 6)
then user:inventory_modify("SK-ARv35", -1)
elseif (menuitem == 7)
then user:inventory_modify("TCOx2 PR", -1)
user:inventory_modify("TCOx2 PR-FBM", -1)
elseif (menuitem == 8)
then user:inventory_modify("AVRL", -1)
user:inventory_modify("AVRL-AA", -1)
end
-- Heavy Assault
elseif ((user:inventory_find("Access Granted-HA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Chaingun", 1)
user:inventory_modify("Chaingun-LRS", 1)
elseif (menuitem == 2)
then user:inventory_modify("HPR mk7", 1)
user:inventory_modify("HPR mk7-Charge", 1)
elseif (menuitem == 3)
then user:inventory_modify("M-B 'Swiss' Shotgun", 1)
user:inventory_modify("M-B 'Swiss' Shotgun-B", 1)
elseif (menuitem == 4)
then user:inventory_modify("Chaingun", -1)
user:inventory_modify("Chaingun-LRS", -1)
elseif (menuitem == 5)
then user:inventory_modify("HPR mk7", -1)
user:inventory_modify("HPR mk7-Charge", -1)
elseif (menuitem == 6)
then user:inventory_modify("M-B 'Swiss' Shotgun", -1)
user:inventory_modify("M-B 'Swiss' Shotgun-B", -1)
end
-- Special Assault
elseif ((user:inventory_find("Access Granted-SA") > 0))
then
if (menuitem == 1)
then user:inventory_modify("KNOC GL 6", 1)
elseif (menuitem == 2)
then user:inventory_modify("UCRL 25", 1)
user:inventory_modify("UCRL 25-6S", 1)
elseif (menuitem == 3)
then user:inventory_modify("KNOC GL 6", -1)
elseif (menuitem == 4)
then user:inventory_modify("UCRL 25", -1)
user:inventory_modify("UCRL 25-6S", -1)
end
--Covert
elseif ((user:inventory_find("Access Granted-C") > 0))
then
if (menuitem == 1)
then user:inventory_modify("GlockSM", 1)
user:inventory_modify("GlockSM-B", 1)
elseif (menuitem == 2)
then user:inventory_modify("Camoflage", 1)
elseif (menuitem == 3)
then user:inventory_modify("Cloak", 1)
elseif (menuitem == 4)
then user:inventory_modify("GlockSM", -1)
user:inventory_modify("GlockSM-B", -1)
elseif (menuitem == 5)
then user:inventory_modify("Camoflage", -1)
elseif (menuitem == 6)
then user:inventory_modify("Cloak", -1)
end
--Advanced Covert
elseif ((user:inventory_find("Access Granted-AC") > 0))
then
if (menuitem == 1)
then user:inventory_modify("Phantom mk47", 1)
elseif (menuitem == 2)
then user:inventory_modify("Phantom mk47", -1)
end
---Emd Armory Scripts
end
--- Titan
end
return true
end
-- resurrection script
function Player_OnDeath(killer, victim)
local vid = victim:getVehicle():vehicletypeid()
local c = victim:coords()
local kid = killer:getVehicle():vehicletypeid()
if ((vid == 103)
or (vid == 100)
or (vid == 109)
or (vid == 107)
or (vid == 106)
or (vid == 105)
or (vid == 113)
or (vid == 112)
or (vid == 116)
or (vid == 117)
or (vid == 115)
or (vid == 12))
then victim:setstat(1, vid)
end
-- titan
if ((vid == 113)
or (vid == 112)
or (vid == 116)
or (vid == 117)
or (vid == 115)
or (vid == 12))
then victim:setVehicle(118)
g_arena:vehicle_create(401, c.x, c.y, 1)
table.insert(g_deadplayer, {victim.m_name, vid, os.time()})
-- europa
elseif ((vid == 103)
or (vid == 100)
or (vid == 109)
or (vid == 107)
or (vid == 106)
or (vid == 105))
then victim:setVehicle(121)
g_arena:vehicle_create(402, c.x, c.y, 1)
table.insert(g_deadplayer, {victim.m_name, vid, os.time()})
end
event_create(res_Check, 10000)
end
-- Can't use event_createargs() so need to use global tables, eww
function res_Check()
local removal = {}
for index, value in pairs(g_deadplayer) do
if (g_deadplayer[index][3] ~= nil) then
if ((os.time() - g_deadplayer[index][3]) >= 10) then
local dPlayer = g_arena:getPlayer(g_deadplayer[index][1])
if dPlayer ~= nil and dPlayer:valid() == true then
dPlayer:setVehicle(g_deadplayer[index][2])
if (g_deadplayer[index][2] >= 105 and g_deadplayer[index][2] <= 107)
or g_deadplayer[index][2] == 109 or g_deadplayer[index][2] == 100
or g_deadplayer[index][2] == 103 then
dPlayer:warp(6000, 14976, 50)
elseif (g_deadplayer[index][2] >= 115 and g_deadplayer[index][2] <= 117)
or g_deadplayer[index][2] == 113 or g_deadplayer[index][2] == 112
or g_deadplayer[index][2] == 12 then
dPlayer:warp(6000, 2448, 50)
end
end
table.insert(removal, index)
end
else
table.insert(removal, index)
end
end
for index2, value2 in pairs(removal) do
table.remove(g_deadplayer, removal[index])
end
end
function Vehicle_OnDeath(victim,killer)
local c = victim:coords()
local vid = victim:vehicletypeid()
local removal = {}
---res script
if ((vid == 404) or (vid == 403)) then
local oldkid = killer:getstat(1)
if (oldkid ~= 0) then
killer:setVehicle(oldkid)
killer:setstat(1, 0)
killer:warp(c.x, c.y, 1)
for index, value in pairs(g_deadplayer) do
if (g_deadplayer[index][1] == killer.m_name) then
table.insert(removal, index)
end
end
for index2, value2 in pairs(removal) do
table.remove(g_deadplayer, removal[index])
end
end
end
end
---unspec script
function Player_OnUnspec(player)
player:message("unspec works")
local vid = player:getVehicle():vehicletypeid()
local Talpha = team_fromname(g_arena, "Titan Alpha"):num()
local Tbravo = team_fromname(g_arena, "Titan Bravo"):num()
local Tcharlie = team_fromname(g_arena, "Titan Charlie"):num()
local Tdelta = team_fromname(g_arena, "Titan Delta"):num()
local Techo = team_fromname(g_arena, "Titan Echo"):num()
local Tfoxtrot = team_fromname(g_arena, "Titan Foxtrot"):num()
local Tgamma = team_fromname(g_arena, "Titan Gamma"):num()
local Thostel = team_fromname(g_arena, "Titan Hostel"):num()
local Tkapa = team_fromname(g_arena, "Titan Kapa"):num()
local Tlamba = team_fromname(g_arena, "Titan Lamba"):num()
local Tmu = team_fromname(g_arena, "Titan Mu"):num()
local Tnu = team_fromname(g_arena, "Titan Nu"):num()
local Tomicron = team_fromname(g_arena, "Titan Omicron"):num()
local Tsigma = team_fromname(g_arena, "Titan Sigma"):num()
local Ttheta = team_fromname(g_arena, "Titan Theta"):num()
local Trogue1 = team_fromname(g_arena, "Titan Rogue 1"):num()
local Trogue2 = team_fromname(g_arena, "Titan Rogue 2"):num()
local Trogue3 = team_fromname(g_arena, "Titan Rogue 3"):num()
local Trogue4 = team_fromname(g_arena, "Titan Rogue 4"):num()
local Trogue5 = team_fromname(g_arena, "Titan Rogue 5"):num()
local Trogue6 = team_fromname(g_arena, "Titan Rogue 6"):num()
local Trogue7 = team_fromname(g_arena, "Titan Rogue 7"):num()
local Trogue8 = team_fromname(g_arena, "Titan Rogue 8"):num()
local Trogue9 = team_fromname(g_arena, "Titan Rogue 9"):num()
local Trogue10 = team_fromname(g_arena, "Titan Rogue 10"):num()
local Trogue11 = team_fromname(g_arena, "Titan Rogue 11"):num()
local Trogue12 = team_fromname(g_arena, "Titan Rogue 12"):num()
local Trogue13 = team_fromname(g_arena, "Titan Rogue 13"):num()
local Trogue14 = team_fromname(g_arena, "Titan Rogue 14"):num()
local Trogue15 = team_fromname(g_arena, "Titan Rogue 15"):num()
local Ealpha = team_fromname(g_arena, "Europa Alpha"):num()
local Ebravo = team_fromname(g_arena, "Europa Bravo"):num()
local Echarlie = team_fromname(g_arena, "Europa Charlie"):num()
local Edelta = team_fromname(g_arena, "Europa Delta"):num()
local Eecho = team_fromname(g_arena, "Europa Echo"):num()
local Efoxtrot = team_fromname(g_arena, "Europa Foxtrot"):num()
local Egamma = team_fromname(g_arena, "Europa Gamma"):num()
local Ehostel = team_fromname(g_arena, "Europa Hostel"):num()
local Ekapa = team_fromname(g_arena, "Europa Kapa"):num()
local Elamba = team_fromname(g_arena, "Europa Lamba"):num()
local Emu = team_fromname(g_arena, "Europa Mu"):num()
local Enu = team_fromname(g_arena, "Europa Nu"):num()
local Eomicron = team_fromname(g_arena, "Europa Omicron"):num()
local Esigma = team_fromname(g_arena, "Europa Sigma"):num()
local Etheta = team_fromname(g_arena, "Europa Theta"):num()
local Erogue1 = team_fromname(g_arena, "Europa Rogue 1"):num()
local Erogue2 = team_fromname(g_arena, "Europa Rogue 2"):num()
local Erogue3 = team_fromname(g_arena, "Europa Rogue 3"):num()
local Erogue4 = team_fromname(g_arena, "Europa Rogue 4"):num()
local Erogue5 = team_fromname(g_arena, "Europa Rogue 5"):num()
local Erogue6 = team_fromname(g_arena, "Europa Rogue 6"):num()
local Erogue7 = team_fromname(g_arena, "Europa Rogue 7"):num()
local Erogue8 = team_fromname(g_arena, "Europa Rogue 8"):num()
local Erogue9 = team_fromname(g_arena, "Europa Rogue 9"):num()
local Erogue10 = team_fromname(g_arena, "Europa Rogue 10"):num()
local Erogue11 = team_fromname(g_arena, "Europa Rogue 11"):num()
local Erogue12 = team_fromname(g_arena, "Europa Rogue 12"):num()
local Erogue13 = team_fromname(g_arena, "TEuropa Rogue 13"):num()
local Erogue14 = team_fromname(g_arena, "TEuropa Rogue 14"):num()
local Erogue15 = team_fromname(g_arena, "Europa Rogue 15"):num()
if ((Talpha + Tbravo + Tcharlie + Tdelta + Techo + Tfoxtrot + Tgamma + Thostel + Tkapa + Tlamba + Tmu + Tnu + Tomicron + Tsigma + Ttheta + Trogue1 + Trogue2 + Trogue3 + Trogue4 + Trogue5 + Trogue6 + Trogue7 + Trogue8 + Trogue9 + Trogue10 + Trogue11 + Trogue12 + Trogue13 + Trogue14 + Trogue15) <= (Ealpha + Ebravo + Echarlie + Edelta + Eecho + Efoxtrot + Egamma + Ehostel + Ekapa + Elamba + Emu + Enu + Eomicron + Esigma + Etheta + Erogue1 + Erogue2 + Erogue3 + Erogue4 + Erogue5 + Erogue6 + Erogue7 + Erogue8 + Erogue9 + Erogue10 + Erogue11 + Erogue12 + Erogue13 + Erogue14 + Erogue15)) then
g_arena:message("player added to titan")
table.insert(g_unspecplayer, {player.m_name, vid, titan})
elseif ((Talpha + Tbravo + Tcharlie + Tdelta + Techo + Tfoxtrot + Tgamma + Thostel + Tkapa + Tlamba + Tmu + Tnu + Tomicron + Tsigma + Ttheta + Trogue1 + Trogue2 + Trogue3 + Trogue4 + Trogue5 + Trogue6 + Trogue7 + Trogue8 + Trogue9 + Trogue10 + Trogue11 + Trogue12 + Trogue13 + Trogue14 + Trogue15) > (Ealpha + Ebravo + Echarlie + Edelta + Eecho + Efoxtrot + Egamma + Ehostel + Ekapa + Elamba + Emu + Enu + Eomicron + Esigma + Etheta + Erogue1 + Erogue2 + Erogue3 + Erogue4 + Erogue5 + Erogue6 + Erogue7 + Erogue8 + Erogue9 + Erogue10 + Erogue11 + Erogue12 + Erogue13 + Erogue14 + Erogue15)) then
g_arena:message("player added to europa")
table.insert(g_unspecplayer, {player.m_name, vid, europa})
end
event_create(unspec_Check, 100)
return true
end
function unspec_Check()
local removal = {}
g_arena:message("1")
for index, value in pairs(g_unspecplayer) do
local user = g_arena:getPlayer(g_unspecplayer[index][1])
if user ~= nil and user:valid() == true then
g_arena:message("2")
if (g_unspecplayer[index][3] == titan) then
g_arena:message("3")
user:warp(6000, 2448, 50)
if (g_unspecplayer[index][2] == 105) then
user:setVehicle(12)
elseif (g_unspecplayer[index][2] == 103) then
user:setVehicle(113)
elseif (g_unspecplayer[index][2] == 100) then
user:setVehicle(112)
elseif (g_unspecplayer[index][2] == 109) then
user:setVehicle(116)
elseif (g_unspecplayer[index][2] == 107) then
user:setVehicle(117)
elseif (g_unspecplayer[index][2] == 106) then
user:setVehicle(115)
else
user:setVehicle(12)
end
if (user:inventory_find("Glock .") > 0)
then user:inventory_modify("Glock", 1)
user:inventory_modify("Glock-B", 1)
user:inventory_modify("Glock .", -1)
user:inventory_modify("Glock-B .", -1)
end
if (user:inventory_find("EP-362 .") > 0)
then user:inventory_modify("EP-362", 1)
user:inventory_modify("EP-362 Charge", 1)
user:inventory_modify("EP-362 .", -1)
user:inventory_modify("EP-362 Charge .", -1)
end
if (user:inventory_find("PKvAR 606 .") > 0)
then user:inventory_modify("PKvAR 606", 1)
user:inventory_modify("PKvAR 606-3RB", 1)
user:inventory_modify("PKvAR 606 .", -1)
user:inventory_modify("PKvAR 606-3RB .", -1)
end
if (user:inventory_find("Submachinegun .") > 0)
then user:inventory_modify("Submachinegun", 1)
user:inventory_modify("Submachinegun .", -1)
end
if (user:inventory_find("Gauss Rifle .") > 0)
then user:inventory_modify("Gauss Rifle", 1)
user:inventory_modify("Gauss Rifle-PS", 1)
user:inventory_modify("Gauss Rifle .", -1)
user:inventory_modify("Gauss Rifle-PS .", -1)
end
if (user:inventory_find("SK-ARv35 .") > 0)
then user:inventory_modify("SK-ARv35", 1)
user:inventory_modify("SK-ARv35 .", -1)
end
if (user:inventory_find("TCOx2 PR .") > 0)
then user:inventory_modify("TCOx2 PR", 1)
user:inventory_modify("TCOx2 PR-FBM", 1)
user:inventory_modify("TCOx2 PR .", -1)
user:inventory_modify("TCOx2 PR-FBM .", -1)
end
if (user:inventory_find("AVRL .") > 0)
then user:inventory_modify("AVRL", 1)
user:inventory_modify("AVRL-AA", 1)
user:inventory_modify("AVRL .", -1)
user:inventory_modify("AVRL-AA .", -1)
end
if (user:inventory_find("Chaingun .") > 0)
then user:inventory_modify("Chaingun", 1)
user:inventory_modify("Chaingun-LRS", 1)
user:inventory_modify("Chaingun .", -1)
user:inventory_modify("Chaingun-LRS .", -1)
end
if (user:inventory_find("HPR mk7 .") > 0)
then user:inventory_modify("HPR mk7", 1)
user:inventory_modify("HPR mk7-Charge", 1)
user:inventory_modify("HPR mk7 .", -1)
user:inventory_modify("HPR mk7-Charge .", -1)
end
if (user:inventory_find("M-B 'Swiss' Shotgun .") > 0)
then user:inventory_modify("M-B 'Swiss' Shotgun", 1)
user:inventory_modify("M-B 'Swiss' Shotgun-B", 1)
user:inventory_modify("M-B 'Swiss' Shotgun .", -1)
user:inventory_modify("M-B 'Swiss' Shotgun-B .", -1)
end
if (user:inventory_find("KNOC GL 6 .") > 0)
then user:inventory_modify("KNOC GL 6", 1)
user:inventory_modify("KNOC GL 6 .", -1)
end
if (user:inventory_find("UCRL 25 .") > 0)
then user:inventory_modify("UCRL 25", 1)
user:inventory_modify("UCRL 25-6S", 1)
user:inventory_modify("UCRL 25 .", -1)
user:inventory_modify("UCRL 25-6S .", -1)
end
if (user:inventory_find("GlockSM .") > 0)
then user:inventory_modify("GlockSM", 1)
user:inventory_modify("GlockSM-B", 1)
user:inventory_modify("GlockSM .", -1)
user:inventory_modify("GlockSM-B .", -1)
end
if (user:inventory_find("Phantom mk47 .") > 0)
then user:inventory_modify("Phantom mk47", 1)
user:inventory_modify("Phantom mk47 .", -1)
end
elseif (g_unspecplayer[index][3] == europa) then
user:warp(6000, 14976, 50)
if (g_unspecplayer[index][2] == 12) then
user:setVehicle(105)
elseif (g_unspecplayer[index][2] == 113) then
user:setVehicle(103)
elseif (g_unspecplayer[index][2] == 112) then
user:setVehicle(100)
elseif (g_unspecplayer[index][2] == 116) then
user:setVehicle(109)
elseif (g_unspecplayer[index][2] == 117) then
user:setVehicle(107)
elseif (g_unspecplayer[index][2] == 115) then
user:setVehicle(106)
else
user:setVehicle(105)
end
if (user:inventory_find("Glock") > 0)
then user:inventory_modify("Glock", -1)
user:inventory_modify("Glock-B", -1)
user:inventory_modify("Glock .", 1)
user:inventory_modify("Glock-B .", 1)
end
if (user:inventory_find("EP-362") > 0)
then user:inventory_modify("EP-362", -1)
user:inventory_modify("EP-362 Charge", -1)
user:inventory_modify("EP-362 .", 1)
user:inventory_modify("EP-362 Charge .", 1)
end
if (user:inventory_find("PKvAR 606") > 0)
then user:inventory_modify("PKvAR 606", -1)
user:inventory_modify("PKvAR 606-3RB", -1)
user:inventory_modify("PKvAR 606 .", 1)
user:inventory_modify("PKvAR 606-3RB .", 1)
end
if (user:inventory_find("Submachinegun") > 0)
then user:inventory_modify("Submachinegun", -1)
user:inventory_modify("Submachinegun .", 1)
end
if (user:inventory_find("Gauss Rifle") > 0)
then user:inventory_modify("Gauss Rifle", -1)
user:inventory_modify("Gauss Rifle-PS", -1)
user:inventory_modify("Gauss Rifle .", 1)
user:inventory_modify("Gauss Rifle-PS .", 1)
end
if (user:inventory_find("SK-ARv35") > 0)
then user:inventory_modify("SK-ARv35", -1)
user:inventory_modify("SK-ARv35 .", 1)
end
if (user:inventory_find("TCOx2 PR") > 0)
then user:inventory_modify("TCOx2 PR", -1)
user:inventory_modify("TCOx2 PR-FBM", -1)
user:inventory_modify("TCOx2 PR .", 1)
user:inventory_modify("TCOx2 PR-FBM .", 1)
end
if (user:inventory_find("AVRL") > 0)
then user:inventory_modify("AVRL", -1)
user:inventory_modify("AVRL-AA", -1)
user:inventory_modify("AVRL .", 1)
user:inventory_modify("AVRL-AA .", 1)
end
if (user:inventory_find("Chaingun") > 0)
then user:inventory_modify("Chaingun", -1)
user:inventory_modify("Chaingun-LRS", -1)
user:inventory_modify("Chaingun .", 1)
user:inventory_modify("Chaingun-LRS .", 1)
end
if (user:inventory_find("HPR mk7") > 0)
then user:inventory_modify("HPR mk7", -1)
user:inventory_modify("HPR mk7-Charge", -1)
user:inventory_modify("HPR mk7 .", 1)
user:inventory_modify("HPR mk7-Charge .", 1)
end
if (user:inventory_find("M-B 'Swiss' Shotgun") > 0)
then user:inventory_modify("M-B 'Swiss' Shotgun", -1)
user:inventory_modify("M-B 'Swiss' Shotgun-B", -1)
user:inventory_modify("M-B 'Swiss' Shotgun .", 1)
user:inventory_modify("M-B 'Swiss' Shotgun-B .", 1)
end
if (user:inventory_find("KNOC GL 6") > 0)
then user:inventory_modify("KNOC GL 6", -1)
user:inventory_modify("KNOC GL 6 .", 1)
end
if (user:inventory_find("UCRL 25") > 0)
then user:inventory_modify("UCRL 25", -1)
user:inventory_modify("UCRL 25-6S", -1)
user:inventory_modify("UCRL 25 .", 1)
user:inventory_modify("UCRL 25-6S .", 1)
end
if (user:inventory_find("GlockSM") > 0)
then user:inventory_modify("GlockSM", -1)
user:inventory_modify("GlockSM-B", -1)
user:inventory_modify("GlockSM .", 1)
user:inventory_modify("GlockSM-B .", 1)
end
if (user:inventory_find("Phantom mk47") > 0)
then user:inventory_modify("Phantom mk47", -1)
user:inventory_modify("Phantom mk47 .", 1)
end
table.insert(removal, index)
end
else
table.insert(removal, index)
end
end
for index2, value2 in pairs(removal) do
table.remove(g_unspecplayer, removal[index])
end
end