help with binds in answer fields on a tablet

[YuriGGB]

code:

 

local screenW,screenH = guiGetScreenSize()

local resW, resH = 1366,768

local x, y = (screenW/resW), (screenH/resH)

 

boxcpf = guiCreateEdit(x*-138, y*386, x*1366, y*38, "", false)

guiSetVisible ( boxcpf, false )

guiSetAlpha ( boxcpf, 0.00 )

guiEditSetMaxLength(boxcpf,5)

 

textbox_rg = guiCreateEdit(x*-39, y*329, x*1366, y*27, "", false)

guiSetVisible ( textbox_rg, false )

guiSetAlpha ( textbox_rg, 0.00 )

guiEditSetMaxLength(textbox_rg,3)

textbox_art = guiCreateEdit(x*-28, y*397, x*1366, y*27, "", false)

guiSetVisible ( textbox_art, false )

guiSetAlpha ( textbox_art, 0.00 )

guiEditSetMaxLength(textbox_art,3)

textbox_tem = guiCreateEdit(x*-27, y*466, x*1366, y*27, "", false)  

guiSetVisible ( textbox_tem, false )

guiSetAlpha ( textbox_tem, 0.00 )

guiEditSetMaxLength(textbox_tem,3)

 

addEventHandler("onClientResourceStart", resourceRoot,

function ()

ListaPrisao = dxGridW:Create(x*600, y*322, x*400, y*170)

ListaPrisao:AddColumn("ARTIGO", 30)

ListaPrisao:AddColumn("DURAÇÃO", 200)

ListaPrisao:SetVisible(false)

end)

 

function Reload_Lista ()

local cliente = getPlayerFromID(guiGetText(boxcpf))

if isElement(cliente) then

local motivo1 = getElementData(cliente,"rg:fichacriminal1") or " "

local motivo2 = getElementData(cliente,"rg:fichacriminal2") or " "

local motivo3 = getElementData(cliente,"rg:fichacriminal3") or " "

local motivo4 = getElementData(cliente,"rg:fichacriminal4") or " "

local motivo5 = getElementData(cliente,"rg:fichacriminal5") or " "

local motivo6 = getElementData(cliente,"rg:fichacriminal6") or " "

local motivo7 = getElementData(cliente,"rg:fichacriminal7") or " "

 

local t1 = getElementData(cliente,"rg:tempocriminal1") or " "

local t2 = getElementData(cliente,"rg:tempocriminal2") or " "

local t3 = getElementData(cliente,"rg:tempocriminal3") or " "

local t4 = getElementData(cliente,"rg:tempocriminal4") or " "

local t5 = getElementData(cliente,"rg:tempocriminal5") or " "

local t6 = getElementData(cliente,"rg:tempocriminal6") or " "

local t7 = getElementData(cliente,"rg:tempocriminal7") or " "

ListaPrisao:Clear(true)

ListaPrisao:AddItem(1, motivo1)

ListaPrisao:AddItem(1, motivo2)

ListaPrisao:AddItem(1, motivo3)

ListaPrisao:AddItem(1, motivo4)

ListaPrisao:AddItem(1, motivo5)

ListaPrisao:AddItem(1, motivo6)

ListaPrisao:AddItem(1, motivo7)

 

ListaPrisao:AddItem(2, t1)

ListaPrisao:AddItem(2, t2)

ListaPrisao:AddItem(2, t3)

ListaPrisao:AddItem(2, t4)

ListaPrisao:AddItem(2, t5)

ListaPrisao:AddItem(2, t6)

ListaPrisao:AddItem(2, t7)

 

end

end

 

fabricarpainel = false

------------------------------------------------------------------------

------------------------------------------------------------------------

------------------------------------------------------------------------

box_name = guiCreateEdit(x*403, y*238, x*442, y*29, "", false)

guiSetVisible ( box_name, false )

guiSetAlpha ( box_name, 0.00 )

guiEditSetMaxLength(box_name,32)

box_nascimento = guiCreateEdit(x*401, y*298, x*137, y*29, "", false)

guiSetVisible ( box_nascimento, false )

guiSetAlpha ( box_nascimento, 0.00 )

guiEditSetMaxLength(box_nascimento,10)

box_cidade = guiCreateEdit(x*553, y*299, x*137, y*29, "", false)

guiSetVisible ( box_cidade, false )

guiSetAlpha ( box_cidade, 0.00 )

