Jump to content

تأكيد الاكواد

AliAlanzi

By AliAlanzi
in البرمجة

Recommended Posts

AliAlanzi Red-Headed Stepchild

AliAlanzi

Posted
Posted

انا ابي اسوي مهمه مقلا دبابات او ديربي او هنتر ل حرب عصابات طيب جبت الاكواد من مهمه ديربي عدلت عليها كلها بس باقي السيارات و الريسباون مو الحين ابي اشوف الاكواد صح ولا غلط 

--s
local CarsMission = {
{411},
{429},
{477},
{554},
{456},
{412},
{517},
{599},
{602},
{485},
{474},
{516},
}

TableCars = {}
CrtTable = {}

function updateText()
setElementData(getResourceRootElement( getThisResource( ) ),"PlayerCount", #CrtTable)
triggerClientEvent(root, "showPlayerCountHunterMission", root)
end

function AddPlayer(player, Table)
if not getPlayerTable(player, CrtTable) then
table.insert(Table, player)
updateText()
setElementData(player, "HunterMission", true)
end
end

function RemovePlayer(player, Table)
	for i, v in ipairs (Table) do
		if (v == player) then
			table.remove(Table, i)
			setElementData(player, "HunterMission", false)
			if isElement(TableCars[player]) then
				destroyElement ( TableCars[player] )
			end
		end
		updateText()
	end
end

function getPlayerTable(player, Table)
for i, v in ipairs (Table) do
if (v == player) then
return true
end
end
end

addEventHandler ( "onVehicleStartExit", root,
function ( player )
if getElementData(player, "HunterMission") then
cancelEvent ( )
end
end
)

local CrM = createMarker(1419.18518 ,-1623.82581, 13.54688+1.3, "arrow", 2, 0, 255, 0, 255)
  createBlip (1419.18518, -1623.82581, 13.54688, 53)

function STARTHunterMission()
startTheHunterMission = setTimer(function()
triggerClientEvent(root, "showWarpHunterMission", root)
exports["guimessages"]:outputServer(root,"#3399FF[Hunter Mission] #00FF00Go To Flag Black In the map", 0, 255, 255)
exports["guimessages"]:outputServer(root,"#3399FF[Hunter Mission] #FF0000Hunter mission Will Start After 5 Minutes", 0, 255, 255)
exports["guimessages"]:outputServer(root,"#3399FF[Hunter Mission] #FFFF00For All Enter A Yellow Marker", 0, 255, 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)
setMarkerColor(CrM,255,255,0,255)
standByHunterMission = setTimer(function()
exports["guimessages"]:outputServer(root, "#3399FF[Hunter Mission] #00ff00The Hunter Mission Started !!", 0, 255, 255)
for i, player in ipairs(CrtTable) do
triggerClientEvent(player,"xHunterMissionAction",player)
setElementFrozen(TableCars[player], false)
setTimer(setElementCollisionsEnabled,1000,1,TableCars[player],true)
setElementFrozen(player, false)
setMarkerColor(CrM,0,255,0,255)
end
setTimer(checkHunterForWinner, 3000, 1, true)
end, 3*60*1000, 1)
end, 3*60*1000, 1)
end
--addEventHandler('onResourceStart', root, STARTHunterMission) 
addEvent("STARTHunterMission",true)
addEventHandler("STARTHunterMission",root,STARTHunterMission)

function getTimeLeft(Timer)
if startTheHunterMission == 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(standByHunterMission) then
exports["guimessages"]:outputServer(player,"#3399FF[Hunter Mission] #00FF00Time left Before Hunter Missions Start : #FFFF00"..getTimeLeft(standByHunterMission).." #00FF00!", 0, 255, 0)
elseif isTimer(startTheHunterMission) then
exports["guimessages"]:outputServer(player,"#3399FF[Hunter Mission] #00FF00Time left Before Hunter Missions Start : #FFFF00"..getTimeLeft(startTheHunterMission).." #00FF00!", 255, 255, 0)
else
end
end)

