Modren

استخدم ذي getPlayerFromName getPedOccupiedVehicle

حطيت المود لحالة بسيرفر جديد وطفيت كل المودات و م نفع اضن الشيء ذا من اللعبه نفسها بس سويت حل مؤقت حطيت شخصية اللاعب بداتا قبل م يتغير الماب

انحلت المشكلة باقي شيء بسيط اللي هو يوم يتغير الماب او يشتغل onGamemodeMapStart تتغير شخصية اللاعبين الخارج الديث ماتش!!!! لان اول م يتغير الماب الشخصية تتحول ع شخصية سي جي اضن ذا تدخل من مود اخر

local myMarker = createMarker(726.43085, -1274.49963, 13.64844+1, 'arrow', 2.0, 0, 255, 0, 150) local myMarker1 = createMarker(726.21460, -1278.10498, 13.64844+1, 'arrow', 2.0, 0, 255, 0, 150) addEventHandler ( "onMarkerHit" , resourceRoot , function ( hitElement ) if ( source == myMarker ) then if ( getElementType ( hitElement ) == "player" ) then if getElementData (source, "markerhiting") == false then local Money = getPlayerMoney ( hitElement ) if ( Money >= 5000 ) then takePlayerMoney ( hitElement , 5000 ) setElementData ( hitElement, "markerhiting", true) setElementData ( source, "markerhiting", true) setElementPosition ( hitElement , 775.97052, -1279.57434, 13.64844 ) end else cancelEvent () end end elseif ( source == myMarker1 ) then if ( getElementType ( hitElement ) == "player" ) then if getElementData (source, "markerhitingA") == false then local Money = getPlayerMoney ( hitElement ) if ( Money >= 5000 ) then takePlayerMoney ( hitElement , 5000 ) setElementData ( hitElement, "markerhitingA", true) setElementData ( source, "markerhitingA", true) setElementPosition ( hitElement , 775.97052, -1279.57434, 13.64844 ) end else cancelEvent () end end end end) addEventHandler("onPlayerWasted",root, function () if getElementData (source, "markerhiting") == true then setElementData (myMarker, "markerhiting", false) elseif getElementData (source, "markerhitingA") == true then setElementData (myMarker1, "markerhitingA", false) end end)

