تعديل كود

[Dr.Xen]

السلام عليكم ورحمة الله وبركاته !

ابيكم تعدلو على الكود

كود ذا في قيم مود

Server:

ابيكم تخلو شخصية 285 خاصة لقروب يعني لو دخل السيرفر وسجل وخلص يختار الشخصية اذا اختار 285 وهو من القروب يقدر واذا مو من القروب ما يقدر يأخذ يطلع كلأم بالشات

Server:"

rRoot = getResourceRootElement(getThisResource()) 
local root = getRootElement() 
local Key = "F4" 
Teams = {  -- here all team name 
{"Grove", 0, 255, 0},  
{"Aztecas", 0, 150, 255},  
{"Police", 0, 50, 255}, 
{"Ballas", 255, 0, 150},  
{"No Team", 255, 255, 255},  
{"Medic", 6, 183, 248} 
} 
  
local function set(plr, data, bole) 
  if not isElement(plr) then 
    return  
  end 
  return setElementData(plr, data, bole) 
end 
  
local function get(plr, data) 
  if not isElement(plr) then 
    return  
  end 
  return getElementData(plr, data) 
end 
  
addEventHandler("onResourceStart", resourceRoot, function() 
  setGameType("Gang Wars") 
  outputChatBox(".:[ ?_? ]:. " .. ver .. "", root, 0, 255, 0, true) 
  setTimer(OutPut, 50, 1, ".:[ Server GTA-Ar TuNiSiE" .. ver .. "", root, 0, 255, 0) 
  for _,theTeam in ipairs(Teams) do 
    createTeam(theTeam[1], theTeam[2], theTeam[3], theTeam[4]) 
  end 
  for _,AllTeams in ipairs(getElementsByType("team")) do 
    if getTeamFriendlyFire(AllTeams) == true then 
      setTeamFriendlyFire(AllTeams, false) 
    end 
  end 
  setTeamFriendlyFire(getTeamFromName("No Team"), true) 
  for i,v in ipairs(getElementsByType("player")) do 
    bindKey(v, Key, "down", "changeTeame") 
    setElementData(v, "OnJoinFirstSpawn", false) 
  end 
  setElementData(rRoot,"maxPlayer",getMaxPlayers()) 
end 
) 
  
addEventHandler("onResourceStop", resourceRoot, function() 
  local players = getElementsByType("player") 
  for k,v in ipairs(players) do 
    set(v, "hjwalah", false) 
    set(v, "Grove", false) 
    set(v, "Aztecs", false) 
    set(v, "Police", false) 
    set(v, "Ballas", false) 
    set(v, "noTeam", false) 
    set(v, "Medic", false) 
    set(v, "GameModeActive", false) 
  end 
end 
) 
  
addEvent("onLoadedClient", true) 
addEventHandler("onLoadedClient", root, function(player) 
  versionDisplay = textCreateDisplay() 
  textDisplayAddText(versionDisplay, versionText) 
  textDisplayAddObserver(versionDisplay, player) 
  setElementData(player, "CancleFirstSpawn", true) 
  playSoundFrontEnd(player, 16) 
  setElementData(player, "OnJoinFirstSpawn", false) 
end 
  
) 
  
addEventHandler("onPlayerJoin", root, function() 
    showTextForPlayer ( source, 6000, 255, 0, 0, 1.5, "welcome to server GTA-AR_TuNiSiE ") 
    showTextForPlayer1 ( source, 6000, 255, 0, 0, 1.5, "الرجآء الأنتظار حتى يتم تحميل المودات....!")                 
    setCameraMatrix(source,512.2, -1263.57, 32.53,542.16, -1287.07, 17.24)   
end 
) 
  
addEventHandler("onPlayerSpawn", root, function() 
  checkWeapon(source) 
end 
) 
         
function checkWeapon(player) 
  setTimer(function(player) 
    if isElement(player) then 
      if getElementData(player, "Police") == true then 
        giveWeapon(player, 3) 
      end 
    else 
      takeWeapon(player, 3) 
    end 
  end, 800, 1, player) 
end 
  