local HunterPosition = {
{-4614.06348 ,728.16766, 3.02076-0.2},
{-4614.06348 ,728.16766-50, 3.02076-0.2},
{-4614.06348 ,728.16766-100, 3.02076-0.2},
{-4614.06348 ,728.16766-150, 3.02076-0.2},
{-4614.06348 ,728.16766-200, 3.02076-0.2},
{-4584.36670, 727.82904 ,3.02076-0.2},
{-4584.36670, 727.82904-50 ,3.02076-0.2},
{-4584.36670, 727.82904-100 ,3.02076-0.2},
{-4584.36670, 727.82904-150 ,3.02076-0.2},
{-4584.36670, 727.82904-200 ,3.02076-0.2},
{-4555.61963, 724.96368 ,3.02076-0.2},
{-4555.61963, 724.96368-50 ,3.02076-0.2},
{-4555.61963, 724.96368-100 ,3.02076-0.2},
{-4555.61963, 724.96368-150 ,3.02076-0.2},
{-4555.61963, 724.96368-200 ,3.02076-0.2},
{-4643.72363, 728.15698, 3.02076-0.2},
{-4643.72363, 728.15698-50, 3.02076-0.2},
{-4643.72363, 728.15698-100, 3.02076-0.2},
{-4643.72363, 728.15698-150, 3.02076-0.2},
{-4643.72363, 728.15698-200, 3.02076-0.2},
{-4673.32666, 727.87604, 3.02076-0.2},
{-4673.32666, 727.87604-50, 3.02076-0.2},
{-4673.32666, 727.87604-100, 3.02076-0.2},
{-4673.32666, 727.87604-150, 3.02076-0.2},
{-4673.32666, 727.87604-200, 3.02076-0.2},
{-4703.87305, 725.87445, 3.02076-0.2},
{-4703.87305, 725.87445-50, 3.02076-0.2},
{-4703.87305, 725.87445-100, 3.02076-0.2},
{-4703.87305, 725.87445-150, 3.02076-0.2},
{-4703.87305, 725.87445-200, 3.02076-0.2}
}


