Jump to content

HELP Button Problem


stevensalvaro

Recommended Posts

Hello,

I just make status info for player , and it's using button on the top right of screen ,

1x click status info show up , but if i click again before close this status info , why it's open another status info , so i got twice... ? How to make the status info can't opened again if another status info is open ?

Thanks before ..

Link to comment

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 
  
  
  

Link to comment
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 
  
  
  

Use this:

guiGetVisible 
guiSetVisible 

Link to comment
  • 2 weeks later...

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
  • Recently Browsing   0 members

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