addEvent("onClientWantsToSpawn", true) 
addEventHandler("onClientWantsToSpawn", getRootElement(), function(player, ID, TeamName) 
  if TeamName == "Grove" then 
    setElementData(player, "ID", ID) 
    GroveTeam(player) 
  elseif TeamName == "Aztecas" then 
    setElementData(player, "ID", ID) 
    AztecsTeam(player) 
  elseif TeamName == "Police" then 
    setElementData(player, "ID", ID) 
    PoliceTeam(player) 
  elseif TeamName == "Ballas" then 
    setElementData(player, "ID", ID) 
    Ballas(player) 
  elseif TeamName == "No Team" then 
    setElementData(player, "ID", ID) 
    NoTeam(player) 
  elseif TeamName == "Medic" then 
    setElementData(player, "ID", ID) 
    MedicTeam(player) 
  elseif TeamName == "Drift" then 
    setElementData(player, "ID", ID) 
    hjwalah(player) 
  end 
end 
) 
  
function checkWeapon(player) 
  setTimer(function(player) 
    if isElement(player) then 
      if getElementData(player, "Police") == true then 
        giveWeapon(player, 3) 
      end 
    else 
      takeWeapon(player, 3) 
    end 
  end, 800, 2, player) 
end 
  
function onSelectTeam(player) 
  if not isElement(player) then 
    return  
  end 
  local playerTeam = getPlayerTeam(player) 
  showTextForPlayer(player, 5000, 255, 0, 0, 1.5, "You have been assigned to team [" .. tostring(getTeamName(playerTeam)) .. "]") 
  OutPut("To return to spawn press["..Key.."]", player, 255, 255, 255) 
  local playeraccount = getPlayerAccount(player) 
  if playeraccount and not isGuestAccount(getPlayerAccount(player)) then 
    if getElementData(player, "hjwalah") == true then 
      return false 
    end 
    if getElementData(player, "wasgied") == true then 
      return false 
    end 
    setElementData(player, "wasgied", true) 
    local weap0 = getAccountData(playeraccount, "s.weap0") 
    local weap1 = getAccountData(playeraccount, "s.weap1") 
    local weap2 = getAccountData(playeraccount, "s.weap2") 
    local ammo2 = getAccountData(playeraccount, "s.ammo2") 
    local weap3 = getAccountData(playeraccount, "s.weap3") 
    local ammo3 = getAccountData(playeraccount, "s.ammo3") 
    local weap4 = getAccountData(playeraccount, "s.weap4") 
    local ammo4 = getAccountData(playeraccount, "s.ammo4") 
    local weap5 = getAccountData(playeraccount, "s.weap5") 
    local ammo5 = getAccountData(playeraccount, "s.ammo5") 
    local weap6 = getAccountData(playeraccount, "s.weap6") 
    local ammo6 = getAccountData(playeraccount, "s.ammo6") 
    local weap7 = getAccountData(playeraccount, "s.weap7") 
    local ammo7 = getAccountData(playeraccount, "s.ammo7") 
    local weap8 = getAccountData(playeraccount, "s.weap8") 
    local ammo8 = getAccountData(playeraccount, "s.ammo8") 
    local weap9 = getAccountData(playeraccount, "s.weap9") 
    local ammo9 = getAccountData(playeraccount, "s.ammo9") 
    local weap10 = getAccountData(playeraccount, "s.weap10") 
    local weap11 = getAccountData(playeraccount, "s.weap11") 
    local weap12 = getAccountData(playeraccount, "s.weap12") 
    local wanted = getAccountData(playeraccount, "WantedLevel") 
    if tonumber(wanted) then 
      setPlayerWantedLevel(player, wanted) 
   elseif tonumber(weap0) then 
      giveWeapon(player, weap0, 1) 
  elseif tonumber(weap1) then 
      giveWeapon(player, weap1, 1) 
  elseif tonumber(weap2) and tonumber(ammo2) then 
      giveWeapon(player, weap2, ammo2) 
  elseif tonumber(weap3) and tonumber(ammo3) then 
      giveWeapon(player, weap3, ammo3) 
  elseif tonumber(weap4) and tonumber(ammo4) then 
      giveWeapon(player, weap4, ammo4) 
  elseif tonumber(weap6) and tonumber(ammo5) then 
      giveWeapon(player, weap5, ammo5) 
  elseif tonumber(weap6) and tonumber(ammo6) then 
      giveWeapon(player, weap6, ammo6) 
  elseif tonumber(weap7) and tonumber(ammo7) then 
      giveWeapon(player, weap7, ammo7) 
  elseif tonumber(weap8) and tonumber(ammo8) then 
      giveWeapon(player, weap8, ammo8) 
  elseif tonumber(weap9) and tonumber(ammo9) then 
      giveWeapon(player, weap9, ammo9) 
    elseif tonumber(weap10) then 
      giveWeapon(player, weap10, 30) 
    elseif tonumber(weap11) then 
      giveWeapon(player, weap11, 30) 
    elseif tonumber(weap12) then 
      giveWeapon(player, weap12, 10) 
      end 
  end 
