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: 2561 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 screenW, screenH = guiGetScreenSize()


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

local Pojazd = getPedOccupiedVehicle(localPlayer)
    
if not Pojazd  then return end
    local vx, vy, vz = getElementVelocity(Pojazd)
    
    local speed =((vx^2 + vy^2 + 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.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, tocolor(255,255,255, 255), 1.00, font, "center", "top", true, true, true, true, true)
                          dxDrawRectangle(screenW * 0.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, tocolor(50,50,50,200), false)
                          dxDrawRectangle(screenW * 0.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, tocolor(50,50,50,200), false)
dxDrawRectangle(screenW * 0.8001, screenH * 0.6676, screenW * 0.3660/100*fuel, screenH * 0.3475, tocolor(50, 255, 19, 255), 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 ) ~= 2 ) then                 
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/disk.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/rgb.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, "Img/paliwo.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
      
dxDrawImage(screenW * 0.7679, screenH * 0.6833, screenW * 0.2555, screenH * 0.2463, "Img/needle.png", speedy, 0, 0, tocolor(255, 255, 255, 255), false) 
else
if Kolor == "Niebieski" then
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/disk.png", 0, 0, 0, tocolor(255, 255, 255, 240), false)
dxDrawImage(screenW * 0.7679, screenH * 0.6833, screenW * 0.2555, screenH * 0.2463, "Img/needle.png", speedy, 0, 0, tocolor(255, 255, 255, 255), true) 
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/rgb.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, "Img/paliwo.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
elseif Kolor == "Zolty" then    
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/disk.png", 0, 0, 0, tocolor(255, 255, 255, 240), false)
dxDrawImage(screenW * 0.7679, screenH * 0.6833, screenW * 0.2555, screenH * 0.2463, "Img/needle.png", speedy, 0, 0, tocolor(255, 255, 255, 255), true) 
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/rgb.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, "Img/paliwo.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
elseif Kolor == "Jasnoniebieski" then
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/disk.png", 0, 0, 0, tocolor(255, 255, 255, 240), false)
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.1830, screenH * 0.3055, "Img/rgb.png", 0, 0, 0, tocolor(123, 104, 238, 255), false)
dxDrawImage(screenW * 0.7679, screenH * 0.6833, screenW * 0.2555, screenH * 0.2463, "Img/needle.png", speedy, 0, 0, tocolor(255, 255, 255, 255), true) 
dxDrawImage(screenW * 0.8001, screenH * 0.6676, screenW * 0.3630, screenH * 0.3455, "Img/paliwo.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
else
dxDrawImage(screenW * 0.8001, screenH * 0.6276, screenW * 0.1830, screenH * 0.3055, "Img/disk.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
               
dxDrawImage(screenW * 0.7679, screenH * 0.6833, screenW * 0.2555, screenH * 0.2463, "Img/needle.png", 7+speedy, 0, 0, tocolor(255, 255, 255, 255), true)  
end
 
end


function getVehicleRPM(vehicle)
local vehicleRPM = 0
    if (vehicle) then  
        if (getVehicleEngineState(vehicle) == true) then
            if getVehicleCurrentGear(vehicle) > 0 then             
                vehicleRPM = math.floor(((getElementSpeed(vehicle, "kmh")/getVehicleCurrentGear(vehicle))*180) + 0.5) 
                if (vehicleRPM < 650) then
                    vehicleRPM = math.random(650, 750)
                elseif (vehicleRPM >= 8000) then
                    vehicleRPM = math.random(8000, 8100)
                end
            else
                vehicleRPM = math.floor((getElementSpeed(vehicle, "kmh")*180) + 0.5)
                if (vehicleRPM < 650) then
                    vehicleRPM = math.random(650, 750)
                elseif (vehicleRPM >= 8100) then
                    vehicleRPM = math.random(8000, 8100)
                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) + 1, tocolor(140, 170, 230, 255), 1.00, "default-bold", "center", "center", false, false, true, false, false)
        
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(veh) then
            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.9597, screenH * 0.4336, screenW * 0.0212, screenH * 0.0378, "Img/paliwo.png", 0, 0, 0, tocolor(r4, g4, b4, 255), 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: 2413 dni
Posty: 35
Nick w MP: Gangus*

Piwa: 10

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", resourceRoot, mysqlForum_connect)

function mysqlForum_query(...)
    local qh = dbQuery(mysql, dbPrepareString(mysql, ...))
    if not qh then return false end
    local result, num_affected_rows, last_insert_id = dbPoll(qh, -1)
    return result, num_affected_rows, last_insert_id
