------------------------------------------------
--White's Zombie lua version 1--
--Unrealsoftware Script or lua 1--
-----------------------------------------------

if white==nil then white={} end
white.ut={}

function initArray(m)
     local array = {}
     for i = 1, m do
          array[i]=0
     end
     return array
end
white.ut.timer=initArray(32)
white.ut.level=initArray(32)
white.ut.fblood=0
class=initArray(32)
function classmenu(id)
menu(id,"Select your Class,Deficult Zombie,Runner Zombie,Boomer Zombie,Builder Zombie")
end

addhook("spawn","CTS")
function CTS(id)
if player(id,"team")==2 then
menu(id,"CT Buy Menu,Airstrike|$5600,Chainsaw|$16000,|Machete|$5000")
end
end

addhook("menu","ct")
function ct(id,men,sel)
if men=="CT Buy Menu" then
if sel==1 then
if player(id,"money")>=5600 then
parse("equip "..id.." 76")
parse("setweapon "..id.." 76")
parse("setmoney "..id.." "..player(id,"money")-5600
else
      msg2(id,string.char(169).."255000000Not Enough Money@C")
end
elseif sel==2 then
if player(id,"money")>=16000 then
parse("equip "..id.." 85")
parse("setweapon "..id.." 85")
parse("setmoney "..id.." "..player(id,"money")-16000
else
msg2(id,string.char(169).."255000000Not Enough Money@C")
end
elseif sel==3 then
if player(id,"money")>=5000 then
parse("equip "..id.." 69")
parse("setweapon "..id.." 69")
parse("setmoney "..id.." "..player(id,"money")-5000
else
msg2(id,string.char(169).."255000000Not Enough Money@C")
end
end
end
end

addhook("team","classesteam")
function classesteam(id,team)
if (team==0) then
class[id]=0
end
if (team==1) then
classmenu(id)
end
if (team==2) then
class[id]=0
end
end

addhook("serveraction","classesserveraction")
function classesserveraction(id)
classmenu(id)
end

addhook("menu","classesmenu")
function classesmenu(id,menu,sel)
if (menu=="Select your Class") then
if (sel>=1 and sel<=4) then
class[id]=sel
if (player(id,"health")>0) then
parse("killplayer "..id)
end
end
end
end

addhook("spawn","classesspawn")
function classesspawn(id)
-- Deficult Zombie
if (class[id]==1) then
parse ("setmaxhealth "..id.." 150")
parse ("setarmor "..id.." 200")
parse ("speedmod "..id.." 0")
return "86";
end
-- Runner Zombie
if (class[id]==2) then
parse ("setmaxhealth "..id.." 150")
parse ("setarmor "..id.." 250")
parse ("speedmod "..id.." 5")
return "86";
end
-- Boomer Zombie
if (class[id]==3) then
parse ("setmaxhealth "..id.." 1")
parse ("setarmor "..id.." 0")
parse ("speedmod "..id.." 1")
return "72,86";
end
-- Builder Zombie
if (class[id]==4) then
parse ("setmaxhealth "..id.." 125")
parse ("setarmor "..id.." 75")
parse ("speedmod "..id.." -2")
return "86,74";
end
end

addhook("buy","classesbuy")
function classesbuy()
return 1
end

addhook("startround","white.ut.startround")
function white.ut.startround()
     parse("sv_sound \"fun/prepare.wav\"")
     white.ut.fblood=0
end

addhook("kill","white.ut.kill")
function white.ut.kill(killer,victim,weapon)
     if (os.clock()-white.ut.timer[killer])>3 then
          white.ut.level[killer]=0;
     end
     level=white.ut.level[killer]
     level=level+1
     white.ut.level[killer]=level
     white.ut.timer[killer]=os.clock()
     -- FIRST BLOOD?
     if (white.ut.fblood==0) then
          white.ut.fblood=1
          parse("sv_sound \"fun/firstblood.wav\"");
          msg (player(killer,"name").." sheds FIRST BLOOD by killing "..player(victim,"name").."!")
     end
     -- HUMILIATION? (KNIFEKILL)
     if (weapon==50) then
          -- HUMILIATION!
          parse("sv_sound \"fun/killingspree.wav\"");
          msg (player(killer,"name").." Kill "..player(victim,"name").." With a Knife wow!")
     else
          -- REGULAR KILL
          if (level==1) then
               -- Single Kill! Nothing Special!
          elseif (level==2) then
               parse("sv_sound \"fun/doublekill.wav\"");
               msg (player(killer,"name").." made a Doublekill!")
          elseif (level==3) then
               parse("sv_sound \"fun/multikill.wav\"")
               msg (player(killer,"name").." made a Multikill!")
          elseif (level==4) then
               parse("sv_sound \"fun/ultrakill.wav\"")
               msg (player(killer,"name").." made an UULTRAAKILL!")
          elseif (level==5) then
               parse("sv_sound \"fun/unstoppable.wav\"")
               msg (player(killer,"name").." made a UNSTAPPABLE!")
          elseif (level==6) then
               parse("sv_sound \"fun/monsterkill.wav\"")
               msg (player(killer,"name").." made a MO-O-O-O-ONSTERKILL-ILL-ILL!")
          else
               parse("sv_sound \"fun/rampage.wav\"")
               msg (player(killer,"name").." is RAMPAGE! "..level.." KILLS!")
          end
     end
end

parse("mp_timelimit 99")
parse("sv_gamemode 5")
parse("mp_wpndmg XM1014 50")
parse("mp_wpndmg Chainsaw 100")
parse("mp_wpndmg Knife 200")
parse("mp_wpndmg Claw 1")

parse('mp_building_limit "dispenser" 99999')
parse('mp_building_limit "turret" 99999')
parse('mp_building_limit "supply" 99999')
parse('mp_building_limit "gate field" 99999')
parse('mp_building_limit "wall I" 99999')
parse('mp_building_limit "wall II" 99999')
parse('mp_building_limit "wall III" 99999')
parse('mp_building_limit "barbed wire" 100')
parse('mp_building_limit "Barricade" 100')
parse('mp_building_limit "teleporter exit" 1')
parse('mp_building_limit "teleporter entrance" 99999')
addhook("build","no_site")

function no_site(id,type)
     if (type == 21) then
          return 0
     else
          return 1
     end
end

buildingmoney = {300,500,1000,2000,3000,1500,5000,3000}

addhook("build","no_sitenow")
function no_sitenow(id,type,x,y)
     if (type == 21) then
          return 0
     else
          parse("spawnobject "..type.." "..x.." "..y.." 90 1 "..player(id,"team").." "..id)
     end
end

addhook("build","money_loose")
function money_loose(id,type)
     if (type == 1) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[1])
     elseif (type == 2) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[2])
     elseif (type == 3) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[3])
     elseif (type == 4) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[4])
     elseif (type == 5) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[5])
     elseif (type == 6) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[6])
     elseif (type == 7) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[7])
     elseif (type == then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[7])
     elseif (type == 9) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[7])
     elseif (type == 13) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[8])
     elseif (type == 14) then
          parse("setmoney "..id.." "..player(id,"money")-buildingmoney[8])
     end
end