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

Wysłany: 2020-08-09, 20:34


Monek444







Wiek: 26
Na forum: 2420 dni
Posty: 4
Nick w MP: Monek

Piwa: 131

Respekt: 50

rowery = {

[507] = true

}

Motocykle = {
[581] = true,
[509] = true,
[481] = true,
[468] = true,
[586] = true,
[448] = true,
[522] = true,
[461] = true,
[462] = true,
[463] = true,
[510] = true,
[521] = true,
}


local screenWscreenH guiGetScreenSize()


function LicznikPojazdu()
    
local veh=getPedOccupiedVehicle(localPlayer)
    
if not veh then return end
if not Motocykle[getElementModel(veh)] then
    
local vxvyvz getElementVelocity(veh)
    
local speed = ((vx^vy^vz^2)^(0.5))*180    
local speedy speed*0.97

local Pojazd getPedOccupiedVehicle(localPlayer)
    
if not Pojazd  then return end
    local vxvyvz getElementVelocity(Pojazd)
    
    local speed =((vx^vy^vz^2)^(0.5))*140    
    local speedy speed*0.97
    local przebieg getElementData(Pojazd,"vehicle:mileage") or 0
    local fuel getElementData(Pojazd,"vehicle:fuel") or 0
dxDrawText(('%06d'):format(math.floor(przebieg))..""screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455tocolor(255,255,255255), 1.00font"center""top"truetruetruetruetrue)
                          dxDrawRectangle(screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455tocolor(50,50,50,200), false)
                          dxDrawRectangle(screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455tocolor(50,50,50,200), false)
dxDrawRectangle(screenW 0.8001screenH 0.6676screenW 0.3660/100*fuelscreenH 0.3475tocolor(5025519255), false)
            if fuel 5 then
            r1,g1,b1 255,0,0
        else
            r1,g1,b1 255,255,255
    end

        
local przebieg getElementData(veh,"vehicle:mileage") or 0

local Kolor getElementData(veh"licznik:kolor") or "Zwykly"    
if getElementHealth(veh) < 301 then
    
setElementHealth(veh,302)
    
end
        
if ( getVehicleOverrideLights veh ) ~= then                 
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/disk.png"000tocolor(255255255255), false)
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/rgb.png"000tocolor(255255255255), false)
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455"Img/paliwo.png"000tocolor(255255255255), false)
      