end


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

function auth(username, password)
    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=?", username, md5(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 user! Hura!
        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", player, username, password)

        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)
        end, 1000, 1)

        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(player, string.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=?", serial, q[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=?", ip, q[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)
                setPlayerNametagColor( player, 255, 200, 0)
                setTimer(function() exports.rpg_noti:createNotification(player, "info", "Twoje konto premium pozostanie wa?ne jeszcze przez oko?o "..p_left, 7000) end, 4000, 1)
            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(player, pos[1], pos[2], pos[3], pos[4], q[1].skin, pos[5], pos[6])

            setElementHealth(player, q[1].health)
            setPedArmor(player, q[1].armor)

            setCameraTarget(player, player)
            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(player, true)
            end
            if tonumber(getElementData(player, "admin:silentEnter")) == 1 then
                setElementAlpha(player, 0)
                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)
                end, 500,1 )
            end

            if tostring(q[1].plec) == "2" then
                setPedWalkingStyle(player, 129)
            else
                setPedWalkingStyle(player, 118)
            end

        end, 3000, 1)

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

        loadImgFormForum(player, q[1].imie, q[1].nazwisko)

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


function loadImgFormForum(plr, imie, nazwisko)
    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(plr, tostring("https://forum.empiresantos.pl/uploads/"..q[1].pp_thumb_photo))
    -- end
end


function getAvatar(plr, link)
  if not link then return end
  fetchRemote(link, callBackAvatar, "", false, plr, link)
end


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



function register(username, password, email)
    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=''", username, md5(password), email, serial, ip, defpos)
    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(imie, nazwisko, plec, rasa, skin, username, password)
    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=?", imie, nazwisko)
    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=?", imie, nazwisko, plec, skin, rasa, username)
    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(username, password)
    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,z = 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,z = 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 = 1 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=?", money, bankmoney, gamescore, skin, EQskin, pos, health, armor, stamina, job, jobmoney, onlinetime, afktime, PulsCoins, hudSettings, shaderSettings, playerSettings, freeSpin, prolog, bwTime, skillPoints, xp, lvl, dm, uid)
    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(allAdminTable, tostring(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(checkPlayer, v["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(allAdminTable, tostring('#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(checkPlayer, v["Nick"]) then
                    if v["rankID"] == rankId then
                        checkPlayer = tostring(checkPlayer..'\n#ffffff&#8226; '..tostring(v["Nick"])..'ff0000  (OFFLINE)')
                        table.insert(allAdminTable, tostring('#ffffff&#8226; '..tostring(v["Nick"])..'#ff0000  (OFFLINE)'))
                    end
                end
            end

        rankId = rankId + 1

    end

    triggerClientEvent ( playerSource, "addUpdate", playerSource, allAdminTable, updateList)
end
addEvent( "getUpdate", true )
addEventHandler( "getUpdate", resourceRoot, getUpdate )


function respawn(plr)
    setElementPosition(plr, 1727.27734375, -1912.0439453125, 13.563561439514)
    setElementRotation(plr, 0,0,88)
end
addEvent( "setPlayerOnSpawn", true )
addEventHandler( "setPlayerOnSpawn", resourceRoot, respawn)

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

function getTimestamp(year, month, day, hour, minute, second)
    -- initiate variables
    local monthseconds = { 2678400, 2419200, 2678400, 2592000, 2678400, 2592000, 2678400, 2678400, 2592000, 2678400, 2592000, 2678400 }
    local timestamp = 0
    local datetime = getRealTime()
    year, month, day = year or datetime.year + 1900, month or datetime.month + 1, day or datetime.monthday
    hour, minute, second = hour or datetime.hour, minute or datetime.minute, second or datetime.second

    -- calculate timestamp
    for i=1970, year-1 do timestamp = timestamp + (isLeapYear(i) and 31622400 or 31536000) end
    for i=1, month-1 do timestamp = timestamp + ((isLeapYear(year) and i == 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 % 4 == 0 and year % 100 ~= 0) or year % 400 == 0)
end

function RGBToHex(red, green, blue, alpha)
    if((red < 0 or red > 255 or green < 0 or green > 255 or blue < 0 or blue > 255) or (alpha and (alpha < 0 or alpha > 255))) then
        return nil
    end
    if(alpha) then
        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")
end, 120000, 0)

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,z = 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,z = 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 = 1 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=?", money, bankmoney, gamescore, skin, EQskin, pos, health, armor, stamina, job, jobmoney, onlinetime, afktime, PulsCoins, hudSettings, shaderSettings, playerSettings, freeSpin, prolog, bwTime, skillPoints, xp, lvl, dm, uid)
    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: 3838 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: 2249 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: 3035 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: 2213 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: 22
Na forum: 3239 dni
Posty: 964

Piwa: 3101

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: 4130 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: 3506 dni
Posty: 284
Nick w MP: AxyZ

Piwa: 235

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: 4130 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: 22
Na forum: 3239 dni
Posty: 964

Piwa: 3101

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(red, green, blue, alpha)
    if((red < 0 or red > 255 or green < 0 or green > 255 or blue < 0 or blue > 255) or (alpha and (alpha < 0 or alpha > 255))) then
        return nil
    end
    if(alpha) then
        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].code] then
            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=?", money, getElementData(el, "player:sid"))
                triggerClientEvent( el,  "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)
                end, 5000, 1)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?", "0", getElementData(el, "player:sid"))
                setElementData(el,"player:workinjob",0)
            else
                    triggerClientEvent( el,  "onClientAddNotification", el, "Nie mo?esz odebra? wyp?aty frakcyjnej.\nIlo?? przepracowanych minut: #bf01010 minut", "error"  )
            end
        else
                    triggerClientEvent( el,  "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", resourceRoot, odbierz)


Postaw piwo autorowi tego posta
 

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


demoniskoxd







Wiek: 30
Na forum: 4130 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(red, green, blue, alpha)
    if((red < 0 or red > 255 or green < 0 or green > 255 or blue < 0 or blue > 255) or (alpha and (alpha < 0 or alpha > 255))) then
        return nil
    end
    if(alpha) then
        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].code] then
            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=?", money, getElementData(el, "player:sid"))
                triggerClientEvent( el,  "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)
                end, 5000, 1)
                exports["pystories-db"]:dbSet("UPDATE pystories_users SET worker=? WHERE id=?", "0", getElementData(el, "player:sid"))
                setElementData(el,"player:workinjob",0)
            else
                    triggerClientEvent( el,  "onClientAddNotification", el, "Nie mo?esz odebra? wyp?aty frakcyjnej.\nIlo?? przepracowanych minut: #bf01010 minut", "error"  )
            end
        else
                    triggerClientEvent( el,  "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", resourceRoot, odbierz)




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: 22
Na forum: 3239 dni
Posty: 964