addEventHandler("onMarkerHit", root,
function(player)
if getElementType(player) == "player" and not isPedInVehicle(player) and getElementDimension(player) == 0 then
if isTimer(standByHunterMission) then
if source == CrM then
local x, y, z = unpack(HunterPosition[math.random(#HunterPosition)])
local cats = unpack(CarsMission[math.random(#CarsMission)])
setElementPosition(player, x, y, z)
setElementDimension(player, 55)
setElementInterior(player, 0)
AddPlayer(player, CrtTable)
TableCars[player] = createVehicle( cats, x, y, z, 0, 0, 0 )
setElementDimension(TableCars[player], 55)
setElementInterior(TableCars[player], 0)
addVehicleUpgrade(TableCars[player], 1010)
setVehicleDamageProof(TableCars[player],true)
warpPedIntoVehicle ( player, TableCars[player] )
setElementCollisionsEnabled(TableCars[player],false)
setElementFrozen(TableCars[player], true)
setElementFrozen(player, true)
triggerClientEvent(player,"xWaterCarsFalse",player)
toggleControl ( player, "vehicle_fire", false )
toggleControl ( player, "vehicle_secondary_fire", false )
toggleControl ( player, "enter_exit", false )
end
else
if source == CrM then
exports["guimessages"]:outputServer(player,"#3399FF[Hunter Mission] #00FF00Time left Before Hunter Missions Start : #FFFF00"..getTimeLeft(startTheHunterMission).." #00FF00!", 0, 255, 255)
end
end
end
end)

function WarpHunterMission()
if isTimer(standByHunterMission) then
if isPedInVehicle(source) then
removePedFromVehicle(source)
end
local x, y, z = unpack(HunterPosition[math.random(#HunterPosition)])
local cats = unpack(CarsMission[math.random(#CarsMission)])
setElementPosition(source, x, y, z)
setElementDimension(source, 55)
setElementInterior(source, 0)
AddPlayer(source, CrtTable)
TableCars[source] = createVehicle( cats, x, y, z, 0, 0, 0 )
warpPedIntoVehicle ( source, TableCars[source] )
setElementDimension(TableCars[source], 55)
setElementInterior(TableCars[source], 0)
addVehicleUpgrade(TableCars[source], 1010)
setVehicleDamageProof(TableCars[source],true)
setElementCollisionsEnabled(TableCars[source],false)
setElementFrozen(TableCars[source], true)
setElementFrozen(source, true)
triggerClientEvent(source,"xWaterCarsFalse",source)
toggleControl ( source, "vehicle_fire", false )
toggleControl ( source, "vehicle_secondary_fire", false )
toggleControl ( source, "enter_exit", false )
else
exports["guimessages"]:outputServer(source,"#3399FF[Hunter Mission] Not Starting yet !!", 0, 255, 255)
end
end
addEvent("WarpHunterMission",true)
addEventHandler("WarpHunterMission",root,WarpHunterMission)

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, CrtTable) then
		exports["guimessages"]:outputServer(root, "#3399FF[Hunter Mission] #FFFF00["..getPlayerName(source).."]#FF0000 Dead In Hunter Mission !!", 0, 255, 255)
		RemovePlayer(source, CrtTable)
		if isElement( TableCars[source] ) then
			setElementFrozen(TableCars[source], false)
		end
		setElementFrozen(source, false)
		if isElement( TableCars[source] ) then
			destroyElement ( TableCars[source] )
		end
		toggleControl ( source, "vehicle_fire", true )	
		toggleControl ( source, "vehicle_secondary_fire", true )
		toggleControl ( source, "enter_exit", true )
		for i, player in ipairs(CrtTable) do
			if not ( isPedDead ( player ) ) then
				TopKill[player] = (TopKill[player] or 0) + 1
				exports["guimessages"]:outputServer(player, "#3399FF[Hunter Mission] #00FF00 You Got (+1) Point !!", 0, 255, 255)
			end
		end
		checkHunterforWinner()
	end
end );

addEvent("XDedHunter",true)
addEventHandler("XDedHunter",root,
function ()
if getElementData(source,"HunterMission") then
for _, theCar in pairs ( getElementsByType 'vehicle' ) do
if isElement(theCar) and isElementInWater(theCar) then
destroyElement(theCar)
end
end
if isElementInWater(source) then
killPed(source)
end
end
end)


addEventHandler("onPlayerQuit", root,
function()
if getPlayerTable(source, CrtTable) then
destroyElement ( TableCars[source] )
RemovePlayer(source, CrtTable)
checkHunterForWinner()
end
end)

function checkHunterForWinner(cHk)
if cHk then
TopKill = {}
end
if not isTimer(standByHunterMission) and not isTimer(startTheHunterMission) then
if #CrtTable == 1 then
if not cHk then
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, "TopShowFiveHunterTable", root,sortedTopKillHunter)
else
exports["guimessages"]:outputServer(root, "#3399FF[Hunter Mission] #FF0000The Hunter Mission Was End !", 0, 255, 255)
end
for _, p in ipairs (CrtTable) 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,"xHunterMissionWoner",p)
exports["guimessages"]:outputServer(p, "#3399FF[Hunter Mission] #00FF00You Won #FF00FF$40000 and #FFFF0020 Xp.", 0, 255, 255)
toggleControl ( p, "vehicle_fire", true )
toggleControl ( p, "vehicle_secondary_fire", true )
toggleControl ( p, "enter_exit", true )
else
setElementData(p,"Money",(getElementData(p,"Money")or 0)+20000)
setElementData(p,"XP",(getElementData(p,"XP")or 0)+10)
triggerClientEvent(p,"xHunterMissionWoner",p)
exports["guimessages"]:outputServer(p, "#3399FF[Hunter Mission] #00FF00You Won #FF00FF$20000 and #FFFF0010 Xp.", 0, 255, 255)
toggleControl ( p, "vehicle_fire", true )
toggleControl ( p, "vehicle_secondary_fire", true )
toggleControl ( p, "enter_exit", true )
end
end
removePedFromVehicle ( p )
destroyElement ( TableCars[p] )
setElementPosition(p, 1421.33032 ,-1627.61792 ,13.54688)
setElementRotation(p, 0,0,270,"default",true)
setElementInterior(p, 0)
setElementDimension(p, 0)
setElementData(p,"Coins",(getElementData(p,"Coins")or 0)+2)
setMarkerColor(CrM,0,255,0,255)
setElementData(p, "HunterMission", false)
for i, cars in ipairs(TableCars) do
destroyElement ( cars )
end
end
CrtTable = {};
TableCars = {};
updateText()
if isTimer(HunterCheckTimer) then
	killTimer(HunterCheckTimer);
end
exports.M6OpenMission:STARTOpenMapMission()
setMarkerColor(CrM,0,255,0,255)
elseif #CrtTable == 0 then
killTimer ( HunterCheckTimer )
for i, cars in ipairs(TableCars) do
destroyElement ( cars )
end
TableCars = {}
exports["guimessages"]:outputServer(root, "#3399FF[Hunter Mission] #FF0000The Hunter Mission Was End !", 0, 255, 255)
exports.M6OpenMission:STARTOpenMapMission()
setMarkerColor(CrM,0,255,0,255)
end
end
end

---System---
addCommandHandler("WHM",
function(player, cmd)
for k,v in ipairs(getElementsByType("player")) do
if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(v)),aclGetGroup("Staff")) then
triggerClientEvent(player, "showWarpHunterMission", player)
end
end
end)

addCommandHandler("WHM",
function(player, cmd)
for k,v in ipairs(getElementsByType("player")) do
if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(v)),aclGetGroup("Staff")) then
triggerClientEvent(root, "showWarpHunterMission", root)
end
end
end)

هذا ملف s 

--c
---System---
function centerWindow(center_window)
local screenW,screenH=guiGetScreenSize()
local windowW,windowH=guiGetSize(center_window,false)
local x,y = (screenW-windowW)/2,(screenH-windowH)/2
guiSetPosition(center_window,x,y,false)
end

local rx,ry = guiGetScreenSize()
local fontScale = (rx/1440)
local rxs, rys = (rx/1440), (ry/900)

function dxDrawFramedText(message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, frameColor)
color = color or tocolor(255, 255, 255, 255)
frameColor = frameColor or tocolor(0, 0, 0, 255)
scale = scale or 1.1
font = font or "default"
alignX = alignX or "left"
alignY = alignY or "top"
clip = clip or false
wordBreak = wordBreak or false
postGUI = postGUI or false
dxDrawText(message, left + 1, top + 1, width + 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI)
dxDrawText(message, left + 1, top - 1, width + 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI)
dxDrawText(message, left - 1, top + 1, width - 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI)
dxDrawText(message, left - 1, top - 1, width - 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI)
dxDrawText(message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI)
end

TimeGuiSetDownC = { }

function guiMoveDownToCenter(gui)
if getElementData(gui,"HelhGui") == false then
setElementData(gui,"HelhGui",true)
local s1,s2=guiGetScreenSize()
local w1,w2=guiGetSize(gui,false)
local x,y = (s1-w1)/2,(s2-w2)/2
guiSetPosition(gui,x,(w2*4),false) 
TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter,50,0,gui)
end
local a,b=guiGetScreenSize()
local w1,w2=guiGetSize(gui,false)
local x,y = (a-w1)/2,(b-w2)/2
local x1,y1 = guiGetPosition ( gui, false)
if (y1 <= y) then
killTimer(TimeGuiSetDownC[gui])
setElementData(gui,"HelhGui",false)
else
guiSetPosition(gui,x1,(y1-4),false)
end
end


setTimer ( function ()
if getElementData(localPlayer, "HunterMission") then
triggerServerEvent('XDedHunter',localPlayer)
end
end, 5000, 0 )


addEventHandler("onClientRender", root,
function()
if getElementData(localPlayer, "HunterMission") then
if getElementDimension(localPlayer) ~= 55 then
setElementData(localPlayer, "HunterMission", false)
else
end
cN = 0
for i, player in ipairs(getElementsByType("player")) do
if getElementData(player, "HunterMission") then
cN = cN + 1
end
end
dxDrawRectangle(rxs*30, rys*555, rxs*100, rys*30, tocolor(0, 0, 0, 150))
dxDrawText("#FFFF00Player : #FFFFFF"..cN, rxs*40, rys*560, rxs*450, rys*350, tocolor(200, 200, 255, 255), rys*1.4, "default-bold", "left", "top", false, false, false, true)
end
end)


local x, y = guiGetScreenSize()
local movingSpeed = 5
local g_root = getRootElement( )
local g_resRoot = getResourceRootElement( getThisResource( ) )
local screenWidth, screenHeight = guiGetScreenSize( )
--Top-System---
TopMission = guiCreateStaticImage(0, y/1.7-(250/2), 0, 220, "Window.jpg", false)
header = guiCreateStaticImage(0, 0, 500, 30, "Header.png", false, TopMission)
guiSetAlpha ( TopMission, 0 )
guiCreateLabel(50, 5, 500, 100, "Top 5 Players On Hunter Mission", false, header)
----------------
Label1 = guiCreateLabel(10, 50, 500, 100, "1 - ", false, TopMission)
guiLabelSetColor(Label1,255,255,0)
Label11 = guiCreateLabel(25, 50, 500, 100, getElementData(g_resRoot,"1") or "None", false, TopMission)
Label2 = guiCreateLabel(220, 50, 500, 100, getElementData(g_resRoot,"1k") or "0", false, TopMission)
if Label2 then
guiLabelSetColor(Label2,0,255,0)
end

Label3 = guiCreateLabel(10, 80, 500, 100, "2 - ", false, TopMission)
guiLabelSetColor(Label3,255,255,0)
Label22 = guiCreateLabel(25, 80, 500, 100, getElementData(g_resRoot,"2") or "None", false, TopMission)
Label4 = guiCreateLabel(220, 80, 500, 100, getElementData(g_resRoot,"2k") or "0", false, TopMission)
if Label4 then
guiLabelSetColor(Label4,0,255,0)
end

Label5 = guiCreateLabel(10, 110, 500, 100, "3 - ", false, TopMission)
guiLabelSetColor(Label5,255,255,0)
Label33 = guiCreateLabel(25, 110, 500, 100, getElementData(g_resRoot,"3") or "None", false, TopMission)
Label6 = guiCreateLabel(220, 110, 500, 100, getElementData(g_resRoot,"3k") or "0", false, TopMission)
if Label6 then
guiLabelSetColor(Label6,0,255,0)
end

Label7 = guiCreateLabel(10, 140, 500, 100, "4 - ", false, TopMission)
guiLabelSetColor(Label7,255,255,0)
Label44 = guiCreateLabel(25, 140, 500, 100, getElementData(g_resRoot,"4") or "None", false, TopMission)
Label8 = guiCreateLabel(220, 140, 500, 100, getElementData(g_resRoot,"4k") or "0", false, TopMission)
if Label8 then
guiLabelSetColor(Label8,0,255,0)
end

Label9 = guiCreateLabel(10, 170, 500, 100, "5 - ", false, TopMission)
guiLabelSetColor(Label9,255,255,0)
Label55 = guiCreateLabel(25, 170, 500, 100, getElementData(g_resRoot,"5") or "None", false, TopMission)
Label10 = guiCreateLabel(220, 170, 500, 100, getElementData(g_resRoot,"5k") or "0", false, TopMission)
if Label10 then
guiLabelSetColor(Label10,0,255,0)
end
------------------


addEvent('TopShowFiveHunterTable',true)
addEventHandler('TopShowFiveHunterTable',resourceRoot,
function( )
guiSetVisible(TopMission, true)
addEventHandler( "onClientRender", getRootElement(), contractSubWindow )

guiSetText(Label11, getElementData(g_resRoot,"1") or "None")
guiSetText(Label22, getElementData(g_resRoot,"2") or "None")
guiSetText(Label33, getElementData(g_resRoot,"3") or "None")
guiSetText(Label44, getElementData(g_resRoot,"4") or "None")
guiSetText(Label55, getElementData(g_resRoot,"5") or "None")

guiSetText(Label2, getElementData(g_resRoot,"1k") or "0")
guiSetText(Label4, getElementData(g_resRoot,"2k") or "0")
guiSetText(Label6, getElementData(g_resRoot,"3k") or "0")
guiSetText(Label8, getElementData(g_resRoot,"4k") or "0")
guiSetText(Label10, getElementData(g_resRoot,"5k") or "0")

end)

function contractSubWindow( )
    local width, height = guiGetSize( TopMission, false )
    local x, y = guiGetPosition( TopMission, false )
    if width < 250 then
        guiSetSize( TopMission, width + movingSpeed, height, false )
	guiSetAlpha ( TopMission, (guiGetAlpha(TopMission) + 0.015) )
        if width > screenWidth - x then
            guiSetPosition( TopMission, (screenWidth - width), y, false )
        end
    else
        guiSetSize( TopMission, 250 , height, false )
		removeEventHandler( "onClientRender", g_root, contractSubWindow )
        guiMoveToBack( TopMission )
		setTimer(function()
		addEventHandler( "onClientRender", getRootElement(), endSubWindow )
		end, 20000, 1)
    end
end


function endSubWindow( )
    local width, height = guiGetSize( TopMission, false )
    local x, y = guiGetPosition( TopMission, false )
    if width > 0 then
        guiSetSize( TopMission, width - movingSpeed, height, false )
	guiSetAlpha ( TopMission, (guiGetAlpha(TopMission) - 0.015) )
        if width > screenWidth - x then
            guiSetPosition( TopMission, (screenWidth - width), y, false )
        end
    else
        guiSetSize( TopMission, 0 , height, false )
	removeEventHandler( "onClientRender", g_root, endSubWindow )
        guiMoveToBack( TopMission )
    end
	setTimer(function()
	guiSetVisible(TopMission, false)
	end, 2000, 1)
end
----Warp-Mission---
local g_resRoot = getResourceRootElement( getThisResource( ) )

WarpMission = guiCreateWindow(400, 400, 300, 150, "Warp System | Hunter Mission", false)
guiSetVisible(WarpMission, false)
centerWindow(WarpMission)
guiMoveDownToCenter(WarpMission)
Tite_Mission = guiCreateLabel(10,30, 300, 27, " To Enter The Hunter Mission , Press 'Go To Mission' \n      To Close The  Hunter Mission , Press 'Close' !", false, WarpMission)
guiSetFont(Tite_Mission, "default-bold-small")
WarpButton = guiCreateButton(10, 65, 300, 25, "Go To Mission", false,WarpMission)
guiSetFont(WarpButton, "default-bold-small")
CloseButton = guiCreateButton(10, 95, 300, 25, "Close", false,WarpMission)
guiSetFont(CloseButton, "default-bold-small")
PlayersLabel = guiCreateLabel(110, 125, 500, 100, "Player : ", false, WarpMission)
guiLabelSetColor(PlayersLabel,255,255,255)
guiSetFont(PlayersLabel, "default-bold-small")
PlayerCountLabel = guiCreateLabel(155, 125, 500, 100, getElementData(g_resRoot,"PlayerCount") or "0", false, WarpMission)
guiLabelSetColor(PlayerCountLabel,255,255,0)
guiSetFont(PlayerCountLabel, "default-bold-small")
---
addEvent("showPlayerCountHunterMission", true)
addEventHandler("showPlayerCountHunterMission", root,
function( )
guiSetText(PlayerCountLabel, getElementData(g_resRoot,"PlayerCount") or "0")
end)

addEvent("showWarpHunterMission", true)
addEventHandler("showWarpHunterMission", root,
function( )
guiSetVisible(WarpMission, true)
guiMoveDownToCenter(WarpMission)
showCursor(true)
setTimer(guiSetVisible,60000,1,WarpMission,false)
setTimer(showCursor,60000,1,false)
end)

addEventHandler("onClientGUIClick",root,
function()
if ( source == WarpButton ) then
if getElementData(localPlayer, "LegalStatus") == "Jailed" then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. You Are Jailed !", 255, 255, 0) return end
if getElementData(localPlayer, "LegalStatus") == "Arrested" then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. You Are Arrested !", 255, 255, 0) return end
if getElementData(localPlayer,"Stats") == 4 then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Not Go Mission Because You Are Kidnapped !", 255, 255, 0) return end
if getElementData(localPlayer,"Stats") == 5 then						exports["guimessages"]:outputClient("#3399FF[Fight Mission] #FF0000You Not Go Mission Because You Are Kidnapped !", 255, 255, 0) return end
if getElementData(localPlayer, "bag") then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. You Have The Bag !", 255, 255, 0) return end
if getElementData(localPlayer, "ShowMarkerPoor") then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. You Have The Poor Marker !", 255, 255, 0) return end
if getElementData(localPlayer, "ShopPanel") then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000Close The Panel First!", 255, 255, 0) return end
if getElementDimension(localPlayer) == 55 then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. You Are Already in The Mission !", 255, 255, 0) return end
if (isPedDead (localPlayer)) then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. You Are Dead !", 255, 255, 0) return end
if not getPlayerTeam(localPlayer)  then exports["guimessages"]:outputClient("#00F5F0[Hunter Mission] #FF0000You Can't Go The Mission. Not Join To Any Team First !", 255, 255, 255) return end
fadeCamera(false)
setTimer(fadeCamera, 3000, 1, true)
triggerServerEvent ( "WarpHunterMission", localPlayer )
guiSetVisible(WarpMission, false)
showCursor(false)
elseif ( source == CloseButton ) then
guiSetVisible(WarpMission, false)
showCursor(false)
end
end)
---Mission-System---
local MissionCompassed = {
{"mission passed"},
{"mission complete"}
}

local MissionFailed = "The Mission Hunter Failed"
local MissionComplte = "Mission Hunter"
local WainXP = "XP For Mission"
local WainMoney = "Money for mission"
local PointSelver = "Completion - Silver"
local mahdi = unpack(MissionCompassed[math.random(#MissionCompassed)])
local Money1 = math.random(1,50)
local Money = math.random(50,100)
local XP1 = math.random(1,50)
local XP = math.random(50,100)
local Silver = math.random(0,50)

function showmission()
dxDrawText("Mission failed", rx*0.01, ry*0.0000006, rx*0.99, ry*0.97, tocolor(255, 0, 0, 200), fontScale*3, "pricedown", "center", "center",false,false,true)
dxDrawText(MissionFailed, rx*0.01, ry*0.23, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawRectangle(rx*0.334, ry*0.561, rx*0.336, ry*0.08, tocolor(0, 0, 0, 150))
dxDrawLine ( rx/3, ry/1.55, rx/1.49, ry/1.55, tocolor ( 255, 255, 255, 255 ), 4 )
dxDrawLine ( rx/3, ry/1.80, rx/1.49, ry/1.80, tocolor ( 255, 255, 255, 255 ), 4 )
end

function MissionWon()
dxDrawText(mahdi, rx*0.018, ry*0.0000006900, rx*0.99, ry*0.97, tocolor(0, 0, 0, 255), fontScale*3, "pricedown", "center", "center",false,false,true)
dxDrawText(mahdi, rx*0.01, ry*0.0000006, rx*0.99, ry*0.97, tocolor(255, 200, 0, 255), fontScale*3, "pricedown", "center", "center",false,false,true)
dxDrawText(MissionComplte, rx*0.01, ry*0.22, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawRectangle(rx*0.334, ry*0.561, rx*0.336, ry*0.24, tocolor(0, 0, 0, 150))
dxDrawLine ( rx/3, ry/1.60, rx/1.49, ry/1.60, tocolor ( 255, 255, 255, 255 ), 4 )
dxDrawLine ( rx/3, ry/1.78, rx/1.49, ry/1.78, tocolor ( 255, 255, 255, 255 ), 4 )
---Won-Mission---
dxDrawLine ( rx/1.55, ry/1.52, rx/1.5, ry/1.52, tocolor ( 255, 255, 255, 150 ), 20 )
dxDrawLine ( rx/1.55, ry/1.42, rx/1.5, ry/1.42, tocolor ( 255, 255, 255, 150 ), 20 )
dxDrawLine ( rx/1.55, ry/1.30, rx/1.5, ry/1.30, tocolor ( 255, 255, 255, 150 ), 20 )
dxDrawText(WainXP, rx*-0.21, ry*0.35, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawText(WainMoney, rx*-0.185, ry*0.44, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
if getElementData(localPlayer,"OnMissionDouble")then
dxDrawText(XP.." %", rx*0.26, ry*0.444, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawText(Money.." %", rx*0.26, ry*0.353, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
else
dxDrawText(XP1.." %", rx*0.26, ry*0.444, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawText(Money1.." %", rx*0.26, ry*0.353, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
end
dxDrawText("√", rx*0.32, ry*0.444, rx*0.99, ry*0.97, tocolor(0, 128, 0, 255), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawText("√", rx*0.32, ry*0.353, rx*0.99, ry*0.97, tocolor(0, 128, 0, 255), fontScale*1.5, "sans", "center", "center",false,false,true)
---Complete-Mission---
dxDrawLine ( rx/3, ry/1.35, rx/1.49, ry/1.35, tocolor ( 255, 255, 255, 200 ), 4 )
if Silver >= 50 then
dxDrawText("√", rx*0.32, ry*0.575, rx*0.99, ry*0.97, tocolor(0, 128, 0, 255), fontScale*1.5, "sans", "center", "center",false,false,true)
else
dxDrawText("X", rx*0.323, ry*0.57, rx*0.99, ry*0.97, tocolor(255, 0, 0, 255), fontScale*1.5, "sans", "center", "center",false,false,true)
end
dxDrawText(Silver.." %", rx*0.26, ry*0.57, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawText(PointSelver, rx*-0.185, ry*0.57, rx*0.99, ry*0.97, tocolor(255, 255, 255, 180), fontScale*1.5, "sans", "center", "center",false,false,true)
dxDrawLine ( rx/3, ry/1.25, rx/1.49, ry/1.25, tocolor ( 255, 255, 255, 200 ), 4 )
end

function showClientImage()
if getElementData(source, "HunterMission") then
setPlayerHudComponentVisible( "all", false )
showChat(false)
addEventHandler("onClientRender", root,showmission)
local img = guiCreateStaticImage( 0, 0, 1920, 1080, ":M1FightMission/vignette1.dds", true )
setTimer(function()
showPlayerHudComponent("all", true)
showChat(true)
destroyElement(img)
removeEventHandler("onClientRender", root,showmission)
end, 5000, 1)
end
end
addEventHandler ( "onClientPlayerWasted", getLocalPlayer(), showClientImage)

function ActionMissionHunter()
sounds = playSound("Go.mp3")
setSoundVolume (sounds, 0.5)
end
addEvent("xHunterMissionAction", true)
addEventHandler("xHunterMissionAction",root,ActionMissionHunter)


function WaterCarsFalse()
setWorldSpecialPropertyEnabled ("hovercars",false)
end
addEvent("xWaterCarsFalse", true)
addEventHandler("xWaterCarsFalse",root,WaterCarsFalse)


function WonerMissionHunter()
local sound = playSound(":M1FightMission/Woner.mp3")
setSoundVolume (sound, 0.5)
addEventHandler("onClientRender", root,MissionWon)
setTimer(function()
removeEventHandler("onClientRender", root,MissionWon)
end, 10000, 1)
end
addEvent("xHunterMissionWoner",true)
addEventHandler("xHunterMissionWoner",root,WonerMissionHunter)

function WastedMissionHunter()
local sound = playSound(":M1FightMission/Wasted.mp3")
setSoundVolume (sound, 1)
end
addEvent("xHunterMissionWasted",true)
addEventHandler("xHunterMissionWasted",root,WastedMissionHunter)

هذا ملف c 

<meta>
    <map src="Map_DerbyMission.map" dimension="55"></map>
	<script cache="false" src="c.lua" type="client"></script>
    <script src="s.lua" type="server"></script>
	<file src="Go.mp3" />
	<file src="Window.jpg" />
    <file src="Header.png" />
	<export function="STARTHunterMission"/>
</meta>

هذا ملف ميتا

Link to comment
AliAlanzi Red-Headed Stepchild

AliAlanzi

Posted
  • Author
Posted 
addCommandHandler("WHM",
function(player, cmd)
for k,v in ipairs(getElementsByType("player")) do
if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(v)),aclGetGroup("Staff")) then
triggerClientEvent(root, "showWarpHunterMission", root)
end
end
end)

صح ذا؟

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...