Valahogyan nem lehetne kezelni szerveren belül a regisztrált játékosokat?
registry.db -fileba próbálkoztam belenézni (FileViewPro -val), de kéne egy olyan program amivel teljesen a file-tartalmát lehet megtekinteni olvashatóan.

ACL re ható parancssorokat keresek! Wikin még nem találtam, ha valaki tudna segíteni, azt nagyon meghálálnám!
Szeretnék olyan felületet létrehozni, ami a játékos loginnevét berakja a megadott ACL be.

Itt a source az arra a játékosra érvényes, aki rákattintott a gombra, vagy valamit megint nagyon benéztem?
A lényeg az, hogy akarok csinálni egy panelt, ami átrakja a játékost egy másik dimenzióba.
 

GUIEditor = {
    button = {},
    window = {}
}
addEventHandler(\"onClientResourceStart\", resourceRoot,
    function()
showCursor(true)
local screenW, screenH = guiGetScreenSize()
        GUIEditor.window[1] = guiCreateWindow((screenW - 477) / 2, (screenH - 266) / 2, 477, 266, \"Válassz egy dimenziót!\", false)
        GUIEditor.button1 = guiCreateButton(10, (266 - 85) / 2, 137, 85, \"Dimenzió 0\\nNormál\", false, GUIEditor.window[1])
addEventHandler(\"onClientGUIClick\",GUIEditor.button1, dimenzio0)
        GUIEditor.button2 = guiCreateButton(477 - 135 - 10, (266 - 82) / 2, 135, 82, \"Dimenzió 1\\nZombik\", false, GUIEditor.window[1])    
addEventHandler(\"onClientGUIClick\",GUIEditor.button2, dimenzio1)
    end
)
function dimenzio0()
setElementDimension ( source, 0 )
end
function dimenzio1()
setElementDimension ( source, 1 )
end

Működő MySQL -el kompatibilis bejelentkező panelt keresek! Programozni nem tudok!

Hol lehet át állítani, hogy a zombik, ne a 0 -ás dimenzióba jöjjenek létre, hanem például: 1 -es dimenzióba?
client
 

myZombies = { }
helmetzombies = { 27, 51, 52, 99, 27, 137, 153, 167, 205, 260, 277, 278, 279, 284, 285 }
resourceRoot = getResourceRootElement()
--FORCES ZOMBIES TO MOVE ALONG AFTER THEIR TARGET PLAYER DIES
function playerdead ()
setTimer ( Zomb_release, 4000, 1 )
end
addEventHandler ( \"onClientPlayerWasted\", getLocalPlayer(), playerdead )
function Zomb_release ()
for k, ped in pairs( myZombies ) do
if (isElement(ped)) then
   if (getElementData (ped, \"zombie\") == true) then
      setElementData ( ped, \"target\", nil )
      setElementData ( ped, \"status\", \"idle\" )
      table.remove(myZombies,k)
   end
end
end
end
--REMOVES A ZOMBIE FROM INFLUENCE AFTER ITS KILLED
function pedkilled ( killer, weapon, bodypart )
if (getElementData (source, \"zombie\") == true) and (getElementData (source, \"status\") ~= \"dead\" ) then
setElementData ( source, \"target\", nil )
setElementData ( source, \"status\", \"dead\" )
end
end
addEventHandler ( \"onClientPedWasted\", getRootElement(), pedkilled )
--THIS CHECKS ALL ZOMBIES EVERY SECOND TO SEE IF THEY ARE IN SIGHT
function zombie_check ()
if (getElementData (getLocalPlayer (), \"zombie\") ~= true) and ( isPlayerDead ( getLocalPlayer () ) == false ) then
local zombies = getElementsByType ( \"ped\",getRootElement(),true )
local Px,Py,Pz = getElementPosition( getLocalPlayer () )
if isPedDucked ( getLocalPlayer ()) then
   local Pz = Pz-1
end      
for theKey,theZomb in ipairs(zombies) do
   if (isElement(theZomb)) then
      local Zx,Zy,Zz = getElementPosition( theZomb )
      if (getDistanceBetweenPoints3D(Px, Py, Pz, Zx, Zy, Zz) < 45 ) then
         if (getElementData (theZomb, \"zombie\") == true) then
            if ( getElementData ( theZomb, \"status\" ) == \"idle\" ) then --CHECKS IF AN IDLE ZOMBIE IS IN SIGHT
               local isclear = isLineOfSightClear (Px, Py, Pz+1, Zx, Zy, Zz +1, true, false, false, true, false, false, false) 
               if (isclear == true) then
                  setElementData ( theZomb, \"status\", \"chasing\" )
                  setElementData ( theZomb, \"target\", getLocalPlayer() )
                  table.insert( myZombies, theZomb ) --ADDS ZOMBIE TO PLAYERS COLLECTION
                  table.remove( zombies, theKey)
                  zombieradiusalert (theZomb)
               end
            elseif (getElementData(theZomb,\"status\") == \"chasing\") and (getElementData(theZomb,\"target\") == nil) then --CHECKS IF AN AGGRESSIVE LOST ZOMBIE IS IN SIGHT
               local isclear = isLineOfSightClear (Px, Py, Pz+1, Zx, Zy, Zz +1, true, false, false, true, false, false, false) 
               if (isclear == true) then
                  setElementData ( theZomb, \"target\", getLocalPlayer() )
                  isthere = \"no\"
                  for k, ped in pairs( myZombies ) do
                     if ped == theZomb then
                        isthere = \"yes\"
                     end
                  end
                  if isthere == \"no\" then
                     table.insert( myZombies, theZomb ) --ADDS THE WAYWARD ZOMBIE TO THE PLAYERS COLLECTION
                     table.remove( zombies, theKey)
                  end
               end
            elseif ( getElementData ( theZomb, \"target\" ) == getLocalPlayer() ) then --CHECKS IF AN ALREADY AGGRESSIVE ZOMBIE IS IN SIGHT
               local isclear = isLineOfSightClear (Px, Py, Pz+1, Zx, Zy, Zz +1, true, false, false, true, false, false, false) 
               if (isclear == false) then --IF YOUR ZOMBIE LOST YOU, MAKES IT REMEMBER YOUR LAST COORDS
                  setElementData ( theZomb, \"target\", nil )
                  triggerServerEvent (\"onZombieLostPlayer\", theZomb, oldPx, oldPy, oldPz)
               end
            end
         end
      end
   end
end
--this second half is for checking peds and zombies
local nonzombies = getElementsByType ( \"ped\",getRootElement(),true )
for theKey,theZomb in ipairs(zombies) do
   if (isElement(theZomb)) then
      if (getElementData (theZomb, \"zombie\") == true) then
         local Zx,Zy,Zz = getElementPosition( theZomb )
         for theKey,theNonZomb in ipairs(nonzombies) do
            if (getElementData (theNonZomb, \"zombie\") ~= true) then -- if the ped isnt a zombie
               local Px,Py,Pz = getElementPosition( theNonZomb )
               if (getDistanceBetweenPoints3D(Px, Py, Pz, Zx, Zy, Zz) < 45 ) then
                  local isclear = isLineOfSightClear (Px, Py, Pz+1, Zx, Zy, Zz +1, true, false, false, true, false, false, false ) 
                  if (isclear == true) and ( getElementHealth ( theNonZomb ) > 0) then
                     if ( getElementData ( theZomb, \"status\" ) == \"idle\" ) then --CHECKS IF AN IDLE ZOMBIE IS IN SIGHT
                        triggerServerEvent (\"onZombieLostPlayer\", theZomb, Px, Py, Pz)                           
                        setElementData ( theZomb, \"status\", \"chasing\" )
                        setElementData ( theZomb, \"target\", theNonZomb )
                        zombieradiusalert (theZomb)
                     elseif ( getElementData ( theZomb, \"status\" ) == \"chasing\" ) and ( getElementData ( theZomb, \"target\" ) == nil) then
                        triggerServerEvent (\"onZombieLostPlayer\", theZomb, Px, Py, Pz)
                        setElementData ( theZomb, \"target\", theNonZomb )                           
                     end
                  end               
               end      
               if ( getElementData ( theZomb, \"target\" ) == theNonZomb ) then --CHECKS IF AN ALREADY AGGRESSIVE ZOMBIE IS IN SIGHT OF THE PED
                  local Px,Py,Pz = getElementPosition( theNonZomb )
                  if (getDistanceBetweenPoints3D(Px, Py, Pz, Zx, Zy, Zz) < 45 ) then
                     local isclear = isLineOfSightClear (Px, Py, Pz+1, Zx, Zy, Zz+1, true, false, false, true, false, false, false) 
                     if (isclear == false) then --IF YOUR ZOMBIE LOST THE PED, MAKES IT REMEMBER the peds LAST COORDS
                        triggerServerEvent (\"onZombieLostPlayer\", theZomb, Px, Py, Pz)                     
                        setElementData ( theZomb, \"target\", nil )
                     end
                  end
               end
            end
         end
      end
   end
end
end
for k, ped in pairs( myZombies ) do
if (isElement(ped) == false) then
   table.remove( myZombies, k)
end
end
oldPx,oldPy,oldPz = getElementPosition( getLocalPlayer () )
end
 
--INITAL SETUP
function clientsetupstarter(startedresource)
if startedresource == getThisResource() then
setTimer ( clientsetup, 1234, 1)
MainClientTimer1 = setTimer ( zombie_check, 1000, 0)  --STARTS THE TIMER TO CHECK FOR ZOMBIES
end
end
addEventHandler(\"onClientResourceStart\", getRootElement(), clientsetupstarter)
function clientsetup()
oldPx,oldPy,oldPz = getElementPosition( getLocalPlayer () )
throatcol = createColSphere ( 0, 0, 0, .3)
woodpic = guiCreateStaticImage( .65, .06, .1, .12, \"zombiewood.png\", true )
guiSetVisible ( woodpic, false )
--ALL ZOMBIES STFU
local zombies = getElementsByType ( \"ped\" )
for theKey,theZomb in ipairs(zombies) do
if (isElement(theZomb)) then
   if (getElementData (theZomb, \"zombie\") == true) then
      setPedVoice(theZomb, \"PED_TYPE_DISABLED\")
   end
end
end
--SKIN REPLACEMENTS
local skin = engineLoadTXD ( \"skins/13.txd\" ) --bleedin eyes 31 by Slothman
engineImportTXD ( skin, 13 )
local skin = engineLoadTXD ( \"skins/22.txd\" ) -- slashed 12 by Wall-E
engineImportTXD ( skin, 22 )   
local skin = engineLoadTXD ( \"skins/56.txd\" ) --young and blue by Slothman
engineImportTXD ( skin, 56 )
local skin = engineLoadTXD ( \"skins/67.txd\" ) -- slit r* employee
engineImportTXD ( skin, 67 )
local skin = engineLoadTXD ( \"skins/68.txd\" ) -- shredded preist by Deixell
engineImportTXD ( skin, 68 )
local skin = engineLoadTXD ( \"skins/69.txd\" ) --bleedin eyes in denim by Capitanazop
engineImportTXD ( skin, 69 )
local skin = engineLoadTXD ( \"skins/70.txd\" ) --ultra gory scientist by 50p
engineImportTXD ( skin, 70 )
local skin = engineLoadTXD ( \"skins/84.txd\" ) --guitar wolf (nonzombie) by Slothman
engineImportTXD ( skin, 84 )
local skin = engineLoadTXD ( \"skins/92.txd\" ) -- peeled flesh by xbost
engineImportTXD ( skin, 92 )
local skin = engineLoadTXD ( \"skins/97.txd\" ) -- easterboy by Slothman
engineImportTXD ( skin, 97 )
local skin = engineLoadTXD ( \"skins/105.txd\" ) --Scarred Grove Gangster by Wall-E
engineImportTXD ( skin, 105 )
local skin = engineLoadTXD ( \"skins/107.txd\" ) --ripped and slashed grove by Wall-E
engineImportTXD ( skin, 107 )
local skin = engineLoadTXD ( \"skins/108.txd\" ) -- skeleton thug by Deixell
engineImportTXD ( skin, 108 )
local skin = engineLoadTXD ( \"skins/111.txd\" ) --Frank West from dead rising (nonzombie) by Slothman
engineImportTXD ( skin, 111 )
local skin = engineLoadTXD ( \"skins/126.txd\" ) -- bullet ridden wiseguy by Slothman
engineImportTXD ( skin, 126 )
local skin = engineLoadTXD ( \"skins/127.txd\" ) --flyboy from dawn of the dead by Slothman
engineImportTXD ( skin, 127 )
local skin = engineLoadTXD ( \"skins/128.txd\" ) --holy native by Slothman
engineImportTXD ( skin, 128 )
local skin = engineLoadTXD ( \"skins/152.txd\" ) --bitten schoolgirl by Slothman
engineImportTXD ( skin, 152 )
local skin = engineLoadTXD ( \"skins/162.txd\" ) --shirtless redneck by Slothman
engineImportTXD ( skin, 162 )
local skin = engineLoadTXD ( \"skins/167.txd\" ) --dead chickenman by 50p
engineImportTXD ( skin, 167 )
local skin = engineLoadTXD ( \"skins/188.txd\" ) --burnt greenshirt by Slothman
engineImportTXD ( skin, 188 )
local skin = engineLoadTXD ( \"skins/192.txd\" ) --Alice from resident evil (nonzombie) by Slothman
engineImportTXD ( skin, 192 )
local skin = engineLoadTXD ( \"skins/195.txd\" ) --bloody ex by Slothman
engineImportTXD ( skin, 195 )
local skin = engineLoadTXD ( \"skins/206.txd\" ) -- faceless zombie by Slothman
engineImportTXD ( skin, 206 )
local skin = engineLoadTXD ( \"skins/209.txd\" ) --Noodle vendor by 50p
engineImportTXD ( skin, 209 )
local skin = engineLoadTXD ( \"skins/212.txd\" ) --brainy hobo by Slothman
engineImportTXD ( skin, 212 )
local skin = engineLoadTXD ( \"skins/229.txd\" ) --infected tourist by Slothman
engineImportTXD ( skin, 229 )
local skin = engineLoadTXD ( \"skins/230.txd\" ) --will work for brains hobo by Slothman
engineImportTXD ( skin, 230 )
local skin = engineLoadTXD ( \"skins/258.txd\" ) --bloody sided suburbanite by Slothman
engineImportTXD ( skin, 258 )
local skin = engineLoadTXD ( \"skins/264.txd\" ) --scary clown by 50p
engineImportTXD ( skin, 264 )
local skin = engineLoadTXD ( \"skins/274.txd\" ) --Ash Williams (nonzombie) by Slothman
engineImportTXD ( skin, 274 )
local skin = engineLoadTXD ( \"skins/277.txd\" ) -- gutted firefighter by Wall-E
engineImportTXD ( skin, 277 )
local skin = engineLoadTXD ( \"skins/280.txd\" ) --infected cop by Lordy
engineImportTXD ( skin, 280 )
local skin = engineLoadTXD ( \"skins/287.txd\" ) --torn army by Deixell
engineImportTXD ( skin, 287 )
end
--UPDATES PLAYERS COUNT OF AGGRESIVE ZOMBIES
addEventHandler ( \"onClientElementDataChange\", getRootElement(),
function ( dataName )
if getElementType ( source ) == \"ped\" and dataName == \"status\" then
local thestatus = (getElementData ( source, \"status\" ))
if (thestatus == \"idle\") or (thestatus == \"dead\") then      
   for k, ped in pairs( myZombies ) do
      if ped == source and (getElementData (ped, \"zombie\") == true) then
         setElementData ( ped, \"target\", nil )
         table.remove( myZombies, k)
         setElementData ( getLocalPlayer(), \"dangercount\", tonumber(table.getn( myZombies )) )
      end
   end
end
end
end )
--MAKES A ZOMBIE JUMP
addEvent( \"Zomb_Jump\", true )
function Zjump ( ped )
if (isElement(ped)) then
setPedControlState( ped, \"jump\", true )
setTimer ( function (ped) if ( isElement ( ped ) ) then setPedControlState ( ped, \"jump\", false) end end, 800, 1, ped )
end
end
addEventHandler( \"Zomb_Jump\", getRootElement(), Zjump )
--MAKES A ZOMBIE PUNCH
addEvent( \"Zomb_Punch\", true )
function Zpunch ( ped )
if (isElement(ped)) then
setPedControlState( ped, \"fire\", true )
setTimer ( function (ped) if ( isElement ( ped ) ) then setPedControlState ( ped, \"fire\", false) end end, 800, 1, ped )
end
end
addEventHandler( \"Zomb_Punch\", getRootElement(), Zpunch )
--MAKES A ZOMBIE STFU
addEvent( \"Zomb_STFU\", true )
function Zstfu ( ped )
if (isElement(ped)) then
setPedVoice(ped, \"PED_TYPE_DISABLED\")
end
end
addEventHandler( \"Zomb_STFU\", getRootElement(), Zstfu )
--MAKES A ZOMBIE MOAN
addEvent( \"Zomb_Moan\", true )
function Zmoan ( ped, randnum )
if (isElement(ped)) then
local Zx,Zy,Zz = getElementPosition( ped )
local sound = playSound3D(\"sounds/mgroan\"..randnum..\".ogg\", Zx, Zy, Zz, false)
setSoundMaxDistance(sound, 20)
end
end
addEventHandler( \"Zomb_Moan\", getRootElement(), Zmoan )
--ZOMBIE HEADSHOTS TO ALL BUT HELMETED ZOMBIES
function zombiedamaged ( attacker, weapon, bodypart )
if getElementType ( source ) == \"ped\" then
if (getElementData (source, \"zombie\") == true) then
   if ( bodypart == 9 ) then
      helmeted = \"no\"
      local zskin = getElementModel ( source )
      for k, skin in pairs( helmetzombies ) do
         if skin == zskin then
            helmeted = \"yes\"
         end
      end
      if helmeted == \"no\" then
         triggerServerEvent (\"headboom\", source, source, attacker, weapon, bodypart )
      end
   end
end
end
end
addEventHandler ( \"onClientPedDamage\", getRootElement(), zombiedamaged )
function zombiedkilled(killer, weapon, bodypart)
if getElementType ( source ) == \"ped\" then
if (getElementData (source, \"zombie\") == true) then
   setElementCollisionsEnabled(source, false)
end
end
end
addEventHandler ( \"onClientPedWasted\", getRootElement(), zombiedkilled )
--CAUSES MORE DAMAGE TO PLAYER WHEN ATTACKED BY A ZOMBIE
function zombieattack ( attacker, weapon, bodypart )
if (attacker) then
if getElementType ( attacker ) == \"ped\" then
   if (getElementData (attacker, \"zombie\") == true) then
      local playerHealth = getElementHealth ( getLocalPlayer() )
      if playerHealth > 15 then
         setElementHealth ( source, playerHealth - 15 )
      else
         triggerServerEvent (\"playereaten\", source, source, attacker, weapon, bodypart )
      end
   end
end
end
end
addEventHandler ( \"onClientPlayerDamage\", getLocalPlayer(), zombieattack )
--WOOD GUI
function showwoodpic ( theElement, matchingDimension )
if ( theElement == getLocalPlayer() ) and (getElementData ( source, \"purpose\" ) == \"zombiewood\" ) then
guiSetVisible ( woodpic, true )
end
end
addEventHandler ( \"onClientColShapeHit\", getRootElement(), showwoodpic )
function hidewoodpic ( theElement, matchingDimension )
if ( theElement == getLocalPlayer() ) and (getElementData ( source, \"purpose\" ) == \"zombiewood\" ) then
guiSetVisible ( woodpic, false )
end
end
addEventHandler ( \"onClientColShapeLeave\", getRootElement(), hidewoodpic )
--ZOMBIES ATTACK FROM BEHIND AND GUI STUFF
function movethroatcol ()
local screenWidth, screenHeight = guiGetScreenSize()
local dcount = tostring(table.getn( myZombies ))
dxDrawText( dcount, screenWidth-40, screenHeight -50, screenWidth, screenHeight, tocolor ( 0, 0, 0, 255 ), 1.44, \"pricedown\" )
dxDrawText( dcount, screenWidth-42, screenHeight -52, screenWidth, screenHeight, tocolor ( 255, 255, 255, 255 ), 1.4, \"pricedown\" )
if isElement(throatcol) then
local playerrot = getPedRotation ( getLocalPlayer () )
local radRot = math.rad ( playerrot )
local radius = 1
local px,py,pz = getElementPosition( getLocalPlayer () )
local tx = px + radius * math.sin(radRot)
local ty = py + -(radius) * math.cos(radRot)
local tz = pz
setElementPosition ( throatcol, tx, ty, tz )
end
end
addEventHandler ( \"onClientRender\", getRootElement(), movethroatcol )
function choketheplayer ( theElement, matchingDimension )
if getElementType ( theElement ) == \"ped\" and ( isPlayerDead ( getLocalPlayer () ) == false ) then
        if ( getElementData ( theElement, \"target\" ) == getLocalPlayer () ) and (getElementData (theElement, \"zombie\") == true) then
   local px,py,pz = getElementPosition( getLocalPlayer () )
   setTimer ( checkplayermoved, 600, 1, theElement, px, py, pz)
end
    end
end
addEventHandler ( \"onClientColShapeHit\", getRootElement(), choketheplayer )
function checkplayermoved (zomb, px, py, pz)
if (isElement(zomb)) then
local nx,ny,nz = getElementPosition( getLocalPlayer () )
local distance = (getDistanceBetweenPoints3D (px, py, pz, nx, ny, nz))
if (distance < .7) and ( isPlayerDead ( getLocalPlayer () ) == false ) then
   setElementData ( zomb, \"status\", \"throatslashing\" )
end
end
end
--ALERTS ANY IDLE ZOMBIES WITHIN A RADIUS OF 10 WHEN GUNSHOTS OCCUR OR OTHER ZOMBIES GET ALERTED
function zombieradiusalert (theElement)
local Px,Py,Pz = getElementPosition( theElement )
local zombies = getElementsByType ( \"ped\" )
for theKey,theZomb in ipairs(zombies) do
if (isElement(theZomb)) then
   if (getElementData (theZomb, \"zombie\") == true) then
      if ( getElementData ( theZomb, \"status\" ) == \"idle\" ) then
         local Zx,Zy,Zz = getElementPosition( theZomb )
         local distance = (getDistanceBetweenPoints3D (Px, Py, Pz, Zx, Zy, Zz))
         if (distance < 10) and ( isPlayerDead ( getLocalPlayer () ) == false ) then
            isthere = \"no\"
            for k, ped in pairs( myZombies ) do
               if ped == theZomb then
                  isthere = \"yes\"
               end
            end
            if isthere == \"no\" and (getElementData (getLocalPlayer (), \"zombie\") ~= true) then
               if (getElementType ( theElement ) == \"ped\") then
                  local isclear = isLineOfSightClear (Px, Py, Pz, Zx, Zy, Zz, true, false, false, true, false, false, false) 
                  if (isclear == true) then
                     setElementData ( theZomb, \"status\", \"chasing\" )
                     setElementData ( theZomb, \"target\", getLocalPlayer () )
                     table.insert( myZombies, theZomb ) --ADDS ZOMBIE TO PLAYERS COLLECTION
                  end
               else
                  setElementData ( theZomb, \"status\", \"chasing\" )
                  setElementData ( theZomb, \"target\", getLocalPlayer () )
                  table.insert( myZombies, theZomb ) --ADDS ZOMBIE TO PLAYERS COLLECTION
               end
            end
         end
      end
   end
end
end
end
function shootingnoise ( weapon, ammo, ammoInClip, hitX, hitY, hitZ, hitElement)
if alertspacer ~= 1 then
if (weapon == 9) then
   alertspacer = 1
   setTimer ( resetalertspacer, 5000, 1 )
   zombieradiusalert(getLocalPlayer ())
elseif (weapon > 21) and (weapon ~= 23) then
   alertspacer = 1
   setTimer ( resetalertspacer, 5000, 1 )
   zombieradiusalert(getLocalPlayer ())
end
end
if hitElement then
if (getElementType ( hitElement ) == \"ped\") then
   if (getElementData (hitElement, \"zombie\") == true) then         
      isthere = \"no\"
      for k, ped in pairs( myZombies ) do
         if ped == hitElement then
            isthere = \"yes\"
         end
      end
      if isthere == \"no\" and (getElementData (getLocalPlayer (), \"zombie\") ~= true) then
         setElementData ( hitElement, \"status\", \"chasing\" )
         setElementData ( hitElement, \"target\", getLocalPlayer () )
         table.insert( myZombies, hitElement ) --ADDS ZOMBIE TO PLAYERS COLLECTION
         zombieradiusalert (hitElement)
      end
   end
end
end
end
addEventHandler ( \"onClientPlayerWeaponFire\", getLocalPlayer (), shootingnoise )
function resetalertspacer ()
alertspacer = nil
end
function choketheplayer ( theElement, matchingDimension )
if getElementType ( theElement ) == \"ped\" and ( isPlayerDead ( getLocalPlayer () ) == false ) and (getElementData (theElement , \"zombie\") == true) then
        if ( getElementData ( theElement, \"target\" ) == getLocalPlayer () ) then
   local px,py,pz = getElementPosition( getLocalPlayer () )
   setTimer ( checkplayermoved, 600, 1, theElement, px, py, pz)
end
    end
end
addEvent( \"Spawn_Placement\", true )
function Spawn_Place(xcoord, ycoord)
local x,y,z = getElementPosition( getLocalPlayer() )
local posx = x+xcoord
local posy = y+ycoord
local gz = getGroundPosition ( posx, posy, z+500 )
triggerServerEvent (\"onZombieSpawn\", getLocalPlayer(), posx, posy, gz+1 )
end
addEventHandler(\"Spawn_Placement\", getRootElement(), Spawn_Place)

 
server
 

ZombieLimit = get(\"zombies.MaxZombies\")-- HOW MANY ZOMBIES SHOULD EXIST AT MAXIMUM?
ZombieStreaming = get(\"zombies.StreamMethod\") -- 1 to constantly stream zombies, 0 to only allow zombies to spawn via createZombie function, 2 to only allow spawning at set spawnpoints
ZombiePedSkins = {13,22,56,67,68,69,70,92,97,105,107,108,126,127,128,152,162,167,188,195,206,209,212,229,230,258,264,277,280,287 } --ALTERNATE SKIN LISTS FOR ZOMBIES (SHORTER LIST IS TEXTURED ZOMBIES ONLY)
--ZombiePedSkins = {7,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,43,44,45,36,37,38,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,66,67,68,69,70,71,72,73,75,76,77,78,79,80,81,82,83,85,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,112,113,114,115,116,117,118,120,121,122,123,124,125,126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148,150,151,152,153,154,155,156,157,158,159,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,209,210,211,212,213,214,215,216,217,218,219,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255,256,257,258,259,260,261,262,263,264,275,276,277,278,279,280,281,282,283,284,285,286,287,288 }
ZombieSpeed = get(\"zombies.Speed\")
if ZombieSpeed == 0 then --super slow zombies (goofy looking)
chaseanim = \"WALK_drunk\"
checkspeed = 2000
elseif ZombieSpeed == 1 then -- normal speed
chaseanim = \"run_old\"
checkspeed = 1000
elseif ZombieSpeed == 2 then -- rocket zombies (possibly stressful on server)
chaseanim = \"Run_Wuzi\"
checkspeed = 680
else -- defaults back to normal
chaseanim = \"run_old\"
checkspeed = 1000
end
resourceRoot = getResourceRootElement()
moancount =0
moanlimit = 10
everyZombie = { }
--IDLE BEHAVIOUR OF A ZOMBIE
function Zomb_Idle (ped)
if isElement(ped) then
if ( getElementData ( ped, \"status\" ) == \"idle\" ) and ( isPedDead ( ped ) == false ) and (getElementData (ped, \"zombie\") == true) then
   local action = math.random( 1, 6 )
   if action < 4 then -- walk a random direction
      local rdmangle = math.random( 1, 359 )
      setPedRotation( ped, rdmangle )
      setPedAnimation ( ped, \"PED\", \"Player_Sneak\", -1, true, true, true)
      setTimer ( Zomb_Idle, 7000, 1, ped )
   elseif action == 4 then -- get on the ground
      setPedAnimation ( ped, \"MEDIC\", \"cpr\", -1, false, true, true)
      setTimer ( Zomb_Idle, 4000, 1, ped )
   elseif action == 5 then -- stand still doing nothing
      setPedAnimation ( ped )
      setTimer ( Zomb_Idle, 4000, 1, ped )
   end
end
end
end
--BEHAVIOUR WHILE CHASING PLAYERS
function Zomb_chase (ped, Zx, Zy, Zz )
if isElement(ped) then
if (getElementData ( ped, \"status\" ) == \"chasing\") and (getElementData (ped, \"zombie\") == true) then
   local x, y, z = getElementPosition( ped )
   if (getElementData ( ped, \"target\" ) == nil) and getElementData ( ped, \"Tx\" ) ~= false then         
      local Px = getElementData ( ped, \"Tx\" )
      local Py = getElementData ( ped, \"Ty\" )
      local Pz = getElementData ( ped, \"Tz\" )
      local Pdistance = (getDistanceBetweenPoints3D( Px, Py, Pz, x, y, z ))
      if (Pdistance < 1.5 ) then
         setTimer ( function (ped) if ( isElement ( ped ) ) then setElementData ( ped, \"status\", \"idle\" ) end end, 2000, 1, ped )
      end
   end
   local distance = (getDistanceBetweenPoints3D( x, y, z, Zx, Zy, Zz ))         
   if (distance < 1 ) then -- IF THE PED HASNT MOVED
      if (getElementData ( ped, \"target\" ) == nil) then
         local giveup = math.random( 1, 15 )
         if giveup == 1 then
            setElementData ( ped, \"status\", \"idle\" )
         else
            local action = math.random( 1, 2 )
            if action == 1 then
               setPedAnimation ( ped )
               triggerClientEvent ( \"Zomb_Punch\", getRootElement(), ped )
               setTimer ( function (ped) if ( isElement ( ped ) ) then setPedAnimation ( ped, \"ped\", chaseanim, -1, true, true, true ) end end, 800, 1, ped )
               setTimer ( Zomb_chase, 2000, 1, ped, x, y, z )
            elseif action == 2 then
               setPedAnimation ( ped )
               triggerClientEvent ( \"Zomb_Jump\", getRootElement(), ped )
               setTimer ( Zomb_chase, 3500, 1, ped, x, y, z )
            end
         end
      else 
         local Ptarget = (getElementData ( ped, \"target\" ))
         if isElement(Ptarget) then
            local Px, Py, Pz = getElementPosition( Ptarget )
            local Pdistance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
            if (Pdistance < 1.2 ) then -- ATTACK A PLAYER IF THEY ARE CLOSE
               if ( isPedDead ( Ptarget ) ) then --EAT A DEAD PLAYER
                  setPedAnimation ( ped )
                  setPedAnimation ( ped, \"MEDIC\", \"cpr\", -1, false, true, false)
                  setTimer ( function (ped) if ( isElement ( ped ) ) then setElementData ( ped, \"status\", \"idle\" ) end end, 10000, 1, ped )
                  setTimer ( function (ped) if ( isElement ( ped ) ) then setPedRotation ( ped, getPedRotation(ped)-180) end end, 10000, 1, ped )
                  zmoan(ped)
               else
                  local action = math.random( 1, 6 )
                  if action == 1 then
                     setPedAnimation ( ped)
                     triggerClientEvent ( \"Zomb_Jump\", getRootElement(), ped )
                     setTimer ( Zomb_chase, 2000, 1, ped, x, y, z )
                  else
                     setPedAnimation ( ped)
                     triggerClientEvent ( \"Zomb_Punch\", getRootElement(), ped )
                     setTimer ( function (ped) if ( isElement ( ped ) ) then setPedAnimation ( ped, \"ped\", chaseanim, -1, true, true, true ) end end, 800, 1, ped )
                     setTimer ( Zomb_chase, 2000, 1, ped, x, y, z )
                  end
               end
            else
               if ( isPedDead (Ptarget) ) then
               setTimer ( function (ped) if ( isElement ( ped ) ) then setElementData ( ped, \"status\", \"idle\" ) end end, 2000, 1, ped )
               setTimer ( function (ped) if ( isElement ( ped ) ) then setPedRotation ( ped, getPedRotation(ped)-180) end end, 1800, 1, ped )
               else
                  local action = math.random( 1, 2 )
                  if action == 1 then
                     setPedAnimation ( ped)
                     triggerClientEvent ( \"Zomb_Punch\", getRootElement(), ped )
                     setTimer ( function (ped) if ( isElement ( ped ) ) then setPedAnimation ( ped, \"ped\", chaseanim, -1, true, true, true ) end end, 800, 1, ped )
                     setTimer ( Zomb_chase, 2000, 1, ped, x, y, z )
                  elseif action == 2 then
                     setPedAnimation ( ped)
                     triggerClientEvent ( \"Zomb_Jump\", getRootElement(), ped )
                     setTimer ( Zomb_chase, 2000, 1, ped, x, y, z )
                  end
               end
            end
         else
            setElementData ( ped, \"status\", \"idle\" )
         end
      end
   else
      setPedAnimation ( ped, \"ped\", chaseanim, -1, true, true, true) --KEEP WALKING
      setTimer ( Zomb_chase, checkspeed, 1, ped, x, y, z ) --CHECK AGAIN
   end
end
end
end
--SET THE DIRECTION OF THE ZOMBIE
function setangle ()
for theKey,ped in ipairs(everyZombie) do
if isElement(ped) then
   if ( getElementData ( ped, \"status\" ) == \"chasing\" ) then
      local x
      local y
      local z
      local px
      local py
      local pz
      if ( getElementData ( ped, \"target\" ) ~= nil ) then
         local ptarget = getElementData ( ped, \"target\" )
         if isElement(ptarget) then
            x, y, z = getElementPosition( ptarget )
            px, py, pz = getElementPosition( ped )
         else
            setElementData ( ped, \"status\", \"idle\" )
            x, y, z = getElementPosition( ped )
            px, py, pz = getElementPosition( ped )
         end
         zombangle = ( 360 - math.deg ( math.atan2 ( ( x - px ), ( y - py ) ) ) ) % 360 --MAGIC SPELL TO MAKE PEDS LOOK AT YOU
         setPedRotation( ped, zombangle )
      elseif ( getElementData ( ped, \"target\" ) == nil ) and (getElementData ( ped, \"Tx\" ) ~= false) then --IF THE PED IS AFTER THE PLAYERS LAST KNOWN WHEREABOUTS
         x = getElementData ( ped, \"Tx\" )
         y = getElementData ( ped, \"Ty\" )
         z = getElementData ( ped, \"Tz\" )
         px, py, pz = getElementPosition( ped )
         zombangle = ( 360 - math.deg ( math.atan2 ( ( x - px ), ( y - py ) ) ) ) % 360 --MAGIC SPELL TO MAKE PEDS LOOK AT YOU
         setPedRotation( ped, zombangle )
      end
   end
end
end
end
--SETS THE ZOMBIE ACTIVITY WHEN STATUS CHANGES
addEventHandler ( \"onElementDataChange\", getRootElement(),
function ( dataName )
if getElementType ( source ) == \"ped\" and dataName == \"status\" then
if (getElementData (source, \"zombie\") == true) then
   if ( isPedDead ( source ) == false ) then
      if (getElementData ( source, \"status\" ) ==  \"chasing\" ) then
         local Zx, Zy, Zz = getElementPosition( source )
         setTimer ( Zomb_chase, 1000, 1, source, Zx, Zy, Zz )
         local newtarget = (getElementData ( source, \"target\" ))
         if isElement (newtarget) then
            if getElementType ( newtarget ) == \"player\" then
               setElementSyncer ( source, newtarget )
            end
         end
         zmoan(source)
      elseif (getElementData ( source, \"status\" ) ==  \"idle\" ) then
         setTimer ( Zomb_Idle, 1000, 1, source)
      elseif (getElementData ( source, \"status\" ) ==  \"throatslashing\" ) then
         local tx,ty,tz = getElementPosition( source )
         local ptarget = getElementData ( source, \"target\" )
         if isElement(ptarget) then
            local vx,vy,vz = getElementPosition( ptarget )
            local zombdistance = (getDistanceBetweenPoints3D (tx, ty, tz, vx, vy, vz))
            if (zombdistance < . then
               zmoan(source)
               setPedAnimation ( source, \"knife\", \"KILL_Knife_Player\", -1, false, false, true)
               setPedAnimation ( ptarget, \"knife\", \"KILL_Knife_Ped_Damage\", -1, false, false, true)
               setTimer ( Playerthroatbitten, 2300, 1, ptarget, source) 
               setTimer ( function (source) if ( isElement ( source ) ) then setElementData ( source, \"status\", \"idle\" ) end end, 5000, 1, source )
            else
               setElementData ( source, \"status\", \"idle\" )
            end
         else
            setElementData ( source, \"status\", \"idle\" )
         end
      end
   elseif (getElementData ( source, \"status\" ) ==  \"dead\" ) then
      setTimer ( Zomb_delete, 10000, 1, source)
   end
end
end
end)
--RESOURCE START/INITIAL SETUP
function outbreak(startedResource)
newZombieLimit = get(\"\" .. getResourceName(startedResource) .. \".Zlimit\")
if newZombieLimit ~= false then
if newZombieLimit > ZombieLimit then 
   newZombieLimit = ZombieLimit
end
else
newZombieLimit = ZombieLimit
end
WoodTimer = setTimer ( WoodSetup, 2000, 1) -- CHECKS FOR BARRIERS
if startedResource == getThisResource() then
--      call(getResourceFromName(\"scoreboard\"), \"scoreboardAddColumn\", \"Zombie kills\") --ADDS TO SCOREBOARD
local allplayers = getElementsByType ( \"player\" )
for pKey,thep in ipairs(allplayers) do
   setElementData ( thep, \"dangercount\", 0 )
end   
local alivePlayers = getAlivePlayers ()
for playerKey, playerValue in ipairs(alivePlayers) do
   setElementData ( playerValue, \"alreadyspawned\", true  )
end
if ZombieSpeed == 2 then
   MainTimer1 = setTimer ( setangle, 200, 0) -- KEEPS ZOMBIES FACING THE RIGHT DIRECTION (fast)
else
   MainTimer1 = setTimer ( setangle, 400, 0) -- KEEPS ZOMBIES FACING THE RIGHT DIRECTION
end
MainTimer3 = setTimer ( clearFarZombies, 3000, 0) --KEEPS ALL THE ZOMBIES CLOSE TO PLAYERS   
if ZombieStreaming == 1 then
   MainTimer2 = setTimer ( SpawnZombie, 2500, 0 ) --Spawns zombies in random locations
elseif ZombieStreaming == 2 then
   MainTimer2 = setTimer ( SpawnpointZombie, 2500, 0 ) --spawns zombies in zombie spawnpoints
end
end
end
addEventHandler(\"onResourceStart\", getRootElement(), outbreak)
function player_Connect()
setElementData ( source, \"dangercount\", 0 )
end
addEventHandler ( \"onPlayerConnect\", getRootElement(), player_Connect )
function WoodSetup()
local allcols = getElementsByType ( \"colshape\" ) --clears off old wood cols
for colKey, colValue in ipairs(allcols) do
if ( getElementData ( colValue, \"purpose\" ) ==\"zombiewood\" ) then
   destroyElement(colValue)
end
end   
local allobjects = getElementsByType ( \"object\" ) --SETS UP ALL THE WOOD BARRIERS
for objectKey, objectValue in ipairs(allobjects) do
if ( getElementData ( objectValue, \"purpose\" ) ==\"zombiewood\" ) then
   setElementDimension ( objectValue, 26 )
   local x,y,z = getElementPosition( objectValue )
   local thecol = createColSphere ( x, y, z, 1.6 )
   setElementData ( thecol, \"purpose\", \"zombiewood\" )
   setElementParent ( thecol, objectValue )
end
end   
end
function ReduceMoancount()
moancount = moancount-1
end
function zmoan(zombie)
if moancount < moanlimit then
moancount = moancount+1
local randnum = math.random( 1, 10 )
triggerClientEvent ( \"Zomb_Moan\", getRootElement(), zombie, randnum )
setTimer ( ReduceMoancount, 800, 1 )
end
end
--CLEARS A DEAD ZOMBIE
function Zomb_delete (ped)
if isElement(ped) then
if (getElementData (ped, \"zombie\") == true) then
   for theKey,thePed in ipairs(everyZombie) do
      if ped == thePed then
         table.remove( everyZombie, theKey )
         break
      end
   end
   destroyElement ( ped )
end
end
end
--HEADSHOTS
addEvent( \"headboom\", true )
function Zheadhit ( ped,attacker, weapon, bodypart)
if (getElementData (ped, \"zombie\") == true) then
killPed ( ped, attacker, weapon, bodypart )
setPedHeadless  ( ped, true )
end
end
addEventHandler( \"headboom\", getRootElement(), Zheadhit )
--KILL FROM ZOMBIE ATTACK
addEvent( \"playereaten\", true )
function Playerinfected ( player, attacker, weapon, bodypart)
    killPed ( player, attacker, weapon, bodypart )
end
addEventHandler( \"playereaten\", getRootElement(), Playerinfected )
--CHECKS FOR ZOMBIE GRABBING FROM BEHIND
function Playerthroatbitten ( player, attacker)
local Zx, Zy, Zz = getElementPosition( attacker )
local Px, Py, Pz = getElementPosition( player )
local distance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
if (distance < 1) then
killPed ( player, attacker, weapon, bodypart )
else
setPedAnimation (player)
end
end
--ADJUSTS PLAYERS ZOMBIE KILL SCORE
function deanimated( ammo, attacker, weapon, bodypart )
if (attacker) then
if (getElementType ( attacker ) == \"player\") and (getElementType ( source ) == \"ped\") then
   if (getElementData (source, \"zombie\") == true) then
      local oldZcount = getElementData ( attacker, \"Zombie kills\" )
      if oldZcount ~= false then
         setElementData ( attacker, \"Zombie kills\", oldZcount+1  )
         triggerEvent ( \"onZombieWasted\", source, attacker, weapon, bodypart )
      else
         setElementData ( attacker, \"Zombie kills\", 1  )
         triggerEvent ( \"onZombieWasted\", source, attacker, weapon, bodypart )            
      end
   end
end
end
end
addEventHandler(\"onPedWasted\", resourceRoot, deanimated)
--STUFF TO ALLOW PLAYERS TO PLACE BOARDS
function boarditup( player, key, keyState )
local rightspot = 0
local allcols = getElementsByType ( \"colshape\" )
for ColKey,theCol in ipairs(allcols) do
if (getElementData ( theCol, \"purpose\" ) == \"zombiewood\" ) then
   if (isElementWithinColShape ( player, theCol )) then
      local rightcol = theCol
      local Cx, Cy, Cz = getElementPosition( rightcol )
      local Bx, By, Bz = getElementPosition( player )
      woodangle = ( 360 - math.deg ( math.atan2 ( ( Cx - Bx ), ( Cy - By ) ) ) ) % 360
      setPedRotation( player, woodangle )
      setPedAnimation(player, \"riot\", \"RIOT_PUNCHES\", 3000, true, true, true )
      local wx, wy, wz = getElementPosition( player )
      setTimer( doneboarding, 2000, 1, player, rightcol, wx, wy, wz )
   end
end
end
end
addCommandHandler ( \"construct\", boarditup )
function doneboarding(player, rightcol, wx, wy, wz)
setPedAnimation(player)
local newx, newy, newz = getElementPosition( player )
local distance = (getDistanceBetweenPoints3D( wx, wy, wz, newx, newy, newz ))         
if (distance < .7 ) then
newwood = getElementParent ( rightcol )
setElementDimension ( newwood, 25 )
setTimer( setElementDimension, 50, 1, newwood, 0)
end
end
 
--SPAWN ZOMBIE (now can be cancelled!)
addEvent( \"onZombieSpawn\", true )
function RanSpawn_Z ( gx, gy, gz, rot)
local safezone = 0
local allradars = getElementsByType(\"radararea\")
for theKey,theradar in ipairs(allradars) do
if getElementData(theradar, \"zombieProof\") == true then
   if isInsideRadarArea ( theradar, gx, gy ) then
      safezone = 1
   end
end
end
if safezone == 0 then
if table.getn ( everyZombie ) < newZombieLimit then
   if not rot then
      rot = math.random (1,359)
   end
   randomZskin = math.random ( 1, table.getn ( ZombiePedSkins ) )         
   local zomb = createPed( tonumber( ZombiePedSkins[randomZskin] ), gx, gy, gz )
   if zomb ~= false then
      setElementData ( zomb, \"zombie\", true  )
      table.insert( everyZombie, zomb )   
      setTimer ( function (zomb, rot) if ( isElement ( zomb ) ) then setPedRotation ( zomb, rot ) end end, 500, 1, zomb, rot )
      setTimer ( function (zomb) if ( isElement ( zomb ) ) then setPedAnimation ( zomb, \"ped\", chaseanim, -1, true, true, true ) end end, 1000, 1, zomb )
      setTimer ( function (zomb) if ( isElement ( zomb ) ) then setElementData ( zomb, \"status\", \"idle\" ) end end, 2000, 1, zomb )
      triggerClientEvent ( \"Zomb_STFU\", getRootElement(), zomb )
   end
end
end
end
addEventHandler( \"onZombieSpawn\", getRootElement(), RanSpawn_Z )
 
--SPAWNS ZOMBIES RANDOMLY NEAR PLAYERS
function SpawnZombie ()
local pacecount = 0
while pacecount < 5 do   --4 ZOMBIES AT A TIME TO PREVENT FPS DROP
if (table.getn( everyZombie )+pacecount < newZombieLimit ) and (ZombieStreaming == 1) then   
   local xcoord = 0
   local ycoord = 0
   local xdirection = math.random(1,2)
   if xdirection == 1 then
      xcoord = math.random(15,40)
   else
      xcoord = math.random(-40,-15)
   end
   local ydirection = math.random(1,2)
   if ydirection == 1 then
      ycoord = math.random(15,40)
   else
      ycoord = math.random(-40,-15)
   end
   local liveplayers = getAlivePlayers ()
   if (table.getn( liveplayers ) > 0 ) then
      local lowestcount = 99999
      local lowestguy = nil
      for PKey,thePlayer in ipairs(liveplayers) do
         if isElement(thePlayer) then
            if (getElementData (thePlayer, \"dangercount\")) and (getElementData(thePlayer, \"zombieProof\") ~= true) and (getElementData(thePlayer, \"alreadyspawned\" ) == true) then
               if (getElementData (thePlayer, \"dangercount\") < lowestcount) then
                  local safezone = 0
                  local gx, gy, gz = getElementPosition( thePlayer )
                  local allradars = getElementsByType(\"radararea\")
                  for theKey,theradar in ipairs(allradars) do
                     if getElementData(theradar, \"zombieProof\") == true then
                        if isInsideRadarArea ( theradar, gx, gy ) then
                           safezone = 1
                        end
                     end
                  end
                  if safezone == 0 then
                     lowestguy = thePlayer
                     lowestcount = getElementData (thePlayer, \"dangercount\")
                  end
               end
            end
         end
      end
      pacecount = pacecount+1
      if isElement(lowestguy) then
         triggerClientEvent ( \"Spawn_Placement\", lowestguy, ycoord, xcoord )
      else
         pacecount = pacecount+1
      end
   else
      pacecount = pacecount+1
   end
else
   pacecount = pacecount+1
end
end
end
--SPAWNS ZOMBIES IN SPAWNPOINTS NEAR PLAYERS
function SpawnpointZombie ()
local pacecount = 0
while pacecount < 6 do   --5 ZOMBIES AT A TIME TO PREVENT FPS DROP
if (table.getn( everyZombie )+pacecount < newZombieLimit ) and (ZombieStreaming == 2) then   
   local liveplayers = getAlivePlayers ()
   if (table.getn( liveplayers ) > 0 ) then
      local lowestcount = 99999
      local lowestguy = nil
      for PKey,thePlayer in ipairs(liveplayers) do --THIS PART GETS THE PLAYER WITH THE LEAST ZOMBIES ATTACKING
         if (getElementData (thePlayer, \"dangercount\")) and (getElementData(thePlayer, \"zombieProof\") ~= true) then
            if (getElementData (thePlayer, \"dangercount\") < lowestcount) then
               lowestguy = thePlayer
               lowestcount = getElementData (thePlayer, \"dangercount\")
            end
         end
      end
      if isElement(lowestguy) then
         local zombiespawns = { }
         local possiblezombies = getElementsByType ( \"Zombie_spawn\" )
         local Px, Py, Pz = getElementPosition( lowestguy )
         for ZombKey,theZomb in ipairs(possiblezombies) do
            local Zx, Zy, Zz = getElementPosition( theZomb )
            local distance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
            if (distance <  then
               table.remove( possiblezombies, ZombKey) --IF SPAWN IS TOO CLOSE TO ANY PLAYER
            end
         end
         local Px, Py, Pz = getElementPosition( lowestguy )
         for ZombKey2,theZomb2 in ipairs(possiblezombies) do
            local Zx, Zy, Zz = getElementPosition( theZomb2 )
            local distance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
            if (distance < 60) then --AS LONG AS THE SPAWN IS CLOSE ENOUGH TO A PLAYER
               table.insert( zombiespawns, theZomb2 )
            end
         end
         if (table.getn( zombiespawns ) >0 ) then--IF THE LOWEST PLAYER HAS ANY CLOSE SPAWNS,USE ONE
            local random = math.random ( 1, table.getn ( zombiespawns ) )
            local posX = getElementData(zombiespawns[random], \"posX\") 
            local posY = getElementData(zombiespawns[random], \"posY\") 
            local posZ = getElementData(zombiespawns[random], \"posZ\")
            local rot = getElementData(zombiespawns[random], \"rotZ\")
            pacecount = pacecount+1
            triggerEvent ( \"onZombieSpawn\",zombiespawns[random], posX, posY, posZ, rot )         
         else--IF THE LOWEST PLAYERS DOESNT HAVE ANY SPAWNS, THEN SEE IF ANYONE HAS ANY
            local zombiespawns = { }
            local possiblezombies = getElementsByType ( \"Zombie_spawn\" )
            local allplayers = getAlivePlayers ()
            for theKey,thePlayer in ipairs(allplayers) do
               local Px, Py, Pz = getElementPosition( thePlayer )
               for ZombKey,theZomb in ipairs(possiblezombies) do
                  local Zx, Zy, Zz = getElementPosition( theZomb )
                  local distance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
                  if (distance <  then
                     table.remove( possiblezombies, ZombKey) --IF SPAWN IS TOO CLOSE TO ANY PLAYER
                  end
               end
            end
            for theKey,thePlayer in ipairs(allplayers) do
               local Px, Py, Pz = getElementPosition( thePlayer )
               for ZombKey2,theZomb2 in ipairs(possiblezombies) do
                  local Zx, Zy, Zz = getElementPosition( theZomb2 )
                  local distance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
                  if (distance < 60) then --AS LONG AS THE SPAWN IS CLOSE ENOUGH TO A PLAYER
                     table.insert( zombiespawns, theZomb2 )
                  end
               end
            end
            if (table.getn( zombiespawns ) >1 ) then
               local random = math.random ( 1, table.getn ( zombiespawns ) )
               local posX = getElementData(zombiespawns[random], \"posX\") 
               local posY = getElementData(zombiespawns[random], \"posY\") 
               local posZ = getElementData(zombiespawns[random], \"posZ\")
               local rot = getElementData(zombiespawns[random], \"rotZ\")
               pacecount = pacecount+1
               triggerEvent ( \"onZombieSpawn\",zombiespawns[random], posX, posY, posZ, rot )         
            else
               pacecount = pacecount+1
            end
         end
      else
         pacecount = pacecount+1
      end
   else
      pacecount = pacecount+1
   end
else
   pacecount = pacecount+1
end
end
end
--DELETES ZOMBIES THAT ARE TOO FAR FROM ANY PLAYERS TO KEEP THEM MORE CONCENTRATED WHILE STREAMING ZOMBIES
function clearFarZombies ()
if newZombieLimit ~= false then
local toofarzombies = { }
local allplayers = getElementsByType ( \"player\" )
for ZombKey,theZomb in ipairs(everyZombie) do
   if isElement(theZomb) then
      if (getElementData (theZomb, \"zombie\") == true) then
         far = 1
         local Zx, Zy, Zz = getElementPosition( theZomb )
         for theKey,thePlayer in ipairs(allplayers) do
            local Px, Py, Pz = getElementPosition( thePlayer )
            local distance = (getDistanceBetweenPoints3D( Px, Py, Pz, Zx, Zy, Zz ))
            if (distance < 75) then
               far = 0
            end
         end
         if far == 1 then
            table.insert( toofarzombies, theZomb )
         end
      end
   else
      table.remove( everyZombie, ZombKey )
   end
end
if (table.getn( toofarzombies ) >1 ) then
   for ZombKey,theZomb in ipairs(toofarzombies) do
      if (getElementData (theZomb, \"zombie\") == true) and  ( getElementData ( theZomb, \"forcedtoexist\" ) ~= true) then
         Zomb_delete (theZomb)
      end
   end
end
end
end
-- DESTROYS UP TO 13 ZOMBIES THAT ARE IDLE WHEN A PLAYER SPAWNS (TO FORCE NEW ZOMBIES TO SPAWN NEAR THE NEW GUY)
function player_Spawn ()
if ZombieStreaming == 1 or ZombieStreaming == 2 then
local relocatecount = 0
for ZombKey,theZomb in ipairs(everyZombie) do
   if relocatecount < 14 then
      if ( getElementData ( theZomb, \"forcedtoexist\" ) ~= true) then
         if ( getElementData ( theZomb, \"status\" ) == \"idle\" ) and ( isPedDead ( theZomb ) == false ) and (getElementData (theZomb, \"zombie\") == true) then
            relocatecount = relocatecount+1
            Zomb_delete (theZomb)
         end
      end
   end
end
end
if ( getElementData ( source, \"alreadyspawned\" ) ~= true) then
setElementData ( source, \"alreadyspawned\", true  )
end
end
addEventHandler ( \"onPlayerSpawn\", getRootElement(), player_Spawn )
--EXPORTED FUNCTIONS!!!!!!!!!!!!!!
function createZombie ( x, y, z, rot, skin, interior, dimension )
if (table.getn( everyZombie ) < newZombieLimit ) then
--this part handles the args
if not x then return false end
if not y then return false end
if not z then return false end
if not rot then
   rot = math.random (1,359)
end
if not skin then
   randomZskin = math.random ( 1, table.getn ( ZombiePedSkins ) )         
   skin = ZombiePedSkins[randomZskin]
end
if not interior then interior = 0 end
if not dimension then dimension = 1 end
--this part spawns the ped
local zomb = createPed (tonumber(skin),tonumber(x),tonumber(y),tonumber(z))--spawns the ped
--if successful, this part applies the zombie settings/args
if (zomb ~= false) then
   setTimer ( setElementInterior, 100, 1, zomb, tonumber(interior)) --sets interior
   setTimer ( setElementDimension, 100, 1, zomb, tonumber(dimension)) --sets dimension
   setElementData ( zomb, \"zombie\", true  )
   setElementData ( zomb, \"forcedtoexist\", true  )
   setTimer ( function (zomb, rot) if ( isElement ( zomb ) ) then setPedRotation ( zomb, rot ) end end, 500, 1, zomb, rot )
   setTimer ( function (zomb) if ( isElement ( zomb ) ) then setElementData ( zomb, \"status\", \"idle\" ) end end, 2000, 1, zomb )
   setTimer ( function (zomb) if ( isElement ( zomb ) ) then setElementData ( zomb, \"forcedtoexist\", true ) end end, 1000, 1, zomb )
   setTimer ( function (zomb) if ( isElement ( zomb ) ) then table.insert( everyZombie, zomb ) end end, 1000, 1, zomb )
   triggerClientEvent ( \"Zomb_STFU\", getRootElement(), zomb )
   return zomb --returns the zombie element
else
   return false --returns false if there was a problem
end
else
return false --returns false if there was a problem
end
end
--check if a ped is a zombie or not
function isPedZombie(ped)
if (isElement(ped)) then
if (getElementData (ped, \"zombie\") == true) then
   return true
else
   return false
end
else
return false
end
end
addEvent( \"onZombieLostPlayer\", true )
function ZombieTargetCoords ( x,y,z )
setElementData ( source, \"Tx\", x, false )
setElementData ( source, \"Ty\", y, false )
setElementData ( source, \"Tz\", z, false )
end
addEventHandler( \"onZombieLostPlayer\", getRootElement(), ZombieTargetCoords )

Ennek a résznek van valami értelme? Még nagyon kezdetleges dolgoknak állok neki.
 

function cursor()
showCursor(true)
if
showCursor = true
then
showCursor(false)
end
end
addCommandHandler(\"klikk\", cursor)

Szeretném ezt a kaput úgy mozgatni parancsal, hogy ha valaki beírja a commandot, akkor mindenkinek megtörténjen a változás.
 

local gate = createObject(980, 282.29998779297, -1320.1999511719, 55.599998474121, 0, 0, 34.25 )
function open()
moveObject(gate, 980, 282.29998779297, -1320.1999511719, 55.599998474121, 0, 0, 0 )
end
addCommandHandler(\"gatebe\", open)
function close()
moveObject(gate, 980, 282.29998779297, -1320.1999511719, 49.9, 0, 0, 0 )
end
addCommandHandler(\"gateki\", close)

Szeretnénk gyorsasági versenyeket rendezni. Ezért kéne az a lehetőség, hogy a Commandot csak egyszer lehessen felhasználni és utána soha többet!
 

function consoleMoneyOnJoin ( )    
givePlayerMoney ( source, 20000 )
outputChatBox (\"Köszöntelek a szerverünkön! Jó szórakozást!\", source, 255, 0, 0)
end
addEventHandler ( \"onPlayerJoin\", getRootElement(), consoleMoneyOnJoin )