Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2019-04-22, 22:42


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Witam ot??, mam pro?b? pom?g? by mi kto? to ogarn?? ze jak wpisujemy /cl id pow?d, to wy?wietla si? to graczowi np /cl 2 ju? IDE. Naprawd? prosi?bym o pomoc
kod

function RGBToHex(redgreenbluealpha)
    if((red or red 255 or green or green 255 or blue or blue 255) or (alpha and (alpha or alpha 255))) then
        return nil
    end
    if(alphathen
        return string.format("#%.2X%.2X%.2X%.2X"red,green,blue,alpha)
    else
        return string.format("#%.2X%.2X%.2X"red,green,blue)
    end
end
--admins
function getAdmin(plr,level)
    if level then
        local result=exports["ogrpg-db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=? AND level=?"getPlayerSerial(plr), level)
        if result and #result > 0 then
            return true
        else
            return false
        end
    else
        local result=exports["ogrpg-db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=?"getPlayerSerial(plr))
        if result and #result > 0 then
            return true
        else
            return false
        end
    end
end



function getLevel(plr)
    if plr then
        local result=exports["ogrpg-db"]:dbGet("SELECT level from ogrpg_admins WHERE serial=? limit 1"getPlayerSerial(plr))
        if result and #result > 0 then
            if tonumber(result[1].level) > 0 then
            return result[1].level
            else
            return false
            end
        else
            return false
        end
    end
end

--

function cmd_admins(plr)
if not getElementData(plr,"adminsON"then
  local helperzy={}
  local supporterzy={}
  local admini={}
  local rconi={}
  local dev={}
  setElementData(plr,"adminsON",true)
  setTimer(setElementData,30*1000,1,plr,"adminsON",false)
  for i,v in ipairs(getElementsByType("player")) do
    local adminer getElementData(v,"player:id")
    if (getAdmin(v,4)) then
      local t
      local login=getElementData(v,"player:admin")
      if (loginthen
        t="#ffffff"..getPlayerName(v):gsub("#%x%x%x%x%x%x","").."[#0066ffID:"..getElementData(v,"id").."#ffffff]"
        table.insert(dev,t)
      end
    end
      if (getAdmin(v,3)) then
      local t
      local login=getElementData(v,"player:admin")
      if (loginthen
        t="#ffffff"..getPlayerName(v):gsub("#%x%x%x%x%x%x","").."[#0066ffID:"..getElementData(v,"id").."#ffffff]"
        table.insert(rconi,t)
      end
    end
    if(getAdmin(v,2)) then
      local t
      local login=getElementData(v,"player:admin")
      if (loginthen
        t="#ffffff"..getPlayerName(v):gsub("#%x%x%x%x%x%x","").."[#0066ffID:"..getElementData(v,"id").."#ffffff]"
        table.insert(admini,t)
      end
    end
    if (getAdmin(v,1)) then
      local t
      local login=getElementData(v,"player:admin")
      if (loginthen
        t="#ffffff"..getPlayerName(v):gsub("#%x%x%x%x%x%x","").."[#0066ffID:"..getElementData(v,"id").."#ffffff]"
        table.insert(supporterzy,t)
      end
    end
end
  outputChatBox("Developerzy:"plr160,0,170)
  if (#dev>0) then
    outputChatBox("  " .. table.concat(dev,", "), plr,255,255,255,true)
  else
    outputChatBox("Brak."plr)
  end
  outputChatBox("RCON:"plr100,0,0)
  if (#rconi>0) then
    outputChatBox("  " .. table.concat(rconi,", "), plr,255,255,255,true)
  else
    outputChatBox("Brak."plr)
  end
  
  outputChatBox("Administrator:"plr255,0,0)
  if (#admini>0) then
    outputChatBox("  " .. table.concat(admini,", "), plr,255,255,255,true)
  else
    outputChatBox("Brak."plr)
  end

  outputChatBox("Support:"plr0,200,0)
  if (#supporterzy>0) then
    outputChatBox("  " .. table.concat(supporterzy,", "), plr,255,255,255,true)
  else
    outputChatBox("Brak."plr)
  end
end
end
addCommandHandler("admins"cmd_adminsfalsefalse)
addCommandHandler("admini"cmd_adminsfalsefalse)
addCommandHandler("ekipa"cmd_adminsfalsefalse)

addEvent("admin:logs"true)
addEventHandler("admin:logs"root, function(text)
local query=exports["ogrpg-db"]:dbSet("INSERT INTO ogrpg_logs (name,data) VALUES (?,NOW())"text)
end)

addCommandHandler("ucho", function(plr,cmd)
    if getAdmin(plrthen
    local x getElementData(plr,"player:ucho")
    setElementData(plr,"player:ucho",not x)
    end
end)
addCommandHandler("duty", function(plr,cmd)
    if getAdmin(plrthen
        if not getElementData(plr,"player:admin"then
            giveWeapon(plr,22)
            toggleControl(plr,"fire",true)
            toggleControl(plr,"aim_weapon",true)
            if getAdmin(plr1then
            setElementData(plr,"player:level",1)
            elseif getAdmin(plr2then
            setElementData(plr,"player:level",2)
            elseif getAdmin(plr3then
            setElementData(plr,"player:level",3)
            elseif getAdmin(plr4then
            setElementData(plr,"player:level",4)
            end
            setElementData(plr,"player:admin",true)
            setElementData(plr,"player:premium",true)
            exports["noti"]:noti("Zalogowa?e?[a?] si? na konto Administratora"plr)
            exports["noti"]:noti("Wpisz /ucho by wy?wietli? podgl?d"plr192 ,192 ,192)
             exports["ogrpg-db"]:dbSet("UPDATE ogrpg_admins SET actived=NOW() WHERE serial=?",getPlayerSerial(plr))
            local text "* "..getPlayerName(plr).." zalogowa?(a) si? do administracji."..RGBToHex(255,255,255)
            triggerEvent("admin:addText"resourceRoottext,math.random(0,99))
            --outputChatBox(, root25500)
    --        local rank getVisualRank(plr)
            if rank then 
                setElementData(plr,"player:level",{tonumber(getLevel(plr)),rank})
                return
            end
        else
            takeWeapon(plr,22)
            toggleControl(plr,"fire",false)
            toggleControl(plr,"aim_weapon",false)
            removeElementData(plr,"player:admin")
            removeElementData(plr,"player:level")
            removeElementData(plr,"player:premium")
            exports["noti"]:noti("Wylogowa?e? si? z duty administracji"plr)
            setPlayerName(plr,getPlayerName(plr):gsub("#%x%x%x%x%x%x",""))
            local text "* "..getPlayerName(plr).." wylogowa?(a) si? z administracji."..RGBToHex(255,255,255)
            triggerEvent("admin:addText"resourceRoottext,math.random(0,99))
            --outputChatBox(, root25500)
        end
    else
        --outputChatBox("* Nie posiadasz uprawnie?."plr25500)
    end
end)

rangi = {
[4] = "Developer",
[3] = "RCON",
[2] = "Administrator",
[1] = "Support",
}
scianarapsow createObject 16637,-1983.48466.3824235.17 )
setObjectScale(scianarapsow,3)
reportView = {{"OBECNE ZGLOSZENIA",0}}
setElementData(scianarapsow,"sciana:raportow",reportView)

addEvent("admin:addReport"true)
addEventHandler("admin:addReport"root, function(text,id)
    table.insert(reportView, {text,id})
    if #reportView > 10 then
        table.remove(reportView2)
    end
    setElementData(scianarapsow,"sciana:raportow",reportView)
end)

addEvent("admin:removeReport"true)
addEventHandler("admin:removeReport"root, function(id)
    for i=#reportView, 2, -1 do
        if reportView[i][2] == id then
            table.remove(reportView,i)
        end
    end
    setElementData(scianarapsow,"sciana:raportow",reportView)
end)

scianatext createObject 981,0,0,)
textView = {{"LOGI SERWEROWE",0}}
setElementData(scianatext,"sciana:text",textView)


addEvent("admin:addText"true)
addEventHandler("admin:addText"root, function(text,id)
    table.insert(textView, {text,id})
    if #textView > 10 then
        table.remove(textView2)
    end
    setElementData(scianatext,"sciana:text",textView)
end)

addEvent("admin:removeText"true)
addEventHandler("admin:removeText"root, function(id)
    for i=#textView, 2, -1 do
        if textView[i][2] == id then
            table.remove(textView,i)
        end
    end
    setElementData(scianatext,"sciana:text",textView)
end)


addCommandHandler("report", function(plr,cmd,cel,...)
    if not cel then
        --outputChatBox("Poprawne u?ycie /report <Nick/ID?> <pow?d>")
        return
    end
    local target=exports["ogrpg-core"]:findPlayer(plr,cel)
    if not target then
        outputChatBox("* Nie znaleziono podanego gracza."plr25500)
        return
    end
    local text=table.concat({...}, " ")
      CD text
    desc=getPlayerName(plr):gsub("#%x%x%x%x%x%x","").."("..getElementData(plr,"id")..") >> "..getPlayerName(target):gsub("#%x%x%x%x%x%x","").."("..getElementData(target,"id").."): "..text:gsub("#%x%x%x%x%x%x","")
    triggerEvent("admin:addReport"resourceRootdescgetElementData(target,"id"))
    triggerClientEvent(root"onDebugMessage"resourceRootdesc,2"Report")
     exports["ogrpg-db"]:dbSet("insert into logi_report SET  data=NOW(),serial=?,nick=?,tresc=?",getPlayerSerial(target),getPlayerName(target),CD)
    outputChatBox("* Pomy?lnie wys?ano zg?oszenie na gracza: "..getPlayerName(target):gsub("#%x%x%x%x%x%x",""), plr)
end)




addCommandHandler("cr", function(plr,cmd,id,...)
    if not getAdmin(plrthen
        outputChatBox("* Nie posiadasz uprawnie?."plr25500)
        return
    end
    local reason=table.concat({...}, " ")
    local target=exports["ogrpg-core"]:findPlayer(plr,id)
    if target then
        id=getElementData(target,"id")
        opis=getPlayerName(target)
        if target ~= plr and not getAdmin(targetthen
        exports["ogrpg-db"]:dbSet("INSERT INTO raps (nick,uid,ostatnio_zrobil) VALUES (?,?,NOW())",getPlayerName(plr):gsub("#%x%x%x%x%x%x",""),getElementData(plr"player:uid"))
        end
    end
    for i,v in ipairs(getElementsByType("player")) do
        if getAdmin(vthen
        --    if getElementData(v,"player:admin"then
                triggerEvent("admin:removeReport"resourceRootid)
                outputChatBox("* "..getPlayerName(plr):gsub("#%x%x%x%x%x%x","").." usun??/??a raport na: "..opis:gsub("#%x%x%x%x%x%x","").."/"..id..": "..reasonv25500)
        --    end
        end
    end
end)


addEventHandler("onPlayerQuit"root, function()
    local  id=getElementData(source,"id")
    if id then
        triggerEvent("admin:removeReport"resourceRootid)
    end
end)




addCommandHandler("rapsy", function(plr,cmd,uid)
    if not getAdmin(plrthen
        return
    end
    if not uid then outputChatBox("U?ycie: /rapsy <uid>"plr255255255) return end
    local sel=exports["ogrpg-db"]:dbGet("SELECT * FROM raps WHERE uid=?"uid)
    if sel and #sel > 0 then
    outputChatBox("U?ytkownik o uid "..uid.." wykona? "..#sel.." report?w.", plr, 255, 255, 255)
    else
    outputChatBox("U?ytkownik o uid "..uid.." wykona? 0 report?w."plr255255255)
    end
end)

local x,y,= -6716.17, -1342.3597.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6716.17, -1338.4097.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6716.17, -1334.3397.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6716.17, -1330.3797.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6721.07, -1328.5197.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6721.07, -1332.6497.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6721.14, -1336.5597.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)

local x,y,= -6721.14, -1340.5597.75
local obj createObject(1228,x,y,z-0.65)
triggerClientEvent("setBreakable",root,obj)
setElementFrozen(obj,true)


Podpis
amta
Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-04-23, 11:06


Wilq







Wiek: 24
Na forum: 4428 dni
Posty: 3410

Piwa: 739

Respekt: 1225,8
Respekt: 1225,8

Chcesz komend?, kt?r? wy?wietlisz dany tekst na ekranie gracza?

Je?li tak, tutaj podrzucam na szybko napisany kod:
(chcesz, to dodaj sobie zabezpieczenia do komendy)

SERVER:

function findPlayer(plr,cel)
    local target=nil
    if (tonumber(cel) ~= nilthen
        target=getElementByID("p"..cel)
    else -- podano fragment nicku
        for _,thePlayer in ipairs(getElementsByType("player")) do
            if string.find(string.gsub(getPlayerName(thePlayer):lower(),"#%x%x%x%x%x%x"""), cel:lower(), 1truethen
                if (targetthen
                    outputChatBox("Znaleziono wiecej niz jednego gracza o pasujacym nicku, podaj wiecej liter."plr)
                    return nil
                end
                target=thePlayer
            end
        end
    end
    return target
end

addCommandHandler("cl", function(plr,cmd,cel, ...)
    local target findPlayer plrcel )
    if (not targetthen
        outputChatBox("Nie znaleziono gracza " .. cel,plr )
        return
    end
    local tresc table.concatarg" " )
    if (string.len(tresc)<=1then
        outputChatBox("Wpisz tresc!"plr)
        return
    end

    triggerClientEvent("nadajOstrzezenie"targettresc)
end)


CLIENT:

local playerWarning nil
local screenWscreenH guiGetScreenSize()

function drawPlayerWarning()
    dxDrawText(tostring(playerWarning), screenW/2screenH/2)
end

function hidePlayerWarning()
    playerWarning=false
    removeEventHandler("onClientRender"getRootElement(), drawPlayerWarning)
end

addEvent("nadajOstrzezenie"true)
addEventHandler "nadajOstrzezenie"getRootElement(), function(tresc)
    if source == getLocalPlayer() then
        setTimer(playSoundFrontEnd50035)
        outputChatBox("\n\nOtrzymales/as ostrzezenie!\n"25500)
        outputChatBox(tresc255255255)
        outputChatBox("\nNie stosowanie sie do ostrzezen moze skutkowac kickiem lub banem!\n\n\n"25500)

        addEventHandler("onClientRender"getRootElement(), drawPlayerWarning)

        playerWarning=tresc
        setTimer(hidePlayerWarning70001)
    end
end)


Fragmenty zaczerpni?te z gamemode XyzzyRP.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-04-23, 12:04


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Dzia?a git, tylko nie usuwa report?w z ?ciany kod po stronie clienta.
for k,v in ipairs getElementsByType "object" ) ) do
    if getElementData v"sciana:raportow" then
        scianaplaczu v
    end
    if getElementData(v,"sciana:text"then
        scianatekstu v
    end
end
local sx,sy=guiGetScreenSize()

function renderingInfo()
    dxDrawRectangle(sx*(258)/1024sy*(0)/268sx*(500)/1024sy*(23)/768tocolor(000195), false)
    dxDrawText(xtext:gsub("#%x%x%x%x%x%x",""), sx*(258+1)/1024sy*(0+1)/768sx*(758+1)/1024sy*(23+1)/768tocolor(000255), 1.00"default""center""center"falsetrue)
    dxDrawText(xtext:gsub("#%x%x%x%x%x%x",""), sx*(258)/1024sy*(0)/768sx*(758)/1024sy*(23)/768tocolor(25500255), 1.00"default""center""center"falsetrue)
end

addEvent("admin:rendering"true)
addEventHandler("admin:rendering"root, function(text)
    xtext=text
    if isEventHandlerAdded("onClientRender",root,renderingInfothen
        removeEventHandler "onClientRender"rootrenderingInfo)
    end
    addEventHandler("onClientRender"rootrenderingInfo)
    setTimer(function()
        removeEventHandler("onClientRender"rootrenderingInfo)
    end80001)
end)

function isEventHandlerAddedsEventNamepElementAttachedTofunc )
    if
        typesEventName ) == 'string' and
        isElementpElementAttachedTo ) and
        typefunc ) == 'function'
    then
        local aAttachedFunctions getEventHandlerssEventNamepElementAttachedTo )
        if typeaAttachedFunctions ) == 'table' and #aAttachedFunctions > 0 then
            for iv in ipairsaAttachedFunctions ) do
                if == func then
                    return true
                end
            end
        end
    end

    return false
end

local xtext=nil
local gameView={"Logi serwerowe"}
local x,y=guiGetScreenSize()
local sx,sy=guiGetScreenSize()
local screenWscreenH guiGetScreenSize()
local font dxCreateFont("font.ttf"10false)

---local blur exports['blur']

function redRender()
    dxDrawRectangle (0,y-30,x,30,tocolor(0,0,0,200),true)
    dxDrawText(xtext:gsub("#%x%x%x%x%x%x",""),0,y-22,x,22,tocolor(255,0,0,255),1,"clear","center","top",false,false,true,false,true)
end

function greenRender()
    dxDrawRectangle (0,y-30,x,30,tocolor(0,0,0,200),true)
    dxDrawText(xtext:gsub("#%x%x%x%x%x%x",""),0,y-22,x,22,tocolor(0,255,0,255),1,"clear","center","top",false,false,true,false,true)
end

function goldRender()
    dxDrawRectangle (0,y-30,x,30,tocolor(0,0,0,200),true)
    dxDrawText(xtext:gsub("#%x%x%x%x%x%x",""),0,y-22,x,22,tocolor(255,224,0,255),1,"clear","center","top",false,false,true,false,true)
end

function renderingInfoGracz()
    dxDrawText(xtext:gsub("#%x%x%x%x%x%x",""), screenW 0.0000screenH 0.5521screenW 0.1837screenH 0.5872tocolor(255255255255), 1.00"clear""center""center"falsefalsefalsefalsefalse)
end

function raporcik()
    if not getElementData(localPlayer,"player:admin"then return end
    local tt={}
    reportView=getElementData(scianaplaczu,"sciana:raportow")
    for i,c in ipairs(reportView) do
        if c[1then table.insert(tt,c[1]) end
    end
    concat=table.concat(tt"\n")
    --dxDrawText(concatsx*(698+1)/1024sy*(278+1)/768sx*(1014+1)/1024sy*(496+1)/768tocolor(000255), 1.00font"right""top"falsetrue)
    dxDrawText(concatsx*(698)/1024sy*(278)/768sx*(1014)/1024sy*(496)/768tocolor(255255255255), 1.00font"right""top"falsetrue)
end
addEventHandler("onClientRender"rootraporcik)


addEvent("admin:addText"true)
addEventHandler("admin:addText"root, function(text)
    table.insert(gameViewtext)    
    if #gameView > 10 then
        table.remove(gameView2)
    end
end)


function raporcik2()
    if not getElementData(localPlayer,"player:ucho"then return end
    local tt={}
    reportView=getElementData(scianatekstu,"sciana:text")
    for i,c in ipairs(reportView) do
        if c[1then table.insert(tt,c[1]) end
    end
    concat=table.concat(tt"\n")
    --dxDrawText(concat, (sx*(10)/1024) + 1, (sy*(279)/768) + 1, (sx*(326)/1024) + 1, (sy*(497)/768) + 1black1.00font"left""top"falsefalse,false,true)
    dxDrawText(concatsx*(10)/1024sy*(279)/768sx*(326)/1024sy*(497)/768tocolor(255255255255), 1.00font"left""top"falsefalse,false,true)
end
addEventHandler("onClientRender"rootraporcik2)

addEvent("adminRender"true)
addEventHandler("adminRender"root, function(text)
    xtext=text
    if isEventHandlerAdded("onClientRender",root,gRenderthen
        removeEventHandler "onClientRender"rootredRender)
    end
    addEventHandler("onClientRender"rootredRender)
    setTimer(function()
        removeEventHandler("onClientRender"rootredRender)
    end100001)
end)

addEvent("playerRender"true)
addEventHandler("playerRender"root, function(text)
    xtext=text
    if isEventHandlerAdded("onClientRender",root,greenRenderthen
        removeEventHandler "onClientRender"rootgreenRender)
    end
    addEventHandler("onClientRender"rootgreenRender)
    setTimer(function()
        removeEventHandler("onClientRender"rootgreenRender)
    end100001)
end)

addEvent("goldRender"true)
addEventHandler("goldRender"root, function(text)
    xtext=text
    if isEventHandlerAdded("onClientRender",root,goldRenderthen
        removeEventHandler "onClientRender"rootgoldRender)
    end
    addEventHandler("onClientRender"rootgoldRender)
    setTimer(function()
        removeEventHandler("onClientRender"rootgoldRender)
    end300001)
end)

--[[
local screenWscreenH guiGetScreenSize()
local blur exports['blur']
addEventHandler("onClientRender"root,
    function()
        blur:dxDrawBluredRectangle(screenW 0.0000screenH 0.5169screenW 0.1837screenH 0.1445tocolor(100100100255), false)
        dxDrawText("Kara: Ostrze?enie"screenW 0.0000screenH 0.5169screenW 0.1837screenH 0.5521tocolor(25500255), 1.00"default-bold""center""center"falsefalsefalsefalsefalse)
        dxDrawText("Gracz: Rusek"screenW 0.0000screenH 0.5521screenW 0.1837screenH 0.5872tocolor(255255255255), 1.00"clear""center""center"falsefalsefalsefalsefalse)
        dxDrawText("Karaj?cy: Kurianusz"screenW 0.0000screenH 0.5742screenW 0.1837screenH 0.6094tocolor(255255255255), 1.00"clear""center""center"falsefalsefalsefalsefalse)
        dxDrawText("Pow?d: Odpierdalanie na terenie LS, taranowanie innych."screenW 0.0000screenH 0.6094screenW 0.1837screenH 0.6615tocolor(255255255255), 1.00"clear""center""center"falsetruefalsefalsefalse)
    end
)
--]]




local player_Wplayer_H guiGetScreenSize()
local moje_Wmoje_H 1280,720
local size player_H/moje_H*0.9

local button guiCreateLabel(screenW 0.4458screenH 0.5794screenW 0.1083screenH 0.0443""false)

function gui()
        dxDrawLine((screenW 0.4092) - 1, (screenH 0.2773) - 1, (screenW 0.4092) - 1screenH 0.6419tocolor(254255254255), 1false)
        dxDrawLine(screenW 0.5908, (screenH 0.2773) - 1, (screenW 0.4092) - 1, (screenH 0.2773) - 1tocolor(254255254255), 1false)
        dxDrawLine((screenW 0.4092) - 1screenH 0.6419screenW 0.5908screenH 0.6419tocolor(254255254255), 1false)
        dxDrawLine(screenW 0.5908screenH 0.6419screenW 0.5908, (screenH 0.2773) - 1tocolor(254255254255), 1false)
        dxDrawRectangle(screenW 0.4092screenH 0.2773screenW 0.1816screenH 0.3646tocolor(000197), false)
        dxDrawText("#008000&#10004; #ffffffInformacja o graczu: "..login_clscreenW 0.4092screenH 0.2773screenW 0.5908screenH 0.3255tocolor(255255255255), size"default-bold""center""center"falsetruefalsetruefalse)
        dxDrawText("#008000&#10004; #ffffffG??wne\n\n#ffffffUID: #FFC060"..id_cl.."\n#ffffffLogin: #FFC060"..login_cl.."\n\n#008000&#10004; #ffffffDodatkowe\n\n#ffffffPieni?dze: #FFC060"..pieniadze_cl.."\n#ffffffPieni?dze (bankomat): #FFC060"..bankomat_cl.." \n#ffffffReputacja: #FFC060"..rp_cl.."\n#ffffffData rejestracji: #FFC060"..datarej_cl.." \n#ffffffMinuty na serwerze: #FFC060"..minuty_cl.."\n#ffffffPunkty Premium: #FFC060"..pp_cl..""screenW 0.4092screenH 0.3255screenW 0.5908screenH 0.5716tocolor(255255255255), size"clear""center""top"falsetruefalsetruefalse)
        dxDrawLine((screenW 0.4458) - 1, (screenH 0.5794) - 1, (screenW 0.4458) - 1screenH 0.6237tocolor(255255255255), 1false)
        dxDrawLine(screenW 0.5542, (screenH 0.5794) - 1, (screenW 0.4458) - 1, (screenH 0.5794) - 1tocolor(255255255255), 1false)
        dxDrawLine((screenW 0.4458) - 1screenH 0.6237screenW 0.5542screenH 0.6237tocolor(255255255255), 1false)
        dxDrawLine(screenW 0.5542screenH 0.6237screenW 0.5542, (screenH 0.5794) - 1tocolor(255255255255), 1false)
        dxDrawRectangle(screenW 0.4458screenH 0.5794screenW 0.1083screenH 0.0443tocolor(100255), false)
        dxDrawText("ZAMKNIJ"screenW 0.4451screenH 0.5768screenW 0.5542screenH 0.6237tocolor(255255255255), size"clear""center""center"falsefalsefalsefalsefalse)
end


addEventHandler("onClientGUIClick",resourceRoot, function ()
    if source ~= button then return end
        status false
        removeEventHandler("onClientRender",root,gui)
        
        showCursor(false)
        guiSetVisible(button,false)
    end
)


addEvent("showGUI",true)

function showGUI(id,login,pieniadze,bankomat,rp,datarej,minuty,pp)
    if status == true then 
        status false
        removeEventHandler("onClientRender",root,gui)
        
        showCursor(false)
        guiSetVisible(button,false)
    else
        addEventHandler("onClientRender"root,gui)
        status true
        
        showCursor(true,false)
        guiSetVisible(button,true)
        
        id_cl id        
        login_cl login    
        pieniadze_cl pieniadze        
        bankomat_cl bankomat
        rp_cl rp
        datarej_cl datarej
        minuty_cl minuty
        pp_cl pp
    end
end

addEventHandler("showGUI",resourceRoot,showGUI)

local playerWarning nil
local screenWscreenH guiGetScreenSize()

function drawPlayerWarning()
    dxDrawText(tostring(playerWarning), screenW/2screenH/2)
end

function hidePlayerWarning()
    playerWarning=false
    removeEventHandler("onClientRender"getRootElement(), drawPlayerWarning)
end

addEvent("nadajOstrzezenie"true)
addEventHandler "nadajOstrzezenie"getRootElement(), function(tresc)
    if source == getLocalPlayer() then
        setTimer(playSoundFrontEnd50035)
        outputChatBox("\n\nOtrzymales/as ostrzezenie!\n"25500)
        outputChatBox(tresc255255255)
        outputChatBox("\nNie stosowanie sie do ostrzezen moze skutkowac kickiem lub banem!\n\n\n"25500)

        addEventHandler("onClientRender"getRootElement(), drawPlayerWarning)

        playerWarning=tresc
        setTimer(hidePlayerWarning70001)
    end
end)


0 bledow z db3

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-04-23, 12:18


Wilq







Wiek: 24
Na forum: 4428 dni
Posty: 3410

Piwa: 739

Respekt: 1225,8
Respekt: 1225,8

To podepnij funkcj? od wy?wietlania tekstu do miejsca, gdzie usuwasz te reporty.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-04-23, 12:36


Pyrek24







Wiek: 25
Na forum: 3438 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Tutaj jest ta funkcja, tylko nwm ja j? podpi??.
Kod:

triggerEvent("admin:removeReport", resourceRoot, id)


Postaw piwo autorowi tego posta
 

 
Tagi: usuwanie :: reprotow
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku