السلام عليكم
الحين معي مود فيب
لما اضغط علي الزر الي ينزل الحارس
ماينزل
الكلنت
local animalTable = false
isEventHandel = true
---------------------------------|
local rX,rY = guiGetScreenSize()
local sw,sh = 527,514
---------------------------------|
local tag = dxCreateTexture("3.png")
addEventHandler("onClientPreRender", root,
function()
for i, player in ipairs ( getElementsByType ( "player" ) ) do
if ( getElementData ( player, "isPlayerVIP" ) == true ) then
local x, y, z = getPedBonePosition(player, 5)
if player ~= localPlayer then
dxDrawMaterialLine3D(x, y, z+1.2, x, y, z+0.6, tag, 0.7, tocolor(0,255,255,255))
end
end
end
end
)
------------------
addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()),
function ()
window = guiCreateWindow(242, 194, 511, 347, "|= V.I.P |=", false)
guiSetProperty(window, "CaptionColour", "FF00FF00")
guiSetAlpha(window, 1.00)
close = guiCreateButton(10, 306, 493, 27, "=| Close Window |=", false, window)
guiSetProperty(close, "NormalTextColour", "FFFF0000")
vipset = guiCreateLabel(120, 172, 1000, 18, "=| VIP Option |=", false, window)
guiSetFont(vipset, "default-bold-small")
guiLabelSetColor(vipset, 255, 0, 0)
vipcars = guiCreateButton(10, 200, 156, 27, "=| Spawn Vehicle |=", false, window)
guiSetProperty(vipcars, "NormalTextColour", "FF00FF00")
vipjet = guiCreateButton(345, 274, 157, 27, "=| JetPack |=", false, window)
guiSetProperty(vipjet, "NormalTextColour", "FF00FF00")
viphel = guiCreateButton(179, 200, 156, 27, "=| Health |=", false, window)
guiSetProperty(viphel, "NormalTextColour", "FF00FF00")
vipcbody = guiCreateButton(345, 200, 156, 27, "=| Create Body |=", false, window)
guiSetProperty(vipcbody, "NormalTextColour", "FF00FF00")
vipfv = guiCreateButton(9, 274, 156, 27, "=| Fix Vehicle |=", false, window)
guiSetProperty(vipfv, "NormalTextColour", "FF00FF00")
vipdskin = guiCreateButton(9, 237, 157, 27, "=| Skin VIP |=", false, window)
guiSetProperty(vipdskin, "NormalTextColour", "FF00FF00")
vipdbody = guiCreateButton(345, 237, 157, 27, "=[ Destroy Body ]=", false, window)
guiSetProperty(vipdbody, "NormalTextColour", "FF00FF00")
viplr = guiCreateButton(179, 274, 157, 27, "=| Launcher |=", false, window)
guiSetProperty(viplr, "NormalTextColour", "FF00FF00")
viparmor = guiCreateButton(180, 237, 156, 27, "=| Armour |=", false, window)
guiSetProperty(viparmor, "NormalTextColour", "FF00FF00")
vipimg = guiCreateStaticImage(9, 19, 499, 153, "wnd.png", false, window)
guiSetProperty(vipimg, "NormalTextColour", "FF00FF00")
guiWindowSetMovable (window, true)
guiWindowSetSizable (window, false)
guiSetVisible (window, false)
addEventHandler ("onClientGUIClick", GridListVipSkins, function() setElementModel ( localPlayer, guiGridListGetItemText ( GridListVipSkins, guiGridListGetSelectedItem ( GridListVipSkins ), 1, 2 ) ) end, false)
addEventHandler("onClientGUIClick", close,
function() guiSetVisible(window, false)
setElementModel ( localPlayer, tonumber( getElementData( localPlayer, "clothesvipSkin" )) )
showCursor(false)
guiSetVisible(VipHats, false)
guiSetVisible(WindowWalkStyles, false)
end, false)
addEventHandler("onClientGUIClick", closeFrom,
function() guiSetVisible(window, false)
setElementModel ( localPlayer, tonumber( getElementData( localPlayer, "clothesvipSkin" )) )
showCursor(false)
end, false)
end)
function ShowPremiumPanel ()
if ( getElementData(localPlayer, "isPlayerVIP") ) then
if getElementDimension(localPlayer) == 0 and getElementInterior(localPlayer) == 0 then
if guiGetVisible(window) then
guiSetVisible(window, false)
guiSetVisible(VipHats, false)
showCursor(false,false)
else
setElementData ( localPlayer, "clothesvipSkin", getElementModel ( localPlayer ), true )
triggerServerEvent ( "OnClientGetPreminumTime", localPlayer )
end
else
exports["guimessages"]:outputClient( "#00FF00=(VIP-System)=#CC0000 : Sorry: You Cant use VIP panel here", 255, 0, 0)
end
end
end
addCommandHandler ( "vip", ShowPremiumPanel )
bindKey ( "F10", "down", ShowPremiumPanel )
addEvent( "OpenVIPanel", true )
addEventHandler( "OpenVIPanel", root,
function ( getTime )
guiSetVisible(window,true)
showCursor(true,true)
guiSetText( LabelAccountName, "account name : "..getElementData(localPlayer,"Account").."" )
guiSetText( LabelPlayerName, "player name : "..getPlayerName( localPlayer ).."" )
guiSetText( LabelIsAccountPremium, "Vip : YES" )
guiSetText( LabelTimeRemainig, "Time for END VIP : Open" )
end)
------- Button For VIP panel
addEventHandler("onClientGUIClick", root,
function ()
if (source == vipcars) then
triggerServerEvent ( "onClientSpawnVIPvehicles", localPlayer)
elseif (source == vipjet) then
triggerServerEvent ( "onClientGivJetPackPlayer", localPlayer)
elseif (source == viphel) then
guiSetEnabled( viphel,false)
setTimer(guiSetEnabled,60000*20,1, viphel,true)
triggerServerEvent ( "onClinetGiveVIPHealth", localPlayer)
elseif (source == viparmor) then
guiSetEnabled( viparmor,false)
setTimer(guiSetEnabled,60000*20,1, viparmor,true)
triggerServerEvent ( "onClinetGiveVIPArmor", localPlayer)
elseif (source == vipdskin) then
triggerServerEvent ( "onClinetTakeVIPSkin", localPlayer)
elseif (source == vipcbody) then
triggerServerEvent ( "onClinetSpawnMonture", localPlayer)
elseif (source == vipdbody) then
triggerServerEvent ( "onClinetHideLion", localPlayer)
elseif (source == vipfv) then
triggerServerEvent ( "VIPFixVehicle", localPlayer)
elseif (source == viplr) then
guiSetEnabled( viplr,false)
setTimer(guiSetEnabled,60000*20,1, viplr,true)
triggerServerEvent ( "LauncherVIP", localPlayer)
end
end)
--[[setTimer (
function ()
if ( getElementData(localPlayer, "isPlayerVIP") ) then
triggerServerEvent ( "onClientCheckZone", localPlayer)
end
end, 10000, 0 )]]
addEvent("CloseVIPanel", true)
addEventHandler("CloseVIPanel",getRootElement(),
function ()
guiSetVisible(window, false)
guiSetInputEnabled(false)
showCursor(false)
end)
addEvent("CloseVIPanel2", true)
addEventHandler("CloseVIPanel2",getRootElement(),
function ()
setElementModel ( localPlayer, tonumber( getElementData( localPlayer, "clothesvipSkin" )))
guiSetVisible(window, false)
guiSetInputEnabled(false)
showCursor(false)
end)
txd = engineLoadTXD ( "Mods/wmybar.txd" )
engineImportTXD ( txd, 9 )
dff = engineLoadDFF ( "Mods/wmybar.dff", 9 )
engineReplaceModel ( dff, 9 )
txd1 = engineLoadTXD ( "Mods/rabbit.txd" )
engineImportTXD ( txd1, 10 )
dff1 = engineLoadDFF ( "Mods/rabbit.dff", 10 )
engineReplaceModel ( dff1, 10 )
txd2 = engineLoadTXD ( "Mods/premiumSkin1.txd" )
engineImportTXD ( txd2, 11 )
dff2 = engineLoadDFF ( "Mods/premiumSkin1.dff", 11 )
engineReplaceModel ( dff2, 11 )
txd3 = engineLoadTXD ( "Mods/premiumSkin2.txd" )
engineImportTXD ( txd3, 12 )
dff3 = engineLoadDFF ( "Mods/premiumSkin2.dff", 12 )
engineReplaceModel ( dff3, 12 )
txd4 = engineLoadTXD ( "Mods/premiumSkin3.txd" )
engineImportTXD ( txd4, 13 )
dff4 = engineLoadDFF ( "Mods/premiumSkin3.dff", 13 )
engineReplaceModel ( dff4, 13 )
addEventHandler( "onClientResourceStart", resourceRoot,
function ()
--fileDelete("VIP_Client.lua")
engineImportTXD( engineLoadTXD( "Mods/car.txd" ), getVehicleModelFromName ( "Majestic" ) )
engineReplaceModel ( engineLoadDFF( "Mods/car.dff", 0 ) , getVehicleModelFromName ( "Majestic" ) )
end
)
-------------------------------------------
local pedTarget = {}
local pedTimer = {}
local pedShooting = {}
local AnimalFollowing = {}
addEvent( "onSyncPlayerAnimals", true )
addEventHandler( "onSyncPlayerAnimals", root,
function ( theTable )
animalTable = theTable
--addEventHandler( "onClientPreRender", root, setAnimalFollowing)
AnimalFollowing[localPlayer] = true
end
)
local function doPedAttackOtherPlayer(ped)
if(isTimer(pedTimer[ped])) or (isPedInVehicle(ped)) then
killTimer(pedTimer[ped])
end
if(isElement(ped)) then
pedTimer[ped] = setTimer(function()
if(isElement(ped)) then
local target = pedTarget[ped]
if (target) then
local x, y, z = getElementPosition(ped)
local x2, y2, z2 = getElementPosition(target)
if(isLineOfSightClear(x, y, z, x2, y2, z2, true, false, false, false, false, false)) then
if (getElementType(target) == "player") and getElementData(target, "Stats") >= 2 then
local theOwner = getElementData( ped, "animalOwner" )
killTimer(pedTimer[ped])
pedShooting[ped] = false
setPedControlState(ped, "fire", false)
if (isEventHandel == false) then
--addEventHandler( "onClientPreRender", root, setAnimalFollowing)
AnimalFollowing[localPlayer] = true
end
end
if(getElementHealth(target) >= 1) and target ~= getElementData( ped, "animalOwner" ) then
AnimalFollowing[localPlayer] = false
--removeEventHandler( "onClientPreRender", root, setAnimalFollowing)
isEventHandel = false
if(pedShooting[ped] ~= true) then
setPedAimTarget(ped, x2, y2, z2+0.3)
setPedControlState(ped, "fire", true)
setPedControlState ( ped, "jump", false )
setPedControlState ( ped, "sprint", false )
setPedControlState ( ped, "walk", false )
setPedControlState ( ped, "forwards", false )
pedShooting[ped] = true
else
local x1, y1, z1 = getElementPosition(ped)
local x2, y2, z2 = getElementPosition(target)
local rot = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi
rot = rot-90
setPedRotation(ped, rot)
setPedAimTarget(ped, x2, y2, z2+0.3)
setPedControlState(ped, "fire", true)
end
else
local theOwner = getElementData( ped, "animalOwner" )
killTimer(pedTimer[ped])
pedShooting[ped] = false
setPedControlState(ped, "fire", false)
if (isEventHandel == false) then
AnimalFollowing[localPlayer] = true
--addEventHandler( "onClientPreRender", root, setAnimalFollowing)
end
end
else
local theOwner = getElementData( ped, "animalOwner" )
killTimer(pedTimer[ped])
pedShooting[ped] = false
setPedControlState(ped, "fire", false)
if (isEventHandel == false) then
--addEventHandler( "onClientPreRender", root, setAnimalFollowing)
AnimalFollowing[localPlayer] = true
end
end
end
else
killTimer(pedTimer[ped])
end
end, 100, -1)
else
killTimer(pedTimer[ped])
end
end
function setAnimalFollowing()
if AnimalFollowing[localPlayer] then
if (isEventHandel == false) then
isEventHandel = true
end
if ( animalTable ) then
for theOwner, k in pairs ( animalTable ) do
local theAnimal = animalTable[theOwner][1]
local thePlayer = animalTable[theOwner][3]
if ( isElement( thePlayer ) ) and ( isElement( theAnimal ) ) and ( getElementHealth( theAnimal ) > 0 ) then
local playerX, playerY, playerZ = getElementPosition ( thePlayer )
local playerInt, playerDim = getElementInterior( thePlayer ), getElementDimension( thePlayer )
local dogX, dogY, dogZ = getElementPosition ( theAnimal )
local distance = getDistanceBetweenPoints2D ( playerX, playerY, dogX, dogY )
setElementInterior( theAnimal, playerInt )
setElementDimension( theAnimal, playerDim )
local x1, y1, z1 = getElementPosition(theAnimal)
local x2, y2, z2 = getElementPosition(thePlayer)
local playerRotation = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi
playerRotation = playerRotation-90
setPedRotation(theAnimal, playerRotation)
setPedAimTarget(theAnimal, x2, y2, z2)
if ( isElementInWater ( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end
if ( isPedInVehicle( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end
if ( playerZ > dogZ + 0.5 ) and not getPedControlState (theAnimal, "fire") then
setPedControlState ( theAnimal, "jump", true )
setTimer(function()
if isElement(theAnimal) then
setPedControlState ( theAnimal, "jump", false )
end
end ,500,1)
end
if ( playerZ < dogZ - 0.5 ) and not getPedControlState (theAnimal, "fire") then
setPedControlState ( theAnimal, "jump", true )
setTimer(function()
if isElement(theAnimal) then
setPedControlState ( theAnimal, "jump", false )
end
end ,500,1)
end
if ( distance >= 25 ) and not getPedControlState (theAnimal, "fire") then
setPedWeaponSlot(theAnimal, 5)
setElementPosition ( theAnimal, playerX + 0.5, playerY , playerZ )
setElementDimension( theAnimal, playerDim )
setElementInterior ( theAnimal, playerInt )
end
if ( distance >= 6 ) and ( distance < 25 ) and not getPedControlState (theAnimal, "fire") then
setPedWeaponSlot(theAnimal, 0)
setPedControlState ( theAnimal, "sprint", true )
setPedControlState ( theAnimal, "walk", false )
setPedControlState ( theAnimal, "forwards", true )
end
if ( distance >= 4 ) and ( distance < 6 ) and not getPedControlState (theAnimal, "fire") then
setPedWeaponSlot(theAnimal, 5)
setPedControlState ( theAnimal, "sprint", false )
setPedControlState ( theAnimal, "walk", false )
setPedControlState ( theAnimal, "forwards", true )
end
if ( distance >= 2 ) and ( distance < 4 ) and not getPedControlState (theAnimal, "fire") then
setPedWeaponSlot(theAnimal, 5)
setPedControlState ( theAnimal, "sprint", false )
setPedControlState ( theAnimal, "walk", true )
setPedControlState ( theAnimal, "forwards", true )
end
if ( distance < 2 ) and not getPedControlState (theAnimal, "fire") then
setPedWeaponSlot(theAnimal, 5)
setPedControlState ( theAnimal, "sprint", false )
setPedControlState ( theAnimal, "walk", false )
setPedControlState ( theAnimal, "forwards", false )
end
if ( isPedInVehicle ( thePlayer ) ) then
if not ( isPedInVehicle( theAnimal ) ) then
triggerServerEvent("warpAnimalIntoVehicle", theAnimal, thePlayer)
end
end
if ( isPedInVehicle ( theAnimal ) ) and not ( isPedInVehicle( thePlayer ) ) then
triggerServerEvent("removeAnimalOutVehicle", theAnimal, thePlayer)
end
end
end
end
end
end
addEventHandler( "onClientPreRender", root, setAnimalFollowing)
addEventHandler("onClientPedDamage", getRootElement(), function(attacker)
if getElementData(source, "bodyguard") then
if(attacker) and (isElement(attacker)) then
if ( animalTable ) then
for theOwner, k in pairs ( animalTable ) do
local theAnimal = animalTable[theOwner][1]
local thePlayer = animalTable[theOwner][3]
if source == theAnimal and attacker ~= thePlayer then
if (getElementType(attacker) == "player") then
local AttackerTeam = getPlayerTeam(attacker)
local thePlayerTeam = getPlayerTeam(thePlayer)
local AttackerGroup = getElementData(attacker, "Group")
local thePlayerGroup = getElementData(thePlayer, "Group")
if getTeamName(AttackerTeam) ~= "No Team" and getTeamName(AttackerTeam) == getTeamName(thePlayerTeam) or AttackerGroup == thePlayerGroup then
cancelEvent()
else
pedTarget[source] = attacker
doPedAttackOtherPlayer(source)
end
end
end
if (getElementType(attacker) == "vehicle") or (getElementType(attacker) == "ped") then
pedTarget[source] = attacker
doPedAttackOtherPlayer(source)
end
end
end
end
end
end)
addEventHandler("onClientPlayerDamage", getRootElement(), function(attacker)
if(attacker) and (isElement(attacker)) then
if (getElementType(attacker) == "ped") and getElementData( attacker, "bodyguard" ) and getElementData( attacker, "animalOwner" ) == source then
cancelEvent()
end
if ( animalTable ) then
for theOwner, k in pairs ( animalTable ) do
local theAnimal = animalTable[theOwner][1]
local thePlayer = animalTable[theOwner][3]
if (getElementType(attacker) == "player") then
if theAnimal and getElementData( theAnimal, "animalOwner" ) == thePlayer and thePlayer == source then
local AttackerTeam = getPlayerTeam(attacker)
local sourceTeam = getPlayerTeam(source)
local thePlayerTeam = getPlayerTeam(thePlayer)
local AttackerGroup = getElementData(attacker, "Group")
local sourceGroup = getElementData(source, "Group")
local thePlayerGroup = getElementData(thePlayer, "Group")
if getTeamName(AttackerTeam) ~= "No Team" and getTeamName(AttackerTeam) ~= getTeamName(thePlayerTeam) or AttackerGroup ~= thePlayerGroup then
if theAnimal and attacker then
pedTarget[theAnimal] = attacker
doPedAttackOtherPlayer(theAnimal)
end
end
end
if (getElementType(attacker) == "vehicle") or (getElementType(attacker) == "ped") and attacker ~= theAnimal then
if theAnimal and attacker then
pedTarget[theAnimal] = attacker
doPedAttackOtherPlayer(theAnimal)
end
end
end
if (attacker) == thePlayer and source ~= theAnimal and getElementData( theAnimal, "animalOwner" ) == attacker then
if (getElementType(source) == "player") then
local AttackerTeam = getPlayerTeam(attacker)
local sourceTeam = getPlayerTeam(source)
local thePlayerTeam = getPlayerTeam(thePlayer)
local AttackerGroup = getElementData(attacker, "Group")
local sourceGroup = getElementData(source, "Group")
local thePlayerGroup = getElementData(thePlayer, "Group")
if getTeamName(sourceTeam) ~= "No Team" and getTeamName(sourceTeam) ~= getTeamName(thePlayerTeam) or sourceGroup ~= thePlayerGroup then
local AttackerStars = getElementData(attacker, "WantLvl")
local sourceStars = getElementData(source, "WantLvl")
local thePlayerStars = getElementData(thePlayer, "WantLvl")
if getTeamName(AttackerTeam) == "Police" and sourceStars < 3 then
cancelEvent()
else
if theAnimal and source then
pedTarget[theAnimal] = source
doPedAttackOtherPlayer(theAnimal)
end
end
end
end
end
end
end
end
end)
سيرفر
local theVehicle = {}
local latestSpawn = {}
local latestGetArmor = {}
local latestGetSkin = {}
local latestGetMonture = {}
local latestHideAnimal = {}
local latestHideVehilces = {}
local latestUseHats = {}
local theTimer = {}
local hatObjects = {}
local timers = {}
-----------------
function outButDxChat (Text,player,r,p,g)
exports["guimessages"]:outputServer(player,Text,r,p,g)
end
--------------------
local Serials = {
--Consoles
["1514639F9F1D2DFDDE9659DF6FD4BB12"] = true, --
--VIP
["1514639F9F1D2DFDDE9659DF6FD4BB12"] = true,
}
addEventHandler ( "onResourceStart", resourceRoot, function ( )
for _,players in ipairs ( getElementsByType ( "player" ) ) do
if ( getPlayerAccount( players ) and not isGuestAccount( getPlayerAccount( players ) ) ) then
--if ( isObjectInACLGroup ( "user."..getAccountName ( getPlayerAccount ( players ) ), aclGetGroup ( "VIP" ) ) ) then
if ( Serials[getPlayerSerial(players)] ) then
if aclGetGroup("VIP") then
if not ( isObjectInACLGroup ( "user."..getAccountName ( getPlayerAccount ( players )), aclGetGroup ( "VIP" ) ) ) then
aclGroupAddObject(aclGetGroup("VIP"), "user."..getAccountName ( getPlayerAccount ( players ) ))
outButDxChat("#00FF00=(VIP-System)=#CC0000 : successfully added to VIP Group.",players,255,255,0,false)
end
end
setElementData(players, "isPlayerVIP", true)
end
end
end
end )
addEventHandler ( "onPlayerLogin", root, function ( _,acc )
if ( Serials[getPlayerSerial(source)] ) then
if aclGetGroup("VIP") then
if not ( isObjectInACLGroup ( "user."..getAccountName( acc ), aclGetGroup ( "VIP" ) ) ) then
aclGroupAddObject(aclGetGroup("VIP"), "user."..getAccountName ( getPlayerAccount ( source ) ))
outButDxChat("#00FF00=(VIP-System)=#CC0000 : successfully added to VIP Group.",source,255,255,0,false)
end
end
setElementData(source, "isPlayerVIP", true)
end
end)
------------------
function getPremiumHoursToString ( thePlayer )
if ( isElement( thePlayer ) ) then
local userID = getElementData( thePlayer, "accountUserID" )
if getElementData(thePlayer, "isPlayerVIP" ) then
local premiumData = "N/A"
if ( premiumData ) and ( premiumData.premium ) then
if ( premiumData.premium < 60 ) then
return ""..premiumData.premium.." minutes"
else
local premiumtime = math.floor(premiumData.premium/60)
if( premiumtime == 1 ) then
return ""..premiumtime.." hour"
else
return ""..premiumtime.." hours"
end
end
else
return false
end
else
return false
end
else
return false
end
end
addEvent( "OnClientGetPreminumTime", true )
addEventHandler( "OnClientGetPreminumTime", root,
function ()
local GetTime = getPremiumHoursToString ( source ) or "N/A"
triggerClientEvent( source, "OpenVIPanel", source, GetTime )
end
)
--[[function updatetheVipTimeForAllPlayers ()
for index , player in ipairs ( getElementsByType ( "player" ) ) do
if not isGuestAccount ( getPlayerAccount ( player ) ) then
if getElementData(player, "isPlayerVIP") then
if (getPlayerIdleTime( player ) < 600000) then
local playerID = exports.TNS:playerID( player )
local premiumData = exports.TNSmysql:querySingle( "SELECT * FROM premium WHERE id = ?",playerID )
if premiumData.premium > 4 then
convertedTime = premiumData.premium - 5
elseif premiumData.premium == 4 then
convertedTime = premiumData.premium - 4
elseif premiumData.premium == 3 then
convertedTime = premiumData.premium - 3
elseif premiumData.premium == 2 then
convertedTime = premiumData.premium - 2
elseif premiumData.premium == 1 then
convertedTime = premiumData.premium - 1
end
if convertedTime == 0 then
setElementData(player, "isPlayerVIP", false)
setElementData(player, "vip", "No")
end
local updateViptime = exports.TNSmysql:exec("UPDATE premium SET premium=? WHERE id = '" .. playerID .. "'"
,tonumber(convertedTime)
)
end
end
end
end
end
setTimer ( updatetheVipTimeForAllPlayers , 600000, 0 )]]
local vehs = {}
addEvent("onClientSpawnVIPvehicles", true)
addEventHandler("onClientSpawnVIPvehicles", root,
function()
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
if (isElement(vehs[source])) then
destroyElement(vehs[source])
vehs[source] = nil
end
local x, y, z = getElementPosition(source)
vehs[source] = createVehicle(411, x+3, y, z+1)
addVehicleUpgrade ( vehs[source], 1010 )
outButDxChat("#00FF00=(VIP-System)=#CC0000 : Vehicle Created Successfully .",source,255,255,0,false)
end
end)
addEventHandler ( "onPlayerQuit", root,
function()
if ( isElement( theVehicle[source] ) ) then
destroyElement( theVehicle[source] )
theVehicle[source] = nil
end
end
)
addEventHandler("onVehicleExplode", root,
function ()
if ( getElementData(source, "vehicleType") == "vipCar" ) then
local theOwner = getElementData(source, "vehicleOwner")
theTimer[theOwner] = setTimer(destroyVehicle, 2000, 1, source, theOwner)
end
end
)
addEventHandler("onVehicleStartEnter", root,
function ( player, seat, jacked )
if ( getElementData(source, "vehicleType") == "vipCar" ) and ( seat == 0 ) then
local wanted = getElementData(player,"WantLvl")
if ( wanted < 3 ) then
if source and getElementType(source) == "player" then
local Team = getPlayerTeam(source)
if Team then
if ( player ~= getElementData(source, "vehicleOwner") ) and not getTeamFromName(Team) == "Police" then
cancelEvent()
end
end
end
end
end
end
)
function currentZone(player)
local x, y, z = getElementPosition(player)
if x < -920 then
return "SF"
elseif y < 420 then
return "LS"
else
return "LV"
end
end
function HealthVIP ( )
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
setPedStat(source, 24, 900)
setElementHealth ( source, 160 )
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You take health successfully . Wait 5 minutes to again.",source,255,255,0,false)
end
end
addEvent( "onClinetGiveVIPHealth", true )
addEventHandler( "onClinetGiveVIPHealth", getRootElement(),HealthVIP )
function LauncherVIP ()
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
setElementData(source,"GLA",(getElementData(source,"GLA")or 0)+7)
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You take launcher successfully . Wait 20 minutes to again.",source,255,255,0,false)
end
end
addEvent( "LauncherVIP", true )
addEventHandler( "LauncherVIP", getRootElement(),LauncherVIP )
function JetpackGive ( )
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
local hasJetPack = doesPedHaveJetPack ( source )
if ( hasJetPack ) then
removePedJetPack ( source )
outButDxChat ("#00FF00=(VIP-System)=#CC0000 : You have delete jetpack",source,255,255,0,false)
else
givePedJetPack ( source )
outButDxChat ("#00FF00=(VIP-System)=#CC0000 : You have get jetpack",source,255,255,0,false)
end
end
end
addEvent( "onClientGivJetPackPlayer", true )
addEventHandler( "onClientGivJetPackPlayer", getRootElement(), JetpackGive )
function ArmourVIP ( )
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
setPedArmor (source,100)
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You take armour successfully . Wait 5 minutes to again.",source,255,255,0,false)
end
end
addEvent( "onClinetGiveVIPArmor", true )
addEventHandler( "onClinetGiveVIPArmor", getRootElement(),ArmourVIP )
addEvent('onClinetHideLion', true)
addEventHandler('onClinetHideLion', root,
function ()
if getElementData(source,"Stats") > 2 then
if getElementData(source, "isPlayerVIP") then
if ( latestHideAnimal[getPlayerSerial(source)] ) and ( getTickCount()-latestHideAnimal[getPlayerSerial(source)] < 10000 ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You can use this button only every 10 Seconds.",source,255,255,0,false)
else
onHideAnimalForVips( source )
triggerClientEvent ( source, "CloseVIPanel", getRootElement())
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You have successfully hide your Bodyguard.",source,255,255,0,false)
latestHideAnimal[getPlayerSerial(source)] = getTickCount()
end
end
end
end)
function SetSkinSERVER ( )
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
setPedSkin (source,83)
outButDxChat("#00FF00=(VIP-System)=#CC0000 : Select Skin first .",source,255,255,0,false)
end
end
addEvent( "onClinetTakeVIPSkin", true )
addEventHandler( "onClinetTakeVIPSkin", getRootElement(),SetSkinSERVER )
addEvent("VIPFixVehicle", true)
addEventHandler("VIPFixVehicle", root,
function()
local accName = getAccountName ( getPlayerAccount ( source ) )
if isObjectInACLGroup ("user."..accName, aclGetGroup ( "VIP" ) ) then
if isPedInVehicle ( source ) then
local theVehicle = getPedOccupiedVehicle ( source )
fixVehicle ( theVehicle )
outButDxChat("#00FF00=(VIP-System)=#CC0000 : Vehicle fixed Successfully .",source,255,255,0,false)
end
end
end)
addEvent('onClinetSpawnMonture', true)
addEventHandler('onClinetSpawnMonture', root,
function ()
if getElementData(source,"Stats") < 0 then
if getElementData(source, "isPlayerVIP") then
if ( latestGetMonture[getPlayerSerial(source)] ) and ( getTickCount()-latestGetMonture[getPlayerSerial(source)] < 300000 ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You can take Bodyguard, only every 5 minutes.",source,255,255,0,false)
triggerClientEvent ( source, "CloseVIPanel2", getRootElement())
elseif ( getElementInterior(source) ~= 0 ) or ( getElementDimension(source) ~= 0 ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You can't spawn a Bodyguard in interiors.",source,255,255,0,false)
elseif ( getPlayerAnimal ( source ) ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You already spawned a Bodyguard.",source,255,255,0,false)
elseif ( doesPedHaveJetPack ( source ) ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : Remove the jetpack to spawn a Bodyguard.",source,255,255,0,false)
elseif ( getPedOccupiedVehicle ( source ) ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You are in a vehicle, you can't spawn a Bodyguard.",source,255,255,0,false)
else
setPlayerAnimal ( source, "Lion", 164 )
triggerClientEvent ( source, "CloseVIPanel2", getRootElement())
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You have successfully spawned a Bodyguard.",source,255,255,0,false)
latestGetMonture[getPlayerSerial(source)] = getTickCount()
end
end
end
end
)
function warpAnimalIntoVehicle (theAnimal)
if theAnimal then
local Animal = getPedOccupiedVehicle ( theAnimal )
if Animal then
local AnimalsVehicleSeats = getVehicleMaxPassengers( Animal )
local PlayerVehicleOccupants = getVehicleOccupants( Animal )
for seat = 0, AnimalsVehicleSeats do
local occupant = PlayerVehicleOccupants[seat]
if Animal and not occupant then
warpPedIntoVehicle( source, Animal, seat)
end
end
end
end
end
addEvent("warpAnimalIntoVehicle", true)
addEventHandler("warpAnimalIntoVehicle", root, warpAnimalIntoVehicle)
function removeAnimalOutVehicle (theAnimal)
removePedFromVehicle ( source )
local x, y, z = getElementPosition ( theAnimal )
setElementPosition ( source, x + 1.5, y + 1.5, z )
end
addEvent("removeAnimalOutVehicle", true)
addEventHandler("removeAnimalOutVehicle", root, removeAnimalOutVehicle)
function changeHats(model,scale)
if model then
if ( latestUseHats[getPlayerSerial(source)] ) and ( getTickCount()-latestUseHats[getPlayerSerial(source)] < 10000 ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You can take a hat, only every 10 seconds.",source,255,255,0,false)
elseif ( getPedOccupiedVehicle ( source ) ) then
outButDxChat("#00FF00=(VIP-System)=#CC0000 : You can't take a hat in vehilce.",source,255,255,0,false)
else
if isElement(hatObjects[source]) then
destroyElement(hatObjects[source])
hatObjects[source] = nil
if isTimer(timers) then killTimer(timers[source]) end
end
hatObjects[source] = createObject(model, 0,0,-10 )
setObjectScale(hatObjects[source],scale)
exports.bone_attach:attachElementToBone(hatObjects[source],source,1,-0.0050,0.025,0.125,0,4,180)
latestUseHats[getPlayerSerial(source)] = getTickCount()
local p = source
timers[p] = setTimer(function()
local int,dim=getElementInterior(p),getElementDimension(p)
-- setElementInterior(hatObjects[p],int)
-- setElementDimension(hatObjects[p],dim)
end,5000,1)
end
else
if isElement(hatObjects[source]) then destroyElement(hatObjects[source]) end
if isTimer(timers) then killTimer(timers[source]) end
hatObjects[source] = nil
outButDxChat("#00FF00=(VIP-System)=#CC0000 : No longer wearing any hat.",source,255,255,0,false)
end
end
addEvent("vipHats_changeHat",true)
addEventHandler("vipHats_changeHat",root,changeHats)
addEventHandler("onPlayerQuit",root,function()
if isElement(hatObjects[source]) then
if isTimer(timers[source]) then
killTimer(timers[source])
end
destroyElement(hatObjects[source])
hatObjects[source] = nil
end
end)
function destroyVehicle ( vehicle, thePlayer )
theVehicle[thePlayer] = nil
theTimer[thePlayer] = nil
if isElement(vehicle) then
destroyElement(vehicle)
end
end
------------------------------------------------
addEventHandler("onPlayerLogin", root,
function()
if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(source)),aclGetGroup("VIP")) then
setElementData(source, "isPlayerVIP", true)
outButDxChat("#00FF00=(VIP-System)=#CC0000 : Welcome to open your vip press 'F10' or type '/vip'.",source,255,255,0,false)
else
setElementData(source, "isPlayerVIP", false)
end
end
)
addEventHandler("onResourceStart", getResourceRootElement( getThisResource( ) ),
function()
for i , v in ipairs ( getElementsByType ( "player" ) ) do
if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(v)),aclGetGroup("VIP")) then
setElementData(v, "isPlayerVIP", true)
outButDxChat("#00FF00=(VIP-System)=#CC0000 : Welcome to open your vip press 'F10' or type '/vip'.",v,255,255,0,false)
else
setElementData(v, "isPlayerVIP", false)
end
end
end
)
-----------------------------------------------------
الخطأ بالدي بق
مشكورين مقدمآآ
