الحين تبي مود ولا كود ولا فنكش
مستواك ببالبرمجة لا يسمح لك تسوي مهمة
+
لو تبي فنكش او كود هدا مو القسم مناسب
قسم مناسب هو قسم البرمجة
createMarker
addEventHandler
onMarkerHit
setElementPosition
setElementDimension
setElementHealth
onPlayerDamage
addEventHandler
setTimer
createTeam
spawnPlayer
givePlayerMoney
getElementData
تحتاج تسوي احداتيات لما يخشون ماركر
متال
local GangsterPosition = {
{-1276.42212,-879.63336,427.06561},
{-1277.17603,-864.88983,427.06561},
{-1277.85132,-850.74066,427.06561}
}
تحتاج تسوي جداول
بنسبة لتوب كيل فسويت لك متال بسيط
addEventHandler("onPlayerWasted", root,
function( _, Killer )
if getPlayerTable(source, CrSTable) or getPlayerTable(source, PoSTable) then
if isElement(Killer) and getElementType(Killer) == "player" then
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] "..RGBToHex(getPlayerNametagColor(Killer))..""..getPlayerName(Killer).." #FFFF00("..getElementData(Killer,"PointDMGMission").." Damage) #FF0000Has killed "..RGBToHex(getPlayerNametagColor(source))..""..getPlayerName(source).." #FFFF00("..getElementData(source,"PointDMGMission").." Damage) #FF0000!", 0, 255, 255)
TopKill[Killer] = (TopKill[Killer] or 0) + 1
else
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #FFFF00["..getPlayerName(source).."] #FF0000Dead In Fight Mission !", 255, 255, 0)
end
if getPlayerTeam(source) ~= getTeamFromName("Police") then
RemovePlayer(source, CrSTable)
triggerClientEvent(source, "xFightMissionWasted", source)
if isElement(Killer) and getElementType(Killer) == "player" then
triggerClientEvent(Killer, "xFightMissionGood", Killer)
triggerEvent("OnPointPolice",Killer)
setElementData(Killer,"KilledInMission",(getElementData(Killer,"KilledInMission")or 0)+1)
exports["guimessages"]:outputServer(Killer,"#3399FF[Fight Mission] #00FF00Good Job You Won 1 Point !",0, 255, 255)
end
elseif getPlayerTeam(source) == getTeamFromName("Police") then
RemovePlayer(source, PoSTable)
triggerClientEvent(source, "xFightMissionWasted", source)
if isElement(Killer) and getElementType(Killer) == "player" then
triggerClientEvent(Killer, "xFightMissionGood", Killer)
triggerEvent("OnPointGang",Killer)
setElementData(Killer,"KilledInMission",(getElementData(Killer,"KilledInMission")or 0)+1)
exports["guimessages"]:outputServer(Killer,"#3399FF[Fight Mission] #00FF00Good Job You Won 1 Point !",0, 255, 255)
end
end
checkFightForWinner();
end
end );
وهدا متال بشكل عام لقيت عندي مهمة وحطيت لك سيرفر حقها
تقدر تستفيد منها
CrSTable = {}
PoSTable = {}
KillDMG = {}
function RGBToHex(red, green, blue)
if((red < 0 or red > 255 or green < 0 or green > 255 or blue < 0 or blue > 255) ) then
return nil
end
return string.format("#%.2X%.2X%.2X", red,green,blue)
end
---Server----
addEventHandler ( "onPlayerDamage", root,
function ( attacker, weapon, bodypart, loss )
if ( attacker and attacker == source and getElementData(source,"FightMission") ) then
if ( KillDMG[source] ) then
killTimer(KillDMG[source]);
end
setElementData(attacker,"PointDMGMission",(getElementData(attacker,"PointDMGMission") or 0) + math.ceil(loss));
end
end );
---RestartDMG---
function RestartDMGMission()
for _, player in ipairs(getElementsByType("player")) do
setElementData(player, "PointDMGMission", 0);
end
end
function updateText()
setElementData(getResourceRootElement( getThisResource( ) ),"PlayerCount", #CrSTable)
setElementData(getResourceRootElement( getThisResource( ) ),"PoliceCount", #PoSTable)
triggerClientEvent(root, "showPlayerCountFightMission", root)
end
function AddPlayer(player, Table)
if not getPlayerTable(player, CrSTable) and not getPlayerTable(player, PoSTable) then
table.insert(Table, player)
updateText()
setElementData(player, "FightMission", true)
setElementData(player,"KilledInMission",0)
end
end
function RemovePlayer(player, Table)
for i, v in ipairs (Table) do
if (v == player) then
table.remove(Table, i)
setElementData(player, "FightMission", false)
setTimer(setElementData,3000,1,player,"KilledInMission",0)
end
end
updateText()
end
function getPlayerTable(player, Table)
for i, v in ipairs (Table) do
if (v == player) then
return true
end
end
end
local MedicMarker1 = createMarker(-1290.1999511719,-885.90002441406,426, "cylinder", 2.5, 0, 255, 255, 150)
setElementDimension(MedicMarker1, 55)
setElementInterior(MedicMarker1, 5)
local MedicMarker2 = createMarker(-1383.8000488281,-812.29998779297,426, "cylinder", 2.5, 0, 255, 255, 150)
setElementDimension(MedicMarker2, 55)
setElementInterior(MedicMarker2, 5)
setTimer(function()
for i, player in ipairs(getElementsWithinColShape(getElementColShape(MedicMarker1), "player")) do
if getElementData(player, "FightMission") then
local health = getElementHealth(player)
if health < 200 then
local money = getElementData(player, "Money") or 0
if money >= 400 then
setElementData(player, "Money", money-400)
setElementHealth(player, health+30)
exports["guimessages"]:outputServer(player, "#3399FF[Fight Mission] #FFF000You Have Paid $400 For medic !!", 255, 125, 0)
end
end
end
end
for i, player in ipairs(getElementsWithinColShape(getElementColShape(MedicMarker2), "player")) do
if getElementData(player, "FightMission") then
local health = getElementHealth(player)
if health < 200 then
local money = getElementData(player, "Money") or 0
if money >= 400 then
setElementData(player, "Money", money-400)
setElementHealth(player, health+30)
exports["guimessages"]:outputServer(player, "#3399FF[Fight Mission] #FFF000You Have Paid $400 For medic !!", 255, 125, 0)
end
end
end
end
end, 3000, 0)
local CrM = createMarker(1207.40186, -1459.76721, 13.38281+1.2, "arrow", 2, 0, 255, 0, 255)
local PoM = createMarker(1232.53235, -1459.72217, 13.54688+1.2, "arrow",2, 0, 255, 0, 255)
local CrDoor = createObject(980,-1293.900390625,-893.5,428.79998779297, 0, 0,90)
local PoDoor = createObject(980,-1380.599609375,-805.099609375,428.79998779297, 0, 0,90)
setElementDimension(CrDoor, 55)
setElementDimension(PoDoor, 55)
setElementInterior(CrDoor, 5)
setElementInterior(PoDoor, 5)
createBlip (1219.20044, -1457.51636 ,45.22656, 24)
function STARTFightMission()
startFightMission = setTimer(function()
triggerClientEvent(root, "showWarpFightMission", root)
exports["guimessages"]:outputServer(root,"#3399FF[Fight Mission] #00ff00Go To Yellow Blip In The Map !", 50, 30, 255)
exports["guimessages"]:outputServer(root,"#3399FF[Fight Mission] #ff00ffFight Mission Will Begin After #FFFF003 Minutes #ff00ff.", 0, 255, 30)
exports["guimessages"]:outputServer(root,"#3399FF[Fight Mission] #14F780For #FF0000Gangster : #14F780Enter A Red Marker !", 255, 50, 0)
exports["guimessages"]:outputServer(root,"#3399FF[Fight Mission] #F0FF0FFor #0000FFPolice : #F0FF0FEnter A Blue Maker ! ", 0, 50, 255)
setElementData(getResourceRootElement( getThisResource( ) ),"1", "None") setElementData(getResourceRootElement( getThisResource( ) ),"1k", 0)
setElementData(getResourceRootElement( getThisResource( ) ),"2", "None") setElementData(getResourceRootElement( getThisResource( ) ),"2k", 0)
setElementData(getResourceRootElement( getThisResource( ) ),"3", "None") setElementData(getResourceRootElement( getThisResource( ) ),"3k", 0)
setElementData(getResourceRootElement( getThisResource( ) ),"4", "None") setElementData(getResourceRootElement( getThisResource( ) ),"4k", 0)
setElementData(getResourceRootElement( getThisResource( ) ),"5", "None") setElementData(getResourceRootElement( getThisResource( ) ),"5k", 0)
playSoundFrontEnd ( root,4)
moveObject(CrDoor,3500, -1293.900390625,-893.5,428.79998779297)
moveObject(PoDoor,3500, -1380.599609375,-805.099609375,428.79998779297)
setMarkerColor(CrM,255,0,0,255)
setMarkerColor(PoM,0,0,255,255)
standByFightMission = setTimer(function()
moveObject(CrDoor,3500, -1293.900390625,-893.5,428.79998779297+10)
moveObject(PoDoor,3500, -1380.599609375,-805.099609375,428.79998779297+10)
exports["guimessages"]:outputServer(root,"#3399FF[Fight Mission] #00FF00Fight Mission Started !", 0, 150, 255)
setTimer(checkFightForWinner, 3000, 1, true)
setMarkerColor(CrM,0,255,0,255)
setMarkerColor(PoM,0,255,0,255)
for i, player in ipairs(CrSTable) do
triggerClientEvent(player,"xFightMissionAction", player)
end
for i, player in ipairs(PoSTable) do
triggerClientEvent(player,"xFightMissionAction", player)
end
end, 3*60*1000, 1)
end, 3*60*1000, 1)
end
addEventHandler("onResourceStart", getResourceRootElement( getThisResource( ) ), STARTFightMission)
--addEvent("STARTFightMission",true)
--addEventHandler("STARTFightMission",root,STARTFightMission)
function getTimeLeft(Timer)
if startFightMission == Timer then
ms = getTimerDetails(Timer) + 300000 --
else
ms = getTimerDetails(Timer)
end
local m = math.floor(ms/60000)
local s = math.floor((ms-m*60000)/1000)
if m < 10 then m = ""..m end
if s < 10 then s = ""..s end
return "("..m.." Min and "..s.." Sec)"
end
addCommandHandler("alltime",
function(player)
if isTimer(standByFightMission) then
exports["guimessages"]:outputServer(player,"#3399FF[Fight Mission] #00FF00Time left Before Fight Missions Start : #FFFF00"..getTimeLeft(standByFightMission).." #00FF00!", 0, 255, 0)
elseif isTimer(startFightMission) then
exports["guimessages"]:outputServer(player,"#3399FF[Fight Mission] #00FF00Time left Before Fight Missions Start : #FFFF00"..getTimeLeft(startFightMission).." #00FF00!", 255, 255, 0)
else
-- exports["guimessages"]:outputServer(player,"Fight Mission Waiting ...", 255, 0, 0)
end
end)
local PolicePosition = {
{-1397.04187,-821.90790,427.06561},
{-1396.63196,-834.49438,427.06561},
{-1396.52905, -844.95410,427.06561}
}
local GangsterPosition = {
{-1276.42212,-879.63336,427.06561},
{-1277.17603,-864.88983,427.06561},
{-1277.85132,-850.74066,427.06561}
}
local GangsterOutPosition = {
{1247.20129 ,-1473.52722 ,13.54688},
{1242.79688 ,-1466.32068 ,13.54688},
{1245.09302 ,-1456.78503 ,13.54688},
{1249.23096 ,-1451.80872 ,13.54688}
}
addEventHandler("onMarkerHit", root,
function(player)
if getElementType(player) == "player" and not isPedInVehicle(player) and getElementDimension(player) == 0 then
if isTimer(standByFightMission) then
if source == CrM or source == PoM and getPlayerTeam(source) == getTeamFromName("Medic") then
cancelEvent()
end
if source == CrM and getPlayerTeam(player) ~= getTeamFromName("Police") and getPlayerTeam(player) ~= getTeamFromName("Medic") then
local x, y, z = unpack(GangsterPosition[math.random(#GangsterPosition)])
setElementPosition(player, x, y, z)
setElementDimension(player, 55)
AddPlayer(player, CrSTable)
setElementInterior(player, 5)
setElementData(player, "WantLvl", 6)
setPedArmor(player,100)
setElementHealth (player,100)
setElementData(player,"PointDMGMission", 0)
elseif source == PoM and getPlayerTeam(player) == getTeamFromName("Police") then
local x, y, z = unpack(PolicePosition[math.random(#PolicePosition)])
setElementPosition(player, x, y, z)
setElementDimension(player, 55)
setElementInterior(player, 5)
AddPlayer(player, PoSTable)
setPedArmor(player,100)
setElementHealth (player,100)
setElementData(player,"PointDMGMission", 0)
end
else
if source == CrM or source == PoM then
exports["guimessages"]:outputServer(player,"#3399FF[Fight Mission] #00FF00Time left Before Fight Missions Start : #FFFF00"..getTimeLeft(startFightMission).." #00FF00!", 255, 0, 0)
end
end
end
end)
function WarpFightMission()
if isTimer(standByFightMission) then
if isPedInVehicle(source) then
removePedFromVehicle(source)
end
if getPlayerTeam(source) ~= getTeamFromName("Police") then
local x, y, z = unpack(GangsterPosition[math.random(#GangsterPosition)])
setElementPosition(source, x, y, z)
setElementDimension(source, 55)
AddPlayer(source, CrSTable)
setElementInterior(source, 5)
setElementData(source, "WantLvl", 6)
setPedArmor(source,100)
setElementHealth (source,100)
setElementData(source,"PointDMGMission", 0)
else
local x, y, z = unpack(PolicePosition[math.random(#PolicePosition)])
setElementPosition(source, x, y, z)
setElementDimension(source, 55)
AddPlayer(source, PoSTable)
setPedArmor(source,100)
setElementInterior(source, 5)
setElementHealth (source,100)
setElementData(source,"PointDMGMission", 0)
end
else
exports["guimessages"]:outputServer(source,"#3399FF[Fight Mission] #FF0000Mission Fight Not Started !", 255, 0, 0)
end
end
addEvent("WarpFightMission",true)
addEventHandler("WarpFightMission",root,WarpFightMission)
TopKill = {}
function sortTop()
sortedTopKill = {}
for a, b in pairs(TopKill) do
table.insert(sortedTopKill, {getPlayerName(a), b})
end
table.sort(sortedTopKill, function(a,b) return a[2] > b[2] end)
end
addEventHandler("onPlayerWasted", root,
function( _, Killer )
if getPlayerTable(source, CrSTable) or getPlayerTable(source, PoSTable) then
if isElement(Killer) and getElementType(Killer) == "player" then
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] "..RGBToHex(getPlayerNametagColor(Killer))..""..getPlayerName(Killer).." #FFFF00("..getElementData(Killer,"PointDMGMission").." Damage) #FF0000Has killed "..RGBToHex(getPlayerNametagColor(source))..""..getPlayerName(source).." #FFFF00("..getElementData(source,"PointDMGMission").." Damage) #FF0000!", 0, 255, 255)
TopKill[Killer] = (TopKill[Killer] or 0) + 1
else
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #FFFF00["..getPlayerName(source).."] #FF0000Dead In Fight Mission !", 255, 255, 0)
end
if getPlayerTeam(source) ~= getTeamFromName("Police") then
RemovePlayer(source, CrSTable)
triggerClientEvent(source, "xFightMissionWasted", source)
if isElement(Killer) and getElementType(Killer) == "player" then
triggerClientEvent(Killer, "xFightMissionGood", Killer)
triggerEvent("OnPointPolice",Killer)
setElementData(Killer,"KilledInMission",(getElementData(Killer,"KilledInMission")or 0)+1)
exports["guimessages"]:outputServer(Killer,"#3399FF[Fight Mission] #00FF00Good Job You Won 1 Point !",0, 255, 255)
end
elseif getPlayerTeam(source) == getTeamFromName("Police") then
RemovePlayer(source, PoSTable)
triggerClientEvent(source, "xFightMissionWasted", source)
if isElement(Killer) and getElementType(Killer) == "player" then
triggerClientEvent(Killer, "xFightMissionGood", Killer)
triggerEvent("OnPointGang",Killer)
setElementData(Killer,"KilledInMission",(getElementData(Killer,"KilledInMission")or 0)+1)
exports["guimessages"]:outputServer(Killer,"#3399FF[Fight Mission] #00FF00Good Job You Won 1 Point !",0, 255, 255)
end
end
checkFightForWinner();
end
end );
addEventHandler("onPlayerQuit", root,
function()
if getPlayerTable(source, CrSTable) or getPlayerTable(source, PoSTable) then
if getPlayerTeam(source) ~= getTeamFromName("Police") then
RemovePlayer(source, CrSTable)
elseif getPlayerTeam(source) == getTeamFromName("Police") then
RemovePlayer(source, PoSTable)
end
checkFightForWinner()
end
end)
function checkFightForWinner(cHk)
if cHk then
TopKill = {}
end
if not isTimer(standByFightMission) and not isTimer(startFightMission) then
if #CrSTable > 0 and #PoSTable == 0 then
if not cHk then
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #FF0000Gangster #00FF00Win In The Mission Fight", 0, 255, 255)
sortTop()
if sortedTopKill[1] then setElementData(getResourceRootElement( getThisResource( ) ),"1", sortedTopKill[1][1]) setElementData(getResourceRootElement( getThisResource( ) ),"1k", sortedTopKill[1][2]) end
if sortedTopKill[2] then setElementData(getResourceRootElement( getThisResource( ) ),"2", sortedTopKill[2][1]) setElementData(getResourceRootElement( getThisResource( ) ),"2k", sortedTopKill[2][2]) end
if sortedTopKill[3] then setElementData(getResourceRootElement( getThisResource( ) ),"3", sortedTopKill[3][1]) setElementData(getResourceRootElement( getThisResource( ) ),"3k", sortedTopKill[3][2]) end
if sortedTopKill[4] then setElementData(getResourceRootElement( getThisResource( ) ),"4", sortedTopKill[4][1]) setElementData(getResourceRootElement( getThisResource( ) ),"4k", sortedTopKill[4][2]) end
if sortedTopKill[5] then setElementData(getResourceRootElement( getThisResource( ) ),"5", sortedTopKill[5][1]) setElementData(getResourceRootElement( getThisResource( ) ),"5k", sortedTopKill[5][2]) end
setTimer(triggerClientEvent,1000,1,root, "TopShowFiveFightTable", root)
setMarkerColor(CrM,0,255,0,255)
setMarkerColor(PoM,0,255,0,255)
else
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #FF0000The Fight Mission Was End !", 0, 255, 255)
end
for _, p in ipairs (CrSTable) do
if not cHk then
if getElementData(p,"OnMissionDouble") then
setElementData(p,"Money",(getElementData(p,"Money")or 0)+40000)
setElementData(p,"XP",(getElementData(p,"XP")or 0)+20)
triggerClientEvent(p,"xFightMissionWoner",p)
exports["guimessages"]:outputServer(p, "#3399FF[Fight Mission] #00FF00You Won #FF00FF$40000 and #FFFF0020 Xp.", 0, 255, 255)
else
setElementData(p,"Money",(getElementData(p,"Money")or 0)+20000)
setElementData(p,"XP",(getElementData(p,"XP")or 0)+10)
triggerClientEvent(p,"xFightMissionWoner",p)
exports["guimessages"]:outputServer(p, "#3399FF[Fight Mission] #00FF00You Won #FF00FF$20000 and #FFFF0010 Xp.", 0, 255, 255)
end
end
local x, y, z = unpack(GangsterOutPosition[math.random(#GangsterOutPosition)])
setElementPosition(p, x, y, z)
setElementInterior(p, 0)
setElementDimension(p, 0)
setElementData(p,"KilledInMission",0)
setElementData(p, "FightMission", false)
end
CrSTable = {}
PoSTable = {}
updateText()
if isTimer(CheckFightTimer) then
killTimer(CheckFightTimer)
end
exports.M2PVGMission:STARTPVGMission()
RestartDMGMission()
elseif #PoSTable > 0 and #CrSTable == 0 then
if not cHk then
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #0000FFPolice #00FF00Win In The Mission Fight", 0, 255, 255)
sortTop()
if sortedTopKill[1] then setElementData(getResourceRootElement( getThisResource( ) ),"1", sortedTopKill[1][1]) setElementData(getResourceRootElement( getThisResource( ) ),"1k", sortedTopKill[1][2]) end
if sortedTopKill[2] then setElementData(getResourceRootElement( getThisResource( ) ),"2", sortedTopKill[2][1]) setElementData(getResourceRootElement( getThisResource( ) ),"2k", sortedTopKill[2][2]) end
if sortedTopKill[3] then setElementData(getResourceRootElement( getThisResource( ) ),"3", sortedTopKill[3][1]) setElementData(getResourceRootElement( getThisResource( ) ),"3k", sortedTopKill[3][2]) end
if sortedTopKill[4] then setElementData(getResourceRootElement( getThisResource( ) ),"4", sortedTopKill[4][1]) setElementData(getResourceRootElement( getThisResource( ) ),"4k", sortedTopKill[4][2]) end
if sortedTopKill[5] then setElementData(getResourceRootElement( getThisResource( ) ),"5", sortedTopKill[5][1]) setElementData(getResourceRootElement( getThisResource( ) ),"5k", sortedTopKill[5][2]) end
setTimer(triggerClientEvent,1000,1,root, "TopShowFiveFightTable", root)
setMarkerColor(CrM,0,255,0,255)
setMarkerColor(PoM,0,255,0,255)
else
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #FF0000The Fight Mission Was End !", 0, 255, 255)
end
for _, p in ipairs (PoSTable) do
if not cHk then
if getElementData(p,"OnMissionDouble") then
setElementData(p,"Money",(getElementData(p,"Money")or 0)+40000)
setElementData(p,"XP",(getElementData(p,"XP")or 0)+20)
triggerClientEvent(p,"xFightMissionWoner",p)
exports["guimessages"]:outputServer(p, "#3399FF[Fight Mission] #00FF00You Won #FF00FF$40000 and #FFFF0020 Xp.", 0, 255, 255)
else
setElementData(p,"Money",(getElementData(p,"Money")or 0)+20000)
setElementData(p,"XP",(getElementData(p,"XP")or 0)+10)
triggerClientEvent(p,"xFightMissionWoner",p)
exports["guimessages"]:outputServer(p, "#3399FF[Fight Mission] #00FF00You Won #FF00FF$20000 and #FFFF0010 Xp.", 0, 255, 255)
end
end
setElementPosition(p, 219.09360, 69.06158 ,1005.03906)
setElementInterior(p, 6)
setElementDimension(p, 1)
setElementData(p,"KilledInMission",0)
setElementData(p, "FightMission", false)
end
CrSTable = {}
PoSTable = {}
updateText()
if isTimer(CheckFightTimer) then
killTimer(CheckFightTimer)
end
exports.M2PVGMission:STARTPVGMission()
RestartDMGMission()
elseif #PoSTable == 0 and #CrSTable == 0 then
if isTimer(CheckFightTimer) then
killTimer(CheckFightTimer)
end
exports["guimessages"]:outputServer(root, "#3399FF[Fight Mission] #FF0000The Fight Mission Was End !", 0, 255, 255)
exports.M2PVGMission:STARTPVGMission()
RestartDMGMission()
setMarkerColor(CrM,0,255,0,255)
setMarkerColor(PoM,0,255,0,255)
end
end
end
---Warped----
addCommandHandler("WarpFightSource",
function(player, cmd)
for k,v in ipairs(getElementsByType("player")) do
if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(v)),aclGetGroup("Staff")) then
triggerClientEvent(player, "showWarpFightMission", player)
end
end
end)
addCommandHandler("WarpFightAll",
function(player, cmd)
for k,v in ipairs(getElementsByType("player")) do
if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(v)),aclGetGroup("Staff")) then
triggerClientEvent(root, "showWarpFightMission", root)
end
end
end)
حياك الله اخوي انشاء الله برمضان نضيف دومينات واستضافات مواقع وخوادم كاملة بتكون اسعار رخيصة وحياك الله مرة تانية