local vehicles = "BRAK"
function getVehicleHandlingProperty ( element, property )
if isElement ( element ) and getElementType ( element ) == "vehicle" and type ( property ) == "string" then
local handlingTable = getVehicleHandling ( element )
local value = handlingTable[property]
function refresh_command()
whitelist = {}
local result=exports["pystories-db"]:dbGet("SELECT * FROM Qmix_vehicles_Whitelist")
for i,v in ipairs(result) do
whitelist[v.skrypt] = true
end
end
setTimer(function()
refresh_command()
end,20000,0)
function create_veh(_,id,poss,buyed,player)
Settings (QUERY)
if sourceResource and not whitelist[getResourceName(sourceResource)] then return end
if id then
result=exports["pystories-db"]:dbGet("SELECT * FROM Qmix_vehicle WHERE parking=1 AND id=?", id)
query=exports["pystories-db"]:dbS...
Po krotce chcialem zrobic sprawdzanie serialu by tylko osoby znalezione w bazie mogly korzystac z danego konta lecz cos nie dziala w debugu normalnie wyswietla sie sid i serial
[lua]
addEvent("logging:checkAccount", true)
addEventHandler("logging:checkAccount", resourceRoot, function(login,pass)
local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE login=?", login)
local result_serial = exports["pystories-db"]:dbGet("SELECT * FROM pys_serials WHERE sid=? AND serial=?", result[1].id, getPlayerSerial(client))
if result and #result > 0 then
print("SID: "..result[1].id.." Serial: "..getPlayerSerial(client))
if result_serial then
if result[1].login == login and result[1].pass == pass then
for i,player in pairs(getElementsByType("player")) do
if getElementData(player,"player:sid") == result[1].id then
triggerClientEvent(source, 'pystories_noti:addNoti', source, 'Podany login jest już w grze!', 'error')
return
end
end
setElementData(client, "player:sid", result[1].id)
setPlayerName(client, login)
triggerClientEvent( client, "usunXML", resourceRoot )
Cze?? mam taki problem ze w wi?kszo?ci skryptach mam taki problem ?e nie ma zadnego tekstu (fontu) a np paczka nitro ca?a dzia?a nic nie laguje w skryptach i wgl dzia?a ca?a a je?li wgrywam inn? paczk? ni? nitro to wszytko si? buguje i nie ma w skryptach font (error creating font) na innym kompie wszystko normalnie dziala nawet po resecie skrypt?w
Otoz pdopialem sobie db ichcialem sie zarejestrowac. konto dodaje do bazy danych ale nie mozna sie zalogowa?. pokazuje jedynie "b??dne has?o lub login"
niewiem co sie stalo ale wczoraj bylo git dzisiaj wchodze i podczas ladowania serwera crashuje mi gre odinstalowalem mta i gta sa i dalej nic po zainstalowaniu .. dodam to ze inni gracze nie maja tego bledu jak moge to naprawic?
Sima mam tak prace i wszystko dziala tylko nie dostaje kasy pomoze ktos albo ktos da prace kosiarek a ja se przemieszcze.
i zmieni? zeby by?o od 100srp
i ?eby dostawa?o sie od 1.4srpg prosze o pomocc
addEvent("startJobek", true)
addEventHandler("startJobek", resourceRoot, function(veh)
if getElementData(localPlayer,"player:job") ~= code then return end
missionVehicle=veh
showMarker()
outputChatBox(">>> Rozpocz??e?(a?) prac?.")
end)
function finishJob(plr,value1,value2)
if plr ~= getLocalPlayer() then return end
if getElementData(localPlayer,"player:job") ~= code then return end
if value1 == true then
if isElement(missionMar...
Witam gdy proboje sie zarejestrowac na serwerze nic nie pisze a jak chcem sie zalogowac to pisze ze podany login nie istnieje w bazie.
Paczka to StoriesRPG.
SS debuga: https://imgur.com/K8vsZcP
DB:
-- Functions
function dbSet(...)
if not {...} then return end
local qh = dbQuery(SQL, ...)
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
function dbGet(...)
if not {...} then return end
local stringe=dbPrepareString(SQL,...)
local query=dbQuery(SQL, stringe)
local result,num_affected_rows, last_insert_id =dbPoll(query, -1)
return result
end
function pobierzTabeleWynikow(...)
local h=dbQuery(SQL,...)
if (not h) then
return nil
end
local rows = dbPoll(h, -1)
return rows
end
function pobierzWyniki(...)
local h=dbQuery(SQL,...)
if (not h) then
return nil
end
local rows = dbPoll(h, -1)
if not rows then return nil end
return rows[1]
end
function zapytanie(...)
local h=dbQuery(SQL,...)
local result,numrows=dbPoll(h,-1)
return numrows
end
addEventHandler("onResourceStart", resourceRoot, function()
SQL=dbConnect("mysql", "dbname="..DBName..";host="..DBHost.."", DBUser, DBPass, "share=1;autoreconnect=1")
if SQL then
outputDeb...
Witam mam skrypt na administracje (z pysa) niby duty itp smiga wszystko git ale gdy wpisuje /k nick powod nie kickuje go anie nie daje powiadomienia dodalem go do acl i dalej nic core tak samo co mozna z tym zrobic?
Witam posiadam skrypt z yad 2020 sf lecz nie dziala mi przerobka maryhy i wyskakuje taki blad
[img]https://i.imgur.com/haPkDVb.png[/img]
c.lua
[lua]
--[[
autor; ez3n
mta-youradventure.pl
]]
local sx,sy = guiGetScreenSize()
local sc = 1920/sx
local font = dxCreateFont("f.ttf", 20) or "default"
function zbierajsurowce()
if getElementData(localPlayer, "maryha") == 0 then
exports['yd-noti']:noti("Nie posiadasz marihuany!", "error")
return
end
if getElementData(localPlayer, "player:duty") == "SAPD" then exports['yd-noti']:noti("tobie to si? chyba w dupie poprzewraca?o", "error") return end
if not przerabianie then
przerabianie = true
czas = 1
addEventHandler("onClientRender", root, gui)
t...
Sima, problem w tym ze jak wpisuje /duty to mi nie dzia?a .Wcze?niej dzia?a?o przed dodaniem nowej frakcji. - paczka owlgaming. moze ktos pomoze
DebugScipt3:[b] ERROR: duty/g_duty.lua:66: bad argument #1 to 'pairs' (table expected, got boolean)[/b]
[code]DutyColShapes = { }
function createDutyColShape(posX, posY, posZ, size, interior, dimension, factionID, locationID)
tempShape = createColSphere(tonumber(posX), tonumber(posY), tonumber(posZ), tonumber(size))
setElementDimension(tempShape, tonumber(dimension) or 0)
setElementInterior(tempShape, tonumber(interior) or 0)
if tempShape then
if type(DutyColShapes[tonumber(factionID)]) ~= "table" then
DutyColShapes[tonumber(factionID)] = { }
end
DutyColShapes[tonumber(factionID)][tonumber(locationID)] = tempShape
setElementData(resourceRoot, "DutyColShapes", DutyColShapes)
return true
end
end
function destroyDutyColShape(factionID, locationID)
if DutyColShapes[tonumber(factionID)][tonumber(locationID)] then
destroyElement(DutyColShapes[tonumber(factionID)][tonumber(locationID)])
DutyColShapes[tonumber(factionID)][tonumber(locationID)] = nil
setElementData(resourceRoot, "DutyColShapes", DutyColShapes)
return true
end
end
-- -------------------------- --
-- General checking functions -- Revised by Chaos for OwlGaming < Old way was shitty less loops now
-- -------------------------- --
kod panelu logowani c :[lua]
setElementData(localPlayer, "player:sid", nil)
setElementData(localPlayer, "player:logged", false)
--if getPlayerName(localPlayer) ~= "Liberty" then return end
if getElementData(localPlayer, "player:sid") then return end
local root = getRootElement()
local resourceRoot = getResourceRootElement(getThisResource())
local screenWidth, screenHeight = guiGetScreenSize()
local sx, sy = guiGetScreenSize()
local guiInfo = {
browser = {
volume = 200,
dimness = 90,
url = "https://www.youtube.com/embed/ZqAAjoeu0m4?rel=0&autoplay=1",
loadTime = 8000,
}
}
x,y=2513.58, 1282.80-- my width
intro_step=math.random(0,850)
local sx,sy=guiGetScreenSize()
local data={ showed=nil, button={}, info=nil, misc=nil, }
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
local dist = 100
local angler = 0
function getPointFromDistanceRotation(x, y, dist, angler)
local a = math.rad(90 - angler)
local dx = math.cos(a) * dist;
local dy = math.sin(a) * dist;
return x+dx, y+dy;
end
function loadBrowser()
loadBrowserURL(guiInfo.browser....
Witam nie dziala praca dojenie kr?w kt?r? posiadam z YNE
[lua]
createBlip (-1427.06,2171.40,50.63,46)
local tloPojazdy = {
{573,-1419.67,2181.15,51.32,2.7,4.4,11.7},
}
for i,v in ipairs(tloPojazdy) do
local vehicle = createVehicle(v[1],v[2],v[3],v[4],v[5],v[6],v[7])
setElementFrozen(vehicle,true)
for i=0,5 do
--setVehicleDoorState(vehicle,i,4)
--setVehiclePanelState ( vehicle, i, 3 )
end
end
local sw,sh = guiGetScreenSize()
local k_j = {}
local elements = {}
-------------------------------------------
function isEventHandlerAdded(sEventName,pElementAttachedTo,func)
if type(sEventName)=='string' and isElement(pElementAttachedTo) and type(func)=='function' then local aAttachedFunctions = getEventHandlers(sEventName,pElementAttachedTo)
if type(aAttachedFunctions)=='table' and #aAttachedFunctions > 0 then for i,v in ipairs(aAttachedFunctions) do if v==func then return true end end end
end return false
end
-------------------------------------------
function checkButtons(pcl)
if (pcl==localPlayer) then
for _,v in ipairs(elements) do
if isElement(v) then
destroyElement(v)
end
end
end
if isEventHandlerAdded("onClientRender",root,onRender) then
removeEventHandler("onClientRender",root,onRender)
end
showCursor(false)
end
function showButtons(pcl)
if (pcl==localPlayer) then
checkButtons(pcl)
showCu...
local kasa = math.random(210000,210000)
local premka = math.random(300,300)
local premkaplus = math.random(260000,260000)
local wyplata = 0
local marker = createMarker(-571.23, -177.00, 78.41-1,"cylinder",1.5,25,25,25,255)
local pracablip = createBlipAttachedTo(marker, 46)
local punkt = 0
local blips = {}
local praca = false
local id_drzewa = 615
local id_drzewa2 = 18609
addEventHandler("onClientRender", root, function()
if praca == true and getPedWeaponSlot(localPlayer) ~= 10 then
setPedWeaponSlot(localPlayer, 10)
end
end)
Witam jak w temacie niestety nie da sie mutowac bez panelu admina probowalem nie wele sposob i nie wiem szczerze dlatego pisze tu za pomoc postawie
[lua]
addCommandHandler('mute', function(plr,cmd,cel,time,type, ...)
if getAdmin(plr) then
local text = table.concat({...}, " ")
if not cel or not tonumber(time) or not type or not text then
outputChatBox("#00ff96(ⓘ) #FFFFFFU?ycie: /mute <nick/ID> <czas> <jednostka: m/h/y/w> <pow?d>", plr, 255,255,255, true)
return
end
local target=exports["pystories-core"]:findPlayer(plr,cel)
if not target then
outputChatBox("#00ff96(✖) #FFFFFFNie znaleziono podanego gracza.", plr, 255, 255, 255, true)
return
end
local czas_tabela=pobierzDate(type,time)
triggerClientEvent(getRootElement(), "prawko_noti", getRootElement(), "Gracz "..getPlayerName(target):gsub("#%x%x%x%x%x%x","").." otrzyma? kar? wyciszenia od "..getPlayerName(plr):gsub("#%x%x%x%x%x%x","").." ("..time .. type ..") z powodem: "..text, text)
if type == "m" then
exports["pystories-db"]:dbSet("INSERT INTO n_mute (serial,reason,time) VALUES (?,?,NOW() + INTERVAL ? minute)",getPlayerSerial(target),text,time)
elseif type == "h" then
exports["pystories-db"]:dbSet("INSERT INTO n_mute (serial,reaso...
Witam pisze tutaj poniewaz od ostatniego czasu nie dziala komenda /pm /pw oraz /w zadnych bledow w db3 nizej przesylam core jest z psrpg
s_commands.lua
[lua]
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 settings = {
['swearFilter'] = {
['enabled'] = true,
['swears'] = { -- Allows you to set the blocked swear words, syntax is ['WORD'] = 'REPLACEMENT'
['k****'] = '****',
['cwel'] = '****',
['k****?'] = '****',
['c w e l'] = '****',
['k u r w a'] = '****',
['cwelem'] = '******',
['c w e l e m'] = '****',
['k u r w ?'] = '****',
['szmata'] = '****',
['dziwka'] = '****',
['*****'] = '****',
['jajebie'] = '****',
['j***e'] = '****',
['*****'] = '****',
['*****'] = '****',
['k****'] = '****',
['frajer'] = '****',
['frajerze'] = '****',
['*****'] = '****',
['ja *****'] = '****',
['*****'] = '****',
['*****'] = '****',
['c***'] = '****',
['szmato'] = '****',
['dziwko'] = '****',
['peda?'] = '****',
['pedal'] = '****',
['peda?y'] = '****',
['frjerzy'] = '****',
['frajerka'] = '****',
['p****'] = '****',
['piz...
Witam otoz mam skrypt licznika z WestRPG lecz jak go odpalam to nie pojawia sie totalnie prosilbym o pomoc stawiam
[lua]
--[[
Skrypt zosta? wykonany przez:
-Asper ([email protected]),
-Hardu? ([email protected]).
Na potrzeby serwera:
-WestRPG (2018).
Jedyne i wy??czone prawo do u?ywania kodu ma serwer WestRPG oraz autor skryptu. (Asper, Hardu?)
]]
local dxLibary = exports.dxLibary
local speedometer = {}
local sw,sh = guiGetScreenSize()
local baseX = 1920
local scale = 1
local minScale = 2
if sw < baseX then
scale = math.min(minScale, baseX/sw)
end
local addScale = false
local tick = getTickCount()
function isEventHandlerAdded(eventName, rootName, fnc)
if type(eventName) == 'string' and isElement(rootName) and type(fnc) == 'function' then
local eventHandlers = getEventHandlers(eventName, rootName)
if type(eventHandlers) == 'table' and #eventHandlers > 0 then
for i,v in ipairs(eventHandlers) do
if v == fnc then
return true
end
end
end
end
return false
end
function x(plr)
if plr == localPlayer then
local veh = getPedOccupiedVehicle(localPlayer)
if getVehicleController(veh) ~= localPlayer then return end
okno = guiCreateWindow(0.30, 0.86, 0.40, 0.10, "System STEREO (Kliknij F3 aby pokaza? kursor)", true)
guiWindowSetMovable(okno, false)
guiWindowSetSizable(okno, false)
button = guiCreateButton(0.02, 0.47, 0.95, 0.16, "W??CZ RADIO (PODAJ LINK DO MP3/PLS/M3U)", true, okno)
link = guiCreateEdit(0.02, 0.14, 0.95, 0.26, "", true, okno)
guiSetVisible(okno, true)
end
end
function ustaw()
if source ~= button then return end
local veh = getPedOccupiedVehicle(localPlayer)
if not veh then outputChatBox("Nie jeste? w poje?dzie!") return end-- nie powinno si? zdarzy?
if getElementData(veh,"stereo:use") ~= true then
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:link",guiGetText(link))
setElementData(veh,"stereo:use", true)
guiSetText(button,"WY??CZ RADIO")
else
if dziecijp[getPlayerSerial(localPlayer)] then outputChatBox("Posiadasz zablokowan? mo?liwos? korzystania z STEREO.",255,255,255) return end
setElementData(veh,"stereo:use"...
mam blad z premium nie dziala mam podpieta baze o to caly src z saveplayer
[lua]
--[[
Resource: OURGame v2
Developers: Split <[email protected]>
You have no right to use this code without my permission.
(c) 2015 <[email protected]>. 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 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")
Witam mam problem w kodzie mianowicie mam gotowy export i funkcje usuwania przedmiotu ale mimo wywo?ania jej w innym skrypcie to nadal nic nie zabiera z ekwipunku.
0 b??d?w db3.
Meta w pe?ni uzupe?niona.
Ze wzgl?du na to ?e nie wiem dlaczego nie mog? tu wrzuci? kodu (chyba za d?ugi)
wrzucam w pliku .txt prosz? o szybk? pomoc
Witam, nie wiem czy pisze to w dobrym dziale, najwy?ej mi to przeniesiecie.
Mam ma?y problem, mianowicie chodzi o to ?e od d?u?szego czasu nie mog? znale?? odpowiedzi na moj problem dot. Komendy /tpev.set itp itp. Podpi??em baz? danych pod skrypt, tzn z pystories-db zrobilem DB3 i zamiast from pystories-admins dalem nazwe swojego skryptu na system admina i dalej mi nie dzia?a. Podsy?am ca?y kod, mo?e co? ?le zrobi?em.
local istp = {
state = false,
posx = 0,
posy = 0,
posz = 0,
int = 0,
dim = 0,
}
function getAdmin(plr,level)
if level then
local result=exports["DB3"]:dbGet("SELECT * from admins WHERE serial=? AND level=?", getPlayerSerial(plr), level)
if result and #result > 0 then
return true
else
return false
end
else
local result=exports["DB3"]:dbGet("SELECT * from admins WHERE serial=?", getPlayerSerial(plr))
if result and #result > 0 then
return true
else
return false
end
end
end
function setTp(player)
if not player then return end
if not getElementData(player, "player:admin") then return end
if getAdmin(player) then
if not istp.state == false then re...
lecz zedytowalem c_logging i gui normalnie dzia?a, lecz: nie loguje i nie wiem dlaczego, poprostu jak by funkcja IsMouseIn nie dzia?a?? od [lua] addEventHandler("onClientClick", root, function(btn,state)
if btn=="left" and state=="down" then
if isMouseIn(sx*1605/1024, sy*459/768, sx*269/1024, sy*55/768) and data.showed then
local login=guiGetText(data.button[1])
local pass=guiGetText(data.button[2])
if string.len(login) < 2 or string.len(pass) < 2 then
data.info="Nale?y wype?ni? wszystkie pola."
return
end
triggerServerEvent("logging:checkAccount", resourceRoot, login, pass)
end
if isMouseIn(sx*1605/1024, sy*524/768, sx*273/1024, sy*55/768) and data.showed then
local login=guiGetText(data.button[1])
local pass=guiGetText(data.button[2])
if string.len(login) > 22 or string.len(pass) > 22 and string.len(login) < 3 or string.len(pass) < 3 then
data.info="Login i has?o powinno zawiera? od 3 do 22 znak?w."
return
end
triggerServerEvent("logging:newAccount", resourceRoot, login, pass)
end
end
end) [/lua] - Ta cz??? jak by nie dzia?a?a ^^^
[lua]if getElementData(localPlayer, "player:sid") then return end
local root = getRootElement()
local resourceRoot = ...
Witam mam problem z Baz? danych a dokladnie z jedna tabelka pystories_vehicles a wiec tak doda?em 2 linijki do lpg (gaz do aut) nazwa "gaz" "gazzamont"
I jak ju? je doda?em to cale pystories_vehicles nie chce dzia?a? nie zapisuj? si? pojazdy
Witam mam problem wgralem paczke na serwer i chcialem sie zarejestrowac ale jak w konsoli wpisuje register to nic sie nie pojawia ani mnie nie rejestruje a jak wpisze login to normlanie wyskakuje. Pomoze ktos bede bardzo wdzieczny
attempt to get length of local qr a boolean value
takie cos wyskakuje
local qr = exports['pystories-db']:dbGet("SELECT * FROM pystories_vehicles WHERE id=? AND mk=?",id, "1")
if #qr == 1 then exports['noti']:showBox(source,"info","Posiadasz juĹĽ to ulepszenie.") return end
Witam nie dziala mi zabieranie prawka niby w bazie sie zapisuje ale nadal mozna wsiadac do auta pystories-core i pystories-admin dodane do acl
tabela bazy sql
[quote]
--
-- Struktura tabeli dla tabeli `pystories_punish`
--
CREATE TABLE `pystories_punish` (
`kolejnosc` int(11) NOT NULL,
`serial` text NOT NULL,
`reason` text CHARACTER SET utf8 NOT NULL,
`time` timestamp NOT NULL DEFAULT '0000-00-00 00:00:00' ON UPDATE CURRENT_TIMESTAMP,
`type` text NOT NULL,
`active` tinyint(1) NOT NULL DEFAULT '1'
) ENGINE=InnoDB DEFAULT CHARSET=latin1; [/quote]
funckja zpj
[quote]
addCommandHandler("zpj", function(plr,cmd,cel,time,type,...)
if getAdmin(plr,3) or getAdmin(plr,2) or getAdmin(plr,1) or getAdmin(plr,4) or getAdmin(plr,5) then
local reason=table.concat({...}, " ")
if not cel or not tonumber(time) or not type or not reason then
outputChatBox("#ff0000✘ #ffffff- /zpj <ID> <czas> <m/h/y/w> <pow?d>", plr, 255, 252, 51,true)
return
end
local target=exports["pystories-core"]:findPlayer(plr,cel)
if not target then
outputChatBox("#ff0000✘ #ffffff- Nie znaleziono podanego gracza.", plr, 255, 252, 51,true)
return
end
if isPedInVehicle(target) then
removePedFromVehicle(target)
end
--if getElementData(target,"player:sid") == 2 then outputChatBox("* Nie mo?na zabra? prawo jazdy graczowi o SID: 1 !",plr) return end
...
Jednak nie naprawilem... Niech mi ktos wytlumaczy wszystko co i jak. rejestruje sie, w bazie pojawia sie juz jako id 1 lecz jak kolega sie rejestruje to tez jest jako id 1 i nie moze wejsc bo juz ktos gra, tak samo z autami, pojawia sie jako id 1 i jak kupuje nastepne to rowniez jest id 1... Nie umiem tego naprawic niech mi ktos wytlumaczy co i jak stawiam i daje licze na szybka pomoc!
no wiec klikam zamontuj i po zamontowaniu w pojezdzie nie ma felg ktore montowalem
i wyswietla sie w debugscript 3 takie cos
ERROR: Client (konosz615) triggered serverside event montazElementu, but event is not added serverside
jedynie co zmienialem w gm to usuwalem montowanie licznika ale mysle ze to nie ma nic z tym wspolnego a tak to nic nie zmienialem nw no nic ani nic nie dodawalem co by moglo zle wplynac na tunera
prosze o szybka i pomoc, thx bardzo oczywiscie oferuje zimne piwerko