Here we go
local localPlayer = getLocalPlayer()
local x, y = guiGetScreenSize()
local texter = guiCreateFont ( ":hud/cartwheel.otf" , 15 )
local texteras = guiCreateFont ( ":hud/cartwheel.otf" , 10 )
local show = false
local job = getElementData(localPlayer, "job") or "Pengangguran"
local bankmoney = getElementData(localPlayer, "bankmoney") or 0
local money = getPlayerMoney(localPlayer)
local carlicense = getElementData(localPlayer, "license.car")
local bikelicense = getElementData(localPlayer, "license.bike")
local boatlicense = getElementData(localPlayer, "license.boat")
local fishlicense = getElementData(localPlayer, "license.fish")
if job== 0 then
job = "Pengangguran"
elseif job == 1 then
job = "Supir Truck"
elseif job == 2 then
job = "Supir Taxi"
elseif job == 3 then
job = "Supir Bus"
elseif job == 4 then
job = "Pembersih Grafiti"
elseif job == 5 then
job = "Mekanik"
elseif job == 6 then
job = "Tukang Kunci"
end
if (boatlicense==1) then
boatlicense = "Terdaftar"
else
boatlicense = "Tidak Terdaftar"
end
if (fishlicense==1) then
fishlicense = "Terdaftar"
else
fishlicense = "Tidak Terdaftar"
end
if (carlicense==1) then
carlicense = "Terdaftar"
elseif (carlicense==3) then
carlicense = "Ujian Terori Selesai"
else
carlicense = "Tidak Terdaftar"
end
local languages = {}
for i = 1, 3 do
local lang = getElementData(localPlayer, "languages.lang" .. i)
if lang and lang ~= 0 then
local skill = getElementData(localPlayer, "languages.lang" .. i .. "skill")
local langname = exports['language-system']:getLanguageName( lang )
if langname then
languages[i] = langname .. " (" .. skill .. "%)"
else
languages[i] = ""
end
else
languages[i] = ""
end
end
--Kendaraan
local dbid = tonumber(getElementData(localPlayer, "dbid"))
local carids = ""
local numcars = 0
local printCar = ""
for key, value in ipairs(exports.pool:getPoolElementsByType("vehicle")) do
local owner = tonumber(getElementData(value, "owner"))
if (owner) and (owner==dbid) then
local id = getElementData(value, "dbid")
carids = carids .. id .. ", "
numcars = numcars + 1
end
end
printCar = numcars .. "/" .. getElementData(localPlayer, "maxvehicles")
--Properti
local properties = ""
local numproperties = 0
for key, value in ipairs(getElementsByType("interior")) do
local interiorStatus = getElementData(value, "status")
if interiorStatus[4] and interiorStatus[4] == dbid and getElementData(value, "name") then
local id = getElementData(value, "dbid")
properties = properties .. id .. ", "
numproperties = numproperties + 1
end
end
if (properties=="") then properties = "Tidak Punya. " end
if (carids=="") then carids = "Tidak Punya. " end
function OpenStats()
bstats = guiCreateStaticImage( x/2 -380,y/2 - 250,750,500 ,"images/bstatus.png" , false)
lTitle = guiCreateLabel(0.37,0.005,0.95,0.0887,"Informasi Karakter",true,bstats)
lChar = guiCreateLabel(0.18,0.1,0.95,0.0887,"Karakter",true,bstats)
lAsset = guiCreateLabel(0.7,0.1,0.95,0.0887,"Kepemilikan",true,bstats)
--Kiri
lNama = guiCreateLabel(0.01,0.2,0.95,0.0887,"Nama : "..getPlayerName(localPlayer),true,bstats)
lDarah = guiCreateLabel(0.01,0.25,0.95,0.0887,"Darah : "..math.floor(getElementHealth( localPlayer )) .." %",true,bstats)
lArmor = guiCreateLabel(0.01,0.3,0.95,0.0887,"Armor : "..getPedArmor(getLocalPlayer()) .." %",true,bstats)
lSkin = guiCreateLabel(0.01,0.35,0.95,0.0887,"ID Skin : "..getPedSkin(getLocalPlayer()),true,bstats)
lBahasa = guiCreateLabel(0.01,0.4,0.95,0.0887,"Bahasa : "..table.concat(languages),true,bstats)
lJob = guiCreateLabel(0.01,0.45,0.95,0.0887,"Pekerjaan : "..job,true,bstats)
lJam = guiCreateLabel(0.01,0.5,0.95,0.0887,"Jam Bermain : "..getElementData(localPlayer, "hoursplayed") .." jam",true,bstats)
--Kanan
lUang = guiCreateLabel(0.5,0.2,0.95,0.0887,"Uang di Saku : Rp. "..money.. " ,00",true,bstats)
lBank = guiCreateLabel(0.5,0.25,0.95,0.0887,"Uang di Bank : Rp. "..bankmoney.. " ,00",true,bstats)
lSim = guiCreateLabel(0.5,0.3,0.95,0.0887,"Surat Izin Mengemudi : "..carlicense,true,bstats)
lBoat = guiCreateLabel(0.5,0.35,0.95,0.0887,"Sertifikat Pelayaran : "..boatlicense,true,bstats)
lFish = guiCreateLabel(0.5,0.4,0.95,0.0887,"Sertifikat Pelayaran : "..fishlicense,true,bstats)
lKendaraan = guiCreateLabel(0.5,0.45,0.95,0.0887,"Kendaraan : (" .. printCar .. "): " .. string.sub(carids, 1, string.len(carids)-2),true,bstats)
lRumah = guiCreateLabel(0.5,0.5,0.95,0.0887,"Properti : (" .. numproperties .. "/"..(getElementData(localPlayer, "maxinteriors") or 10).."): " .. string.sub(properties, 1, string.len(properties)-2),true,bstats)
guiSetFont (lTitle , texter)
guiSetFont (lChar , texter)
guiSetFont (lAsset , texter)
guiSetFont (lNama , texteras)
guiSetFont (lDarah , texteras)
guiSetFont (lArmor , texteras)
guiSetFont (lSkin , texteras)
guiSetFont (lBahasa , texteras)
guiSetFont (lJob , texteras)
guiSetFont (lJam , texteras)
guiSetFont (lUang , texteras)
guiSetFont (lBank , texteras)
guiSetFont (lSim , texteras)
guiSetFont (lBoat , texteras)
guiSetFont (lFish , texteras)
guiSetFont (lKendaraan , texteras)
guiSetFont (lRumah , texteras)
cButton = guiCreateStaticImage(0.424,0.9,0.12,0.055,"images/tutup.png",true,bstats)
addEventHandler("onClientMouseEnter",cButton, Tutup , false)
addEventHandler("onClientMouseLeave",cButton, Ori , false)
addEventHandler("onClientGUIClick", cButton, tutupStats , false)
end
function tutupStats( )
destroyElement(bstats)
end
function Tutup()
guiStaticImageLoadImage(cButton, "images/tutup1.png" )
end
function Stats()
guiStaticImageLoadImage(stats, "images/stats.png" )
end
function Ori()
guiStaticImageLoadImage(cButton, "images/tutup.png" )
end
function Ori1()
guiStaticImageLoadImage(stats, "images/stats1.png" )
end
local health = math.floor(getElementHealth( localPlayer ))
if (health <= 100) then
stats = guiCreateStaticImage(x/2 + 400, y/2 - 382, 60 ,25 ,"images/stats1.png", false , nil)
addEventHandler("onClientMouseEnter",stats, Stats , false)
addEventHandler("onClientMouseLeave",stats, Ori1 , false)
addEventHandler("onClientGUIClick", stats, OpenStats , false)
end