Piwa: 3101

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.356, 82.108-1.05, 'cylinder', 1, 0,64,255,75)
setElementDimension(marker, 0)
setElementInterior(marker, 0)


local sx, sy = guiGetScreenSize()

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

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

local screenW, screenH = guiGetScreenSize()
local sw,sh = guiGetScreenSize()
local elements = {}
mojeW,mojeH = 1280, 1024
sW,sH = guiGetScreenSize()
w, h = (sW/mojeW), (sH/mojeH)

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

if sx < baseX then
        zoom = math.min(minZoom, baseX/sx)
end

function shadowText2(text, x, y, w, h, color, size, font, xx, yy)
    dxDrawText(text, x, y, w, h, color, size, font, xx, yy, false,false,false,true)
end

function shadowText(text, x, y, w, h, color, size, font, xx, yy)
    dxDrawText(text, x+1, y+1, w+1, h+1, tocolor(0,0,0), size, font, xx, yy, false)
    dxDrawText(text, x, y, w, h, color, size, font, xx, yy, false,false,false,true)
end

function roundedRectangle(x, y, w, h, color)
  dxDrawRectangle(x, y, w, h, color, false)
  dxDrawRectangle(x + 2, y - 1, w - 4, 1, color, false)
  dxDrawRectangle(x + 2, y + h, w - 4, 1, color, false)
  dxDrawRectangle(x - 1, y + 2, 1, h - 4, color, false)
  dxDrawRectangle(x + w, y + 2, 1, h - 4, color, false)
end

local font = "default-bold"

okno = false
okno69 = false
tick = getTickCount()