guiEditSetMaxLength(box_cidade,20)

box_nacionalidade = guiCreateEdit(x*704, y*298, x*137, y*29, "", false)

guiSetVisible ( box_nacionalidade, false )

guiSetAlpha ( box_nacionalidade, 0.00 )

guiEditSetMaxLength(box_nacionalidade,20)

box_genero = guiCreateEdit(x*403, y*357, x*137, y*29, "", false)

guiSetVisible ( box_genero, false )

guiSetAlpha ( box_genero, 0.00 )

guiEditSetMaxLength(box_genero,15)

box_quilos = guiCreateEdit(x*553, y*357, x*137, y*29, "", false)

guiSetVisible ( box_quilos, false )

guiSetAlpha ( box_quilos, 0.00 )

guiEditSetMaxLength(box_quilos,5)

box_altura = guiCreateEdit(x*704, y*358, x*137, y*29, "", false)

guiSetVisible ( box_altura, false )

guiSetAlpha ( box_altura, 0.00 )

guiEditSetMaxLength(box_altura,7)

 

function ConfigurarBrancos ()

    if lg_criarrg == true then

        lgedit_1 = guiGetText(box_name)

        lgedit_2 = guiGetText(box_nascimento)

        lgedit_3 = guiGetText(box_cidade)

        lgedit_4 = guiGetText(box_nacionalidade)

        lgedit_5 = guiGetText(box_genero)

        lgedit_6 = guiGetText(box_quilos)

        lgedit_7 = guiGetText(box_altura)

    end

end

setTimer ( ConfigurarBrancos, 50, 0 )

 

lgedit_1 = 0

lgedit_2 = 0

lgedit_3 = 0

lgedit_4 = 0

lgedit_5 = 0

lgedit_6 = 0

lgedit_7 = 0

 

lg_criarrg = false

 

