-----------------
-----Ön Ayar-----
-----------------
Komut = "vip"
Vip_Arac = 411
Vip_Karakter = 39
----------------------
-----Fonksiyonlar-----
----------------------
function PanelAc(source, commandName)
local accName = getAccountName(getPlayerAccount(source))
if isObjectInACLGroup ("user."..accName, aclGetGroup("Vip")) then
triggerClientEvent(source, "PanelAcma", source)
else
outputChatBox("Bu komutu kullanmak için Vip Üye olmalısınız.", source, 0, 150, 255, true)
end
end
addCommandHandler( Komut, PanelAc)

addEvent ("SilahKullan", true)
addEventHandler ("SilahKullan", getRootElement(), 
function(id)
giveWeapon(source, tonumber(id),99999)
outputChatBox("Silah alındı. [İD:"..id.."]", source, 0, 200, 255, true)
end)

function dokunulmazlik ( source )
if ( isPedInVehicle ( source ) ) then
if ( isVehicleDamageProof ( getPedOccupiedVehicle ( source ) )  == false )    then
setVehicleDamageProof ( getPedOccupiedVehicle ( source ), true )
outputChatBox("Dokunulmazlık Modu açıldı.", source, 0, 200, 255, true)
end
end
end
addEvent("dokunulmazlik", true )
addEventHandler("dokunulmazlik", resourceRoot, dokunulmazlik )

function dokunulmazlik_kapat ( source )
if ( isPedInVehicle ( source ) ) then
setVehicleDamageProof ( getPedOccupiedVehicle ( source ), false )
outputChatBox("Dokunulmazlık Modu kapandı.", source, 0, 150, 255, true)
end
end
addEvent("dokunulmazlik2", true)
addEventHandler("dokunulmazlik2", resourceRoot, dokunulmazlik_kapat )

function Beceriler_Doldur()
setPedStat(source, 22, 1000)
setPedStat(source, 23, 1000)
setPedStat(source, 24, 1000)
setPedStat(source, 25, 1000)
setPedStat(source, 69, 1000)
setPedStat(source, 70, 1000)
setPedStat(source, 71, 1000)
setPedStat(source, 72, 1000)
setPedStat(source, 73, 1000)
setPedStat(source, 74, 1000)
setPedStat(source, 75, 1000)
setPedStat(source, 76, 1000)
setPedStat(source, 77, 1000)
setPedStat(source, 78, 1000)
setPedStat(source, 79, 1000)
setPedStat(source, 80, 1000)
setPedStat(source, 81, 1000)
setPedArmor(source, 100)
setElementHealth(source, 200)
outputChatBox("Beceriler doldurulmuştur.", source, 0, 200, 255,false)
end
addEvent( "Beceriler_event", true )
addEventHandler( "Beceriler_event", getRootElement(), Beceriler_Doldur)

veh= {}
function Araba()
if veh[source] and
isElement(veh[source]) then
destroyElement(veh[source])
veh[source] = nil
end
local x,y,z = getElementPosition(source)
local zx,zy,zz = getElementRotation(source)
veh[source] = createVehicle(Vip_Arac, x, y, z, zx, zy, zz)
setVehicleColor(veh[source], 0, 200, 255)
addVehicleUpgrade(veh[source], 1010)
warpPedIntoVehicle(source, veh[source])
outputChatBox("Araba alındı.", source, 0, 200, 255, true)
end
addEvent("araba_event", true)
addEventHandler("araba_event", getRootElement(), Araba)

function AracHata(thePlayer, seat, jacked)
if getElementModel(source) == Vip_Arac then
local accName = getAccountName(getPlayerAccount(thePlayer))
if isObjectInACLGroup("user."..accName, aclGetGroup("Vip"))then
else
cancelEvent()
outputChatBox("Bu arabaya binmek için VİP Üye olmalısınız.", thePlayer, 0, 150, 255, true)
end
end
end
addEventHandler("onVehicleStartEnter", getRootElement(), AracHata)

function karakter_fonksiyon()
setPedSkin(source, Vip_Karakter)
outputChatBox("Karakter alındı.", source, 0, 200, 255, true)
end
addEvent( "karakter_event", true )
addEventHandler( "karakter_event", getRootElement(), karakter_fonksiyon )

function JetPackModu()
local JetPackVar = doesPedHaveJetPack(source)
if (JetPackVar) then  
removePedJetPack(source)
outputChatBox("JetPack bırakıldı.", source, 0, 150, 255, true)
else
givePedJetPack(source)
outputChatBox("JetPack alındı.", source, 0, 200, 255, true)
end
end
addEvent( "JetPack_event", true )
addEventHandler( "JetPack_event", getRootElement(), JetPackModu)