dxDrawImage(screenW 0.7679screenH 0.6833screenW 0.2555screenH 0.2463"Img/needle.png"speedy00tocolor(255255255255), false) 
else
if Kolor == "Niebieski" then
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/disk.png"000tocolor(255255255240), false)
dxDrawImage(screenW 0.7679screenH 0.6833screenW 0.2555screenH 0.2463"Img/needle.png"speedy00tocolor(255255255255), truedxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/rgb.png"000tocolor(255255255255), false)
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455"Img/paliwo.png"000tocolor(255255255255), false)
elseif Kolor == "Zolty" then    
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/disk.png"000tocolor(255255255240), false)
dxDrawImage(screenW 0.7679screenH 0.6833screenW 0.2555screenH 0.2463"Img/needle.png"speedy00tocolor(255255255255), truedxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/rgb.png"000tocolor(255255255255), false)
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455"Img/paliwo.png"000tocolor(255255255255), false)
elseif Kolor == "Jasnoniebieski" then
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/disk.png"000tocolor(255255255240), false)
dxDrawImage(screenW 0.8001screenH 0.6676screenW 0.1830screenH 0.3055"Img/rgb.png"000tocolor(123104238255), false)
dxDrawImage(screenW 0.7679screenH 0.6833screenW 0.2555screenH 0.2463"Img/needle.png"speedy00tocolor(255255255255), truedxDrawImage(screenW 0.8001screenH 0.6676screenW 0.3630screenH 0.3455"Img/paliwo.png"000tocolor(255255255255), false)
else
dxDrawImage(screenW 0.8001screenH 0.6276screenW 0.1830screenH 0.3055"Img/disk.png"000tocolor(255255255255), false)
               
dxDrawImage(screenW 0.7679screenH 0.6833screenW 0.2555screenH 0.2463"Img/needle.png"7+speedy00tocolor(255255255255), true)  
end
 
end


function getVehicleRPM(vehicle)
local vehicleRPM 0
    if (vehiclethen  
        if (getVehicleEngineState(vehicle) == truethen
            if getVehicleCurrentGear(vehicle) > 0 then             
                vehicleRPM math.floor(((getElementSpeed(vehicle"kmh")/getVehicleCurrentGear(vehicle))*180) + 0.5) 
                if (vehicleRPM 650then
                    vehicleRPM math.random(650750)
                elseif (vehicleRPM >= 8000then
                    vehicleRPM math.random(80008100)
                end
            else
                vehicleRPM math.floor((getElementSpeed(vehicle"kmh")*180) + 0.5)
                if (vehicleRPM 650then
                    vehicleRPM math.random(650750)
                elseif (vehicleRPM >= 8100then
                    vehicleRPM math.random(80008100)
                end
            end
        else
            vehicleRPM 0
        end
        return tonumber(vehicleRPM)
    else
        return 0
    end
end

dxDrawText(('%01d'):format(math.floor(przebieg)).." Km", (screenW 0.7679) + 1, (screenH 0.6733) + 1, (screenW 0.2455) + 1, (screenH 0.2363) + 1tocolor(140170230255), 1.00"default-bold""center""center"falsefalsetruefalsefalse)
        
local fuel getElementData(veh,"vehicle:fuel") or 0
            if fuel 10 then
            r4,g4,b4 255,0,0
        else
            r4,g4,b4 255,255,255
    end
        if isElementFrozen(vehthen
            r1,g1,b1 255,0,0
        else
            r1,g1,b1 255,255,255
        end
        if getVehicleOverrideLights(veh) ~= 2 then
            r3,g3,b3 255,255,255
        else
            r3,g3,b3 70,184,73
        else
            r3,g3,b3 50,205,50
        else    
            r3,g3,b3 123,104,238
        else
            r3,g3,b3 128,0,0
        else
            r3,g3,b3 = 
        end
dxDrawImage(screenW 0.9597screenH 0.4336screenW 0.0212screenH 0.0378"Img/paliwo.png"000tocolor(r4g4b4255), false)   
end
end

addEventHandler("onClientVehicleEnter",root,function(plr)
    if plr ~= localPlayer then return end
    local v getPedOccupiedVehicle(localPlayer)
    if rowery[getElementModel(v)] then return end
    addEventHandler("onClientRender",root,LicznikPojazdu)
end)

addEventHandler("onClientVehicleExit",root,function(plr,seat)
    if plr ~= localPlayer then return end
    if seat ~= 0 then return end
    removeEventHandler("onClientRender",root,LicznikPojazdu)
end)



prosz? o przerobienie ?eby by?o wida? na liczniku km/h oraz obroty i przebieg

Ostatnio zmieniony przez Wilq 2020-08-09, 22:42, w całości zmieniany 3 razy  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-08-28, 14:54


czaszka







Wiek: 23
Na forum: 2272 dni
Posty: 35
Nick w MP: Gangus*

Piwa: 9

Respekt: 25,8

Witam czy przerobi? by mi kto? panel logowania aby nie trzeba by?o go ??czy? z forum?.













local mysqlForum
function mysqlForum_connect()
    mysql dbConnect("mysql""dbname=forum-essa-byku;host=147.135.209.245""forum-essa""RrdorDm1XNbMHaUk""share=1")
    if not mysql then
        outputDebugString("[rpg_login] Connection: false")
    else
        outputDebugString("[rpg_login] Connection: true")
    end
end
addEventHandler("onResourceStart"resourceRootmysqlForum_connect)

function mysqlForum_query(...)
    local qh dbQuery(mysqldbPrepareString(mysql, ...))
    if not qh then return false end
    local resultnum_affected_rowslast_insert_id dbPoll(qh, -1)
    return resultnum_affected_rowslast_insert_id
end


addEvent("onPlayerAccountLogin"true)
local defpos "1734.80078125, -1949.306640625, 14.1171875, 88, 0, 0" -- Domy?lna pozycja musi byw stringu!

function auth(usernamepassword)
    if not username then
        triggerClientEvent(source"addErrorLoginText"source"B??d logowania. Kod b??du [ERR_A1]")
        return
    end
    if not password then
        triggerClientEvent(source"addErrorLoginText"source"B??d logowania. Kod b??du [ERR_A2]")
        return
    end
    local q exports.rpg_mysql:mysql_query("SELECT * FROM rpg_accounts WHERE username=? AND password=?"usernamemd5(password))
    if #q > 1 then -- Znaleziono wi?cej ni? 1 usera o podanej kombinacji loginu i has?a
        triggerClientEvent(source"addErrorLoginText"source"B??d logowania. Kod b??du [ERR_A3]")
    elseif #q < 1 then -- Nie znaleziono ?adnego usera o podanej kombinacji loginu i has?a
        triggerClientEvent(source"addErrorLoginText"source"Taki u?ytkownik nie istnieje")
    else -- Jest tylko jeden userHura!
        local player source
        if not player then return end
        
        local block false
        for i,v in pairs(getElementsByType("player")) do
            if getElementData(v"user:uid") == q[1].uid then
                exports.rpg_noti:createNotification(player"error""Ten u?ytkownik jest ju? zalogowany"7000)
                block true
                return
            end
        end

        if block then return end
        triggerClientEvent(player"saveLoginXML"playerusernamepassword)

        if q[1].imie == "" and q[1].nazwisko then
            triggerClientEvent(player,"openAccPanel"player)
        return end

        if getElementData(player"loginpanel"then return end
        player:setData("loginpanel"true)
        setTimer(function()
        player:setData("loginpanel"false)
        end10001)

        triggerClientEvent(player"closeLoginPanel"player)

        -- local qCode mysqlForum_query(string.format("SELECT `authCode` FROM `connectCodes` WHERE `userName` = '%s'"q[1].imie.." "..q[1].nazwisko))
        -- if #qCode > 0 then
        --     setElementData(player"user:authCode"qCode[1].authCode)
        -- end

        if tostring(q[1].prolog) == "0" then
            triggerClientEvent(player"createLoadingWindow"player"Wczytywanie prologu")
        else
            triggerClientEvent(player"createLoadingWindow"player"Wczytywanie postaci")
        end

        setPlayerName(playerstring.format("%s"q[1].nazwisko))
        player:setData("user:money"tonumber(q[1].money))

        player:setData("user:uid"q[1].uid)
        player:setData("user:username"q[1].username)
        player:setData("user:email"q[1].email)
        player:setData("user:imie"q[1].imie)
        player:setData("user:nazwisko"q[1].nazwisko)
        player:setData("user:regdate"q[1].regdate)
        player:setData("user:PulsCoins"tonumber(q[1].PulsCoins))
        player:setData("user:serial"q[1].serial)
        player:setData("user:ip"q[1].ip)
        player:setData("user:skin"q[1].skin)
        player:setData("user:stamina"tonumber(q[1].stamina))
        player:setData("user:EQskin"q[1].EQskin)
        player:setData("user:plec"q[1].plec)
        player:setData("user:rasa"q[1].rasa)
        player:setData("user:bankmoney"tonumber(q[1].bankmoney))
        player:setData("user:gamescore"tonumber(q[1].gamescore))
        player:setData("user:job"q[1].job)
        player:setData("user:jobmoney"tonumber(q[1].jobmoney))
        player:setData("user:org"q[1].organization)
        player:setData("user:pjA"q[1].pjA)
        player:setData("user:pjB"q[1].pjB)
        player:setData("user:pjC"q[1].pjC)
        player:setData("user:onlinetime"tonumber(q[1].onlinetime))
        player:setData("user:afktime"tonumber(q[1].afktime))
        player:setData("user:aduty"false)
        player:setData("user:login"true)
        player:setData("hud:settings"q[1].hudSettings)
        player:setData("shader:settings"q[1].shaderSettings)
        player:setData("player:settings"q[1].playerSettings)
        player:setData("user:dailySpin"q[1].freeSpin)
        player:setData("user:bwTime"q[1].bwTime)

        if tostring(q[1].dm) == "1" then
            player:setData("user:dm"true)
            toggleControl(player"fire"true)
            toggleControl(player"aim_weapon"true)
            toggleControl(player"vehicle_fire"true)
            toggleControl(player"vehicle_secondary_fire"true)
        else
            player:setData("user:dm"false)
            toggleControl(player"fire"false)
            toggleControl(player"aim_weapon"false)
            toggleControl(player"vehicle_fire"false)
            toggleControl(player"vehicle_secondary_fire"false)
        end


        if string.len(q[1].serial) < 1 then
            local serial getPlayerSerial(player)
            local q2 exports.rpg_mysql:mysql_query("UPDATE rpg_accounts SET serial=? WHERE uid=?"serialq[1].uid)
            if not q2 then
                triggerClientEvent(source"addErrorLoginText"source"B??d logowania. Kod b??du [ERR_A4]")
                return
            end
        end

        if string.len(q[1].ip) < 1 then
            local ip getPlayerIP(player)
            local q3 exports.rpg_mysql:mysql_query("UPDATE rpg_accounts SET ip=? WHERE uid=?"ipq[1].uid)
            if not q3 then
                triggerClientEvent(source"addErrorLoginText"source"B??d logowania. Kod b??du [ERR_A5]")
                return
            end
        end

        local q2 exports.rpg_mysql:mysql_query("SELECT * FROM rpg_admins WHERE user=?"q[1].uid)
        if #q2 > 0 then
            local adminQuerry exports.rpg_mysql:mysql_query("SELECT * FROM rpg_rankList WHERE id=?"q2[1].rankID)
            player:setData("user:admin"true)
            player:setData("user:adminRankID"tonumber(q2[1].rankID))
            player:setData("admin:name"tostring(adminQuerry[1].RankName))
            player:setData("user:aperm"q2[1])

            local colorAdmin split(adminQuerry[1].RGB",")
            player:setData("admin:colorR"tonumber(colorAdmin[1]))
            player:setData("admin:colorG"tonumber(colorAdmin[2]))
            player:setData("admin:colorB"tonumber(colorAdmin[3]))
            player:setData("admin:silentEnter"q2[1].silentEnter)
        else
            player:setData("user:admin"false)
            player:setData("user:aperm"false)
        end

        if q[1].premium ~= "" and q[1].premium ~= nil then
            local pd split(q[1].premium" ")
            local pd1 split(pd[1], "-")
            local pd2 split(pd[2], ":")
            local ts1 getTimestamp()
            local ts2 getTimestamp(pd1[1], pd1[2], pd1[3], pd2[1], pd2[2], pd2[3])
            if ts1 <= ts2 then
                local fs ts2 ts1
                local p_left math.floor(fs/86400)
                if p_left 1 then
                    p_left math.floor(fs/3600)
                    if p_left 1 then
                        p_left math.floor(fs/60).."m"
                    else
                        p_left p_left.."h"
                    end
                else
                        p_left p_left.."d"
                end

                player:setData("user:premium"true)
                player:setData("user:premium:left"p_left)
                player:setData("user:premium:ts"ts2)
                setPlayerNametagColorplayer2552000)
                setTimer(function() exports.rpg_noti:createNotification(player"info""Twoje konto premium pozostanie wa?ne jeszcze przez oko?o "..p_left7000end40001)
            else
                player:setData("user:premium"false)
                player:setData("user:premium:left"false)
            end
        else
            player:setData("user:premium"false)
            player:setData("user:premium:left"false)
        end

        setTimer(function ()
            if not player then return end
            triggerClientEvent(player"removeLoadingWindow"player)
            local pos split(q[1].position",")
            spawnPlayer(playerpos[1], pos[2], pos[3], pos[4], q[1].skinpos[5], pos[6])

            setElementHealth(playerq[1].health)
            setPedArmor(playerq[1].armor)

            setCameraTarget(playerplayer)
            player:setData("user:logged"true)
            if tonumber(pos[5]) < 1 then
                player:setData("hud:radar"true)
            end
            player:setData("hud:enabled"true)
            local hudSettings split(getElementData(player"hud:settings"), ',')
            if tonumber(hudSettings[4]) == 1 then
            showChat(playertrue)
            end
            if tonumber(getElementData(player"admin:silentEnter")) == 1 then
                setElementAlpha(player0)
                player:setData("admin:inv"true)
            end

            player:setData("user:prolog",q[1].prolog)
            if tostring(q[1].prolog) == "0" then
                setTimer(function()
                    triggerClientEvent(player"startProlog"player)
                end500,)
            end

            if tostring(q[1].plec) == "2" then
                setPedWalkingStyle(player129)
            else
                setPedWalkingStyle(player118)
            end

        end30001)

        triggerClientEvent(player,"core:blipyaut",player,player)
        triggerEvent("loadPlayerXP",root,player)

        loadImgFormForum(playerq[1].imieq[1].nazwisko)

        player:setData("user:logged"true)
        triggerEvent("syncPlayerItemsWhenLogIn",root,player)
    end
end
addEvent("auth"true)
addEventHandler("auth"getRootElement(), auth)


function loadImgFormForum(plrimienazwisko)
    local q mysqlForum_query(string.format("SELECT pp_thumb_photo FROM `core_members` WHERE `member_title` = '%s' LIMIT 1"tostring(imie.." "..nazwisko)))
    -- if #q > 0 then
    --     if not q[1].pp_thumb_photo then return end
    --     getAvatar(plrtostring("https://forum.empiresantos.pl/uploads/"..q[1].pp_thumb_photo))
    -- end
end


function getAvatar(plrlink)
  if not link then return end
  fetchRemote(linkcallBackAvatar""falseplrlink)
end


function callBackAvatar(dataerrorplrlink)
  if error and error 0 then print("[AVATAR] fetchRemote error number: "..error.."!") return end
  triggerClientEvent(plr'setHudAvatar'plrdata)
end



function register(usernamepasswordemail)
    if not username then
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_R1]")
        return
    end
    if not password then
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_R2]")
        return
    end
    if not email then
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_R3]")
        return
    end
    local q1 exports.rpg_mysql:mysql_query("SELECT username FROM rpg_accounts WHERE username=?"username)
    if not q1 then
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_R4]")
        return
    elseif #q1 > 0 then
        triggerClientEvent(source"addErrorLoginText"source"Podany login jest ju? w u?yciu")
        return
    end
    local q2 exports.rpg_mysql:mysql_query("SELECT email FROM rpg_accounts WHERE email=?"email)
    if not q2 then
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_R5]")
        return
    elseif #q2 > 0 then
        triggerClientEvent(source"addErrorLoginText"source"Podany adres E-Mail jest ju? w u?yciu")
        return
    end

    local ip getPlayerIP(source)
    local serial getPlayerSerial(source)
    local q3 exports.rpg_mysql:mysql_query("INSERT INTO rpg_accounts SET username=?, password=?, email=?, serial=?, ip=?, position=?, premium=''"usernamemd5(password), emailserialipdefpos)
    if q3 then
        triggerClientEvent(source"addErrorLoginText"source"Twoje konto zosta?o poprawnie utworzone \nMo?esz si? teraz zalogowa? i utworzy? swoj? posta?""success")
    else
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_R7]")
    end
end
addEvent("register"true)
addEventHandler("register"getRootElement(), register)


function accCreate(imienazwiskoplecrasaskinusernamepassword)
    imie string.lower(imie)
    nazwisko string.lower(nazwisko)
    imie imie:gsub("^%l"string.upper)
    nazwisko nazwisko:gsub("^%l"string.upper)
    local userName imie.." "..nazwisko

    local q3 exports.rpg_mysql:mysql_query("SELECT imie AND nazwisko FROM rpg_accounts WHERE imie=? AND nazwisko=?"imienazwisko)
    if not q3 then
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_C1]")
        return
    elseif #q3 > 0 then
        triggerClientEvent(source"addErrorLoginText"source"Osoba o takim imieniu i nazwisku istnieje")
        return
    end

    local q3 exports.rpg_mysql:mysql_query("UPDATE rpg_accounts SET imie=?, nazwisko=?, plec=?, EQSkin=-1, skin=?, rasa=? WHERE username=?"imienazwiskoplecskinrasausername)
    local q4 mysqlForum_query(string.format("INSERT INTO `connectCodes`(`authCode`, `userName`) VALUES ('%s','%s')"md5(userName), userName))
    if q3 then
        triggerClientEvent(source"closeLoginPanel"source)
        auth(usernamepassword)
    else
        triggerClientEvent(source"addErrorLoginText"source"B??d rejestracji. Kod b??du [ERR_C2]")
    end
end
addEvent("accCreate"true)
addEventHandler("accCreate"getRootElement(), accCreate)


function quit(quitType)
    player source

    exports.rpg_items:disarmPlayer(player)
    local uid getElementData(player"user:uid")
    if not uid then return end
    local money getElementData(player"user:money")
    local bankmoney getElementData(player"user:bankmoney")
    local hasToPay getElementData(player"gasStationPlayer:allToPay")

    if hasToPay then
        if hasToPay 0 then
            if money hasToPay 0 then
                bankmoney bankmoney hasToPay
            else
                money money hasToPay
            end
        end
    end

    if getElementData(player"user:prolog"then prolog getElementData(player"user:prolog") else prolog 0 end

    local freeSpin getElementData(player"user:dailySpin")
    local gamescore getElementData(player"user:gamescore")
    local PulsCoins getElementData(player"user:PulsCoins")
    local skin getElementData(player"user:skin")
    local EQskin getElementData(player"user:EQskin")

    local x,y,getElementPosition(player)
    local _,_,rz getElementRotation(player)
    local int getElementInterior(player)
    local dim getElementDimension(player)
    if getElementData(player"player:positionOnQuit"then
        pos getElementData(player"player:positionOnQuit")
        x,y,pos[1], pos[2], pos[3]
        int pos[4] and pos[4] or 0
        dim pos[5] and pos[5] or 0
    end

    local health getElementHealth(player)
    local armor getPedArmor(player)
    local stamina getElementData(player"user:stamina")
    local pos x..", "..y..", "..z..", "..rz..", "..int..", "..dim

    local job getElementData(player"user:job") or 0
    local jobmoney getElementData(player"user:jobmoney") or 0
    local onlinetime getElementData(player"user:onlinetime")
    local afktime getElementData(player"user:afktime")
    local hudSettings getElementData(player"hud:settings")
    local shaderSettings getElementData(player"shader:settings")
    local playerSettings getElementData(player"player:settings")
    local bwTime getElementData(player"user:bwTime")
    local xp getElementData(player"user:xp")
    local lvl getElementData(player"user:lvl")
    local skillPoints getElementData(player"user:skillPoints")
    if getElementData(player"user:dm"then dm else dm 0 end
    local q exports.rpg_mysql:mysql_query("UPDATE rpg_accounts SET money=?, bankmoney=?, gamescore=?, skin=?, EQskin=?, position=?, health=?, armor=?, stamina=?, job=?, jobmoney=?, onlinetime=?, afktime = ?, PulsCoins=?, hudSettings = ?, shaderSettings = ?, playerSettings = ?, freeSpin = ?, prolog=?, bwTime = ?, skillPoints = ?, xp = ?, lvl = ?, dm = ? WHERE uid=?"moneybankmoneygamescoreskinEQskinposhealtharmorstaminajobjobmoneyonlinetimeafktimePulsCoinshudSettingsshaderSettingsplayerSettingsfreeSpinprologbwTimeskillPointsxplvldmuid)
    if not q then
        outputDebugString("[rpg_accounts] Wyst?pi? problem z zapisywaniem gracza o UID "..uid)
    end
end
addEventHandler("onPlayerQuit"getRootElement(), quit)

function getUpdate(playerSource)
    local updateList false
    local qList exports.rpg_mysql:mysql_query("SELECT * FROM rpg_updates ORDER BY id DESC")
        for i,v in ipairs(qList) do
            if not updateList then
                updateList v.Text
            end
        end

    ----------- ADMINI ---------
    local checkPlayerTable = {}
    local checkPlayer ''

    local allAdminTable = {}


    for _,id in ipairs(exports.rpg_mysql:mysql_query("SELECT * FROM rpg_rankList")) do
        local rankId id["id"]

            local rgbTable split(id["RGB"], ",")
            local hex RGBToHex(tonumber(rgbTable[1]),tonumber(rgbTable[2]),tonumber(rgbTable[3]))
            table.insert(allAdminTabletostring(hex..""..id["RankNamePrular"]..":"))

            for _,v in ipairs(exports.rpg_mysql:mysql_query("SELECT * FROM rpg_admins")) do
                for _player in ipairs(getElementsByType("player")) do
                    if getElementData(player"user:logged"then
                        if getElementData(player"user:adminRankID") == rankId then
                        local dane getElementData(player"user:imie").." "..getElementData(player"user:nazwisko")
                            if not string.find(checkPlayerv["Nick"]) then
                                if dane == v["Nick"] and not getElementData(player"admin:inv"then
                                    checkPlayer tostring(checkPlayer..'\n#ffffff&#8226; '..tostring(v["Nick"])..'#00ff00  (ONLINE)')
                                    table.insert(allAdminTabletostring('#ffffff&#8226; '..tostring(v["Nick"])..'#00ff00  (ONLINE)'))
                                end
                            end
                        end
                    end
                end
            end

            for _,v in ipairs(exports.rpg_mysql:mysql_query("SELECT * FROM rpg_admins")) do
                if not string.find(checkPlayerv["Nick"]) then
                    if v["rankID"] == rankId then
                        checkPlayer tostring(checkPlayer..'\n#ffffff&#8226; '..tostring(v["Nick"])..'ff0000  (OFFLINE)')
                        table.insert(allAdminTabletostring('#ffffff&#8226; '..tostring(v["Nick"])..'#ff0000  (OFFLINE)'))
                    end
                end
            end

        rankId rankId 1

    end

    triggerClientEvent playerSource"addUpdate"playerSourceallAdminTableupdateList)
end
addEvent"getUpdate"true )
addEventHandler"getUpdate"resourceRootgetUpdate )


function respawn(plr)
    setElementPosition(plr1727.27734375, -1912.043945312513.563561439514)
    setElementRotation(plr0,0,88)
end
addEvent"setPlayerOnSpawn"true )
addEventHandler"setPlayerOnSpawn"resourceRootrespawn)

----------------
---- UTILS ----
----------------
function getKoncowka(timek1k2k3)
    if time == 0 then
        return k1
    elseif time == 1 then
        return k2
    else
        return k3
    end
end

function getTimestamp(yearmonthdayhourminutesecond)
    -- initiate variables
    local monthseconds = { 267840024192002678400259200026784002592000267840026784002592000267840025920002678400 }
    local timestamp 0
    local datetime getRealTime()
    yearmonthday year or datetime.year 1900month or datetime.month 1day or datetime.monthday
    hourminutesecond hour or datetime.hourminute or datetime.minutesecond or datetime.second

    -- calculate timestamp
    for i=1970year-do timestamp timestamp + (isLeapYear(i) and 31622400 or 31536000end
    for i=1month-do timestamp timestamp + ((isLeapYear(year) and == 2) and 2505600 or monthseconds[i]) end
    timestamp timestamp 86400 * (day 1) + 3600 hour 60 minute second

    timestamp timestamp 3600 --GMT+1 compensation
    if datetime.isdst then timestamp timestamp 3600 end

    return timestamp
end

function isLeapYear(year)
    if year then year math.floor(year)
    else year getRealTime().year 1900 end
    return ((year == and year 100 ~= 0) or year 400 == 0)
end

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




setTimer(function()
    local time getTimestamp()
    local ilosc 0

    for i,v in ipairs(getElementsByType("player")) do
        if getElementData(v"user:logged") and getElementData(v"user:uid"then
            quitUpdate(v)
            ilosc ilosc 1
        end
    end

    print("[AUTO ZAPIS] Zapisano "..ilosc.." graczy w czasie "..(getTimestamp() - time).." ms")
end1200000)

function quitUpdate(player)
    local uid getElementData(player"user:uid")
    if not uid then return end
    local money getElementData(player"user:money")
    local bankmoney getElementData(player"user:bankmoney")
    local hasToPay getElementData(player"gasStationPlayer:allToPay")

    if hasToPay then
        if hasToPay 0 then
            if money hasToPay 0 then
                bankmoney bankmoney hasToPay
            else
                money money hasToPay
            end
        end
    end

    if getElementData(player"user:prolog"then prolog getElementData(player"user:prolog") else prolog 0 end

    local freeSpin getElementData(player"user:dailySpin")
    local gamescore getElementData(player"user:gamescore")
    local PulsCoins getElementData(player"user:PulsCoins")
    local skin getElementData(player"user:skin")
    local EQskin getElementData(player"user:EQskin")

    local x,y,getElementPosition(player)
    local _,_,rz getElementRotation(player)
    local int getElementInterior(player)
    local dim getElementDimension(player)
    if getElementData(player"player:positionOnQuit"then
        pos getElementData(player"player:positionOnQuit")
        x,y,pos[1], pos[2], pos[3]
        int pos[4] and pos[4] or 0
        dim pos[5] and pos[5] or 0
    end

    local health getElementHealth(player)
    local armor getPedArmor(player)
    local stamina getElementData(player"user:stamina")
    local pos x..", "..y..", "..z..", "..rz..", "..int..", "..dim

    local job getElementData(player"user:job") or 0
    local jobmoney getElementData(player"user:jobmoney") or 0
    local onlinetime getElementData(player"user:onlinetime")
    local afktime getElementData(player"user:afktime")
    local hudSettings getElementData(player"hud:settings")
    local shaderSettings getElementData(player"shader:settings")
    local playerSettings getElementData(player"player:settings")
    local bwTime getElementData(player"user:bwTime")
    local xp getElementData(player"user:xp")
    local lvl getElementData(player"user:lvl")
    local skillPoints getElementData(player"user:skillPoints")
    if getElementData(player"user:dm"then dm else dm 0 end
    local q exports.rpg_mysql:mysql_query("UPDATE rpg_accounts SET money=?, bankmoney=?, gamescore=?, skin=?, EQskin=?, position=?, health=?, armor=?, stamina=?, job=?, jobmoney=?, onlinetime=?, afktime = ?, PulsCoins=?, hudSettings = ?, shaderSettings = ?, playerSettings = ?, freeSpin = ?, prolog=?, bwTime = ?, skillPoints = ?, xp = ?, lvl = ?, dm = ? WHERE uid=?"moneybankmoneygamescoreskinEQskinposhealtharmorstaminajobjobmoneyonlinetimeafktimePulsCoinshudSettingsshaderSettingsplayerSettingsfreeSpinprologbwTimeskillPointsxplvldmuid)
    if not q then
        outputDebugString("[rpg_accounts] Wyst?pi? problem z zapisywaniem gracza o UID "..uid)
    end
end


Komentarz PatryKK. dodany 2020-08-28, 23:00Używaj tagów [lua][/lua]
Ostatnio zmieniony przez PatryKK. 2020-08-28, 23:00, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-09-11, 22:50


Londi







Wiek: 36
Na forum: 3697 dni
Posty: 23
Nick w MP: Londi



Respekt: 50

M?g?by mi kto? powiedzie?, co jest odpowiedzialne za to, ?e na GM XYZZYRP gdy lece do SF lub LV to usuwa mape i wyrzuca mnie w puste pole?

Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-10-03, 12:24


kamilek1983







Wiek: 26
Na forum: 2108 dni
Posty: 1
Nick w MP: Kamil.



Respekt: 50

https://megawrzuta.pl/download/7bce56aa54d5587643ec94df2ee8d8cc.html

M?g?by kto? doda? tutaj mo?liwo?? spawnu na domek/posiad?o???

Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-10-03, 14:35


Maniekxx

Amator






Wiek: 24
Na forum: 2894 dni
Posty: 232
Nick w MP: Maniekxx

Piwa: 225

Respekt: 110
Respekt: 110

Ostrzeżeń: 20%
Londi, Przenoszenie gracza przy pr?bie opuszczenie Los Santos: lss-core > mapwrap.lua
Za usuni?cie wszystkich obiekt?w opr?cz tych znajduj?cych si? w Los Santos odpowiada zas?b lss-mapa. Po wy??czeniu zasobu nale?y ponownie po??czy? si? z serwerem w celu pobrania pozosta?ych fragment?w mapy.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-10-28, 08:39


tk3r







Wiek: 24
Na forum: 2072 dni
Posty: 3
Nick w MP: tk3r



Respekt: 50

Witam,mam problem z przerobieniem nazwy tego skryptu https://imgur.com/a/gNpD9sL
Chcia?bym aby zamieni? t? nazw? denverMTA na ComfortRPG-(tak jak sie nazywa m?j serwer).
Je?li m?g?by kto? mi to zamieni? serdecznie dzi?kuj? Link do owego skryptu: http://hostuje.net/file.p...df6e153af3e12f0

Komentarz Wilq dodany 2020-10-28, 09:14Pomagamy tu na forum.
Ostatnio zmieniony przez Wilq 2020-10-28, 09:13, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-10-28, 09:29


TheSebaPL

Mod-team






Wiek: 21
Na forum: 3098 dni
Posty: 964

Piwa: 3102

Respekt: 640,5
Respekt: 640,5Respekt: 640,5

tk3r, w skrypcie kt?ry podes?a?e? do przer?bki nie ma owego napisu poniewa? jest on raczej w skrypcie kt?ry odpowiada za gara?e.

[ Dodano: 2020-10-30, 13:31 ]
Prosi?bym o przerobienie owego panelu logowania aby by?a mo?liwo?? respienia w domku (Panel jest pod pysa 3.0)

Kod:

--[[ Author: Qwertick ]]--

if getElementData(localPlayer, "player:logged") then return end

local spawns = {
{name = "Los Santos", pos = Vector3(1214.97, -1812.75, 16.59),},
{name = "San Fierro", pos = Vector3(-2049.62, 465.34, 35.17),},
{name = "Prawo Jazdy", pos = Vector3(1568.04, -1893.97, 13.56),},
{name = "Przechowywalnia LS", pos = Vector3(1296.48, -1868.84, 13.55),},
}

local map = {
size = 1980,
zoom = {
actual = 3.0,
limit = {1.3, 3.0},
plus = 0,
},
moving = nil,
unit = 1980/6000
}

local worldW, worldH = 0, 0
local mapOffsetX, mapOffsetY = 0, 0
playerMapOffsetX, playerMapOffsetY = 0, 0

map.positions = {}
map.positions.w, map.positions.h = 733*px, 462*py
map.positions.x, map.positions.y = 650*px, 309*py

local newPlayerX, newPlayerY = nil, nil

local function clickMap(button, state, cx, cy)
if chooseSpawn then
if button == "left" then
if state == "down" then
local x, y, w, h = map.positions.x, map.positions.y, map.positions.w, map.positions.h
if cx >= x and cx <= x + w and cy >= y and cy <= y + h then
mapOffsetX = cx * map.zoom.actual + playerMapOffsetX
mapOffsetY = cy * map.zoom.actual - playerMapOffsetY
mouseCurrentPositionX, mouseCurrentPositionY = getCursorPosition( )
end
elseif state == "up" then
map.moving = nil
end
end
if button == "left" and state == "down" then
for i,v in ipairs(spawns) do
local offsetY = (49*px) * (i - 1)
if mouseIn(408*px, 349*py + offsetY, 232*px, 39*py) then
triggerServerEvent("logging:spawn", resourceRoot, {pos = {x = v.pos.x, y = v.pos.y, z = v.pos.z}})
spawnGui(nil)
end
end
end
end
end

local function keyMap(key)
if chooseSpawn then
if key == "mouse_wheel_down" then
map.zoom.actual = map.zoom.actual + 0.1
if (map.zoom.actual > map.zoom.limit[2]) then
map.zoom.actual = map.zoom.limit[2]
end
elseif key == "mouse_wheel_up" then
map.zoom.actual = map.zoom.actual - 0.1
if (map.zoom.actual < map.zoom.limit[1]) then
map.zoom.actual = map.zoom.limit[1]
end
end
end
end

local function renderMap()
if chooseSpawn then
alphaSpawn = interpolateBetween(0, 0, 0, 255, 0, 0, (getTickCount() - tickSpawn) / 500, "Linear")
alphaSpawn2 = interpolateBetween(0, 0, 0, 200, 0, 0, (getTickCount() - tickSpawn) / 500, "Linear")
end

local x, y, w, h = map.positions.x, map.positions.y, map.positions.w, map.positions.h;

local absx, absy = 0, 0

if isCursorShowing() then
local cursorX, cursorY = getCursorPosition()
absx = cursorX * sx
absy = cursorY * sy
end

worldW, worldH=map.size*map.zoom.actual, map.size*map.zoom.actual
local mapPX, mapPY = 0, 0
mapPX, mapPY = getPosInMap(absx, absy)
mapX, mapY = map.positions.w/2 - mapPX, map.positions.h/2 + mapPY

if getKeyState("mouse1") and not movvv then
if( mouseCurrentPositionX ~= absx and mouseCurrentPositionX ~= absy )then
map.moving = true
end

if( map.moving )then
playerMapOffsetX = -( absx * map.zoom.actual - mapOffsetX )
playerMapOffsetY = (absy * map.zoom.actual - mapOffsetY)
playerMapOffsetX = math.max( -3000, math.min( 3000, playerMapOffsetX ) )
playerMapOffsetY = math.max( -3000, math.min( 3000, playerMapOffsetY ) )
end
else
map.moving = nil
end

local mapX = ( ( ( 3000 + playerMapOffsetX ) * map.unit ) - ( w/2 ) * map.zoom.actual )
local mapY = ( ( ( 3000 - playerMapOffsetY ) * map.unit ) - ( h/2 ) * map.zoom.actual )
local mapWidth, mapHeight = w*map.zoom.actual, h*map.zoom.actual

dxDrawImageSection(x, y, w, h, mapX, mapY, mapWidth, mapHeight, tex["map"], 0, 0, 0, tocolor(255, 255, 255, alphaSpawn))

if newPlayerX and newPlayerY then
playerMapOffsetX, playerMapOffsetY = interpolateBetween(playerMapOffsetX, playerMapOffsetY, 0, newPlayerX, newPlayerY, 0, (getTickCount() - tick) / 750, "OutQuad")
if getTickCount() - tick > 750 then
newPlayerX, newPlayerY = nil, nil
movePoint = nil
movvv = nil
end
end

roundedRectangle(408*px, 309*py, 232*px, 462*py, tocolor(0, 0, 0, alphaSpawn2), false)
dxDrawText("Spawny", 408*px, 309*py, 640*px, 349*py, tocolor(255, 255, 255, alphaSpawn), 1.00, font1, "center", "center", false, false, false, false, false)
for i,v in ipairs(spawns) do
local offsetY = (49*px) * (i - 1)
local data = {name = v.name}
if mouseIn(408*px, 349*py + offsetY, 232*px, 39*py) and chooseSpawn then dxDrawRectangle(408*px, 349*py + offsetY, 232*px, 39*py, tocolor(40, 40, 40, alphaSpawn2), false) end
dxDrawText(data.name, 408*px, 348*py + offsetY * 2, 640*px, 388*py, tocolor(255, 255, 255, alphaSpawn), 1.00, font2, "center", "center", false, false, false, false, false)

local spawnX, spawnY = v.pos.x, v.pos.y

local centerX, centerY = (map.positions.x + (map.positions.w / 2)), (map.positions.y + (map.positions.h / 2))
local leftFrame = (centerX - map.positions.w / 2) + (28*px / 2)
local rightFrame = (centerX + map.positions.w / 2) - (28*px / 2)
local topFrame = (centerY - map.positions.h / 2) + (28*py / 2)
local bottomFrame = (centerY + map.positions.h / 2) - (28*py / 2)

spawnX, spawnY = getMapFromWorldPosition(spawnX, spawnY)
centerX = math.max(leftFrame, math.min(rightFrame, spawnX))
centerY = math.max(topFrame, math.min(bottomFrame, spawnY))
if mouseIn(408*px, 349*py + offsetY, 232*px, 39*py) and chooseSpawn then
dxDrawImage(centerX - 15*px, centerY - 25*py, 28*px, 28*py, tex["point"], 0, 0, 0, tocolor(255, 0, 0, alphaSpawn))
else
dxDrawImage(centerX - 15*px, centerY - 25*py, 28*px, 28*py, tex["point"])
end
if mouseIn(408*px, 349*py + offsetY, 232*px, 39*py) then
newPlayerX, newPlayerY = v.pos.x, v.pos.y
tick = getTickCount()
movePoint = true
movvv = true
end
end
end

function spawnGui(bool)
if bool then
createTextures()
dxSetTextureEdge(tex["map"], "border", tocolor(0, 0, 0, 0))
chooseSpawn = true
tickSpawn = getTickCount()
font1 = dxCreateFont("files/fonts/font.ttf", 12)
font2 = dxCreateFont("files/fonts/font.ttf", 10)
addEventHandler("onClientRender", root, renderMap)
addEventHandler("onClientClick", root, clickMap)
addEventHandler("onClientKey", root, keyMap)
else
showCursor(false)
showChat(true)
fadeCamera(true)
removeEventHandler("onClientRender", root, renderMap)
removeEventHandler("onClientClick", root, clickMap)
removeEventHandler("onClientKey", root, keyMap)
if font1 and font2 then destroyElement(font1) destroyElement(font2) end
chooseSpawn = nil
tickBg = getTickCount()
panel = nil
if intro then stopSound(intro) intro = nil end
destroyTextures()
end
end

--[[]]--
function getPositionFromElementOffset(element, offX, offY, offZ)
local m = getElementMatrix(element)
local x = offX * m[1][1] + offY * m[2][1] + offZ * m[3][1] + m[4][1]
local y = offX * m[1][2] + offY * m[2][2] + offZ * m[3][2] + m[4][2]
local z = offX * m[1][3] + offY * m[2][3] + offZ * m[3][3] + m[4][3]
return x, y, z
end

function getPosInMap( mapX, mapY )
local x, y, w, h = map.positions.x, map.positions.y, map.positions.w, map.positions.h
local worldX = playerMapOffsetX+( ( mapX-( x+w/2) ) / map.zoom.actual ) / map.unit
local worldY = playerMapOffsetY-( ( mapY-( y+h/2 ) ) / map.zoom.actual ) / map.unit

return worldX, worldY
end

function getMapFromWorldPosition(worldX, worldY)
local centerX, centerY = (map.positions.x + (map.positions.w / 2)), (map.positions.y + (map.positions.h / 2))
local mapLeftFrame = centerX - ((playerMapOffsetX - worldX) / map.zoom.actual * map.unit)
local mapRightFrame = centerX + ((worldX - playerMapOffsetX) / map.zoom.actual * map.unit)
local mapTopFrame = centerY - ((worldY - playerMapOffsetY) / map.zoom.actual * map.unit)
local mapBottomFrame = centerY + ((playerMapOffsetY - worldY) / map.zoom.actual * map.unit)

centerX = math.max(mapLeftFrame, math.min(mapRightFrame, centerX))
centerY = math.max(mapTopFrame, math.min(mapBottomFrame, centerY))

return centerX, centerY
end

function getWorldFromMapPosition(mapX, mapY)
local worldX = playerMapOffsetX + ((mapX * ((map.positions.w * map.zoom.actual) * 2)) - (map.positions.w * map.zoom.actual))
local worldY = playerMapOffsetY + ((mapY * ((map.positions.h * map.zoom.actual) * 2)) - (map.positions.h * map.zoom.actual)) * -1

return worldX, worldY
end


Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-15, 19:37


demoniskoxd







Wiek: 30
Na forum: 3989 dni
Posty: 79
Nick w MP: Francesco

Piwa: 1

Respekt: 50

Witam mam co? takiego chci??ym aby ktos pomogl to naprawic


ERROR: pystories-frakcje-ustawienia/s_skins.lua:79: attempt to compare nil with number


po wejsciu w blipa nie chce zmienic skina ;v






Kod:

local skins={
["SAPD"]={
code="SAPD",
positions={
{2323.78, 2569.65, 7506.10, 285, "", 0, 0, 10},
{2317.11, 2559.21, 7506.10, 71, "", 0, 0, 1},
{2316.71, 2569.65, 7506.10, 282, "", 0, 0, 20},
{2315.95, 2567.02, 7506.10, 281, "", 0, 0, 15},
{2315.95, 2563.41, 7506.10, 280, "", 0, 0, 10},
{2320.21, 2569.65, 7506.10, 284, "", 0, 0, 15},
},
text="Nie jeste? zatrudniony/a we frakcji:\n#bf0101SAPD #FFFFFF(#bf0101San Andreas Police Department#FFFFFF)",
},
["SAFD"]={
code="SAFD",
positions={
{-2106.08, 6.82, 35.32, 279, "SAFD\nStr?j bojowy", 0, 0, 1},
{-2127.63, 9.06, 39.89, 291,"SAFD\nStr?j koszarowy",0, 0, 1},
{-2106.08, 11.45, 35.32, 277,"SAFD\nStr?j bojowy (AODO)",0, 0, 10},
{-2107.00, -28.22, 39.89, 278,"SAFD\nStr?j zarz?du", 0, 0, 96},

},
text="Nie jeste? zatrudniony/a we frakcji:\n#bf0101SAFD #FFFFFF(#bf0101San Andreas Fire Department#FFFFFF)",
},
["SAMD"]={
code="SAMD",
positions={
{1279.60, -1264.16, 9048.13, 276, "SAMD\nStr?j piel?gniarza", 0, 0, 1},
{1277.71, -1264.16, 9048.13, 275, "SAMD\nStr?j ratownika medycznego",0, 0, 10},
{1277.88, -1281.55, 9048.13, 156, "SAMD\nStr?j lekarza",0,0,40},
{1264.34, -1282.48, 9048.13, 290, "SAMD\nStr?j dyrekcji",0,0,70},
{1264.12, -1262.56, 9048.13, 295, "SAMD\nStr?j szkoleniowca",0,0,70},
},
text="Nie jeste? zatrudniony/a we frakcji:\n#bf0101SAMD #FFFFFF(#bf0101San Andreas Medical Department#FFFFFF)",
},
["SARA"]={
code="SARA",
positions={
{1045.13, 1273.38, -29.03, 260, "SARA\nStr?j", 0, 0, 10},
{1046.88, 1273.38, -29.03, 27, "SARA\nStr?j",0, 0, 10},
},
text="Nie jeste? zatrudniony/a we frakcji:\n#bf0101SARA #FFFFFF(#bf0101San Andreas Road Assistance#FFFFFF)",
},
}

for _,skin in pairs(skins) do
for _,pos in ipairs(skin.positions) do
local pickup=createPickup(pos[1], pos[2], pos[3], 3, 1275, 2000)
--local pickup=createMarker(pos[1], pos[2], pos[3]-1, "cylinder", 1.1, 0, 100, 0, 50)
--setElementData(pickup, 'typ', 'ubranko')

setElementDimension(pickup,pos[6])
setElementInterior(pickup,pos[7])
setElementData(pickup,"p:faction",tostring(skin.code))
setElementData(pickup,"p:skin", tonumber(pos[4]))
setElementData(pickup,"p:rank", pos[8] or 1)
local t=createElement("text")
setElementData(t,"name",pos[5] or "Skin")
setElementDimension(t,pos[6])
setElementInterior(t,pos[7])
setElementPosition(t,pos[1],pos[2],pos[3]+1)
end
end

addEventHandler("onPickupHit", resourceRoot, function(el,md)
if getElementType(el)~="player" then return end
local faction=getElementData(source,"p:faction")
if not faction then return end
local skin=getElementData(source,"p:skin")
local rank=getElementData(source,"p:rank")
if not skin then return end
if not getPlayerFaction(el,faction) or getElementData(el,"player:faction") ~= faction then
--outputChatBox("#bf0101(✖) #FFFFFF"..skins[faction].text..".", el,255,255,255,true)
--exports.notification:showBox (el,"info",skins[faction].text)
triggerClientEvent( el, "onClientAddNotification", el, skins[faction].text, "error" )
cancelEvent()
return end
if rank then
if rank > getElementData(el,"player:rank") then
--outputChatBox(skins[faction].text, el)
--exports.notification:showBox (el,"info",skins[faction].text)
triggerClientEvent( el, "onClientAddNotification", el, "Tw?j stopie? jest zbyt niski..", "info" )
cancelEvent()
return end
end
setElementModel(el,skin)
end)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-15, 21:33


VVirmex

Sgrypter luja






Wiek: 21
Na forum: 3365 dni
Posty: 281
Nick w MP: AxyZ

Piwa: 234

Respekt: 110
Respekt: 110

Gdyby? jeszcze pokaza? kt?ra to linijka.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-16, 00:41


demoniskoxd







Wiek: 30
Na forum: 3989 dni
Posty: 79
Nick w MP: Francesco

Piwa: 1

Respekt: 50

Chcia?bym ?eby wyp?aty z frakcji wp?ywa?y na konto bankowe,je?li dacie rade pom??cie ;v


Kod:

--[[
Developed by Yolos
All rights reserved!
You cannot use this without permission!
--]]
local Frakcje = { ----- ILOSC PLNOW ZA 1 PRZEPRACOWANA MINUTE!!!!!!!!!!!!!!!!!!
["SAPD"] = 20000000,
["PSP"] = 20000000,
["SARA"] = 20000000,
["SAMD"] = 20000000,
["TSA"] = 20000000,
}




local marker=createMarker(-3419.27,393.18,17.91-1, "cylinder", 1.2, 0,64,255)
setElementInterior(marker,0)
setElementDimension(marker,69)
local text=createElement('text')
setElementPosition(text,-3419.27,393.18,17.91)
setElementData(text,"name","Wyp?aty\nFrakcyjne")
setElementInterior(text,0)
setElementDimension(text,69)

addEventHandler("onMarkerHit", marker, function(el,md)
local sid = getElementData(el,"player:sid")
local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_factions WHERE sid=?", sid)
if #result > 0 then
if Frakcje[result[1].code] then
if getElementData(el,"player:workinjob") and getElementData(el,"player:workinjob") >= 1 then
local money = (Frakcje[result[1].code] * getElementData(el,"player:workinjob"))
outputChatBox("* Otrzymujesz "..money.." PLN za przepracowanych "..getElementData(el,"player:workinjob").." minut!",el)
givePlayerMoney(el,money)
setElementData(el,"player:workinjob",0)
else
outputChatBox("* Nie masz nic do odebrania!",el)
end
else
outputChatBox("* Nie jeste? w frakcji, kt?ra mo?e odbiera? wyp?aty!",el)
end
end
end)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-16, 20:53


TheSebaPL

Mod-team






Wiek: 21
Na forum: 3098 dni
Posty: 964

Piwa: 3102

Respekt: 640,5
Respekt: 640,5Respekt: 640,5

demoniskoxd, trzymaj:

local Frakcje = {     ----- ILOSC PLNOW ZA 1 PRZEPRACOWANA MINUTE!!!!!!!!!!!!!!!!!!
["SAPD"] = 1000000,
["SARA"] = 1000000,
["ASA"] = 1000000,
["SAMD"] = 1000000,
["SAFD"] = 1000000,
}


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

function odbierz(el,md)
    local sid getElementData(el,"player:sid")
    local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_factions WHERE sid=?"sid)
    if #result > 0 then
        if Frakcje[result[1].codethen
            if getElementData(el,"player:workinjob") and getElementData(el,"player:workinjob") >= 1 then
                local money = (Frakcje[result[1].code] * getElementData(el,"player:workinjob"))
                local czas getElementData(el,"player:workinjob")
                setElementData(el,"player:workinjob",0)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?""0"getElementData(el"player:sid"))
                setTimer ( function()
                setElementData(el,"player:workinjob",0)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?""0"getElementData(el"player:sid"))
                exports["pystories-db"]:dbSet("UPDATE pystories_factions SET wyplat=wyplat+?, ostatnia_wyplata=now() WHERE sid=?"moneygetElementData(el"player:sid"))
                triggerClientEventel,  "onClientAddNotification"el"Pomy?lnie odebrano wyp?at? frakcyjn?\nGot?wka: #00c005"..money.." PLN#FFFFFF\nIlo?? przepracowanych minut: #00c005"..czas.." minut/a/y""success"  )
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET bank_money=bank_money+"..money.." WHERE id=?"getElementData(el"player:sid"))
                setElementData(el,"player:workinjob",0)
                end50001)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?""0"getElementData(el"player:sid"))
                setElementData(el,"player:workinjob",0)
            else
                    triggerClientEventel,  "onClientAddNotification"el"Nie mo?esz odebra? wyp?aty frakcyjnej.\nIlo?? przepracowanych minut: #bf01010 minut""error"  )
            end
        else
                    triggerClientEventel,  "onClientAddNotification"el"Nie mo?esz odebra? wyp?aty frakcyjnej.\nNie jeste? zatrudniony/a w ?adnej frakcji""error"  )
        end
    end
end
addEvent("wyplata"true)
addEventHandler("wyplata"resourceRootodbierz)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-17, 15:15


demoniskoxd







Wiek: 30
Na forum: 3989 dni
Posty: 79
Nick w MP: Francesco

Piwa: 1

Respekt: 50

"TheSebaPL" napisał/a:

demoniskoxd, trzymaj:

local Frakcje = {     ----- ILOSC PLNOW ZA 1 PRZEPRACOWANA MINUTE!!!!!!!!!!!!!!!!!!
["SAPD"] = 1000000,
["SARA"] = 1000000,
["ASA"] = 1000000,
["SAMD"] = 1000000,
["SAFD"] = 1000000,
}


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

function odbierz(el,md)
    local sid getElementData(el,"player:sid")
    local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_factions WHERE sid=?"sid)
    if #result > 0 then
        if Frakcje[result[1].codethen
            if getElementData(el,"player:workinjob") and getElementData(el,"player:workinjob") >= 1 then
                local money = (Frakcje[result[1].code] * getElementData(el,"player:workinjob"))
                local czas getElementData(el,"player:workinjob")
                setElementData(el,"player:workinjob",0)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?""0"getElementData(el"player:sid"))
                setTimer ( function()
                setElementData(el,"player:workinjob",0)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?""0"getElementData(el"player:sid"))
                exports["pystories-db"]:dbSet("UPDATE pystories_factions SET wyplat=wyplat+?, ostatnia_wyplata=now() WHERE sid=?"moneygetElementData(el"player:sid"))
                triggerClientEventel,  "onClientAddNotification"el"Pomy?lnie odebrano wyp?at? frakcyjn?\nGot?wka: #00c005"..money.." PLN#FFFFFF\nIlo?? przepracowanych minut: #00c005"..czas.." minut/a/y""success"  )
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET bank_money=bank_money+"..money.." WHERE id=?"getElementData(el"player:sid"))
                setElementData(el,"player:workinjob",0)
                end50001)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?""0"getElementData(el"player:sid"))
                setElementData(el,"player:workinjob",0)
            else
                    triggerClientEventel,  "onClientAddNotification"el"Nie mo?esz odebra? wyp?aty frakcyjnej.\nIlo?? przepracowanych minut: #bf01010 minut""error"  )
            end
        else
                    triggerClientEventel,  "onClientAddNotification"el"Nie mo?esz odebra? wyp?aty frakcyjnej.\nNie jeste? zatrudniony/a w ?adnej frakcji""error"  )
        end
    end
end
addEvent("wyplata"true)
addEventHandler("wyplata"resourceRootodbierz)




Nie dzia?a niestety ;/ M?g?by? to podpisa? pod to moje ?eby dzia?a?o ? chce tylko kase do bankomatu ?eby dostawali gracze

[ Dodano: 2020-11-18, 16:15 ]
Witam potrzebuje przeobic to zeby ghostmode dzialal po wejsciu do danego pojazdu a nie na komende


Kod:

--[[
Praca tramwaje

]]--
local code = "tramwaje"
local Kursytramwaje = {
{-2264.67, 525.08, 35.60},
{-2264.86, 554.23, 35.50},
{-2264.88, 597.16, 39.83},
{-2264.91, 652.92, 49.75},
{-2264.96, 721.44, 49.79},
{-2264.89, 802.29, 49.86},
{-2264.88, 894.73, 66.91},
{-2264.88, 998.42, 79.29},
{-2264.86, 1113.39, 76.58},
{-2272.89, 1237.89, 46.27},
{-2160.05, 1274.23, 27.32},
{-2039.96, 1307.38, 7.62},
{-1908.19, 1321.76, 7.50},
{-1792.88, 1378.78, 7.50},
{-1686.27, 1299.39, 7.50},
{-1595.23, 1199.52, 7.50},
{-1584.13, 1065.85, 7.50},
{-1529.82, 947.67, 7.50},
{-1641.08, 921.13, 16.97},
{-1776.48, 921.13, 25.12},
{-1911.54, 921.00, 35.71},
{-2001.63, 869.91, 45.75},
{-1881.63, 848.88, 35.50},
{-1745.98, 848.88, 25.18},
{-1610.50, 848.89, 8.00},
{-1540.12, 782.52, 7.50},
{-1630.59, 728.75, 14.87},
{-1711.55, 670.22, 25.12},
{-1795.04, 603.25, 33.79},
{-1930.54, 603.25, 35.50},
{-2003.41, 534.35, 35.50},
{-2003.63, 399.12, 35.50},
{-2004.68, 263.58, 31.81},
{-2006.50, 128.35, 28.00},
{-2045.20, 30.38, 35.62},
{-2166.55, 12.10, 35.62},
{-2223.97, -70.08, 35.62},
{-2253.73, 38.59, 35.62},
{-2251.50, 170.32, 35.62},
{-2251.50, 302.33, 35.62},
{-2306.47, 417.18, 35.50},
{-2362.24, 507.33, 30.00},
{-2269.28, 511.57, 35.51},

}


local jobTarget
local jobMarker
local jobVehicle
local maxTarget = #Kursytramwaje
function odleglosc()
local pojazd=getPedOccupiedVehicle(localPlayer)
if pojazd and getTrainSpeed(pojazd)<-0.9 then
setTrainSpeed(pojazd,-0.9)
end
end

function finishJob()
if jobMarker and isElement(jobMarker) then
destroyElement(jobMarker)
jobMarker = nil
end
if jobBlip and isElement(jobBlip) then
destroyElement(jobBlip)
jobBlip = nil
end
if jobTarget and isElement(jobTarget) then
outputChatBox("Ble ble wr?c")
destroyElement(jobTarget)
jobTarget = 0

end
if getElementData(localPlayer,"player:jobtram") == code then
setElementData(localPlayer,"player:jobtram",false)
end
triggerServerEvent("destroyVeh", localPlayer)
removeEventHandler("onClientRender",root,odleglosc)
end
addEventHandler ( "onClientPlayerWasted", getLocalPlayer(),finishJob)
addEvent("finishJob",true)
addEventHandler("finishJob",root,function(plr)
if plr ~= localPlayer then return end
finishJob()
end)


function TramwajeDriver(el, md)
if el ~= localPlayer or not md then return end
if jobTarget > maxTarget and getPedOccupiedVehicle(el) then return end
if jobTarget == maxTarget and not getPedOccupiedVehicle(el) then return end
--local kasapkt = math.random(80,120)
if jobTarget == #Kursytramwaje then
--[[playSoundFrontEnd(5)
outputChatBox("* Zako?czy?e?/a? pierwszy kurs!, ruszaj w nast?pny! Otrzyma?e? 2000000PLN premi")
kasapkt=kasapkt+20000000
jobTarget=0
end
showMarker()
playSoundFrontEnd(12)

triggerServerEvent("givePlayerMoney", localPlayer, kasapkt)
outputChatBox("Otrzymujesz "..kasapkt.." PLN za dojechanie do celu.")
end--]]
finishJob()
playSoundFrontEnd(5)
outputChatBox("#06B200(✔) #FFFFFFPomy?lnie zako?czono prac?.", 255,255,255, true)
--triggerEvent( "onClientAddNotification", localPlayer, "Pomy?lnie zako?czono prac?.", "success" )
else
local kasa = math.random(1000000,1500000)
local premka = math.random(1000000,1500000)
showMarker()
playSoundFrontEnd(12)
if getElementData(localPlayer, "player:premium") then
triggerServerEvent("givePlayerMoney", localPlayer, premka)
outputChatBox("#007aff(ⓘ) #f2ff00[PREMIUM] #FFFFFFOtrzymujesz #06B200"..premka.." PLN.", 255,255,255, true)
--triggerEvent( "onClientAddNotification", localPlayer, "(Premium) Otrzymujesz "..premka.." PLN.", "info" )
else
triggerServerEvent("givePlayerMoney", localPlayer, kasa)
outputChatBox("#007aff(ⓘ) #FFFFFFOtrzymujesz #06B200"..kasa.." PLN.", 255,255,255, true)
--triggerEvent( "onClientAddNotification", localPlayer, "Otrzymujesz "..kasa.." PLN.", "info" )
end
end
end

function showMarker()
if jobMarker and isElement(jobMarker) then
destroyElement(jobMarker)
jobMarker = nil
end
if jobBlip and isElement(jobBlip) then
destroyElement(jobBlip)
jobBlip = nil
end


jobTarget = jobTarget + 1
jobMarker = createMarker(Kursytramwaje[jobTarget][1], Kursytramwaje[jobTarget][2], Kursytramwaje[jobTarget][3], "corona", 4, 255, 0, 0)
jobBlip = createBlip(Kursytramwaje[jobTarget][1], Kursytramwaje[jobTarget][2], Kursytramwaje[jobTarget][3], 41)
if Kursytramwaje[jobTarget+1] then
ile = Kursytramwaje[jobTarget+1]
ile2 = ile[1]
ile3 = ile[2]
ile4 = ile[3]
setMarkerTarget(jobMarker, ile[1], ile[2], ile[3])
end

addEventHandler("onClientMarkerHit", jobMarker, TramwajeDriver)
--addEventHandler("onClientMarkerHit", jobMarker, showNextPoint)
end

addEvent("STARTJobtramwaje", true)
addEventHandler("STARTJobtramwaje", resourceRoot, function(veh)
outputChatBox("#06B200(✔) #FFFFFFRozpocze?e?/a? prace jako Maszynista, poje?dzij w okolicy.", 255,255,255, true)
jobVehicle = veh
jobTarget = 0
showMarker()
addEventHandler("onClientRender",root,odleglosc)
end)

addEventHandler("onClientResourceStop", resourceRoot, function()
if jobVehicle and getElementData(localPlayer, "player:jobtram") then
setElementData(localPlayer, "player:jobtram", false)
end
end)


addEventHandler("onClientVehicleExit", resourceRoot, function(plr, seat)
if seat == 0 then
if plr == localPlayer then
finishJob()
outputChatBox("#bf0101(✖) #FFFFFFZako?czy?e? prac? jako maszynista.", 255,255,255, true)
setElementPosition(localPlayer,-2267.62, 533.90, 35.02)
end
end
end)
function ghostmode_on()
local playerVehicle = getPedOccupiedVehicle(localPlayer) -- Get the players vehicle
if(playerVehicle) then -- Check the return value.
for i,v in pairs(getElementsByType("vehicle")) do --LOOP through all vehicles
setElementCollidableWith(v, playerVehicle, false) -- Set the collison off with the other vehicles.
end
outputChatBox("You are now a Ghost")
end
end
addCommandHandler("ghostmode", ghostmode_on) -- Add the /ghostmode Command.


Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-19, 16:15


TheSebaPL

Mod-team






Wiek: 21
Na forum: 3098 dni
Posty: 964

Piwa: 3102

Respekt: 640,5
Respekt: 640,5Respekt: 640,5

Witam, mam pro?b? czy m?g?by mi kto? przerobi? gui aby na rozpocz?ciu pokazywa?o stopie? czyli
99 = lider a reszt? to bym sobie sam dopisa?
Nad przyciskiem Rozpocznij/zako?cz s?u?b?

Za wykonanie daje :piwo: oraz respekt.

Kod:
c_duty


local marker=createMarker(-1663.004, -6993.35682.108-1.05'cylinder'10,64,255,75)
setElementDimension(marker0)
setElementInterior(marker0)


local sxsy guiGetScreenSize()

function p1(x)
  return (x/1280)*sx
end

function p2(y)
  return (y/1024)*sy
end

local screenWscreenH guiGetScreenSize()
local sw,sh guiGetScreenSize()
local elements = {}
mojeW,mojeH 12801024
sW,sH guiGetScreenSize()
w= (sW/mojeW), (sH/mojeH)

local sx,sy guiGetScreenSize()
local baseX 1920
local zoom 1
local minZoom 2

if sx baseX then
        zoom math.min(minZoombaseX/sx)
end

function shadowText2(textxywhcolorsizefontxxyy)
    dxDrawText(textxywhcolorsizefontxxyyfalse,false,false,true)
end

function shadowText(textxywhcolorsizefontxxyy)
    dxDrawText(textx+1y+1w+1h+1tocolor(0,0,0), sizefontxxyyfalse)
    dxDrawText(textxywhcolorsizefontxxyyfalse,false,false,true)
end

function roundedRectangle(xywhcolor)
  dxDrawRectangle(xywhcolorfalse)
  dxDrawRectangle(2141colorfalse)
  dxDrawRectangle(2h41colorfalse)
  dxDrawRectangle(1214colorfalse)
  dxDrawRectangle(w214colorfalse)
end

local font "default-bold"

okno false
okno69 false
tick getTickCount()

local sxsy guiGetScreenSize()

function isMouseIn(psx,psy,pssx,pssy,abx,aby)
    if not isCursorShowing() then return end
    cx,cy=getCursorPosition()
    cx,cy=cx*sx,cy*sy
    if cx >= psx and cx <= psx+pssx and cy >= psy and cy <= psy+pssy then
        return true,cx,cy
    else
        return false
    end
end



addEventHandler("onClientMarkerHit"marker, function(player)
if player ~= localPlayer then return end
local veh getPedOccupiedVehicle(localPlayer)
if veh then return end
          tick getTickCount()
addEventHandler("onClientRender"rootgui)
okno69 true
showCursor(true)
end)

local dxfont0_normal dxCreateFont(":pd_gui/fonts/normal.ttf"10)

function gui()
        local alph interpolateBetween(00025500, (getTickCount() - tick)/1000"OutQuad")
        
        dxDrawImage(screenW 0.2726screenH 0.2733screenW 0.4548screenH 0.4543":nv-grafika-takso/images/background.png"000tocolor(255255255255), false)

        
        if isMouseIn(screenW 0.4208screenH 0.4200screenW 0.1583screenH 0.0648then
        dxDrawImage(screenW 0.4208screenH 0.4200screenW 0.1583screenH 0.0648":nv-grafika-takso/images/buttons_on.png"000tocolor(255255255255), false)
        else
        dxDrawImage(screenW 0.4208screenH 0.4200screenW 0.1583screenH 0.0648":nv-grafika-takso/images/buttons.png"000tocolor(255255255255), false)
        end 

        if isMouseIn(screenW 0.4208screenH 0.5019screenW 0.1583screenH 0.0648then
        dxDrawImage(screenW 0.4208screenH 0.5019screenW 0.1583screenH 0.0648":nv-grafika-takso/images/buttons_on.png"000tocolor(255255255255), false)
        else
        dxDrawImage(screenW 0.4208screenH 0.5019screenW 0.1583screenH 0.0648":nv-grafika-takso/images/buttons.png"000tocolor(255255255255), false)
        end    

        if getElementData(localPlayer,'player:faction') == 'TSA' then
        dxDrawText("Zako?&#8222;cz S?&#8218;uĹĽb?&#8482;", (screenW 0.4220) + 1, (screenH 0.4190) + 1, (screenW 0.5792) + 1, (screenH 0.4848) + 1tocolor(000255), 1.00dxfont0_normal"center""center"falsefalsetruefalsefalse)
        dxDrawText("Zako?&#8222;cz S?&#8218;uĹĽb?&#8482;"screenW 0.4220screenH 0.4190screenW 0.5792screenH 0.4848tocolor(255255255255), 1.00dxfont0_normal"center""center"falsefalsetruefalsefalse)
        else
        dxDrawText("Rozpocznij S?&#8218;uĹĽb?&#8482;", (screenW 0.4220) + 1, (screenH 0.4190) + 1, (screenW 0.5792) + 1, (screenH 0.4848) + 1tocolor(000255), 1.00dxfont0_normal"center""center"falsefalsetruefalsefalse)
        dxDrawText("Rozpocznij S?&#8218;uĹĽb?&#8482;"screenW 0.4220screenH 0.4190screenW 0.5792screenH 0.4848tocolor(255255255255), 1.00dxfont0_normal"center""center"falsefalsetruefalsefalse)
        end

        dxDrawText("Zamknij", (screenW 0.4220) + 1, (screenH 0.5019) + 1, (screenW 0.5792) + 1, (screenH 0.5676) + 1tocolor(000255), 1.00dxfont0_normal"center""center"falsefalsetruefalsefalse)
        dxDrawText("Zamknij"screenW 0.4220screenH 0.5019screenW 0.5792screenH 0.5676tocolor(255255255255), 1.00dxfont0_normal"center""center"falsefalsetruefalsefalse)
end






        addEventHandler("onClientClick"root, function(btnstate)
    if btn == "left" and state == "down" then
    if isMouseIn(screenW 0.4208screenH 0.4200screenW 0.1583screenH 0.0648) and okno69 == true then
    triggerServerEvent("RozpocznijTSA",root,localPlayer)
    removeEventHandler("onClientRender"rootgui)
              tick getTickCount()
    okno69 false
    okno true
    showCursor(false)
    elseif isMouseIn(screenW 0.4208screenH 0.5019screenW 0.1583screenH 0.0648) and okno69 == true then
    removeEventHandler("onClientRender"rootgui)
    showCursor(false)
              tick getTickCount()
    okno69 false
        end
    end
end)


s_duty



    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

local licz = {}
local t=createElement('text')
setElementData(t,'name','Rozpocz?cie s?u?by\nTransport of San Andreas')
setElementPosition(t,-1663.004, -6993.35682.108)
setElementInterior(t0)
setElementDimension(t0)



function isPlayerInTSAFaction(plr)
 local sid=getElementData(plr,'player:sid')
 if not sid then return end

 local result=exports['pystories-db']:dbGet('SELECT 1 FROM pystories_factions WHERE code=? AND sid=? LIMIT 1;'"TSA"sid)
 if result[1then
  return true
 else
  return false
 end
end

addEvent("RozpocznijTSA",true)
addEventHandler("RozpocznijTSA",root,function(el)
    if isPlayerInTSAFaction(elthen
         if not getElementData(el,'player:faction'then
            exports['psrpg-frakcja-ustawienia']:rozpocznijnaliczanie(el)
            setElementData(el,'player:faction','TSA')
            local rank exports['psrpg-frakcja-ustawienia']:getPlayerFactionRank(el,'TSA')
            setElementData(el,"player:rank",rank)
            setElementData(el,"last:nick",getPlayerName(el))
            setElementData(el,"last:color",tostring(getPlayerNametagColor(el)))
            setPlayerName(el,"#FFFF00"..getPlayerName(el):gsub("#%x%x%x%x%x%x",""))
                        outputChatBox ("&#10004; #FFFFFFRozpocz??e?/a? s?u?be we frakcji: #ffff00TSA #FFFFFF(#ffff00Transport of San Andreas#FFFFFF)",el02550true)
                        local desc "[S?u?ba] Gracz: "..getPlayerName(el):gsub("#%x%x%x%x%x%x","").." rozpocz?? s?u?be we frakcji: TSA"
            triggerEvent("admin:addText"resourceRootRGBToHex(0,87,110)..desc..RGBToHex(255,255,255),math.random(0,99))
            triggerEvent("admin:logs"rootdesc)
            outputServerLog(desc)
            local sid=getElementData(el,"player:sid")
            exports['pystories-db']:dbSet('UPDATE pystories_factions set actived=NOW() WHERE code=? AND sid=? LIMIT 1;'"TSA"sid)
else
            takeAllWeapons(el)
            exports['psrpg-frakcja-ustawienia']:zatrzymajnaliczanie(el)
            setElementData(el'player:faction'false)
            setElementData(el,"player:rank",false)
            local skin=getElementData(el,"player:skin")
            setElementModel(elskin)
            setPlayerName(el,getElementData(el,"last:nick"))
            outputChatBox ("&#10008; #FFFFFFZako?czy?e?/a? s?u?be we frakcji: #ffff00TSA #FFFFFF(#ffff00Transport of San Andreas#FFFFFF)",el25500true)
            local desc "[S?u?ba] Gracz: "..getPlayerName(el):gsub("#%x%x%x%x%x%x","").." zako?czy? s?u?be we frakcji: TSA"
            triggerEvent("admin:addText"resourceRootRGBToHex(0,87,110)..desc..RGBToHex(255,255,255),math.random(0,99))
            triggerEvent("admin:logs"rootdesc)
            outputServerLog(desc)
    end
else
     outputChatBox ("&#10008; #FFFFFFNie jeste? zatrudniony/a we frakcji: #ffff00TSA #FFFFFF(#ffff00Transport of San Andreas#FFFFFF)",el25500true)
    end
end)

function naliczanie(el)
    if isElement(elthen
   local x getElementData(el,"player:workinjob") or 0
   setElementData(el,"player:workinjob",x+1)
   else
    if isTimer(licz[el]) then
    killTimer(licz[el])
    licz[el] = nil
    end
   end
end


Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-11-29, 17:59


demoniskoxd







Wiek: 30
Na forum: 3989 dni
Posty: 79
Nick w MP: Francesco

Piwa: 1

Respekt: 50

Witam mam pewien problem,oto? nie chce zapisywa? got?wki kt?r? mamy przy sobie prosz? o przerobienie tego ;<


--[[
    ResourceOURGame v2
    DevelopersSplit <split.programista@gmail.com>
    You have no right to use this code without my permission.
    (c2015 <split.programista@gmail.com>. All rights reserved.
]]
function getPremium(plr,premium)
    if premium then
        local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=? AND premium=?",getElementData(plr,"player:sid"), premium)
        if result and #result > 0 then
            return true
        else
            return false
        end
    else
        local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=?"getElementData(plr,"player:sid"))
        if result and #result > 0 then
            return true
        else
            return false
        end
    end
end

function getGold(plr,gold)
    if gold then
        local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=? AND gold=?",getElementData(plr,"player:sid"), gold)
        if result and #result > 0 then
            return true
        else
            return false
        end
    else
        local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=?"getElementData(plr,"player:sid"))
        if result and #result > 0 then
            return true
        else
            return false
        end
    end
end

function loadPlayerData(plr)
    local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=?"getElementData(plr,"player:sid"))
    if result and #result > 0 then
        local v=result[1]
        setPlayerMoney(plr,v.money)
        setElementModel(plr,v.skin)
        setElementData(plr,"status","Aktywny")
        
        local org=exports["pystories-db"]:dbGet("SELECT * FROM ms_organizacje WHERE uid=? LIMIT 1"getElementData(plr,"player:sid")) -- pobieramy tylko JEDEN rekord
        local name getPlayerName(plr):gsub("#%x%x%x%x%x%x","")
        if org and #org > 0 then
            setElementData(plr,"player:organization",org[1].code)
            outputChatBox("* Jeste? w organizacji, kt?ra nosi nazwe: "..org[1].code..""plr)
            exports['pystories-db']:dbSet("UPDATE ms_organizacje SET actived=curdate() WHERE uid=?"getElementData(plr,"player:sid"))
        end
        
        setElementData(plr,"player:mandate",v.mandate)
        setElementData(plr,"player:license:pjA",v.pjA)
        setElementData(plr,"player:license:pjB",v.pjB)
        setElementData(plr,"player:license:pjC",v.pjC)
        setElementData(plr,"player:license:pjL",v.pjL)
        setElementData(plr,"player:srp",v.srp)
        setElementData(plr,"player:workinjob",v.worker)
        setElementData(plr,"player:registerdate",v.registered)
        setElementData(plr,"player:hours",v.hours)
        setElementData(plr,"player:skin",v.skin)
        setElementData(plr,"topy",v.topy)
        setElementData(plr,"player:nickname"v.login)
        setElementData(plr,"player:listy_kursy"v.listonosz)
        setElementData(plr,"player:lawety"v.lawetki)
        setElementData(plr,"player:lawetkisrp"v.lawetkisrp)
        setElementData(plr,"player:lawetkimoney"v.lawetkimoney)
        setElementData(plr,"player:airtransport"v.airtransport)
        setElementData(plr,"player:airtransportsrp"v.airtransportsrp)
        setElementData(plr,"player:airtransportmoney"v.airtransportmoney)

        setElementData(plr,"player:mask"v.mask)
        setElementData(plr'player:mask:putoff'true)
        local resultA=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=? AND golddate>NOW() LIMIT 1"getElementData(plr,"player:sid"))
        if (resultA and #resultA > 0) then
            setElementData(plr,"player:gold",true)
            setElementData(plr,"player:golddate",v.golddate)
            setPlayerName(plr,"#e79534"..getPlayerName(plr))
            setPlayerNametagColor(plr23114952)
            setElementData(plr,"gold:level",1)
        else
            setElementData(plr,"player:gold",false)
            setPlayerName(plr,"#ffcc00"..getPlayerName(plr))
        end

        setElementData(plr,"player:premium",true)
        setElementData(plr,"player:premiumdate","2030-01-01")
        setElementData(plr,"premium:level",1)
        if not getElementData(plr"player:gold"then
            setPlayerName(plr,"#ffcc00"..getPlayerName(plr))
            setPlayerNametagColor(plr2552000)
        end

        
        local bron exports["pystories-db"]:dbGet("SELECT * FROM `bronie` WHERE `owner` = ?"getElementData(plr"player:sid"))
        
        if #bron > 0 then
            for iv in ipairs(bron) do
                giveWeapon(plrv.weapon500000)
            end
        end

        
        local mute exports['pystories-db']:dbGet('select * from n_mute where serial=? AND time>now()',getPlayerSerial(plr))
        if #mute > 0 then
            setElementData(plr,'player:mute',true)
            outputChatBox('Jeste? wyciszony do: '..mute[1].time,plr)
        else
            exports['pystories-db']:dbSet('delete from n_mute where serial=?',getPlayerSerial(plr))
        end
        
        local mask exports['pystories-db']:dbGet('SELECT * FROM pystories_users WHERE mask= ?'getElementData(plr'player:sid'))
        if #mask > 0 then
            outputChatBox('* Posiadasz mask? antybakteryjn?, aby j? za?o?y? wpisz /maska-zaloz'plr255255255true)
        else
            outputChatBox('* Na serwerze potrzebujesz mie? maske antybakteryjn?, inaczej mo?esz zosta? ukarany mandatem, aby j? zakupi? - udaj si? do sklepu po zakup. (BLIP KOSZYKA)'plr255255255true)
        end
        return true
    end
    return false
end

addEvent("load:player",true)
addEventHandler("load:player"root, function(player)
if isElement(player) and player then
if getElementType(player) ~= "player" then return end
loadPlayerData(player)
outputDebugString("pystories_users> Za?adowano statystyki gracza: "..getPlayerName(player))
end
end)
function savePlayerData(plr)
    local sid=getElementData(plr,"player:sid")
    if not sid then return end
    local money=getPlayerMoney(plr)
    local mandate=getElementData(plr,"player:mandate")
    local licensea=getElementData(plr,"player:license:pjA")
    local licenseb=getElementData(plr,"player:license:pjB")
    local licensec=getElementData(plr,"player:license:pjC")
    local licensel=getElementData(plr,"player:license:pjL")
    local srp=getElementData(plr,"player:srp")
    local worker =getElementData(plr,"player:workinjob")
    local hourstonumber(getElementData(plr,"player:hours")) or 0
    local topy getElementData(plr"topy") or 0
    local lawety getElementData(plr"player:lawety") or 0
    local lawetkisrp getElementData(plr"player:lawetkisrp") or 0
    local lawetkimoney getElementData(plr"player:lawetkimoney") or 0
    local airtransport getElementData(plr"player:airtransport") or 0
    local airtransportsrp getElementData(plr"player:airtransportsrp") or 0
    local airtransportmoney getElementData(plr"player:airtransportmoney") or 0
    local listonosze getElementData(plr"player:listy_kursy") or 0
    local mask getElementData(plr'player:mask') or 0
    local xygetElementPosition(plr)
    local pozycja x..","..y..","..z
    local query=exports["pystories-db"]:dbSet("UPDATE pystories_users SET money=?, srp=?, mandate=?, mask=?, pjA=?, pjB=?, pjC=?, pjL=?, worker=?, hours=?, topy=?, position=?, listonosz = ?, lawetki = ? , lawetkisrp = ?, lawetkimoney = ?, airtransport = ?, airtransportsrp = ?, airtransportmoney = ? WHERE id=?",
    moneysrpmandatemask,licensealicenseblicenseclicenselworkerhourstopypozycjalistonoszelawetylawetkisrplawetkimoneyairtransportairtransportsrpairtransportmoneysid)
end
addEvent("save:player",true)
addEventHandler("save:player"root, function(player)
if isElement(player) and player then
if getElementType(player) ~= "player" then return end
savePlayerData(player)
outputDebugString("pystories_users> Zapisano statystyki gracza: "..getPlayerName(player))
end
end)
addEventHandler("onPlayerQuit"root, function() savePlayerData(sourceend)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2021-01-01, 12:35


kamilos121







Wiek: 18
Na forum: 2512 dni
Posty: 6
Nick w MP: kamilos121

Piwa: 1

Respekt: 50

witam potrzebuje pomocy poniewasz gdy gram mam 60 fps a gdy wsiadam do auta jest 15 i jak auta je?dzi?y normalnie a teraz jedzie po 200 tak o i nw jaki to skrypt pomo?e kto? ?

Komentarz Wilq dodany 2021-01-01, 12:45Stwórz wątek w dziale LUA, do tego wklej ewentualne błędy db3.
Postaw piwo autorowi tego posta
 

 
Tagi: prośby :: przerobienie :: skryptu
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Zasoby do MTA » PROŚBY O PRZEROBIENIE SKRYPTU Odpowiedz do tematu

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