function painelrg()

    dxDrawImage(x*393, y*162, x*564, y*388, "img/rg.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        dxDrawText(lgedit_1, x*411, y*238, x*704, y*270, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(lgedit_2, x*411, y*299, x*540, y*327, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(lgedit_3, x*561, y*299, x*690, y*327, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(lgedit_4, x*712, y*299, x*841, y*327, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(lgedit_5, x*411, y*358, x*540, y*386, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(lgedit_6, x*561, y*358, x*690, y*386, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(lgedit_7, x*712, y*358, x*841, y*386, tocolor(254, 254, 254, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

end

 

function Abrir_Fechar_Rg ()

if lg_criarrg == false then

addEventHandler ( "onClientRender", root, painelrg )

guiSetVisible ( box_name, true )

guiSetVisible ( box_nascimento, true )

guiSetVisible ( box_cidade, true )

guiSetVisible ( box_nacionalidade, true )

guiSetVisible ( box_genero, true )

guiSetVisible ( box_quilos, true )

guiSetVisible ( box_altura, true )

showCursor ( true )

lg_criarrg = true

else

removeEventHandler ( "onClientRender", root, painelrg )

guiSetVisible ( box_name, false )

guiSetVisible ( box_nascimento, false )

guiSetVisible ( box_cidade, false )

guiSetVisible ( box_nacionalidade, false )

guiSetVisible ( box_genero, false )

guiSetVisible ( box_quilos, false )

guiSetVisible ( box_altura, false )

showCursor ( false )

lg_criarrg = false

end

end

 

function ReceberSolicitacaoCriarRG ()

  if getElementData ( localPlayer, "lg_solicitarregistro" ) == "Sim" then

  setElementData ( localPlayer, "lg_solicitarregistro", "Não" )

  Abrir_Fechar_Rg () -- Abrir

  end

end

setTimer ( ReceberSolicitacaoCriarRG, 50, 0 )

 

function ConfirmarContinuar (_,state)

 

if lg_criarrg == true then

if state == "down" then

if cursoronelement (x*571, y*465, x*166, y*29) then

if guiGetText(box_name) == "" or guiGetText(box_nascimento) == "" or guiGetText(box_cidade) == "" or guiGetText(box_nacionalidade) == "" or guiGetText(box_genero) == "" or guiGetText(box_quilos) == "" or guiGetText(box_altura) == "" then

  return

end

            local time = getRealTime() or 0

            local hora = time.hour + 1 or 0

            local minuto = time.minute or 0

            local sec = time.second or 0

            local dia = time.monthday or 0

            local mes = time.month + 1 or 0

            local ano = time.year + 1900 or 0

 

            if minuto < 10 then

                minuto = "0"..minuto

            end

            if sec < 10 then

                sec = "0"..sec

            end

            if mes < 10 then

                mes = "0"..mes

            end

 

setElementData ( localPlayer, "lg_rg_nome", ""..lgedit_1.."" )

setElementData ( localPlayer, "lg_rg_nascimento", ""..lgedit_2.."" )

setElementData ( localPlayer, "lg_rg_cidade", ""..lgedit_3.."" )

setElementData ( localPlayer, "lg_rg_nacionalidade", ""..lgedit_4.."" )

setElementData ( localPlayer, "lg_rg_genero", ""..lgedit_5.."" )

setElementData ( localPlayer, "lg_rg_quilos", ""..lgedit_6.."" )

setElementData ( localPlayer, "lg_rg_altura", ""..lgedit_7.."" )

setElementData ( localPlayer, "lg_rg_expedicao", ""..dia.."/"..mes.."/"..ano.." "..hora..":"..minuto..":"..sec )

 

Abrir_Fechar_Rg () -- Fechar

setElementData ( localPlayer, "lg_possuirg", "Sim" )

end

end

end

end

addEventHandler ( "onClientClick", root, ConfirmarContinuar )

 

------------------------------------------------------------------------

------------------------------------------------------------------------

------------------------------------------------------------------------

 

    function p_fabricar()

        local paginaplayer = getElementData(localPlayer,"pfpagina") or false

 

       

 

        dxDrawImage(x*337, y*155, x*705, y*486, "img/tablet.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        --dxDrawImage(337, 155, 705, 486, ":lg_ppf/img/tablet.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        if paginaplayer == "aguarde" then

    dxDrawImage(x*337, y*155, x*705, y*486, "img/aguarde.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        elseif paginaplayer == 1 then

            guiSetVisible ( boxcpf, true )

        dxDrawImage(x*337, y*155, x*705, y*486, "img/buscarcpf.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        dxDrawText(guiGetText(boxcpf), x*517, y*386, x*844, y*415, tocolor(50+50, 31+50, 101+50, 255), 1.20, "default-bold", "center", "center", false, false, false, false, false)

        elseif paginaplayer == 2 then

        dxDrawImage(x*337, y*155, x*705, y*486, "img/pagina1.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

    elseif paginaplayer == 201 then

local nome = getElementData(cliente,"lg_rg_nome") or ""

        local nascimento = getElementData(cliente,"lg_rg_nascimento") or ""

        local cidade = getElementData(cliente,"lg_rg_cidade") or ""

        local nacionalidade = getElementData(cliente,"lg_rg_nacionalidade") or ""

        local genero = getElementData(cliente,"lg_rg_genero") or ""

        local peso = getElementData(cliente,"lg_rg_quilos") or ""

        local altura = getElementData(cliente,"lg_rg_altura") or ""

        local expedicao = getElementData(cliente,"lg_rg_expedicao") or ""

        local serial = getElementData(cliente,"lg_serial") or ""

        dxDrawImage(x*337, y*155, x*705, y*486, "img/foto3x4.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        dxDrawText("REGISTRO GERAL", x*508, y*340, x*603, y*364, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(guiGetText(boxcpf), x*508, y*358, x*603, y*382, tocolor(0, 25, 101, 254), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("NOME", x*767, y*306, x*862, y*330, tocolor(0, 30, 121, 181), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText(nome, x*767, y*325, x*862, y*349, tocolor(0, 25, 101, 254), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("DATA DE NASCIMENTO", x*767, y*349, x*862, y*373, tocolor(0, 30, 121, 181), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText(nascimento, x*767, y*368, x*862, y*392, tocolor(0, 25, 101, 254), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("SERIAL", x*391, y*476, x*486, y*500, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(serial, x*391, y*494, x*486, y*518, tocolor(0, 25, 101, 254), 1.00, "default-bold", "left", "center", false, false, false, false, false)

 

    elseif paginaplayer == 401 then

        dxDrawImage(x*337, y*155, x*705, y*486, "img/add.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

    elseif paginaplayer == 301 then

        local habia = getElementData(cliente,"DNL:Categoria(A)") or "Não habilitado(a)"

        local habib = getElementData(cliente,"DNL:Categoria(B)") or "Não habilitado(a)"

        local habic = getElementData(cliente,"DNL:Categoria(C)") or "Não habilitado(a)"

        local serial = getElementData(cliente,"lg_serial") or " "

        dxDrawImage(x*337, y*155, x*705, y*486, "img/foto3x4.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        dxDrawText("HABILITAÇÃO CATEGORIA A", x*765, y*312, x*860, y*336, tocolor(0, 30, 121, 181), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText(habia, x*765, y*326, x*860, y*350, tocolor(0, 22, 89, 231), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("HABILITAÇÃO CATEGORIA B", x*765, y*356, x*860, y*380, tocolor(0, 30, 121, 181), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText(habib, x*765, y*370, x*860, y*394, tocolor(0, 22, 89, 231), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("HABILITAÇÃO CATEGORIA C", x*765, y*400, x*860, y*424, tocolor(0, 30, 121, 181), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText(habic, x*765, y*414, x*860, y*438, tocolor(0, 22, 89, 231), 1.00, "default-bold", "center", "center", false, false, false, false, false)

       

        dxDrawText("REGISTRO GERAL", x*508, y*340, x*603, y*364, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(guiGetText(boxcpf), x*508, y*358, x*603, y*382, tocolor(0, 25, 101, 254), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("SERIAL", x*391, y*476, x*486, y*500, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(serial, x*391, y*494, x*486, y*518, tocolor(0, 25, 101, 254), 1.00, "default-bold", "left", "center", false, false, false, false, false)

    elseif paginaplayer == 2541 then

        dxDrawImage(x*337, y*155, x*705, y*486, "img/addprisao.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        dxDrawText(guiGetText(textbox_rg), x*441, y*330, x*689, y*356, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(guiGetText(textbox_art), x*441, y*397, x*689, y*423, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(guiGetText(textbox_tem), x*441, y*466, x*689, y*492, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

         elseif paginaplayer == 501 then

local nome = getElementData(cliente,"lg_rg_nome") or ""

        local nascimento = getElementData(cliente,"lg_rg_nascimento") or ""

        local cidade = getElementData(cliente,"lg_rg_cidade") or ""

        local nacionalidade = getElementData(cliente,"lg_rg_nacionalidade") or ""

        local genero = getElementData(cliente,"lg_rg_genero") or ""

        local peso = getElementData(cliente,"lg_rg_quilos") or ""

        local altura = getElementData(cliente,"lg_rg_altura") or ""

        local expedicao = getElementData(cliente,"lg_rg_expedicao") or ""

        local serial = getElementData(cliente,"lg_serial") or ""

        local Emprego = getElementData(cliente,"Emprego") or "Desempregado"

        dxDrawImage(x*337, y*155, x*705, y*486, "img/foto3x4.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)

        dxDrawText("REGISTRO GERAL", x*508, y*340, x*603, y*364, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(guiGetText(boxcpf), x*508, y*358, x*603, y*382, tocolor(0, 25, 101, 254), 1.00, "default-bold", "center", "center", false, false, false, false, false)

        dxDrawText("SERIAL", x*391, y*476, x*486, y*500, tocolor(0, 30, 121, 181), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(serial, x*391, y*494, x*486, y*518, tocolor(0, 25, 101, 254), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("NOME", x*642, y*311, x*737, y*335, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(nome, x*642, 325, x*737, 349, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("DATA DE NASCIMENTO", x*642, y*349, x*737, y*373, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(nascimento, x*642, y*363, x*737, y*387, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("DATA DE EXPEDIÇÃO", x*795, y*349, x*890, y*373, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(expedicao, x*795, y*363, x*890, y*387, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("CIDADE", x*642, y*387, x*737, y*411, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(cidade, x*642, y*401, x*737, y*425, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("SEXO", x*795, y*387, x*890, y*411, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(genero, x*795, y*401, x*890, y*425, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("Peso", x*396, y*405, x*491, y*429, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(peso, x*396, y*419, x*491, y*443, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("Altura", x*491, y*405, x*586, y*429, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(altura, x*491, y*419, x*586, y*443, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("Nacionalidade", x*642, y*425, x*737, y*449, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(nacionalidade, 642, y*439, x*737, y*463, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText("Emprego", x*795, y*425, x*890, y*449, tocolor(0, 30, 121, 180), 1.00, "default-bold", "left", "center", false, false, false, false, false)

        dxDrawText(Emprego, x*795, y*439, x*890, y*463, tocolor(0, 25, 121, 255), 1.00, "default-bold", "left", "center", false, false, false, false, false)

    end

        --[[x*392, y*372, x*172, y*42

        x*392, y*414, x*172, y*42

        x*392, y*456, x*172, y*42

        x*392, y*498, x*172, y*42

        x*808, y*366, x*172, y*42

        x*808, y*414, x*172, y*42]]

    end

 

function abrir_fabricar()

    if fabricarpainel == false then

        triggerServerEvent("verificar_permissao",localPlayer)

        if getElementData(localPlayer,"lg_permissao") == "Sim" then

    showCursor ( true )

    fabricarpainel = true

    addEventHandler ( "onClientRender", getRootElement(), p_fabricar )

    setElementData(localPlayer, "pfpagina",1)

    guiSetText(boxcpf,"")

 

    Reload_Lista()

end

end

end

bindKey("n","down",abrir_fabricar)

 

function selecionararma ( _, state )

    local paginaplayer = getElementData(localPlayer,"pfpagina") or false

    if fabricarpainel == true then

    if state == "down" then

    if cursoronelement (x*632, y*431, x*89, y*28) then

    if paginaplayer == 1 then

    cliente = getPlayerFromID(guiGetText(boxcpf))

    if isElement(cliente) then

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",2)

    guiSetVisible(boxcpf,false)

else

end

end

    elseif cursoronelement (x*392, y*372, x*172, y*42) then      --1

    if paginaplayer == 2 then

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",201)

end

 

elseif cursoronelement (x*392, y*414, x*172, y*42) then          --2

    if paginaplayer == 2 then

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",301)

end

 

elseif cursoronelement (x*394, y*461, x*168, y*31) then          --3

    if paginaplayer == 2 then

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",401)

    ListaPrisao:SetVisible(true)

    Reload_Lista()

end

elseif cursoronelement (x*905, y*514, x*57, y*47) then

    if paginaplayer == 401 then

        setElementData(localPlayer,"pfpagina","aguarde")

        guiSetText(textbox_rg,"")

        guiSetText(textbox_tem,"")

        guiSetText(textbox_art,"")

        guiSetVisible ( textbox_rg, true )

    guiSetVisible ( textbox_tem, true )

    guiSetVisible ( textbox_art, true )

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",2541)

    ListaPrisao:SetVisible(false)

end

elseif cursoronelement (x*394, y*500, x*168, y*36) then          --4

    if paginaplayer == 2 then

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",501)

end

 

elseif cursoronelement (x*393, y*463, x*226, y*79) then    

    if paginaplayer == 201 or paginaplayer == 301 or paginaplayer == 501 then

    local serial = getPlayerSerial ( cliente )

    setClipboard(serial)

end

   elseif cursoronelement(x*827, y*502, x*106, y*81) then

    if paginaplayer == 2541 then

 

    if isElement(cliente) then

    if guiGetText(textbox_rg) == "" or guiGetText(textbox_tem) == "" or guiGetText(textbox_art) == "" then

        return

    end

    if  guiGetText(textbox_rg) == guiGetText(boxcpf) then

   

   

    local m1 = getElementData(cliente,"rg:fichacriminal1") or ""

    local t1 = getElementData(cliente,"rg:tempocriminal1") or ""

    local m2 = getElementData(cliente,"rg:fichacriminal2") or ""

    local t2 = getElementData(cliente,"rg:tempocriminal2") or ""

    local m3 = getElementData(cliente,"rg:fichacriminal3") or ""

    local t3 = getElementData(cliente,"rg:tempocriminal3") or ""

    local m4 = getElementData(cliente,"rg:fichacriminal4") or ""

    local t4 = getElementData(cliente,"rg:tempocriminal4") or ""

    local m5 = getElementData(cliente,"rg:fichacriminal5") or ""

    local t5 = getElementData(cliente,"rg:tempocriminal5") or ""

    local m6 = getElementData(cliente,"rg:fichacriminal6") or ""

    local t6 = getElementData(cliente,"rg:tempocriminal6") or ""

    local m7 = getElementData(cliente,"rg:fichacriminal7") or ""

    local t7 = getElementData(cliente,"rg:tempocriminal7") or ""

 

    if m1 == "" then

       

    setElementData(cliente,"rg:fichacriminal1",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal1",guiGetText(textbox_tem).." Meses")

elseif m2 == "" then

   

    setElementData(cliente,"rg:fichacriminal2",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal2",guiGetText(textbox_tem).." Meses")

    elseif m3 == "" then

       

    setElementData(cliente,"rg:fichacriminal3",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal3",guiGetText(textbox_tem).." Meses")

    elseif m4 == "" then

       

    setElementData(cliente,"rg:fichacriminal4",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal4",guiGetText(textbox_tem).." Meses")

    elseif m5 == "" then

       

    setElementData(cliente,"rg:fichacriminal5",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal5",guiGetText(textbox_tem).." Meses")

    elseif m6 == "" then

       

    setElementData(cliente,"rg:fichacriminal6",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal6",guiGetText(textbox_tem).." Meses")

    elseif m7 == "" then

       

    setElementData(cliente,"rg:fichacriminal7",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal7",guiGetText(textbox_tem).." Meses")

else

 

    setElementData(cliente,"rg:fichacriminal1",false)

    setElementData(cliente,"rg:fichacriminal2",false)

    setElementData(cliente,"rg:fichacriminal3",false)

    setElementData(cliente,"rg:fichacriminal4",false)

    setElementData(cliente,"rg:fichacriminal5",false)

    setElementData(cliente,"rg:fichacriminal6",false)

    setElementData(cliente,"rg:fichacriminal7",false)

 

    setElementData(cliente,"rg:tempocriminal1",false)

    setElementData(cliente,"rg:tempocriminal2",false)

    setElementData(cliente,"rg:tempocriminal3",false)

    setElementData(cliente,"rg:tempocriminal4",false)

    setElementData(cliente,"rg:tempocriminal5",false)

    setElementData(cliente,"rg:tempocriminal6",false)

    setElementData(cliente,"rg:tempocriminal7",false)

 

    setElementData(cliente,"rg:fichacriminal1",guiGetText(textbox_art).." (CP)")

    setElementData(cliente,"rg:tempocriminal1",guiGetText(textbox_tem).." Meses")

 

end

 

    setElementData(localPlayer,"pfpagina","aguarde")

    guiSetVisible ( textbox_rg, false )

    guiSetVisible ( textbox_tem, false )

    guiSetVisible ( textbox_art, false )

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",401)

    ListaPrisao:SetVisible(true)

    Reload_Lista()

    end

   end

   end

    elseif cursoronelement (x*602, y*594, x*172, y*42) then

 

    if paginaplayer == 1 then

    showCursor ( false )

    fabricarpainel = false

    removeEventHandler ( "onClientRender", getRootElement(), p_fabricar )

elseif paginaplayer == 201 or paginaplayer == 301 or paginaplayer == 401 or paginaplayer == 501 or paginaplayer == 601 or paginaplayer == 701 or paginaplayer == 801 then

    setElementData(localPlayer,"pfpagina",2)

    ListaPrisao:SetVisible(false)

    guiSetVisible ( textbox_rg, false )

    guiSetVisible ( textbox_tem, false )

    guiSetVisible ( textbox_art, false )

    guiSetVisible(boxcpf,false)

    Reload_Lista()

elseif paginaplayer == 2541 then

    setElementData(localPlayer,"pfpagina","aguarde")

        guiSetVisible ( textbox_rg, false )

    guiSetVisible ( textbox_tem, false )

    guiSetVisible ( textbox_art, false )

    setElementData(localPlayer,"pfpagina","aguarde")

    setTimer(setElementData, 100,1, localPlayer,"pfpagina",401)

    ListaPrisao:SetVisible(true)

    Reload_Lista()

 

   

else

    setElementData(localPlayer,"pfpagina", 1)

    guiSetText(boxcpf,"")

end

end

end

end

end

addEventHandler ( "onClientClick", root, selecionararma )

 

 function cursoronelement ( x, y, Largura, Altura )

    if not isCursorShowing ( ) then

        return false

    end

    local sx, sy = guiGetScreenSize()

    local cx, cy = getCursorPosition()

    local cx, cy = (cx*sx), (cy*sy)

    if (cx >= x and cx <= x + Largura) and (cy >= y and cy <= y + Altura) then

        return true

    else

        return false

    end

end

 

function getPlayerFromID ( id )

    for k, player in ipairs ( getElementsByType ( "player" ) ) do

            local p_id = getElementData ( player, "ID" )

            if ( p_id == tonumber(id) ) then

                    player_n = getPlayerName ( player )

                    return player, player_n

            end

    end

           

end