-----------------------------------------------------
--Script ByCash tarafından kodlanıp paylaşılmıştır.--
--wwww.MTASA-TURK.com'u ziyaret etmeyi unutmayınız.--
--------LS Gaming Freeroam /0.1 beta scripti.--------
-----------------------------------------------------
h1,h2,h3,h4,h5,h6 = "B","y","C","a","s","h"
Yapimci_ = h1..h2..h3..h4..h5..h6
------------------------
-----Panel Ortalama-----
------------------------
sC,sD = guiGetScreenSize()
C,D = 378,250
A = (sC/2) - (C/2)
B = (sD/2) - (D/2)
---------------
-----Panel-----
---------------
panel = guiCreateStaticImage(A, B, C, D, "Dosyalar/Resimler/siyah.png", false)
guiSetVisible(panel,false)

mavi_kisim = guiCreateStaticImage(0, 0, 378, 25, "Dosyalar/Resimler/altin.png", false, panel)
-------------------
-----Panel Adı-----
-------------------
panel_adi = guiCreateLabel(165, 5, 120, 25, "Vip Panel", false, mavi_kisim)
guiSetFont(panel_adi, "default-bold-small")
guiLabelSetColor(panel_adi, 255, 255, 255)
--------------------------
-----Script Yapımcısı-----
--------------------------
Yapimci = guiCreateLabel(10, 5, 120, 25, Yapimci_, false, mavi_kisim)
guiSetFont(Yapimci, "default-bold-small")
--------------------
-----Seçenekler-----
--------------------
secenekler_label = guiCreateLabel(20, 50, 178, 16, "Seçenekler", false, panel)
guiSetFont(secenekler_label, "default-bold-small")
--------------------
-----Özellikler-----
--------------------
ozellik1 = guiCreateCheckBox(20, 70, 130, 25, "Dokunulmazlık Modu", false, false, panel)
ozellik2 = guiCreateCheckBox(20, 90, 110, 25, "Uçma Modu", false, false, panel)
ozellik3 = guiCreateCheckBox(20, 110, 110, 25, "Yüzme Modu", false, false, panel)
ozellik4 = guiCreateCheckBox(20, 130, 130, 25, "JetPack Modu", false, false, panel)
---------------------------
-----Becerileri Doldur-----
---------------------------
beceriler_buton = guiCreateStaticImage(20, 160, 120, 25, "Dosyalar/Resimler/altin.png", false, panel)
beceriler_label = guiCreateLabel(17, 5, 110, 25, "Becerileri Doldur", false, beceriler_buton)
guiSetFont(beceriler_label, "default-bold-small")
guiLabelSetColor(beceriler_label, 255, 255, 255)
-------------------------
-----Karakter Kullan-----
-------------------------
karakter_buton = guiCreateStaticImage(20, 190, 120, 25, "Dosyalar/Resimler/altin.png", false, panel)
karakter_label = guiCreateLabel(18, 5, 110, 25, "Karakter Kullan", false, karakter_buton)
guiSetFont(karakter_label, "default-bold-small")
guiLabelSetColor(karakter_label, 255, 255, 255)
----------------------
-----Araba Kullan-----
----------------------
araba_buton = guiCreateStaticImage(20, 220, 120, 25, "Dosyalar/Resimler/altin.png", false, panel)
araba_label = guiCreateLabel(23.5, 5, 110, 25, "Araba Kullan", false, araba_buton)
guiSetFont(araba_label, "default-bold-small")
guiLabelSetColor(araba_label, 255, 255, 255)
---------------------------
-----Silah Listesi-----
---------------------------
silah_listesi_label = guiCreateLabel(237, 50, 178, 16, "Silah Listesi", false, panel)
guiSetFont(silah_listesi_label, "default-bold-small")
--------------------------------
-----Silah Listesi Gridlist-----
--------------------------------
gizle = guiCreateStaticImage(180, 70, 178, 145, "Dosyalar/Resimler/siyah.png", false, panel)
silah_listesi = guiCreateGridList(-5, -24.5, 230, 188, false, gizle)
guiGridListSetSortingEnabled(silah_listesi, false)

guiGridListAddColumn(silah_listesi, "Silah", 0.9)
for i = 1, 6 do
guiGridListAddRow(silah_listesi)
end
----------------------
-----Silah Kullan-----
----------------------
silah_buton = guiCreateStaticImage(180, 220, 178, 25, "Dosyalar/Resimler/altin.png", false, panel)
silah_label = guiCreateLabel(57, 5, 110, 25, "Silahı Kullan", false, silah_buton)
guiSetFont(silah_label, "default-bold-small")
guiLabelSetColor(silah_label, 255, 255, 255)
----------------------
-----Paneli Kapat-----
----------------------
kapat_label = guiCreateLabel(360, 5, 60, 24, "X", false, mavi_kisim)
guiSetFont(kapat_label, "default-bold-small")
guiLabelSetColor(kapat_label, 255, 255, 255)

function kapat()
if source == kapat_label then
guiSetVisible(panel, false)
showCursor(false)
end
end
addEventHandler("onClientGUIClick", root, kapat)
---------------------
-----Buton Alpha-----
---------------------
addEventHandler ("onClientMouseEnter", root,
function ()
if source == silah_label then
guiSetAlpha(silah_label, 0.5)
else
if source == araba_label then
guiSetAlpha(araba_label, 0.5)
else
if source == karakter_label then
guiSetAlpha(karakter_label, 0.5)
else
if source == beceriler_label then
guiSetAlpha(beceriler_label, 0.5)
else
if source == kapat_label then
guiSetAlpha(kapat_label, 0.5)
end
end
end
end
end
end)