end 
  
function camera(plr) 
  if not isElement(plr) then 
    return  
  end 
  setTimer(fadeCamera, 50, 1, plr, false, 1) 
  setTimer(fadeCamera, 100, 1, plr, true, 3) 
  setCameraTarget(plr, plr) 
  showChat(plr, true) 
end 
  
addEventHandler("onPlayerSpawn", root, function() 
  setElementData(source, "FristTimeSpawn", false) 
  bindKey(source, Key, "down", "changeTeame") 
  setElementData(source, "WasChangeTeam", false) 
end 
) 
  
Change = false 
  
addCommandHandler("changeTeame", function(plr) 
  if getElementData(plr, "WasChangeTeam") == false then 
    setElementData(plr, "ChangeTeam", true) 
    OutPut("The team will change after you die", plr, 255, 0, 255) 
    setTimer(cancleTeam, 1700, 1, plr) 
    setElementData(plr, "WasChangeTeam", true) 
  else 
    OutPut("Change the team has been canceled", plr, 255, 255, 0) 
    setElementData(plr, "ChangeTeam", false) 
    setElementData(plr, "WasChangeTeam", false) 
  end 
  Change = not Change 
end 
) 
  
function cancleTeam(plr) 
  if Change == false then 
    return false 
  end 
  OutPut("To cancel the change team press again", plr, 255, 255, 0) 
end 
  
function GroveTeam(plr) 
  if not isElement(plr) then 
    return  
  

[Dr.Xen]

رفع للموضوع

Up@!

[The Killer]

همم جرب

بدل

"اسم القروب"