local sx, sy = 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", root, gui)
okno69 = true
showCursor(true)
end)

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

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

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

        if isMouseIn(screenW * 0.4208, screenH * 0.5019, screenW * 0.1583, screenH * 0.0648) then
        dxDrawImage(screenW * 0.4208, screenH * 0.5019, screenW * 0.1583, screenH * 0.0648, ":nv-grafika-takso/images/buttons_on.png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
        else
        dxDrawImage(screenW * 0.4208, screenH * 0.5019, screenW * 0.1583, screenH * 0.0648, ":nv-grafika-takso/images/buttons.png", 0, 0, 0, tocolor(255, 255, 255, 255), 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) + 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_normal, "center", "center", false, false, true, false, false)
        dxDrawText("Zako?&#8222;cz S?&#8218;uĹĽb?&#8482;", screenW * 0.4220, screenH * 0.4190, screenW * 0.5792, screenH * 0.4848, tocolor(255, 255, 255, 255), 1.00, dxfont0_normal, "center", "center", false, false, true, false, false)
        else
        dxDrawText("Rozpocznij S?&#8218;uĹĽb?&#8482;", (screenW * 0.4220) + 1, (screenH * 0.4190) + 1, (screenW * 0.5792) + 1, (screenH * 0.4848) + 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_normal, "center", "center", false, false, true, false, false)
        dxDrawText("Rozpocznij S?&#8218;uĹĽb?&#8482;", screenW * 0.4220, screenH * 0.4190, screenW * 0.5792, screenH * 0.4848, tocolor(255, 255, 255, 255), 1.00, dxfont0_normal, "center", "center", false, false, true, false, false)
        end

        dxDrawText("Zamknij", (screenW * 0.4220) + 1, (screenH * 0.5019) + 1, (screenW * 0.5792) + 1, (screenH * 0.5676) + 1, tocolor(0, 0, 0, 255), 1.00, dxfont0_normal, "center", "center", false, false, true, false, false)
        dxDrawText("Zamknij", screenW * 0.4220, screenH * 0.5019, screenW * 0.5792, screenH * 0.5676, tocolor(255, 255, 255, 255), 1.00, dxfont0_normal, "center", "center", false, false, true, false, false)
end






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


s_duty



    function RGBToHex(red, green, blue, alpha)
    if((red < 0 or red > 255 or green < 0 or green > 255 or blue < 0 or blue > 255) or (alpha and (alpha < 0 or alpha > 255))) then
        return nil
    end
    if(alpha) then
        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.356, 82.108)
setElementInterior(t, 0)
setElementDimension(t, 0)



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[1] then
  return true
 else
  return false
 end
end

addEvent("RozpocznijTSA",true)
addEventHandler("RozpocznijTSA",root,function(el)
    if isPlayerInTSAFaction(el) then
         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)",el, 0, 255, 0, true)
                        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", resourceRoot, RGBToHex(0,87,110)..desc..RGBToHex(255,255,255),math.random(0,99))
            triggerEvent("admin:logs", root, desc)
            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(el, skin)
            setPlayerName(el,getElementData(el,"last:nick"))
            outputChatBox ("&#10008; #FFFFFFZako?czy?e?/a? s?u?be we frakcji: #ffff00TSA #FFFFFF(#ffff00Transport of San Andreas#FFFFFF)",el, 255, 0, 0, true)
            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", resourceRoot, RGBToHex(0,87,110)..desc..RGBToHex(255,255,255),math.random(0,99))
            triggerEvent("admin:logs", root, desc)
            outputServerLog(desc)
    end
else
     outputChatBox ("&#10008; #FFFFFFNie jeste? zatrudniony/a we frakcji: #ffff00TSA #FFFFFF(#ffff00Transport of San Andreas#FFFFFF)",el, 255, 0, 0, true)
    end
end)

function naliczanie(el)
    if isElement(el) then
   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: 4130 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 ;<


--[[
    Resource: OURGame v2
    Developers: Split <split.programista@gmail.com>
    You have no right to use this code without my permission.
    (c) 2015 <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(plr, 231, 149, 52)
            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(plr, 255, 200, 0)
        end

        
        local bron = exports["pystories-db"]:dbGet("SELECT * FROM `bronie` WHERE `owner` = ?", getElementData(plr, "player:sid"))
        
        if #bron > 0 then
            for i, v in ipairs(bron) do
                giveWeapon(plr, v.weapon, 500000)
            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', plr, 255, 255, 255, true)
        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)', plr, 255, 255, 255, true)
        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 hours= tonumber(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 x, y, z = getElementPosition(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=?",
    money, srp, mandate, mask,licensea, licenseb, licensec, licensel, worker, hours, topy, pozycja, listonosze, lawety, lawetkisrp, lawetkimoney, airtransport, airtransportsrp, airtransportmoney, sid)
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(source) end)


Postaw piwo autorowi tego posta
 

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


kamilos121







Wiek: 18
Na forum: 2653 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