function jp(gracz)
if getElementData(gracz, "duty") then
if doesPlayerHaveJetPack(gracz) then
removePlayerJetPack(gracz)
else
givePlayerJetPack(gracz)
end
end
end
local jednostki = {
["m"] = true,
["h"] = true,
["d"] = true,
}
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 zbanuj(plr, cmd, target, t1, t2, ...)
if not getElementData(plr, "duty") then return end
if not target or not t1 or not t2 or not ... then
return
end
local player = findPlayer(plr, target)
if not player then return end
local text = table.concat({...}, ", ")
local ts_start = getTimestamp()
if t1 == "m" then
local t2 = tonumber(t2)
local ts_final = ts_start + t2*60
local time = getRealTime(ts_final)
local txt = getPlayerName(player).." zosta? zbanowany przez "..getPlayerName(plr).." na czas "..t2.." minut z powodu "..text
triggerClientEvent(getRootElement(), "notiAdmin", getRootElement(), txt)
outputConsole(txt)
local user_id = getElementData(player, "dbid")
local user_serial = getPlayerSerial(player)
local final_date = (time.year+1900).."-"..(time.month+1).."-"..(time.monthday).." "..(time.hour)..":"..(time.minute)..":"..(time.second)
exports.mysql:wykonaj("INSERT INTO bany SET nick=?, serial=?, ip=?, data=?, admin=?", getPlayerName(player), getPlayerSerial(player), getPlayerIP(player), final_date, getPlayerName(plr))
kickPlayer(player, "Po??cz si? ponownie")
elseif t1 == "h" then
local t2 = tonumber(t2)
local ts_final = ts_start + t2*3600
local time = getRealTime(ts_final)
local txt = getPlayerName(player).." zosta? zbanowany przez "..getPlayerName(plr).." na czas "..t2.." godzin z powodu "..text
triggerClientEvent(getRootElement(), "notiAdmin", getRootElement(), txt)
outputConsole(txt)
local user_id = getElementData(player, "dbid")
local user_serial = getPlayerSerial(player)
local final_date = (time.year+1900).."-"..(time.month+1).."-"..(time.monthday).." "..(time.hour)..":"..(time.minute)..":"..(time.second)
exports.mysql:wykonaj("INSERT INTO bany SET nick=?, serial=?, ip=?, data=?, admin=?", getPlayerName(player), getPlayerSerial(player), getPlayerIP(player), final_date, getPlayerName(plr))
kickPlayer(player, "Po??cz si? ponownie")
elseif t1 == "d" then
local t2 = tonumber(t2)
local ts_final = ts_start + t2*86400
local time = getRealTime(ts_final)
local txt = getPlayerName(player).." zosta? zbanowany przez "..getPlayerName(plr).." na czas "..t2.." dni z powodu "..text
triggerClientEvent(getRootElement(), "notiAdmin", getRootElement(), txt)
outputConsole(txt)
local user_id = getElementData(player, "dbid")
local user_serial = getPlayerSerial(player)
local final_date = (time.year+1900).."-"..(time.month+1).."-"..(time.monthday).." "..(time.hour)..":"..(time.minute)..":"..(time.second)
exports.mysql:wykonaj("INSERT INTO bany SET nick=?, serial=?, ip=?, data=?, admin=?", getPlayerName(player), getPlayerSerial(player), getPlayerIP(player), final_date, getPlayerName(plr))
kickPlayer(player, "Po??cz si? ponownie")
end
end
function kicknij(gracz, _, graczhere, ...)
if graczhere and ... and getElementData(gracz, "duty") then
graczhere = findPlayer(gracz, graczhere)
if not graczhere then
exports["nm-noti"]:noti("Nie znaleziono podanego gracza.", gracz)
return
end
local tresc = table.concat({...}, " ")
local txt = getPlayerName(graczhere).." zosta? wykopany przez "..getPlayerName(gracz).." z powodu "..tresc
kickPlayer(graczhere, gracz, tresc)
outputConsole(txt)
triggerClientEvent(root, "notiAdmin", root, txt)
end
end
function warnij(gracz, _, graczhere, ...)
if graczhere and ... and getElementData(gracz, "duty") then
graczhere = findPlayer(gracz, graczhere)
if not graczhere then
exports["nm-noti"]:noti("Nie znaleziono podanego gracza.", gracz)
return
end
local tresc = table.concat({...}, " ")
local txt = getPlayerName(graczhere).." zosta? ostrze?ony przez "..getPlayerName(gracz).." z powodu "..tresc
outputChatBox(" ", graczhere, 255, 0, 0)
outputChatBox("Otrzyma?e? ostrze?enie od "..getPlayerName(gracz), graczhere, 255, 0, 0)
outputChatBox(" ", graczhere, 255, 0, 0)
outputChatBox("Pow?d: "..tresc, graczhere, 255, 255, 255)
outputChatBox(" ", graczhere, 255, 0, 0)
outputChatBox("Nie stosowanie si? do ostrze?enia, mo?e skutkowa? kickiem lub banem.", graczhere, 0, 131, 255)
outputConsole(txt)
triggerClientEvent(root, "notiAdmin", root, txt)
triggerClientEvent(graczhere, "warnPlayer", root, {
["powod"] = tresc,
["kto"] = getPlayerName(gracz),
})
end
end
function prawko(plr, cmd, target, t1, t2, ...)
if not getElementData(plr, "duty") then return end
if not target or not t1 or not t2 or not ... then
return
end
local player = findPlayer(plr, target)
if not player then return end
local text = table.concat({...}, ", ")
local ts_start = getTimestamp()
if t1 == "m" then
local t2 = tonumber(t2)
local ts_final = ts_start + t2*60-3600
local time = getRealTime(ts_final)
local txt = getPlayerName(player).." otrzyma? zakaz prowadzenia pojazd?w kat. A,B,C od "..getPlayerName(plr).." na czas "..t2.." minut z powodu "..text
triggerClientEvent(getRootElement(), "notiAdmin", getRootElement(), txt)
outputConsole(txt)
local user_id = getElementData(player, "dbid")
local user_serial = getPlayerSerial(player)
removePedFromVehicle(player)
local final_date = (time.year+1900).."-"..(time.month+1).."-"..(time.monthday).." "..(time.hour)..":"..(time.minute)..":"..(time.second)
exports.mysql:wykonaj("INSERT INTO prawka SET nick=?, serial=?, ip=?, data=?, admin=?", getPlayerName(player), getPlayerSerial(player), getPlayerIP(player), final_date, getPlayerName(plr))
elseif t1 == "h" then
local t2 = tonumber(t2)
local ts_final = ts_start + t2*3600-3600
local time = getRealTime(ts_final)
removePedFromVehicle(player)
local txt = getPlayerName(player).." otrzyma? zakaz prowadzenia pojazd?w kat. A,B,C od "..getPlayerName(plr).." na czas "..t2.." godzin z powodu "..text
triggerClientEvent(getRootElement(), "notiAdmin", getRootElement(), txt)
outputConsole(txt)
local user_id = getElementData(player, "dbid")
local user_serial = getPlayerSerial(player)
local final_date = (time.year+1900).."-"..(time.month+1).."-"..(time.monthday).." "..(time.hour)..":"..(time.minute)..":"..(time.second)
exports.mysql:wykonaj("INSERT INTO prawka SET nick=?, serial=?, ip=?, data=?, admin=?", getPlayerName(player), getPlayerSerial(player), getPlayerIP(player), final_date, getPlayerName(plr))
elseif t1 == "d" then
local t2 = tonumber(t2)
removePedFromVehicle(player)
local ts_final = ts_start + t2*86400-3600
local time = getRealTime(ts_final)
local txt = getPlayerName(player).." otrzyma? zakaz prowadzenia pojazd?w kat. A,B,C od "..getPlayerName(plr).." na czas "..t2.." dni z powodu "..text
triggerClientEvent(getRootElement(), "notiAdmin", getRootElement(), txt)
outputConsole(txt)
local user_id = getElementData(player, "dbid")
local user_serial = getPlayerSerial(player)
local final_date = (time.year+1900).."-"..(time.month+1).."-"..(time.monthday).." "..(time.hour)..":"..(time.minute)..":"..(time.second)
exports.mysql:wykonaj("INSERT INTO prawka SET nick=?, serial=?, ip=?, data=?, admin=?", getPlayerName(player), getPlayerSerial(player), getPlayerIP(player), final_date, getPlayerName(plr))
end
end
function report(gracz, cmd, graczhere, ...)
if ... and graczhere then
graczhere = findPlayer(gracz, graczhere)
if not graczhere then
exports["nm-noti"]:noti("Nie znaleziono podanego gracza.", gracz)
return
end
local tekst = table.concat({...}, " ")
exports["nm-noti"]:noti("Pomy?lnie wys?ano zg?oszenie na gracza "..getPlayerName(graczhere).." o tre?ci "..tekst, gracz)
tekst = getPlayerName(gracz).."("..getElementData(gracz, "id")..") > "..getPlayerName(graczhere).."("..getElementData(graczhere, "id").."): "..tekst
triggerClientEvent(root, "dRaps", root, tekst, getElementData(graczhere, "id"))
else
exports["nm-noti"]:noti("Poprawne u?ycie: /"..cmd.." [id/nick] [pow?d]", gracz)
end
end
addCommandHandler("report", report)
addCommandHandler("raport", report)
addCommandHandler("cl", function(gracz, _, graczh)
if getElementData(gracz, "duty") and graczh then
triggerClientEvent(root, "uRaps", root, graczh)
exports["nm-noti"]:noti("Pomy?lnie usuni?to reporta.", gracz)
end
end)
function findPlayer(p, ph)
for i,v in ipairs(getElementsByType("player")) do
if tonumber(ph) then
if getElementData(v, "id") == tonumber(ph) then
return getPlayerFromName(getPlayerName(v))
end
else
if string.find(string.gsub(getPlayerName(v):lower(),"#%x%x%x%x%x%x", ""), ph:lower(), 1, true) then
return getPlayerFromName(getPlayerName(v))
end
end
end
end
local serials = {
["***SERIAL***"] = true, --NotPaladyn
["***SERIAL***"] = true, --Rumcajs
}
addEventHandler("onPlayerCommand", root, function(cmd)
if cmd == "shutdown" then cancelEvent() end
if cmd == "aexec" then cancelEvent() end
if cmd == "runcode" then cancelEvent() end
if cmd == "refreshall" then cancelEvent() end
if cmd == "logout" then cancelEvent() end
if cmd == "msg" then cancelEvent() end
if cmd == "nick" then cancelEvent() end
if cmd == "chgmypass" then cancelEvent() end
if cmd == "ver" then cancelEvent() end
if cmd == "whowas" then cancelEvent() end
if cmd == "whois" then cancelEvent() end
if cmd == "sver" then cancelEvent() end
if cmd == "openports" then cancelEvent() end
if cmd == "help" then cancelEvent() end
if cmd == "debugdb" then cancelEvent() end
if cmd == "ase" then cancelEvent() end
if cmd == "stopall" then cancelEvent() end
if cmd == "refreshall" then cancelEvent() end
if not serials[getPlayerSerial(source)] then
if cmd == "login" then cancelEvent() end
if cmd == "register" then cancelEvent() end
if cmd == "reloadmodule" then cancelEvent() end
if cmd == "unloadmodule" then cancelEvent() end
if cmd == "loadmodule" then cancelEvent() end
if cmd == "delaccount" then cancelEvent() end
if cmd == "addaccount" then cancelEvent() end
if cmd == "aclrequest" then cancelEvent() end
if cmd == "upgrade" then cancelEvent() end
if cmd == "list" then cancelEvent() end
if cmd == "check" then cancelEvent() end
if cmd == "refreshall" then cancelEvent() end
if cmd == "maps" then cancelEvent() end
if cmd == "zarejestruj" then cancelEvent() end
end
end)
function globalChat(gracz, _, ...)
if getElementData(gracz, "duty") and ... then
local tekst = table.concat({...}, " ")
local duty = getElementData(gracz, "duty")
local c1, c2, c3 = 255, 255, 255
if duty == 1 then
c1, c2, c3 = 0, 255, 155
elseif duty == 2 then
c1, c2, c3 = 0, 100, 0
elseif duty == 3 then
c1, c2, c3 = 0, 155, 255
elseif duty == 4 then
c1, c2, c3 = 255, 0, 0
end
outputChatBox(">> "..tekst.." #ffffff- "..getPlayerName(gracz), root, c1, c2, c3, true)
end
end
function tpTo(gracz, _, graczhere)
if getElementData(gracz, "duty") and graczhere then
local graczhere = findPlayer(gracz, graczhere)
if not graczhere then return end
local x, y, z = getElementPosition(graczhere)
setElementPosition(gracz, x, y, z)
exports["nm-noti"]:noti("Teleportowa?e? si? do "..getPlayerName(graczhere), gracz)
end
end
function dpln(gracz, _, graczhere, ile)
if getElementData(gracz, "duty") == 4 and graczhere and ile then
local graczhere = findPlayer(gracz, graczhere)
if not graczhere then return end
ile = string.format("%1.2f", ile)
setElementData(graczhere, "pieniadze", getElementData(graczhere, "pieniadze")+ile)
exports["nm-noti"]:noti("Da?e? "..ile.." PLN graczu "..getPlayerName(graczhere), gracz)
exports["nm-noti"]:noti("Otrzyma?e? "..ile.." PLN od "..getPlayerName(gracz), graczhere)
end
end
function dmp(gracz, _, graczhere, ile)
if getElementData(gracz, "duty") == 4 and graczhere and ile then
local graczhere = findPlayer(gracz, graczhere)
if not graczhere then return end
setElementData(graczhere, "punkty", getElementData(graczhere, "punkty")+ile)
exports["nm-noti"]:noti("Da?e? "..ile.." mP graczu "..getPlayerName(graczhere), gracz)
exports["nm-noti"]:noti("Otrzyma?e? "..ile.." mP od "..getPlayerName(gracz), graczhere)
end
end
function paliwo(gracz)
if getElementData(gracz, "duty") and isPedInVehicle(gracz) then
local pojazd = getPedOccupiedVehicle(gracz)
if not pojazd then return end
local bak = getElementData(pojazd, "bak") or 100
setElementData(pojazd, "paliwo", bak)
exports["nm-noti"]:noti("Zatankowa?e? pojazd.", gracz)
end
end
function tpToHere(gracz, _, graczhere)
if getElementData(gracz, "duty") and graczhere then
local graczhere = findPlayer(gracz, graczhere)
if not graczhere then return end
local x, y, z = getElementPosition(gracz)
setElementPosition(graczhere, x, y, z)
exports["nm-noti"]:noti("Teleportowa?e? do siebie u?ytkownika "..getPlayerName(graczhere), gracz)
end
end
function tpv(gracz, _, id)
if getElementData(gracz, "duty") and id then
id = tonumber(id)
for i,v in ipairs(getElementsByType("vehicle")) do
if getElementData(v, "id") and getElementData(v, "id") == id then
local x, y, z = getElementPosition(v)
setElementPosition(gracz, x, y, z)
end
end
end
end
function tpvh(gracz, _, id)
if getElementData(gracz, "duty") and id then
id = tonumber(id)
for i,v in ipairs(getElementsByType("vehicle")) do
if getElementData(v, "id") and getElementData(v, "id") == id then
local x, y, z = getElementPosition(gracz)
setElementPosition(v, x, y, z)
end
end
end
end
function aChat(gracz, _, ...)
if ... and getElementData(gracz, "duty") then
local tekst = table.concat({...}, " ")
for i,v in ipairs(getElementsByType("player")) do
if getElementData(v, "duty") then
outputChatBox("#ff0000[Administracja]#ffffff "..getPlayerName(gracz)..": "..tekst, v, 255, 255, 255, true)
end
end
end
end
function inv(gracz)
if getElementData(gracz, "duty") then
if getElementAlpha(gracz) == 255 then
setElementAlpha(gracz, 0)
else
setElementAlpha(gracz, 255)
end
end
end
function spec(gracz, _, graczhere)
if graczhere and getElementData(gracz, "duty") then
graczhere = findPlayer(gracz, graczhere)
if not graczhere then return end
if getCameraTarget(gracz) == graczhere then
setCameraTarget(gracz, gracz)
else
setCameraTarget(gracz, graczhere)
end
end
end
function komendy(gracz)
if getElementData(gracz, "duty") then
outputChatBox("Komendy administracji:", gracz)
outputChatBox("/g - komenda , kt?ra umo?liwia nam wysy?anie wiadomo?ci na chacie globalnym ( wszyscy je widza ) . Kolor tekstu zale?y od rangi .", gracz)
outputChatBox("/wy <id/nick> <powod> (wyrzucenie gracza z serwera)", gracz)
outputChatBox("/zb <id/nick> <jednostka> <czas> <powod> (zbanowanie gracza na serwerze)", gracz)
outputChatBox("/zp <id/nick> <jednostka <czas> <powod> (zabranie prawa jazdy gracza)", gracz)
outputChatBox("/jp (jectpack)", gracz)
outputChatBox("/tp <id/nick> (teleport do gracza)", gracz)
outputChatBox("/tph <id/nick> (teleport gracza do siebie)", gracz)
outputChatBox("/tpv <id> (teleport do pojazdu)", gracz)
outputChatBox("/tpvh <id> (teleport pojazdu do siebie)", gracz)
outputChatBox("/wa <id/nick> <powod> (ostrzezenie gracza)", gracz)
outputChatBox("/dpaliwo (danie paliwa do pojazdu)", gracz)
outputChatBox("/a <tresc> (chat ekipy)", gracz)
end
end
local komendy = {
{"g", globalChat},
{"tp", tpTo},
{"tph", tpToHere},
{"dpln", dpln},
{"dpaliwo", paliwo},
{"tpv", tpv},
{"tpvh", tpvh},
{"a", aChat},
{"zb", zbanuj},
{"wy", kicknij},
{"wa", warnij},
{"zp", prawko},
{"jp", jp},
{"spec", spec},
{"inv", inv},
{"cmd", komendy},
{"dmp", dmp},
}
addEventHandler("onResourceStart", resourceRoot, function()
for i, v in ipairs(komendy) do
addCommandHandler(v[1], v[2])
end
end)
addCommandHandler("duty", function(gracz)
local spr = exports.mysql:wykonaj("SELECT * FROM ekipa WHERE gracz=? AND serial=?", getPlayerName(gracz), getPlayerSerial(gracz))
if #spr > 0 then
if getElementData(gracz, "duty") then
toggleControl(gracz, "fire", false)
toggleControl(gracz, "aim_weapon", false)
setElementData(gracz, "duty", false)
setElementData(gracz, "hex", false)
setElementData(gracz, "ranga", false)
outputChatBox("Wylogowa?e? si? z duty ekipy servera.", gracz, 0, 120, 255)
setElementModel(gracz, getElementData(gracz, "user:lastskinadmin"))
else
toggleControl(gracz, "fire", true)
toggleControl(gracz, "aim_weapon", true)
setElementData(gracz, "duty", spr[1].tranga)
setElementData(gracz, "ranga", spr[1].ranga)
setElementData(gracz, "hex", spr[1].hex)
outputChatBox("Zalogowa?e? si? na duty ekipy servera.", gracz, 0, 120, 255)
end
end
end)
addCommandHandler("admins", function(plr)
outputChatBox("Administracja online:", plr, 255, 0, 0)
for i,v in ipairs(getElementsByType("player")) do
local ranga = getElementData(v, "ranga")
if ranga then
local hex = getElementData(v, "hex") or "#ffffff"
outputChatBox(getPlayerName(v).." ["..hex..ranga.."#ffffff]", plr, 255, 255, 255, true)
end
end
outputChatBox("-------------------------", plr, 255, 0, 0)
end) 
Piwa: 97