بأسم قروبك

   local group = "اسم القروب" 
    rRoot = getResourceRootElement(getThisResource()) 
    local root = getRootElement() 
    local Key = "F4" 
    Teams = {  -- here all team name 
    {"Grove", 0, 255, 0}, 
    {"Aztecas", 0, 150, 255}, 
    {"Police", 0, 50, 255}, 
    {"Ballas", 255, 0, 150}, 
    {"No Team", 255, 255, 255}, 
    {"Medic", 6, 183, 248} 
    } 
      
    local function set(plr, data, bole) 
      if not isElement(plr) then 
        return 
      end 
      return setElementData(plr, data, bole) 
    end 
      
    local function get(plr, data) 
      if not isElement(plr) then 
        return 
      end 
      return getElementData(plr, data) 
    end 
      
    addEventHandler("onResourceStart", resourceRoot, function() 
      setGameType("Gang Wars") 
      outputChatBox(".:[ ?_? ]:. " .. ver .. "", root, 0, 255, 0, true) 
      setTimer(OutPut, 50, 1, ".:[ Server GTA-Ar TuNiSiE" .. ver .. "", root, 0, 255, 0) 
      for _,theTeam in ipairs(Teams) do 
        createTeam(theTeam[1], theTeam[2], theTeam[3], theTeam[4]) 
      end 
      for _,AllTeams in ipairs(getElementsByType("team")) do 
        if getTeamFriendlyFire(AllTeams) == true then 
          setTeamFriendlyFire(AllTeams, false) 
        end 
      end 
      setTeamFriendlyFire(getTeamFromName("No Team"), true) 
      for i,v in ipairs(getElementsByType("player")) do 
        bindKey(v, Key, "down", "changeTeame") 
        setElementData(v, "OnJoinFirstSpawn", false) 
      end 
      setElementData(rRoot,"maxPlayer",getMaxPlayers()) 
    end 
    ) 
      
    addEventHandler("onResourceStop", resourceRoot, function() 
      local players = getElementsByType("player") 
      for k,v in ipairs(players) do 
        set(v, "hjwalah", false) 
        set(v, "Grove", false) 
        set(v, "Aztecs", false) 
        set(v, "Police", false) 
        set(v, "Ballas", false) 
        set(v, "noTeam", false) 
        set(v, "Medic", false) 
        set(v, "GameModeActive", false) 
      end 
    end 
    ) 
      
    addEvent("onLoadedClient", true) 
    addEventHandler("onLoadedClient", root, function(player) 
      versionDisplay = textCreateDisplay() 
      textDisplayAddText(versionDisplay, versionText) 
      textDisplayAddObserver(versionDisplay, player) 
      setElementData(player, "CancleFirstSpawn", true) 
      playSoundFrontEnd(player, 16) 
      setElementData(player, "OnJoinFirstSpawn", false) 
    end 
      
    ) 
      
    addEventHandler("onPlayerJoin", root, function() 
        showTextForPlayer ( source, 6000, 255, 0, 0, 1.5, "welcome to server GTA-AR_TuNiSiE ") 
        showTextForPlayer1 ( source, 6000, 255, 0, 0, 1.5, "الرجآء الأنتظار حتى يتم تحميل المودات....!")                
        setCameraMatrix(source,512.2, -1263.57, 32.53,542.16, -1287.07, 17.24)   
    end 
    ) 
      
    addEventHandler("onPlayerSpawn", root, function() 
      checkWeapon(source) 
    end 
    ) 
            
    function checkWeapon(player) 
      setTimer(function(player) 
        if isElement(player) then 
          if getElementData(player, "Police") == true then 
            giveWeapon(player, 3) 
          end 
        else 
          takeWeapon(player, 3) 
        end 
      end, 800, 1, player) 
    end 
      
    addEvent("onClientWantsToSpawn", true) 
    addEventHandler("onClientWantsToSpawn", getRootElement(), function(player, ID, TeamName) 
      if TeamName == "Grove" then 
        setElementData(player, "ID", ID) 
        GroveTeam(player) 
      elseif TeamName == "Aztecas" then 
        setElementData(player, "ID", ID) 
        AztecsTeam(player) 
      elseif TeamName == "Police" then 
        setElementData(player, "ID", ID) 
        PoliceTeam(player) 
      elseif TeamName == "Ballas" then 
        setElementData(player, "ID", ID) 
        Ballas(player) 
      elseif TeamName == "No Team" then 
        setElementData(player, "ID", ID) 
        NoTeam(player) 
      elseif TeamName == "Medic" then 
        setElementData(player, "ID", ID) 
        MedicTeam(player) 
      elseif TeamName == "Drift" then 
        setElementData(player, "ID", ID) 
        hjwalah(player) 
      end 
    end 
    ) 
      
    function checkWeapon(player) 
      setTimer(function(player) 
        if isElement(player) then 
          if getElementData(player, "Police") == true then 
            giveWeapon(player, 3) 
          end 
        else 
          takeWeapon(player, 3) 
        end 
      end, 800, 2, player) 
    end 
      
    function onSelectTeam(player) 
      if not isElement(player) then 
        return 
      end 
      local playerTeam = getPlayerTeam(player) 
      showTextForPlayer(player, 5000, 255, 0, 0, 1.5, "You have been assigned to team [" .. tostring(getTeamName(playerTeam)) .. "]") 
      OutPut("To return to spawn press["..Key.."]", player, 255, 255, 255) 
      local playeraccount = getPlayerAccount(player) 
      if playeraccount and not isGuestAccount(getPlayerAccount(player)) then 
        if getElementData(player, "hjwalah") == true then 
          return false 
        end 
        if getElementData(player, "wasgied") == true then 
          return false 
        end 
        setElementData(player, "wasgied", true) 
        local weap0 = getAccountData(playeraccount, "s.weap0") 
        local weap1 = getAccountData(playeraccount, "s.weap1") 
        local weap2 = getAccountData(playeraccount, "s.weap2") 
        local ammo2 = getAccountData(playeraccount, "s.ammo2") 
        local weap3 = getAccountData(playeraccount, "s.weap3") 
        local ammo3 = getAccountData(playeraccount, "s.ammo3") 
        local weap4 = getAccountData(playeraccount, "s.weap4") 
        local ammo4 = getAccountData(playeraccount, "s.ammo4") 
        local weap5 = getAccountData(playeraccount, "s.weap5") 
        local ammo5 = getAccountData(playeraccount, "s.ammo5") 
        local weap6 = getAccountData(playeraccount, "s.weap6") 
        local ammo6 = getAccountData(playeraccount, "s.ammo6") 
        local weap7 = getAccountData(playeraccount, "s.weap7") 
        local ammo7 = getAccountData(playeraccount, "s.ammo7") 
        local weap8 = getAccountData(playeraccount, "s.weap8") 
        local ammo8 = getAccountData(playeraccount, "s.ammo8") 
        local weap9 = getAccountData(playeraccount, "s.weap9") 
        local ammo9 = getAccountData(playeraccount, "s.ammo9") 
        local weap10 = getAccountData(playeraccount, "s.weap10") 
        local weap11 = getAccountData(playeraccount, "s.weap11") 
        local weap12 = getAccountData(playeraccount, "s.weap12") 
        local wanted = getAccountData(playeraccount, "WantedLevel") 
        if tonumber(wanted) then 
          setPlayerWantedLevel(player, wanted) 
       elseif tonumber(weap0) then 
          giveWeapon(player, weap0, 1) 
      elseif tonumber(weap1) then 
          giveWeapon(player, weap1, 1) 
      elseif tonumber(weap2) and tonumber(ammo2) then 
          giveWeapon(player, weap2, ammo2) 
      elseif tonumber(weap3) and tonumber(ammo3) then 
          giveWeapon(player, weap3, ammo3) 
      elseif tonumber(weap4) and tonumber(ammo4) then 
          giveWeapon(player, weap4, ammo4) 
      elseif tonumber(weap6) and tonumber(ammo5) then 
          giveWeapon(player, weap5, ammo5) 
      elseif tonumber(weap6) and tonumber(ammo6) then 
          giveWeapon(player, weap6, ammo6) 
      elseif tonumber(weap7) and tonumber(ammo7) then 
          giveWeapon(player, weap7, ammo7) 
      elseif tonumber(weap8) and tonumber(ammo8) then 
          giveWeapon(player, weap8, ammo8) 
      elseif tonumber(weap9) and tonumber(ammo9) then 
          giveWeapon(player, weap9, ammo9) 
        elseif tonumber(weap10) then 
          giveWeapon(player, weap10, 30) 
        elseif tonumber(weap11) then 
          giveWeapon(player, weap11, 30) 
        elseif tonumber(weap12) then 
          giveWeapon(player, weap12, 10) 
          end 
      end 
    end 
      
    function camera(plr) 
      if not isElement(plr) then 
        return 
      end 
      setTimer(fadeCamera, 50, 1, plr, false, 1) 
      setTimer(fadeCamera, 100, 1, plr, true, 3) 
      setCameraTarget(plr, plr) 
      showChat(plr, true) 
    end 
      
    addEventHandler("onPlayerSpawn", root, function() 
      setElementData(source, "FristTimeSpawn", false) 
      bindKey(source, Key, "down", "changeTeame") 
      setElementData(source, "WasChangeTeam", false) 
    end 
    ) 
      
    Change = false 
      
    addCommandHandler("changeTeame", function(plr) 
      if getElementData(plr, "WasChangeTeam") == false then 
        setElementData(plr, "ChangeTeam", true) 
        OutPut("The team will change after you die", plr, 255, 0, 255) 
        setTimer(cancleTeam, 1700, 1, plr) 
        setElementData(plr, "WasChangeTeam", true) 
      else 
        OutPut("Change the team has been canceled", plr, 255, 255, 0) 
        setElementData(plr, "ChangeTeam", false) 
        setElementData(plr, "WasChangeTeam", false) 
      end 
      Change = not Change 
    end 
    ) 
      
    function cancleTeam(plr) 
      if Change == false then 
        return false 
      end 
      OutPut("To cancel the change team press again", plr, 255, 255, 0) 
    end 
      
    function GroveTeam(plr) 
      if not