عندي مشكلة ب (math.random+onGamemodeMapStart) في ذا الكود Server Side: debugEnabled = true --Game mode variables gameInterior = 0 gameRespawnTime = 3000 gameTeams = {} gameVehicles = {} gameMaxKills = 40 gameFF = "off" gameTimeHour = 0 gameTimeMin = 0 gameTimeLocked = false versionDisplay = nil xDebug = false xDebug2 = false textBoost = 0 xonPlayerWasted_Enabled = true mapResource = nil local tdma = nil function onMapLoad ( name ) --outputChatBox ( "LOADING NEW MAP... PLEASE WAIT" ) mapResource = getResourceRootElement(name) if xDebug then outputDebugString ( "Starting TDMA Main Control Suite" ) end if xDebug then outputDebugString ( "STARTED... Proceeding to load gamemode... WAIT!" ) end ----outputDebugString ( "Setting up Bases" ) setupBases(name) setGameType ("Team Death Match Arena") tdma = createElement("tdmagame") versionDisplay = textCreateDisplay () local versionText = textCreateTextItem ( "Team Death Match Arena v0.9", 0.975, 0.02, "medium", 255, 255, 255, 255, 1, "right" ) textDisplayAddText ( versionDisplay, versionText ) if ( tonumber(gameMaxKills) > 0 ) then local teamText = textCreateTextItem ( "Scores", 0.01, 0.24 + textBoost, "medium", 255,255,255, 255, 1 ) textDisplayAddText ( versionDisplay, teamText ) textBoost = textBoost + 0.020 for k,v in ipairs(gameTeams) do if xDebug2 then outputDebugString ( "**MAKING TEAM KILL TEXTS***" ) end if xDebug2 then outputDebugString ( "**GOT: " .. v.name .. " R:" .. v.red .. " G:" .. v.green .. " B:" .. v.blue ) end local teamName = v.name local teamKills = v.kills teamText = textCreateTextItem ( teamName .. ": " .. teamKills .. "/" .. gameMaxKills .. " kills", 0.01, 0.24 + textBoost, "medium", tonumber(v.red), tonumber(v.green), tonumber(v.blue), 255, 1 ) --setElementParent ( teamText, tdma ) v.teamText = teamText textDisplayAddText ( versionDisplay, teamText ) textBoost = textBoost + 0.015 end end for k,v in ipairs(gameTeams) do if ( gameFF == "on" ) then setTeamFriendlyFire ( v.team, true ) setTeamFriendlyFire ( v.team, true ) else setTeamFriendlyFire ( v.team, false ) setTeamFriendlyFire ( v.team, false ) end end --Start the pickup system from Included\pickup_system.lua initPickupSystem() --Start the vehicle system from Included\vehicle_system.lua initVehicleSystem() ----outputDebugString ( "Starting The Game" ) if xDebug then outputDebugString ( "[[[[[/*****STARTING GAME*****\]]]]]" ) end startGame() end addEventHandler( "onGamemodeMapStart", root, onMapLoad) function onMapUnload ( name ) --outputChatBox ( "UNLOADING LEVEL... PLEASE WAIT" ) for k = 1,#gameTeams do destroyElement ( gameTeams[k].team ) end textDestroyDisplay ( versionDisplay ) --Game mode variables gameInterior = 0 gameRespawnTime = 3000 gameTeams = {} gameVehicles = {} gameMaxKills = 40 gameFF = "off" gameTimeHour = 0 gameTimeMin = 0 gameTimeLocked = false versionDisplay = nil textBoost = 0 xonPlayerWasted_Enabled = true mapResource = nil destroyElement ( tdma ) for k,v in ipairs(getElementsByType("player")) do setPlayerTeam ( v, nil ) setElementData ( v, "tdma.teamid", false ) setElementData ( v, "tdma.playerHasSpawned", false ) end end addEventHandler( "onGamemodeMapStop", root, onMapUnload) function shuffleTable(inputData) local newTable = {} local i_RndTblPos = 0 while #inputData > 0 do i_RndTblPos = math.random(1,#inputData) table.insert ( newTable, inputData[i_RndTblPos] ) table.remove ( inputData, i_RndTblPos ) end return newTable end function onPlayerJoin () --fadeCamera ( source, false, 1.0, 0, 0, 0 ) --setTimer ( fadeCamera, 1000, 1, source, true, 1 ) setTimer ( firstSpawn, 1000, 1, source ) --showTextForPlayer2 ( source, 12000, 0, 0, 180, 1.5, "Welcome To Team Death Match Arena [By AlienX]" ) setPedStat ( source, 69, 1000 ) setPedStat ( source, 70, 1000 ) setPedStat ( source, 71, 1000 ) setPedStat ( source, 72, 1000 ) setPedStat ( source, 73, 1000 ) setPedStat ( source, 74, 1000 ) setPedStat ( source, 75, 1000 ) setPedStat ( source, 76, 1000 ) setPedStat ( source, 77, 1000 ) setPedStat ( source, 78, 1000 ) setPedStat ( source, 79, 1000 ) setElementData ( source, "tdma.sp", "n" ) statusTextDisplay = textCreateDisplay () local statusTextItem = textCreateTextItem ( "", 0.5, 0.95, "high", 255, 255, 255, 255, 1.5 ) textDisplayAddText ( statusTextDisplay, statusTextItem ) textDisplayAddObserver ( statusTextDisplay, source ) textDisplayAddObserver ( versionDisplay, source ) setElementData ( source, "tdma.status", statusTextItem ) setElementData( source, "tdma.teamMarker", nil ) if ( debugEnabled ) then outputDebugString ( getPlayerName(source) .. "> No marker for this player, Make one and attach it." ) end end addEvent("spawnWar", true) addEventHandler("spawnWar", root, onPlayerJoin) function firstSpawn ( source ) local thePlayer = source if xDebug then outputDebugString ( "Spawning player " .. getPlayerName(thePlayer) .. " for the very first time" ) end updatePlayerInfoBar ( thePlayer, 5200, "Please wait... Spawning" ) local randTeam = math.random(1,#gameTeams) local foundTeam = nil local foundTeamID = nil local allDone = false local scanPlayerCount = 128 local teamPlayerCount = 0 --outputDebugString ( "scanning teams now for auto assignment" ) for k,v in ipairs(gameTeams) do teamPlayerCount = countPlayersInTeam( v.team ) if ( teamPlayerCount < scanPlayerCount ) then scanPlayerCount = countPlayersInTeam ( v.team ) foundTeam = v foundTeamID = k allDone = true end end if ( allDone ) then if xDebug then outputDebugString ( "Spawning player " .. getPlayerName(thePlayer) .. " (ALLDONE) Team: " .. foundTeam.name ) end spawnThePlayer ( thePlayer, foundTeam ) setElementData ( thePlayer, "tdma.teamid", foundTeamID ) showTextForPlayer ( thePlayer, 5000, tonumber(foundTeam.red), tonumber(foundTeam.green), tonumber(foundTeam.blue), 1.5, "You have been automatically assigned to team " .. foundTeam.name ) --setMarkerColor ( theMarker, tonumber(gameTeams[foundTeamID].red), tonumber(gameTeams[foundTeamID].green), tonumber(gameTeams[foundTeamID].blue), 255 ) setPlayerNametagColor ( thePlayer, gameTeams[foundTeamID].red, gameTeams[foundTeamID].green, gameTeams[foundTeamID].blue ) else --Just select a random team if xDebug then outputDebugString ( "Spawning player " .. getPlayerName(thePlayer) .. " (NO FOUND) Team: " .. gameTeams[randTeam].name ) end spawnThePlayer ( thePlayer, gameTeams[1] ) setElementData ( thePlayer, "tdma.teamid", 1 ) --setMarkerColor ( theMarker, tonumber(gameTeams[1].red), tonumber(gameTeams[1].green), tonumber(gameTeams[1].blue), 255 ) setPlayerNametagColor ( thePlayer, gameTeams[1].red, gameTeams[1].green, gameTeams[1].blue ) end end function startGame() if xDebug then outputDebugString ( "... DONE" ) end local playerElementTree = getElementsByType ( "player" ) playerElementTree = shuffleTable(playerElementTree) for k,v in ipairs(playerElementTree) do setElementData ( v, "tdma.sp", "n" ) setElementData ( source, "tdma.playerHasSpawned", false ) --setElementInterior ( v, 10 ) --setTimer ( fadeCamera, 1000, 1, v, true, 1 ) setPedStat ( v, 69, 1000 ) setPedStat ( v, 70, 1000 ) setPedStat ( v, 71, 1000 ) setPedStat ( v, 72, 1000 ) setPedStat ( v, 73, 1000 ) setPedStat ( v, 74, 1000 ) setPedStat ( v, 75, 1000 ) setPedStat ( v, 76, 1000 ) setPedStat ( v, 77, 1000 ) setPedStat ( v, 78, 1000 ) setPedStat ( v, 79, 1000 ) showPlayerHudComponent ( v, "ammo", true ) showPlayerHudComponent ( v, "area_name", true ) showPlayerHudComponent ( v, "armour", true ) showPlayerHudComponent ( v, "breath", true ) showPlayerHudComponent ( v, "health", true ) showPlayerHudComponent ( v, "money", true ) showPlayerHudComponent ( v, "radar", true ) showPlayerHudComponent ( v, "vehicle_name", true ) showPlayerHudComponent ( v, "weapon", true ) --Setup the status bar for the player! statusTextDisplay = textCreateDisplay () local statusTextItem = textCreateTextItem ( "", 0.5, 0.95, "high", 255, 255, 255, 255, 1.5 ) textDisplayAddText ( statusTextDisplay, statusTextItem ) textDisplayAddObserver ( statusTextDisplay, v ) textDisplayAddObserver ( versionDisplay, v ) setElementData ( v, "tdma.status", statusTextItem ) firstSpawn ( v ) end end function restartGame() for k,v in ipairs(getElementsByType ( "player" )) do setElementData ( v, "tdma.sp", "n" ) fadeCamera ( v, false, 1.0, 0, 0, 0 ) --setElementInterior ( v, 10 ) --setTimer ( fadeCamera, 1000, 1, v, true, 1 ) setPedStat ( v, 69, 1000 ) setPedStat ( v, 70, 1000 ) setPedStat ( v, 71, 1000 ) setPedStat ( v, 72, 1000 ) setPedStat ( v, 73, 1000 ) setPedStat ( v, 74, 1000 ) setPedStat ( v, 75, 1000 ) setPedStat ( v, 76, 1000 ) setPedStat ( v, 77, 1000 ) setPedStat ( v, 78, 1000 ) setPedStat ( v, 79, 1000 ) showPlayerHudComponent ( v, "ammo", true ) showPlayerHudComponent ( v, "area_name", true ) showPlayerHudComponent ( v, "armour", true ) showPlayerHudComponent ( v, "breath", true ) showPlayerHudComponent ( v, "health", true ) showPlayerHudComponent ( v, "money", true ) showPlayerHudComponent ( v, "radar", true ) showPlayerHudComponent ( v, "vehicle_name", true ) showPlayerHudComponent ( v, "weapon", true ) local theTeamID = getElementData( v, "tdma.teamid" ) local theTeam = gameTeams[theTeamID] if ( theTeam ) then respawnThePlayer ( v, theTeam ) else firstSpawn ( v ) end end end function onMapFinish ( name ) if getThisResource() ~= name then return end for k,v in ipairs(getElementsByType("player")) do setElementInterior ( v, 0 ) setCameraInterior( v, 0 ) setElementData ( v, "tdma.teamMarker", nil ) setPlayerNametagColor ( v, 255, 255, 255 ) end end addEventHandler( "onResourceStop", root, onMapFinish) function spawnThePlayer ( source, team ) local randSpawn = math.random(1,#team.spawns) local randSkinPicker = math.random(1,#team.skins) local randSkin = tonumber(team.skins[randSkinPicker].id) local x = tonumber(team.spawns[randSpawn].x) + math.random(0,tonumber(team.spawns[randSpawn].rx)) local y = tonumber(team.spawns[randSpawn].y) + math.random(0,tonumber(team.spawns[randSpawn].ry)) local z = tonumber(team.spawns[randSpawn].z) + math.random(0,tonumber(team.spawns[randSpawn].rz)) local rot = tonumber(team.spawns[randSpawn].rot) local rx = tonumber(team.spawns[randSpawn].rx) local ry = tonumber(team.spawns[randSpawn].ry) local rz = tonumber(team.spawns[randSpawn].rz) if xDebug then outputDebugString ( "Spawn Data: spawns size: " .. #team.spawns .. " skin: " .. randSkin .. " x:" .. x .. " y:" .. y .. " z:" .. z .. " rot:" .. rot .. " rx:" .. rx .. " ry:" .. ry .. " zr:" .. rz ) end local playerHasSpawned = getElementData(source, "tdma.playerHasSpawned") if ( playerHasSpawned == false ) then --setCameraMode ( source, "fixed" ) --setTimer ( setCameraPosition, 1000, 1, source, x, y, z + 60 ) --setTimer ( setCameraLookAt, 1000, 1, source, x, y, z ) --setTimer ( setCameraRotation, 1000, source, rot, 0, 0 ) setCameraMatrix( source, x, y, z + 60, x, y, z ) setElementData ( source, "tdma.playerHasSpawned", true ) setTimer ( spawnPlayer, 3000, 1, source, x, y, z, tonumber(rot), tonumber(randSkin), tonumber(gameInterior) ) --spawnPlayer ( source, x,y,z, tonumber(rot), tonumber(randSkin), tonumber(gameInterior) ) else spawnPlayer ( source, x,y,z, tonumber(rot), tonumber(randSkin), tonumber(gameInterior) ) end setCameraInterior ( source, tonumber(gameInterior) ) --setCameraMode ( source, "player" ) setPlayerTeam ( source, team.team ) createBlipAttachedTo ( source, 0, 2, team.red, team.green, team.blue ) --playerSpawned ( source, team ) end function respawnThePlayer ( source, team ) local randSpawn = math.random(1,#team.spawns) local randSkinPicker = math.random(1,#team.skins) local randSkin = tonumber(team.skins[randSkinPicker].id) local x = tonumber(team.spawns[randSpawn].x) + math.random(0,tonumber(team.spawns[randSpawn].rx)) local y = tonumber(team.spawns[randSpawn].y) + math.random(0,tonumber(team.spawns[randSpawn].ry)) local z = tonumber(team.spawns[randSpawn].z) + math.random(0,tonumber(team.spawns[randSpawn].rz)) local rot = tonumber(team.spawns[randSpawn].rot) local rx = tonumber(team.spawns[randSpawn].rx) local ry = tonumber(team.spawns[randSpawn].ry) local rz = tonumber(team.spawns[randSpawn].rz) --outputDebugString ( "Respawning Player " .. getClientName(source) .. " to team " .. team.name ) local spawnComplete = spawnPlayer ( source, x, y, z, tonumber(rot), tonumber(randSkin), tonumber(gameInterior) ) setCameraInterior ( source, tonumber(gameInterior) ) if not ( spawnComplete ) then --Spawn failed, try spawning as CJ? --outputDebugString ( "Respawning Player FAILED - attempting to spawn player " .. getClientName(source) .. " as model CJ[0]") spawnComplete = spawnPlayer ( source, x, y, z, tonumber(rot), 0, tonumber(gameInterior) ) end for k,v in ipairs(team.weapons) do giveWeapon ( source, v.id, v.ammo ) end --playerSpawned ( source, team ) end function destroyBlipsAttachedTo(player) local attached = getAttachedElements ( player ) if ( attached ) then for k,element in ipairs(attached) do if getElementType ( element ) == "blip" then destroyElement ( element ) end end end end function Event_clientScriptLoaded ( player ) if ( player ) then local p_Team = getPlayerTeam(player) if ( p_Team ) then p_TeamName = getTeamName ( p_Team ) p_TeamColorR, p_TeamColorG, p_TeamColorB = getTeamColor ( p_Team ) else --outputChatBox ( "PTeam is bad" ) end --outputChatBox ( "OMG = " .. p_TeamName .. " r=" .. p_TeamColorR .. " g=" .. p_TeamColorG .. " b=" .. p_TeamColorB ) triggerClientEvent ( "Event_showPlayerTheirTeam", player, player, p_TeamName, p_TeamColorR, p_TeamColorG, p_TeamColorB ) end end addEvent ( "Event_clientScriptLoaded", true ) addEventHandler ( "Event_clientScriptLoaded", root, Event_clientScriptLoaded ) function playerSpawned ( ) local player = source -- outputChatBox ( getClientName( player ) .. " SPAWNED" ) --Useful for a later update fadeCamera ( player, true, 1.0, 0, 0, 0 ) spawnProtectionStart ( player ) --setCameraMode ( player, "player" ) setCameraTarget( player, player ) local theTeamID = getElementData( player, "tdma.teamid" ) local theTeam = gameTeams[theTeamID] for k,v in ipairs(theTeam.weapons) do --outputDebugString ( "Attempting to give weapon " .. tostring(v.id) .. " with ammo " .. tostring(v.id) .. " to player " .. getClientName(source) ) giveWeapon ( source, v.id, v.ammo ) end end addEventHandler ( "onPlayerSpawn", root, playerSpawned ) function lockTime () if xDebug2 then outputDebugString ( "Setting game time to " .. gameTimeHour .. ":" .. gameTimeMin ) end setTime ( gameTimeHour, gameTimeMin ) end function getChildren ( root, type ) local elements = getElementsByType ( type ) local result = {} for elementKey,elementValue in ipairs(elements) do if ( getElementParent( elementValue ) == root ) then result[ table.getn( result ) + 1 ] = elementValue end end return result end function setupBases( startedMap ) local gSettings = getElementsByType ( "gamesettings" ) gameInterior = getElementData ( gSettings[1], "interior" ) gameRespawnTime = getElementData ( gSettings[1], "respawntime" ) gameMaxKills = getElementData ( gSettings[1], "maxkills" ) gameFF = getElementData( gSettings[1], "ff" ) local tSettings = getElementsByType ( "gametime" ) --outputDebugString ( "tSettings is " .. tostring(tSettings) ) if tSettings and #tSettings > 0 then local tHour = getElementData ( tSettings[1], "h" ) if ( tHour ) then gameTimeHour = tHour end local tMin = getElementData ( tSettings[1], "m" ) if ( tMin ) then gameTimeMin = tMin end local tLocked = getElementData ( tSettings[1], "locked" ) if ( tLocked ) then gameTimeLocked = tLocked setTimer ( lockTime, 1000, 0 ) if xDebug2 then outputDebugString ( "Timer is Locked" ) end end end if xDebug2 then outputDebugString ( "Timer is " .. tHour .. " " .. tMin .. " locked:" .. tostring(tLocked) ) end if xDebug then outputDebugString ( "Searching base for data" ) end for k,v in ipairs(getElementsByType ( "base" )) do gameTeams[k] = {} gameTeams[k].name = getElementData ( v, "team" ) if xDebug then outputDebugString ( "Creating team " .. gameTeams[k].name ) end gameTeams[k].red = getElementData ( v, "red" ) gameTeams[k].green = getElementData ( v, "green" ) gameTeams[k].blue = getElementData ( v, "blue" ) gameTeams[k].kills = 0 --Weapon Data gameTeams[k].weapons = {} for i,j in ipairs(getChildren ( v, "weapon" )) do gameTeams[k].weapons[i] = {} gameTeams[k].weapons[i].id = getElementData( j, "model" ) gameTeams[k].weapons[i].ammo = getElementData( j, "ammo" ) end --Skins gameTeams[k].skins = {} for i,j in ipairs(getChildren ( v, "skin" )) do gameTeams[k].skins[i] = {} gameTeams[k].skins[i].id = getElementData( j, "model" ) end --Spawns gameTeams[k].spawns = {} for i,j in ipairs(getChildren ( v, "spawn" )) do gameTeams[k].spawns[i] = {} gameTeams[k].spawns[i].x = getElementData ( j, "posX" ) gameTeams[k].spawns[i].y = getElementData ( j, "posY" ) gameTeams[k].spawns[i].z = getElementData ( j, "posZ" ) gameTeams[k].spawns[i].rot = getElementData ( j, "rot" ) gameTeams[k].spawns[i].rx = getElementData ( j, "randx" ) gameTeams[k].spawns[i].ry = getElementData ( j, "randy" ) gameTeams[k].spawns[i].rz = getElementData ( j, "randz" ) end gameTeams[k].team = createTeam( gameTeams[k].name, gameTeams[k].red, gameTeams[k].green, gameTeams[k].blue ) if xDebug then outputDebugString ( "Team created [" .. gameTeams[k].name .. "]" ) end end --Spawn vehicles --<gamevehicle id="NRG500" model="522" posX="-2173.5368652344" posY="681.57989501953" posZ="54.47985458374" rotX="351.66986083984" rotY="69.25244140625" rotZ="168.93634033203" colors="39,106,0,0"/> if xDebug then outputDebugString ( "Searching base for data...DONE" ) end end function updatePlayerInfoBar ( playerID, time, text ) textItemSetText ( getElementData ( playerID, "tdma.status" ), text ) setTimer ( textItemSetText, time, 1, getElementData ( playerID, "tdma.status" ), "" ) end function requestedKillPlayer ( player ) killPed ( player ) end addCommandHandler ( "kill", requestedKillPlayer ) function hasTeamWon( idTeam ) ----outputDebugString ( "Current Kills: " .. gameTeams[idTeam].kills .. " aginst " .. gameMaxKills ) if ( tonumber(gameTeams[idTeam].kills) == tonumber(gameMaxKills) ) then --Yep, won it showTextForAll ( 5000, 0, 0, 255, 1.5, gameTeams[idTeam].name .. " team has won the match!" ) rndTimer = createMissionTimer ( player, 10, "<", 5, 0.45, 0.25, 255, 0, 0, true ) addEventHandler ( "missionTimerActivated", root, tmrRestartRound ) startTimer ( rndTimer ) xonPlayerWasted_Enabled = false --outputChatBox ( "Just about to go into the loop" ) for k,v in ipairs(getElementsByType("player")) do --outputChatBox ( "Im inside the loop, scanning player " .. getClientName(v) ) local pTeam = getPlayerTeam(v) --outputChatBox ( "He is on team " .. tostring(pTeam) .. " - does it match " .. tostring(gameTeams[idTeam].team) .. "?" ) if pTeam ~= gameTeams[idTeam].team then local px, py, pz = getElementPosition(v) --outputChatBox ( "Got player " .. getClientName(v) .. " coords " .. px .. " " .. py .. " " .. pz .. " - boom?" ) createExplosion ( px, py, pz, 0, nil, true, 0, false ) killPed (v) end end --outputChatBox ( "out of the loop now! (did it even get into it?" ) end end function showTextForPlayer ( player, time, red, green, blue, scale, text ) local textDisplay = textCreateDisplay () local textItem = textCreateTextItem ( text, 0.5, 0.5, 2, red, green, blue, 255, scale, "center", "center" ) textDisplayAddText ( textDisplay, textItem ) textDisplayAddObserver ( textDisplay, player ) setTimer(textDestroyTextItem, time, 1, textItem) setTimer(textDestroyDisplay, time, 1, textDisplay) end function showTextForPlayer2 ( player, time, red, green, blue, scale, text ) local textDisplay = textCreateDisplay () local textItem = textCreateTextItem ( text, 0.5, 0.45, 2, red, green, blue, 255, scale, "center", "center" ) textDisplayAddText ( textDisplay, textItem ) textDisplayAddObserver ( textDisplay, player ) setTimer(textDestroyTextItem, time, 1, textItem) setTimer(textDestroyDisplay, time, 1, textDisplay) end function showTextForAll ( time, red, green, blue, scale, text ) local textDisplay = textCreateDisplay () local textItem = textCreateTextItem ( text, 0.5, 0.1, 2, red, green, blue, 255, scale ) textDisplayAddText ( textDisplay, textItem ) local players = getElementsByType( "player" ) for k,v in ipairs(players) do textDisplayAddObserver ( textDisplay, v ) end setTimer(textDestroyTextItem, time, 1, textItem) setTimer(textDestroyDisplay, time, 1, textDisplay) end function onPlayerQuit ( ) destroyBlipsAttachedTo ( source ) setPlayerTeam ( source, nil ) local marker = getElementData( source, "tdma.teamMarker" ) if ( isElement(marker) ) then destroyElement ( marker ) end setElementData ( source, "tdma.teamMarker", nil ) end addEventHandler( "onPlayerQuit", root, onPlayerQuit ) function xonPlayerWasted ( ammo, attacker, weapon, bodypart ) if ( xonPlayerWasted_Enabled ) then local vTeamID = getElementData ( source, "tdma.teamid" ) local vTeam = gameTeams[vTeamID] if not ( vTeam ) then setTimer ( firstSpawn, 3000, 1, source, vTeam ) else local a = setTimer ( respawnThePlayer, 3000, 1, source, vTeam ) if not ( a ) then respawnThePlayer ( source, vTeam ) end end if ( attacker ) then local pTeamID = getElementData ( attacker, "tdma.teamid" ) local pTeam = gameTeams[pTeamID] --Was it a self kill? if ( source ~= attacker and vTeamID ~= pTeamID ) then if ( pTeam ) then updateKills ( attacker, pTeam ) end end end end end addEventHandler ( "onPlayerWasted", root, xonPlayerWasted ) function onChat ( message, theType ) if theType == 0 then cancelEvent() message = string.gsub(message, "#%x%x%x%x%x%x", "") local team = getPlayerTeam ( source ) local bastidName = getPlayerName ( source ) if ( team ) then local r, g, b = getTeamColor ( team ) outputChatBox ( bastidName..":#FFFFFF "..message, getRootElement(), r, g, b, true ) else outputChatBox ( bastidName..": "..message ) end outputServerLog( "CHAT: " .. bastidName .. ": " .. message ) end end addEventHandler ( "onPlayerChat", root, onChat ) function updateKills( idPlayer, idTeam ) if ( tonumber(gameMaxKills) > 0 ) then if xDebug then outputDebugString ( "Kills for team before are: " .. idTeam.kills ) end local teamID = getElementData( idPlayer, "tdma.teamid" ) gameTeams[teamID].kills = gameTeams[teamID].kills + 1 if xDebug then outputDebugString ( "Kills for team " .. idTeam.name .. " updated to " .. gameTeams[teamID].kills ) end textItemSetText ( idTeam.teamText, idTeam.name .. ": " .. gameTeams[teamID].kills .. "/" .. gameMaxKills .. " kills" ) hasTeamWon ( teamID ) end end function tmrRestartRound ( timerID, player ) ----outputDebugString ( "Mission timer has been triggerd, their " .. timerID .. " and " .. rndTimer .. " [timerid/rndtimer]" ) if ( tostring(timerID) == tostring(rndTimer) ) then destroyMissionTimer ( timerID ) --[[for k,v in ipairs(getElementsByType("player")) do end]]-- xonPlayerWasted_Enabled = true for k,v in ipairs(getElementsByType("player")) do setPlayerTeam ( v, nil ) end startGame() if ( tonumber(gameMaxKills) > 0 ) then for k,v in ipairs(gameTeams) do v.kills = 0 textItemSetText ( v.teamText, v.name .. ": 0/" .. gameMaxKills .. " kills" ) textItemSetText ( v.teamText, v.name .. ": 0/" .. gameMaxKills .. " kills" ) end end end end Client Side: addEventHandler ( "onClientGUIClick", War, function () guiSetVisible ( War, false ) showCursor ( false ) triggerServerEvent("spawnWar", localPlayer) end ) عدلت فنكشن onMapLoad إلى function onMapLoad (res) outputChatBox ( "LOADING NEW MAP... PLEASE WAIT" ) mapResource = getResourceRootElement(res) if xDebug then outputDebugString ( "Starting TDMA Main Control Suite" ) end if xDebug then outputDebugString ( "STARTED... Proceeding to load gamemode... WAIT!" ) end ----outputDebugString ( "Setting up Bases" ) setupBases(res) setGameType ("Team Death Match Arena") tdma = createElement("tdmagame") versionDisplay = textCreateDisplay () local versionText = textCreateTextItem ( "Team Death Match Arena v0.9", 0.975, 0.02, "medium", 255, 255, 255, 255, 1, "right" ) textDisplayAddText ( versionDisplay, versionText ) if ( tonumber(gameMaxKills) > 0 ) then local teamText = textCreateTextItem ( "Scores", 0.01, 0.24 + textBoost, "medium", 255,255,255, 255, 1 ) textDisplayAddText ( versionDisplay, teamText ) textBoost = textBoost + 0.020 for k,v in ipairs(gameTeams) do if xDebug2 then outputDebugString ( "**MAKING TEAM KILL TEXTS***" ) end if xDebug2 then outputDebugString ( "**GOT: " .. v.name .. " R:" .. v.red .. " G:" .. v.green .. " B:" .. v.blue ) end local teamName = v.name local teamKills = v.kills teamText = textCreateTextItem ( teamName .. ": " .. teamKills .. "/" .. gameMaxKills .. " kills", 0.01, 0.24 + textBoost, "medium", tonumber(v.red), tonumber(v.green), tonumber(v.blue), 255, 1 ) --setElementParent ( teamText, tdma ) v.teamText = teamText textDisplayAddText ( versionDisplay, teamText ) textBoost = textBoost + 0.015 end end for k,v in ipairs(gameTeams) do if ( gameFF == "on" ) then setTeamFriendlyFire ( v.team, true ) setTeamFriendlyFire ( v.team, true ) else setTeamFriendlyFire ( v.team, false ) setTeamFriendlyFire ( v.team, false ) end end --Start the pickup system from Included\pickup_system.lua initPickupSystem() --Start the vehicle system from Included\vehicle_system.lua initVehicleSystem() ----outputDebugString ( "Starting The Game" ) if xDebug then outputDebugString ( "[[[[[/*****STARTING GAME*****\]]]]]" ) end startGame() end addEventHandler ( "onResourceStart", getRootElement(), onMapLoad) و باقيه نفس المشكله والديبوق يقول ERROR: War\server\War.lua:171: bad argument #2 to 'random' (interval is empty) function firstSpawn ( source ) local thePlayer = source if xDebug then outputDebugString ( "Spawning player " .. getPlayerName(thePlayer) .. " for the very first time" ) end updatePlayerInfoBar ( thePlayer, 5200, "Please wait... Spawning" ) local randTeam = math.random(1,#gameTeams) -- ^^ ذا السطر 171 local foundTeam = nil local foundTeamID = nil local allDone = false local scanPlayerCount = 128 local teamPlayerCount = 0 --outputDebugString ( "scanning teams now for auto assignment" ) for k,v in ipairs(gameTeams) do teamPlayerCount = countPlayersInTeam( v.team ) if ( teamPlayerCount < scanPlayerCount ) then scanPlayerCount = countPlayersInTeam ( v.team ) foundTeam = v foundTeamID = k allDone = true end end if ( allDone ) then if xDebug then outputDebugString ( "Spawning player " .. getPlayerName(thePlayer) .. " (ALLDONE) Team: " .. foundTeam.name ) end spawnThePlayer ( thePlayer, foundTeam ) setElementData ( thePlayer, "tdma.teamid", foundTeamID ) showTextForPlayer ( thePlayer, 5000, tonumber(foundTeam.red), tonumber(foundTeam.green), tonumber(foundTeam.blue), 1.5, "You have been automatically assigned to team " .. foundTeam.name ) --setMarkerColor ( theMarker, tonumber(gameTeams[foundTeamID].red), tonumber(gameTeams[foundTeamID].green), tonumber(gameTeams[foundTeamID].blue), 255 ) setPlayerNametagColor ( thePlayer, gameTeams[foundTeamID].red, gameTeams[foundTeamID].green, gameTeams[foundTeamID].blue ) else --Just select a random team if xDebug then outputDebugString ( "Spawning player " .. getPlayerName(thePlayer) .. " (NO FOUND) Team: " .. gameTeams[randTeam].name ) end spawnThePlayer ( thePlayer, gameTeams[1] ) setElementData ( thePlayer, "tdma.teamid", 1 ) --setMarkerColor ( theMarker, tonumber(gameTeams[1].red), tonumber(gameTeams[1].green), tonumber(gameTeams[1].blue), 255 ) setPlayerNametagColor ( thePlayer, gameTeams[1].red, gameTeams[1].green, gameTeams[1].blue ) end end !!!وش المشكله