addEventHandler ("onClientMouseLeave", root,
function ()
if source == silah_label then
guiSetAlpha(silah_label, 1)
else
if source == araba_label then
guiSetAlpha(araba_label, 1)
else
if source == karakter_label then
guiSetAlpha(karakter_label, 1)
else
if source == beceriler_label then
guiSetAlpha(beceriler_label, 1)
else
if source == kapat_label then
guiSetAlpha(kapat_label, 1)
end
end
end
end
end
end)
----------------------
-----Fonksiyonlar-----
----------------------
function D_Modu()
if isPedInVehicle(localPlayer) == false then
outputChatBox("Dokunulmazlık Modu arabada değilken kullanılamaz.", 0, 150, 255, true)
end
if isPedInVehicle(localPlayer) == true then
if guiCheckBoxGetSelected(ozellik1) == true then
triggerServerEvent("dokunulmazlik", root, localPlayer)
else
triggerServerEvent("dokunulmazlik2", root, localPlayer)
end
else
guiCheckBoxSetSelected(ozellik1, false)
end
end
addEventHandler("onClientGUIClick", ozellik1, D_Modu, false)

function UcmaModu()
if isPedInVehicle(localPlayer) == false then
outputChatBox("Uçma Modu arabada değilken kullanılamaz.", 0, 150, 255, true)
end
if isPedInVehicle(localPlayer) == true then
if guiCheckBoxGetSelected(ozellik2) == true then
setWorldSpecialPropertyEnabled("aircars", true)
outputChatBox("Uçma Modu açıldı.", 0, 200, 255, true)
else
setWorldSpecialPropertyEnabled("aircars", false)
outputChatBox("Uçma Modu kapandı.", 0, 150, 255, true)
end
else
guiCheckBoxSetSelected(ozellik2, false)
end
end
addEventHandler("onClientGUIClick", ozellik2, UcmaModu, false)

function YuzmeModu()
if isPedInVehicle(localPlayer) == false then
outputChatBox("Yüzme Modu arabada değilken kullanılamaz.", 0, 150, 255, true)
end
if isPedInVehicle(localPlayer) == true then
if guiCheckBoxGetSelected(ozellik3) == true then
setWorldSpecialPropertyEnabled("hovercars", true)
outputChatBox("Yüzme Modu açıldı.", 0, 200, 255, true)
else
setWorldSpecialPropertyEnabled("hovercars", false)
outputChatBox("Yüzme Modu kapandı.", 0, 150, 255, true)
end
else
guiCheckBoxSetSelected(ozellik3, false)
end
end
addEventHandler("onClientGUIClick", ozellik3, YuzmeModu, false)

addEventHandler("onClientGUIClick",root,function()
if source == beceriler_label then
triggerServerEvent ("Beceriler_event", localPlayer)
end
end)

function JetPackModu()
if isPedInVehicle(localPlayer) == true then
outputChatBox("JetPack Modu sivil değilken kullanılamaz.", 0, 150, 255, true)
end
if isPedInVehicle(localPlayer) == false then
if guiCheckBoxGetSelected(ozellik4) == true then
triggerServerEvent ("JetPack_event", localPlayer, true)
else
triggerServerEvent ("JetPack_event", localPlayer, false)
end
else
guiCheckBoxSetSelected(ozellik4, false)
end
end
addEventHandler("onClientGUIClick", ozellik4, JetPackModu, false)

addEventHandler("onClientGUIClick",root,function()
if source == karakter_label then
triggerServerEvent ("karakter_event", localPlayer)
end
end)

addEventHandler("onClientGUIClick",root,function()
if source == araba_label then
triggerServerEvent ("araba_event", localPlayer)
end
end)

local Silahlar = {{34,99999},{31,99999},{30,99999},{29,99999},{32,99999},{28,99999},{27,99999},{26,99999},{25,99999},{24,99999},{23,99999},{22,99999},{5,99999}}
for i,v in ipairs (Silahlar) do
local itemName = getWeaponNameFromID (v[1])
local row = guiGridListAddRow(silah_listesi)
guiGridListSetItemText(silah_listesi, row, 1, itemName, false, true)
guiGridListSetItemText(silah_listesi, row, 2, tostring(v[2]), false, true)
end

addEventHandler("onClientGUIClick",root,function()
if source == silah_label then
if (guiGridListGetSelectedItem (silah_listesi)) then
local itemName = guiGridListGetItemText (silah_listesi, guiGridListGetSelectedItem (silah_listesi), 1)
local itemID = getWeaponIDFromName (itemName)
triggerServerEvent ("SilahKullan", getLocalPlayer(), itemID, itemName)
end
end
end)

function VipPanel()
if guiGetVisible(panel) then
guiSetVisible(panel, false)
showCursor(false)
else
guiSetVisible(panel, true)
showCursor(true)
end	    
end
addEvent( "PanelAcma", true )
addEventHandler( "PanelAcma", getRootElement(), VipPanel)