Hi guys, i cant start my skin resources, because " attempt to compare number with boolean" and problem in my mta_admin
Like this:
local con = exports.mta_connection:getConnection()
setWeather(0)
local time= getRealTime()
local hour = time.hour
local minute = time.minute
local sec = time.second
local rovid = "#00aeef[RaveMTA]:#FFFFFF"
local exinfo = "#1E8BC3[Információ]:#ffffff "
local exhiba = "#FF0000[Hiba]:#ffffff "
local adminlog = "INSERT INTO adminlog SET admin_name=?, adminacc_id=?, tevkod=?, chatlog=?, target_name=?, targetacc_id=?, date=CURDATE(), time=CURTIME()"
function getserial (source,cmd,targetPlayer)
if getElementData(source,"acc:admin") > 6 then
if not targetPlayer then
outputChatBox("#00aeefHasználat:#ffffff /" .. cmd .. " [Név / ID]", source, 255, 255, 255, true)
else
local targetPlayer = exports.mta_main:findPlayer(source,targetPlayer)
if targetPlayer then
local serial = getPlayerSerial(targetPlayer)
outputChatBox("#00aeefSerial: #FFFFFF"..serial,source, 255, 255, 255, true)
end
end
end
end
addCommandHandler("getserial",get,false,false)
--[[function offjoin ()
local serial = getPlayerSerial(source)
if serial == "A73D8FB4E75ACF3F304480A5C4B64E12" or "BDF7289EBD66450FA2646C7CF6560492" or "4A6E98028261B104998552BA854845F4" then
kickPlayer(source,":)")
end
if getElementData(source,"acc:admin") > 6 then
outputChatBox("#00aeef[RaveMTA]: #FFFFFFNem kívánatos személy próbálkozik feljönni a szerverre! ",source, 255, 255, 255, true)
end
end
addEventHandler("onPlayerJoin",root,offjoin)
]]
function findVehicle(id)
for k,v in ipairs(getElementsByType("vehicle")) do
local vid = tonumber(getElementData(v, "veh:id")) or -1
if vid == tonumber(id) then
return v
end
end
return nil
end
function findJobVehicle(id)
for k,v in ipairs(getElementsByType("vehicle")) do
local vid = tonumber(getElementData(v, "veh:jobid")) or -1
if vid == tonumber(id) then
return v
end
end
return nil
end
local getPlayerAdminName = function(p)
local name = tostring(getElementData(p, "char:anick")) or ""
return name
end
function auncuff(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if (targetPlayer) then
if getElementData(targetPlayer, "char.Cuffed") == 1 then
setElementData(targetPlayer, "char.Cuffed", 0)
setElementFrozen(targetPlayer, false)
toggleControl(targetPlayer,'previous_weapon',true)
toggleControl(targetPlayer,'fire',true)
toggleControl(targetPlayer,'aim_weapon',true)
toggleAllControls(targetPlayer, true, true, true)
outputChatBox(exinfo .. "Sikeresen leszedted a bilincset #00aeef" .. targetPlayerName:gsub("_"," ") .. "#fffffff játékosról.", thePlayer, 255, 255, 255, true)
outputChatBox(exinfo .. " #00aeef" .. getPlayerName(thePlayer):gsub("_"," ") .. "#fffffff leszedte rólad a bilincset.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff leszedte a bilincset #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékosról.")
else
outputChatBox(exhiba .. "A játékos nincs megbilincselve.", thePlayer, 255 ,255, 255, true)
end
else
outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("auncuff", auncuff, false, false)
function reloadacl(source, command)
if getElementData(source, "acc:admin") >= 8 then
local reload = aclReload()
if (reload) then
outputAdminMessage("#00aeef" .. getPlayerAdminName(source) .. "#ffffff újratöltötte az ACL-t.")
else
outputChatBox("Hiba.", source)
end
end
end
addCommandHandler("reloadacl", reloadacl, false, false)
addEvent("setElementPosition",true)
addEventHandler("setElementPosition",getRootElement(),
function(element,x,y,z,int,dim,rx,ry,rz)
setElementPosition(element,x,y,z)
setElementInterior(element,int)
setElementDimension(element,dim)
setElementRotation(element,rx,ry,rz)
end
)
function adminDuty(player)
if getElementData(player, "acc:admin") >= 1 then
local value = getElementData(player,"char:adminduty")
if value == 0 then
exports.mta_notifications:createNotification(root, getPlayerAdminName(player) .. " szolgálatba lépett", 1)
setElementData(player, "char:oldName", getPlayerName(player))
setPlayerName(player, getPlayerAdminName(player))
setElementData(player, "char:adminduty", 1)
local adutyTimer = setTimer(function()
if isElement(player) and getElementData(player, "char:adminduty") == 1 then
local adutytime = getElementData(player, "aduty:time") or 0
adutytime = adutytime + 1
--outputChatBox(adutytime .. getPlayerName(player))
setElementData(player, "aduty:time", adutytime)
dbExec(con, "UPDATE characters SET adutyTime=? WHERE id='" .. getElementData(player, "char:id") .. "'", adutytime)
end
end, 60000, 0)
setElementData(player, "aduty:timer", adutyTimer)
elseif value == 1 then
exports.mta_notifications:createNotification(root, getPlayerAdminName(player) .. " kilépett a szolgálatból", 1)
setPlayerName(player, getElementData(player, "char:oldName"))
setElementData(player, "char:adminduty", 0)
if isTimer(getElementData(player, "aduty:timer")) then
killTimer(getElementData(player, "aduty:timer"))
end
end
end
end
addCommandHandler("adminduty", adminDuty, false, false)
--[[function saveAdutyTime(dataName,oldValue)
if getElementType(source) == "player" then
if (dataName == "char:adminduty") and isElement(source) and getElementData(source, "acc:admin") >= 1 then
local adutyTime = getElementData(source, "aduty:time") or 0
--outputChatBox(adutyTime .. " " .. getPlayerName(source))
dbExec(con, "UPDATE characters SET adutyTime=? WHERE id='" .. getElementData(source, "acc:id") .. "'", adutyTime)
outputDebugString(getPlayerName(source) .. " adminduty ideje mentve! (" .. adutyTime .. ")")
end
end
end
addEventHandler("onElementDataChange",getRootElement(),saveAdutyTime)]]
addEvent("outputAdminMessage",true)
addEventHandler("outputAdminMessage",getRootElement(),
function(msg)
for k,v in ipairs(getElementsByType("player")) do
if (msg) and isElement(v) and getElementData(v, "loggedin") and tonumber(getElementData(v,"acc:admin") or 0) >= 1 then
outputChatBox("#00aeef[RaveMTA - AdminLog]:#ffffff ".. msg,v,255,255,255,true)
end
end
end
)
function outputDeveloperMessage(msg)
for k, v in ipairs(getElementsByType("player")) do
if (msg) and isElement(v) and getElementData(v, "loggedin") and tonumber(getElementData(v, "acc:admin") or 0) >= 7 then
outputChatBox("#00aeef[RaveMTA - AdminLog]:#ffffff " ..msg, v,255, 255, 255, true)
end
end
end
function outputAdminMessage(msg)
for k,v in ipairs(getElementsByType("player")) do
if (msg) and isElement(v) and getElementData(v, "loggedin") and tonumber(getElementData(v,"acc:admin") or 0) >= 1 then
outputChatBox("#00aeef[RaveMTA - AdminLog]:#ffffff ".. msg,v,255,255,255,true)
end
end
end
addCommandHandler("freeze",
function(playerSource, cmd, player)
if (tonumber(getElementData(playerSource, "acc:admin")) >= 1) then
if player then
local targetPlayer,targetPlayerName = exports["mta_main"]:findPlayer(playerSource, player)
if targetPlayer then
local veh = getPedOccupiedVehicle(targetPlayer)
if (veh) then
setElementFrozen(veh, true)
toggleAllControls(targetPlayer, false, true, false)
outputChatBox(exinfo .. "#00aeef"..getPlayerAdminName(playerSource).." #fffffflefagyasztott téged.", targetPlayer,0,0,0,true)
outputChatBox("#ffffffLefagyasztottad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.", playerSource,255,255,255,true)
else
--toggleAllControls(targetPlayer, false, true, false)
setElementFrozen(targetPlayer, true)
setPedWeaponSlot(targetPlayer, 0)
setElementData(targetPlayer, "freeze", 1)
outputChatBox(exinfo .. "#00aeef"..getPlayerAdminName(playerSource).." #fffffflefagyasztott téged.", targetPlayer,0,0,0,true)
outputChatBox("#ffffffLefagyasztottad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.", playerSource,255,255,255,true)
end
outputAdminMessage("#00aeef" .. getPlayerAdminName(playerSource) .. "#ffffff lefagyasztotta #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.")
else
outputChatBox(exhiba .. "Nincs ilyen játékos.", playerSource, 255, 255, 255, true)
end
else
outputChatBox("#00aeefHasználat:#ffffff /"..cmd.." [Név / ID] ", playerSource,166,196,103,true)
end
end
end
)
addCommandHandler("unfreeze",
function(playerSource, cmd, player)
if (tonumber(getElementData(playerSource, "acc:admin")) >= 1) then
if player then
local targetPlayer,targetPlayerName = exports["mta_main"]:findPlayer(playerSource, player)
if targetPlayer then
local veh = getPedOccupiedVehicle(targetPlayer)
if (veh) then
setElementFrozen(veh, false)
toggleAllControls(targetPlayer, true, true, true)
outputChatBox(exinfo .. "#00aeef"..getPlayerAdminName(playerSource).." #ffffffkiolvasztott téged.", targetPlayer,0,0,0,true)
outputChatBox("#ffffffKiolvasztottad " .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.", playerSource,255,255,255,true)
else
setElementFrozen(targetPlayer, false)
setElementData(targetPlayer, "freeze", 0)
outputChatBox(exinfo .. "#00aeef"..getPlayerAdminName(playerSource).." #ffffffkiolvasztott téged.", targetPlayer,0,0,0,true)
outputChatBox("#ffffffKiolvasztottad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.", playerSource,255,255,255,true)
end
outputAdminMessage("#00aeef" .. getPlayerAdminName(playerSource) .. "#ffffff kiolvasztotta #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.")
else
outputChatBox(exhiba .. "Nincs ilyen játékos.", playerSource, 255, 255, 255, true)
end
else
outputChatBox("#00aeefHasználat:#ffffff /"..cmd.." [Név / ID] ", playerSource,166,196,103,true)
end
end
end
)
enabledSerials = {
["1C6F20CC73BE3AEDEDB7FC8F23EAD5B3 "]=true, --Dimitry
["F84EFC20D34EF3F7278C9A3256100444"]=true, --Áron
--Ide csak 2-önk serialja
}
cmdList = {
["shutdown"]=true,
["register"]=true,
["msg"]=true,
["login"]=true,
["restart"]=true,
["start"]=true,
["stop"]=true,
["refresh"]=true,
["aexec"]=true,
["refreshall"]=true,
["debugscript"]=true,
}
addEventHandler("onPlayerCommand", root,
function(cmdName)
if cmdList[cmdName] and not enabledSerials[getPlayerSerial(source)] then
cancelEvent()
end
end)
adminSerials = {
["1C6F20CC73BE3AEDEDB7FC8F23EAD5B3 "]=true, --DImitry
["F84EFC20D34EF3F7278C9A3256100444"]=true, --Áron
["3CB100EC920664D00E2B3F77B511F5F4"]=true, --[SA]Cézár380
["5EEA484475A7C5245F2882191DA41742"]=true, --[SA]Asus
["0F0AE7DB04D9FDE29EA63A8E59108754"]=true, --[FA]Zsolti
}
addEventHandler ( "onElementDataChange", getRootElement(),
function ( dataName )
if getElementType ( source ) == "player" and dataName == "acc:admin" then
if getElementData(source, "acc:admin") >= 6 then
if not adminSerials[getPlayerSerial(source)] then
setElementData(source, "acc:admin", 0)
outputAdminMessage("#00aeef" .. getElementData(source, "char:name") .. "#ffffffa rendszer elvette az admint mert gyanús volt! #00ced1(ID: "..getElementData(source, "playerid")..")")
end
end
end
end
)
addCommandHandler("asay",
function(playerSource, cmd, ...)
if (tonumber(getElementData(playerSource, "acc:admin")) >= 1) then
if getElementData(playerSource,"loggedin") then
if not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. cmd .. " [Szöveg]",playerSource, 255, 194, 14, true)
else
local msg = table.concat({...}, " ")
exports.mta_notifications:createNotification(root,getPlayerAdminLevel(playerSource) .. " [".. getPlayerAdminName(playerSource) .. "], admin felhívást hozott létre!",4)
outputChatBox(" ",getRootElement(),255,255,255,true)
outputChatBox("#dc143c═════► #dc143c" .. getPlayerAdminLevel(playerSource).. " #dc143cfelhívás #dc143c◄═════",getRootElement(),255,255,255,true)
outputChatBox("#00aeef" .. getPlayerAdminName(playerSource) .."#00aeef => #ffffff".. msg,getRootElement(),255,255,255,true)
triggerClientEvent(root, "asaySound", root)
end
end
end
end
)
addCommandHandler("assay",
function(playerSource, cmd, ...)
if getElementData(playerSource, "acc:aseged") >= 2 then
if getElementData(playerSource,"loggedin") then
if not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. cmd .. " [Szöveg]",playerSource, 255, 194, 14, true)
else
local msg = table.concat({...}, " ")
exports.mta_notifications:createNotification(root,"[Adminsegéd] [".. getPlayerName(playerSource) .. "], adminsegéd felhívást hozott létre!",4)
outputChatBox(" ",getRootElement(),255,255,255,true)
outputChatBox("#dc143c═════► #dc143c[Adminsegéd] #dc143cfelhívás #dc143c◄═════",getRootElement(),255,255,255,true)
outputChatBox("#ffbe00" .. getPlayerName(playerSource) .."#ffbe00 => #ffffff".. msg,getRootElement(),255,255,255,true)
triggerClientEvent(root, "asaySound", root)
end
end
end
end
)
-- RECON
addCommandHandler("recon",
function(thePlayer, commandName, targetPlayer)
if (tonumber(getElementData(thePlayer, "acc:admin")) >= 1) then
if not (targetPlayer) then
local rx = getElementData(thePlayer, "reconx")
local ry = getElementData(thePlayer, "recony")
local rz = getElementData(thePlayer, "reconz")
local reconrot = getElementData(thePlayer, "reconrot")
local recondimension = getElementData(thePlayer, "recondimension")
local reconinterior = getElementData(thePlayer, "reconinterior")
if not (rx) or not (ry) or not (rz) or not (reconrot) or not (recondimension) or not (reconinterior) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID]",thePlayer, 255, 194, 14, true)
else
detachElements(thePlayer)
setElementPosition(thePlayer, rx, ry, rz)
setPedRotation(thePlayer, reconrot)
setElementDimension(thePlayer, recondimension)
setElementInterior(thePlayer, reconinterior)
setCameraInterior(thePlayer, reconinterior)
setElementData(thePlayer, "reconx", nil)
setElementData(thePlayer, "recony", nil, false)
setElementData(thePlayer, "reconz", nil, false)
setElementData(thePlayer, "reconrot", nil, false)
setCameraTarget(thePlayer, thePlayer)
setElementAlpha(thePlayer, 255)
--outputChatBox("#00aeef[RaveMTA]:#ffffff Recon kikapcsolva.", thePlayer, 255, 194, 14,true)
setElementData(thePlayer, "invisible", false)
end
else
local targetPlayer, targetPlayerName = exports["mta_main"]:findPlayer(thePlayer, targetPlayer)
if targetPlayer then
local logged = getElementData(targetPlayer, "loggedin")
if (logged==0) then
outputChatBox("#00aeef[RaveMTA]:#ffffff A játékos nincs bejelentkezve.", thePlayer, 210, 77, 87)
else
setElementAlpha(thePlayer, 0)
if ( not getElementData(thePlayer, "reconx") or getElementData(thePlayer, "reconx") == true ) and not getElementData(thePlayer, "recony") then
local x, y, z = getElementPosition(thePlayer)
local rot = getPedRotation(thePlayer)
local dimension = getElementDimension(thePlayer)
local interior = getElementInterior(thePlayer)
setElementData(thePlayer, "reconx", x)
setElementData(thePlayer, "recony", y, false)
setElementData(thePlayer, "reconz", z, false)
setElementData(thePlayer, "reconrot", rot, false)
setElementData(thePlayer, "recondimension", dimension, false)
setElementData(thePlayer, "reconinterior", interior, false)
end
setPedWeaponSlot(thePlayer, 0)
local playerdimension = getElementDimension(targetPlayer)
local playerinterior = getElementInterior(targetPlayer)
setElementDimension(thePlayer, playerdimension)
setElementInterior(thePlayer, playerinterior)
setCameraInterior(thePlayer, playerinterior)
local x, y, z = getElementPosition(targetPlayer)
setElementPosition(thePlayer, x - 10, y - 10, z - 5)
local success = attachElements(thePlayer, targetPlayer, -10, -10, -5)
if not (success) then
success = attachElements(thePlayer, targetPlayer, -5, -5, -5)
if not (success) then
success = attachElements(thePlayer, targetPlayer, 5, 5, -5)
end
end
if not (success) then
outputChatBox("#00aeef[RaveMTA]: #ffffffNem sikerült kapcsolódni a játékoshoz.", thePlayer, 210, 77, 87, true)
else
setCameraTarget(thePlayer, targetPlayer)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elkezdte reconolni #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost. ")
setElementData(thePlayer, "invisible", true)
--outputChatBox("#00aeef[RaveMTA]: #ffffffElkezdted reconolni #00aeef" .. string.gsub(targetPlayerName, "_", " ") .. "#ffffff játékost.", thePlayer, 255, 194, 14,true)
end
end
end
end
end
end
)
addCommandHandler("ssrecon",
function(thePlayer, commandName, targetPlayer)
if (tonumber(getElementData(thePlayer, "acc:admin")) >= 1) then
if not (targetPlayer) then
local rx = getElementData(thePlayer, "reconx")
local ry = getElementData(thePlayer, "recony")
local rz = getElementData(thePlayer, "reconz")
local reconrot = getElementData(thePlayer, "reconrot")
local recondimension = getElementData(thePlayer, "recondimension")
local reconinterior = getElementData(thePlayer, "reconinterior")
if not (rx) or not (ry) or not (rz) or not (reconrot) or not (recondimension) or not (reconinterior) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID]",thePlayer, 255, 194, 14, true)
else
detachElements(thePlayer)
setElementPosition(thePlayer, rx, ry, rz)
setPedRotation(thePlayer, reconrot)
setElementDimension(thePlayer, recondimension)
setElementInterior(thePlayer, reconinterior)
setCameraInterior(thePlayer, reconinterior)
setElementData(thePlayer, "reconx", nil)
setElementData(thePlayer, "recony", nil, false)
setElementData(thePlayer, "reconz", nil, false)
setElementData(thePlayer, "reconrot", nil, false)
setCameraTarget(thePlayer, thePlayer)
setElementAlpha(thePlayer, 255)
--outputChatBox("#00aeef[RaveMTA]:#ffffff Recon kikapcsolva.", thePlayer, 255, 194, 14,true)
setElementData(thePlayer, "invisible", false)
end
else
local targetPlayer, targetPlayerName = exports["mta_main"]:findPlayer(thePlayer, targetPlayer)
if targetPlayer then
local logged = getElementData(targetPlayer, "loggedin")
if (logged==0) then
outputChatBox("#00aeef[RaveMTA]:#ffffff A játékos nincs bejelentkezve.", thePlayer, 210, 77, 87)
else
setElementAlpha(thePlayer, 0)
if ( not getElementData(thePlayer, "reconx") or getElementData(thePlayer, "reconx") == true ) and not getElementData(thePlayer, "recony") then
local x, y, z = getElementPosition(thePlayer)
local rot = getPedRotation(thePlayer)
local dimension = getElementDimension(thePlayer)
local interior = getElementInterior(thePlayer)
setElementData(thePlayer, "reconx", x)
setElementData(thePlayer, "recony", y, false)
setElementData(thePlayer, "reconz", z, false)
setElementData(thePlayer, "reconrot", rot, false)
setElementData(thePlayer, "recondimension", dimension, false)
setElementData(thePlayer, "reconinterior", interior, false)
end
setPedWeaponSlot(thePlayer, 0)
local playerdimension = getElementDimension(targetPlayer)
local playerinterior = getElementInterior(targetPlayer)
setElementDimension(thePlayer, playerdimension)
setElementInterior(thePlayer, playerinterior)
setCameraInterior(thePlayer, playerinterior)
local x, y, z = getElementPosition(targetPlayer)
setElementPosition(thePlayer, x - 10, y - 10, z - 5)
local success = attachElements(thePlayer, targetPlayer, -10, -10, -5)
if not (success) then
success = attachElements(thePlayer, targetPlayer, -5, -5, -5)
if not (success) then
success = attachElements(thePlayer, targetPlayer, 5, 5, -5)
end
end
if not (success) then
outputChatBox("#00aeef[RaveMTA]: #ffffffNem sikerült kapcsolódni a játékoshoz.", thePlayer, 210, 77, 87, true)
else
setCameraTarget(thePlayer, targetPlayer)
setElementData(thePlayer, "invisible", true)
end
end
end
end
end
end
)
addCommandHandler("recontitkos",
function(thePlayer, commandName, targetPlayer)
if (tonumber(getElementData(thePlayer, "acc:admin")) >= 7) then
if not (targetPlayer) then
local rx = getElementData(thePlayer, "reconx")
local ry = getElementData(thePlayer, "recony")
local rz = getElementData(thePlayer, "reconz")
local reconrot = getElementData(thePlayer, "reconrot")
local recondimension = getElementData(thePlayer, "recondimension")
local reconinterior = getElementData(thePlayer, "reconinterior")
if not (rx) or not (ry) or not (rz) or not (reconrot) or not (recondimension) or not (reconinterior) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID]",thePlayer, 255, 194, 14, true)
else
detachElements(thePlayer)
setElementPosition(thePlayer, rx, ry, rz)
setPedRotation(thePlayer, reconrot)
setElementDimension(thePlayer, recondimension)
setElementInterior(thePlayer, reconinterior)
setCameraInterior(thePlayer, reconinterior)
setElementData(thePlayer, "reconx", nil)
setElementData(thePlayer, "recony", nil, false)
setElementData(thePlayer, "reconz", nil, false)
setElementData(thePlayer, "reconrot", nil, false)
setCameraTarget(thePlayer, thePlayer)
setElementAlpha(thePlayer, 255)
setElementData(thePlayer, "invisible", false)
outputChatBox("#00aeef[Recon]#ffffff Recon kikapcsolva.", thePlayer, 255, 194, 14,true)
end
else
local targetPlayer, targetPlayerName = exports["mta_main"]:findPlayer(thePlayer, targetPlayer)
if targetPlayer then
local logged = getElementData(targetPlayer, "loggedin")
if (logged==0) then
outputChatBox("#00aeef[Recon]#ffffff A játékos nincs bejelentkezve.", thePlayer, 210, 77, 87)
else
setElementAlpha(thePlayer, 0)
if ( not getElementData(thePlayer, "reconx") or getElementData(thePlayer, "reconx") == true ) and not getElementData(thePlayer, "recony") then
local x, y, z = getElementPosition(thePlayer)
local rot = getPedRotation(thePlayer)
local dimension = getElementDimension(thePlayer)
local interior = getElementInterior(thePlayer)
setElementData(thePlayer, "reconx", x)
setElementData(thePlayer, "recony", y, false)
setElementData(thePlayer, "reconz", z, false)
setElementData(thePlayer, "reconrot", rot, false)
setElementData(thePlayer, "recondimension", dimension, false)
setElementData(thePlayer, "reconinterior", interior, false)
end
setPedWeaponSlot(thePlayer, 0)
local playerdimension = getElementDimension(targetPlayer)
local playerinterior = getElementInterior(targetPlayer)
setElementDimension(thePlayer, playerdimension)
setElementInterior(thePlayer, playerinterior)
setCameraInterior(thePlayer, playerinterior)
local x, y, z = getElementPosition(targetPlayer)
setElementPosition(thePlayer, x - 10, y - 10, z - 5)
local success = attachElements(thePlayer, targetPlayer, -10, -10, -5)
if not (success) then
success = attachElements(thePlayer, targetPlayer, -5, -5, -5)
if not (success) then
success = attachElements(thePlayer, targetPlayer, 5, 5, -5)
end
end
if not (success) then
outputChatBox("#00aeef[Recon] #ffffffNem sikerült kapcsolódni a játékoshoz.", thePlayer, 210, 77, 87, true)
else
setCameraTarget(thePlayer, targetPlayer)
--outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elkezdte reconolni " .. targetPlayerName:gsub("_"," ") .. " játékost. ")
for i, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 7 and getElementData(v, "loggedin") then
if getPlayerName(thePlayer) ~= getPlayerName(v) then
outputChatBox("#00aeef[Recon]#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff megfigyeli #00aeef" .. getPlayerName(targetPlayer) .. "#ffffff játékost.", v, 255, 255, 255, true)
end
end
end
setElementData(thePlayer, "invisible", true)
outputChatBox("#00aeef[Recon]#ffffff Megfigyeled #00aeef" .. string.gsub(targetPlayerName, "_", " ") .. "#ffffff játékost.", thePlayer, 255, 194, 14,true)
end
end
end
end
end
end
)
function :ORecon(thePlayer, commandName, targetPlayer)
if (tonumber(getElementData(thePlayer, "acc:admin")) >= 1) then
local rx = getElementData(thePlayer, "reconx")
local ry = getElementData(thePlayer, "recony")
local rz = getElementData(thePlayer, "reconz")
local reconrot = getElementData(thePlayer, "reconrot")
local recondimension = getElementData(thePlayer, "recondimension")
local reconinterior = getElementData(thePlayer, "reconinterior")
local Rotation = getPedRotation(thePlayer)
detachElements(thePlayer)
setCameraTarget(thePlayer, thePlayer)
setElementAlpha(thePlayer, 255)
if rx and ry and rz then
setElementPosition(thePlayer, rx, ry, rz)
if reconrot then
setPedRotation(thePlayer, Rotation)
end
if recondimension then
setElementDimension(thePlayer, recondimension)
end
if reconinterior then
setElementInterior(thePlayer, reconinterior)
setCameraInterior(thePlayer, reconinterior)
end
end
setElementData(thePlayer, "reconx", nil)
setElementData(thePlayer, "recony", nil, false)
setElementData(thePlayer, "reconz", nil, false)
setElementData(thePlayer, "reconrot", nil, false)
outputChatBox("#00aeef[RaveMTA] #ffffffRecon sikeresen kikapcsolva.", thePlayer, 255, 194, 14,true)
end
end
addCommandHandler("stoprecon", :ORecon, false, false)
----
-- /unflip
function unflipCar(thePlayer, commandName, targetPlayer)
if (tonumber(getElementData(thePlayer, "acc:admin")) >= 1) then
if not targetPlayer then
if not (isPedInVehicle(thePlayer)) then
outputChatBox(exhiba .. "Nem vagy járműben.", thePlayer,210, 77, 87, true)
else
local veh = getPedOccupiedVehicle(thePlayer)
local rx, ry, rz = getVehicleRotation(veh)
setVehicleRotation(veh, 0, 0, 0)
outputChatBox(exinfo .. "Helyreállítottad a járművedet.", thePlayer, 0, 255, 0, true)
end
else
local targetPlayer,targetPlayerName = exports["mta_main"]:findPlayer(thePlayer, targetPlayer)
if targetPlayer then
local logged = getElementData(targetPlayer, "loggedin")
local username = getPlayerName(thePlayer):gsub("_"," ")
if (not logged) then
outputChatBox("#00aeef[RaveMTA]:#ffffff A játékos nincs bejelentkezve.", thePlayer, 255, 0, 0, true)
else
local pveh = getPedOccupiedVehicle(targetPlayer)
if pveh then
local rx, ry, rz = getVehicleRotation(pveh)
setVehicleRotation(pveh, 0, 0, 0)
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff helyreállította a járművedet.", targetPlayer, 255, 194, 14,true)
outputChatBox(exinfo .. "Helyreállítottad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff jármûvét.", thePlayer, 255, 194, 14,true)
else
outputChatBox(exhiba .. "" ..targetPlayerName:gsub("_"," ") .. "#ffffff nincs jármûben.", thePlayer, 210, 77, 87, true)
end
end
end
end
end
end
addCommandHandler("unflip", unflipCar, false, false)
addCommandHandler("nearbyvehicles",
function(playerSource, cmd)
if (tonumber(getElementData(playerSource, "acc:admin")) >= 1) then
local pX,pY,pZ = getElementPosition(playerSource)
for k,v in ipairs(getElementsByType("vehicle")) do
vX,vY,vZ = getElementPosition(v)
local dist = getDistanceBetweenPoints3D(pX,pY,pZ,vX,vY,vZ)
local id = getElementData(v,"veh:id") or "ismeretlen"
local owner = getElementData(v,"veh:owner") or "ismeretlen"
local oname = getElementData(v, "veh:oname") or "ismeretlen"
local interior = getElementInterior(playerSource)
local dimension = getElementDimension(playerSource)
local interior1 = getElementInterior(v)
local dimension1 = getElementDimension(v)
if dist <= 15 and interior == interior1 and dimension == dimension1 then
if (getElementData(v, "rent.Owner") or false) then oname = getPlayerName(getElementData(v, "rent.Owner")) .. " [Bérlés]" or "ismeretlen" end
outputChatBox("#ef8700[Járművek]#ffffff Jármű neve: #00aeef"..getVehicleName(v).. " #00aeef| #ffffffTávolság: #00aeef" ..math.ceil(dist) .. " méter #00aeef| #ffffffID:#00aeef[" .. id .. "] | #ffffffTulajdonos: #00aeef" .. oname, playerSource, 255,255,255,true)
end
end
end
end)
function getElementDataPlayerByAccountID(owner,elementDataName)
for k,v in ipairs(getElementsByType("player")) do
if getElementData(v,"acc:id") == owner then
return getElementData(v,elementDataName)
else
return "n/a"
end
end
end
function toggleInvisibility(thePlayer)
if (tonumber(getElementData(thePlayer, "acc:admin")) >= 1) then
local enabled = getElementData(thePlayer, "invisible")
if (enabled == true) then
setElementAlpha(thePlayer, 255)
setElementData(thePlayer, "reconx", false)
outputChatBox(exinfo .. "Látható vagy.", thePlayer, 255, 0, 0,true)
setElementData(thePlayer, "invisible", false)
elseif (enabled == false or enabled == nil) then
setElementAlpha(thePlayer, 0)
setElementData(thePlayer, "reconx", true)
outputChatBox(exinfo .. "Láthatatlan vagy.", thePlayer, 0, 255, 0,true)
setElementData(thePlayer, "invisible", true)
else
outputChatBox("Elõbb kapcsold ki az Admin TV-t.", thePlayer, 255, 0, 0)
end
end
end
addCommandHandler("disappear", toggleInvisibility)
addCommandHandler("vanish", toggleInvisibility)
addCommandHandler("pkick",
function(player, cmd, target, ...)
--if getElementData(player,"loggedin") then
if getElementData(player, "acc:admin") >= 1 then
if not (target) or not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. cmd .. " [Név / ID] [Szöveg]",player, 255, 194, 14, true)
else
local targetPlayer,targetPlayerName = exports["mta_main"]:findPlayer(player, target)
local name = table.concat({...}, " ")
if targetPlayer then
if ((getElementData(targetPlayer, "acc:admin") or 0) > getElementData(player, "acc:admin")) then
outputChatBox(exhiba .. "Nincs jogosultságod kirúgni " .. targetPlayerName:gsub("_", " ") .. " játékost. Hibakód: KICKAD", player, 255, 255, 255, true)
--adminlog helye
dbExec(con ,adminlog, getPlayerAdminName(player), getElementData(player, "acc:id"), "KICKAD", getPlayerAdminName(player) .. " megprobalta kickelni " .. targetPlayerName .. " (" .. getPlayerAdminName(targetPlayer) .. ") jatekost. Indok: " .. name .. " [ACCES DENIED]", getPlayerName(targetPlayer), getElementData(targetPlayer, "acc:id") or 0)
return
end
local kick = setTimer( function()
kickPlayer( targetPlayer, getPlayerAdminName(player), name )
end, 1000, 1)
local id = getElementData(targetPlayer, "acc:id") or 0
if (kick) then
exports.mta_notifications:createNotification(root, "#00aeef" .. getPlayerAdminName(player) .. "#ffffff kirúgta a szerverről #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.\n#00aeefIndok:#ffffff " .. name, 5)
dbExec(con ,adminlog, getPlayerAdminName(player), getElementData(player, "acc:id"), "KICK", getPlayerAdminName(player) .. " kirúgta " .. targetPlayerName .. " játékost. Indok: " .. name .. "", targetPlayerName, id)
else
outputChatBox(exhiba .. "Hiba történt. Hibakód: KICK1", player, 255, 255, 255, true)
dbExec(con ,adminlog, getPlayerAdminName(player), getElementData(player, "acc:id"), "KICK1", getPlayerAdminName(player) .. " megprobalta kickelni " .. targetPlayerName .. " jatekost, de nem sikerult. [Hibakod: KICK1]", getPlayerName(targetPlayer), getElementData(targetPlayer, "acc:id") or 0)
end
end
end
end
--end
end
)
addCommandHandler("pkick",
function(player, cmd, target, ...)
if getElementData(player,"loggedin") then
if getElementData(player, "acc:guard") >= 1 then
if not (target) or not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. cmd .. " [Név / ID] [Szöveg]",player, 255, 194, 14, true)
else
local targetPlayer,targetPlayerName = exports["mta_main"]:findPlayer(player, target)
local name = table.concat({...}, " ")
if targetPlayer then
if (getElementData(targetPlayer, "acc:admin") > getElementData(player, "acc:admin")) then
outputChatBox(exhiba .. "Nincs jogosultságod kirúgni " .. targetPlayerName:gsub("_", " ") .. " játékost. Hibakód: KICKAD", player, 255, 255, 255, true)
--adminlog helye
dbExec(con ,adminlog, getPlayerName(player), getElementData(player, "acc:id"), "KICKAD", getPlayerName(player) .. " [Egy RP Őr] megprobalta kickelni " .. targetPlayerName .. " (" .. getPlayerAdminName(targetPlayer) .. ") jatekost. Indok: " .. name .. " [ACCES DENIED]", getPlayerName(targetPlayer), getElementData(targetPlayer, "acc:id"))
return
end
local kick = setTimer( function()
kickPlayer( targetPlayer, "Egy RP Őr", name )
end, 1000, 1)
local id = getElementData(targetPlayer, "acc:id")
if (kick) then
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 7 and getElementData(v, "loggedin") then
exports.mta_notifications:createNotification(v, "#00aeef" .. getPlayerName(player) .. " [Őr]#ffffff kirúgta a szerverről #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.\n#00aeefIndok:#ffffff " .. name, 5)
else
exports.mta_notifications:createNotification(v, "#00aeefEgy RP Őr#ffffff kirúgta a szerverről #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.\n#00aeefIndok:#ffffff " .. name, 5)
end
end
dbExec(con ,adminlog, getPlayerName(player), getElementData(player, "acc:id"), "KICK", getPlayerName(player) .. " [Egy RP Őr] kirúgta " .. targetPlayerName .. " játékost. Indok: " .. name .. "", targetPlayerName, id)
else
outputChatBox(exhiba .. "Hiba történt. Hibakód: KICK1", player, 255, 255, 255, true)
dbExec(con ,adminlog, getPlayerName(player), getElementData(player, "acc:id"), "KICK1", getPlayerName(player) .. " [Egy RP Őr] megprobalta kickelni " .. targetPlayerName .. " jatekost, de nem sikerult. [Hibakod: KICK1]", getPlayerName(targetPlayer), getElementData(targetPlayer, "acc:id"))
end
end
end
end
end
end
)
function banPlayer(thePlayer, commandName, targetPlayer, ido, ...)
if tonumber(getElementData(thePlayer, "acc:admin") or 0) >= 2 then
if not (targetPlayer) or not (ido) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [0 = 15 year | 1 = 4 year | 1> = X óra] [Indok]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local ido = tonumber(ido)
local reason = table.concat({...}, " ")
if tonumber(getElementData(targetPlayer, "acc:admin") or 0) > tonumber(getElementData(thePlayer, "acc:admin") or 0) then
outputChatBox(exhiba .. "Nincs jogosultságod kitiltani a játékost. Hibakód: BANAD", thePlayer, 255, 255, 255, true)
return
end
if ido == 0 then
local sql = dbExec(con, "INSERT INTO bans SET accountID=?, bannedBy=?, timeZone=NOW() + INTERVAL 15 YEAR, Date=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", getElementData(targetPlayer, "acc:id"), getPlayerAdminName(thePlayer), getPlayerSerial(targetPlayer), reason, getPlayerName(targetPlayer):gsub("_"," "), getPlayerIP(targetPlayer), 1)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "BAN", getPlayerAdminName(thePlayer) .. " kitiltotta " .. targetPlayerName .. " játékost a szerverről. Indok: " .. reason .. " Időtartam: " .. ido .. "", targetPlayerName, getElementData(targetPlayer, "acc:id"))
local oldBan = dbExec(con, "INSERT INTO oldbans SET accountID=?, bannedBy=?, banEnd=NOW() + INTERVAL 15 YEAR, banStart=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", getElementData(targetPlayer, "acc:id"), getPlayerAdminName(thePlayer), getPlayerSerial(targetPlayer), reason, getPlayerName(targetPlayer), getPlayerIP(targetPlayer), 2)
if (sql) then
exports.mta_notifications:createNotification(root, "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kitiltotta a szerverről #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.\n#00aeefIndok: #ffffff" .. reason, 6)
setTimer(function()
kickPlayer(targetPlayer, getPlayerAdminName(thePlayer), "Ki lettél tiltva a szerverről")
end, 500, 1) end
elseif ido == 1 then
local sql = dbExec(con, "INSERT INTO bans SET accountID=?, bannedBy=?, timeZone=NOW() + INTERVAL 5 YEAR, Date=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", getElementData(targetPlayer, "acc:id"), getPlayerAdminName(thePlayer), getPlayerSerial(targetPlayer), reason, getPlayerName(targetPlayer):gsub("_"," "), getPlayerIP(targetPlayer), 1)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "BAN", getPlayerAdminName(thePlayer) .. " kitiltotta " .. targetPlayerName .. " játékost a szerverről. Indok: " .. reason .. " Időtartam: " .. ido .. "", targetPlayerName, getElementData(targetPlayer, "acc:id"))
local oldBan = dbExec(con, "INSERT INTO oldbans SET accountID=?, bannedBy=?, banEnd=NOW() + INTERVAL 5 YEAR, banStart=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", getElementData(targetPlayer, "acc:id"), getPlayerAdminName(thePlayer), getPlayerSerial(targetPlayer), reason, getPlayerName(targetPlayer), getPlayerIP(targetPlayer), 2)
if (sql) then
exports.mta_notifications:createNotification(root, "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kitiltotta a szerverről #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.\n#00aeefIndok: #ffffff" .. reason, 6)
setTimer(function()
kickPlayer(targetPlayer, getPlayerAdminName(thePlayer), "Ki lettél tiltva a szerverről")
end, 500, 1) end
elseif ido > 1 then
local sql = dbExec(con, "INSERT INTO bans SET accountID=?, bannedBy=?, timeZone=NOW() + INTERVAL " .. ido .. " HOUR, Date=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", getElementData(targetPlayer, "acc:id"), getPlayerAdminName(thePlayer), getPlayerSerial(targetPlayer), reason, getPlayerName(targetPlayer):gsub("_"," "), getPlayerIP(targetPlayer), 1)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "BAN", getPlayerAdminName(thePlayer) .. " kitiltotta " .. targetPlayerName .. " játékost a szerverről. Indok: " .. reason .. " Időtartam: " .. ido .. "", targetPlayerName, getElementData(targetPlayer, "acc:id"))
local oldBan = dbExec(con, "INSERT INTO oldbans SET accountID=?, bannedBy=?, banEnd=NOW() + INTERVAL " .. ido .. " HOUR, banStart=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", getElementData(targetPlayer, "acc:id"), getPlayerAdminName(thePlayer), getPlayerSerial(targetPlayer), reason, getPlayerName(targetPlayer), getPlayerIP(targetPlayer), 2)
if (sql) then
exports.mta_notifications:createNotification(root, "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kitiltotta a szerverről #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.\n#00aeefIndok:#ffffff " .. reason, 6)
setTimer(function()
kickPlayer(targetPlayer, getPlayerAdminName(thePlayer), "Ki lettél tiltva a szerverről")
end, 500, 1)
end
else
outputChatBox(exhiba .. "Az időtartamok 0 és a felett értendőek", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("pban", banPlayer, false, false)
function oBan(thePlayer, commandName, targetPlayer, ido, ...)
if tonumber(getElementData(thePlayer, "acc:admin") or 0) >= 2 then
if not (targetPlayer) or not (ido) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Teljes_nev] [0 = 15 year | 1 = 5 year | 1> = X óra] [Indok]", thePlayer ,255, 255, 255, true)
else
local targetPlayer = targetPlayer:gsub("_", " ")
local ido = tonumber(ido)
local reason = table.concat({...}, " ")
if targetPlayer then
local qh = dbQuery(con, "SELECT * FROM characters WHERE charname='" .. targetPlayer .. "'")
local result, num = dbPoll ( qh, -1 )
if num == 0 then outputChatBox("#FF0000[Hiba]:#ffffff Nincs ilyen találat.", thePlayer, 255, 255, 255, true) return end
if result then
for _, row in ipairs ( result ) do
id = tonumber(row["id"])
accountid = tonumber(row["account"])
end
if (accountid) then
local qh2 = dbQuery(con, "SELECT * FROM accounts WHERE id='" .. accountid .. "'")
local result2 = dbPoll ( qh2, -1 )
if result2 then
for _2, row2 in ipairs ( result2 ) do
admin = tonumber(row2["admin"])
serial = row2["mtaserial"]
ip = row2["ip"]
username = row2["username"]
end
if (admin) > (getElementData(thePlayer, "acc:admin")) then
outputChatBox(exhiba .. "Nincs jogosultságod kitiltani ".. targetPlayer .. " játékost. Hibakód: OBANAD", thePlayer, 255, 255, 255, true)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "OBANAD", getPlayerAdminName(thePlayer) .. " offline próbálta kitiltani " .. targetPlayer .. " játékost a szerverről. Indok: " .. reason .. " Időtartam: " .. ido .. " [ACCES DENIED] [Hibakod: OBANAD]", targetPlayer, accountid)
return
end
if ido >= 0 then
if ido == 0 then
timeSave = "NOW() + INTERVAL 10000000 YEAR"
elseif ido == 1 then
timeSave = "NOW() + INTERVAL 5 YEAR"
elseif ido > 1 then
timeSave = "NOW() + INTERVAL " .. ido .. " HOUR"
end
local banSave = dbExec(con, "INSERT INTO bans SET accountID=?, bannedBy=?, timeZone=" .. timeSave .. ", Date=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", accountid, getPlayerAdminName(thePlayer), serial, reason, targetPlayer, ip, 1)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "OBAN", getPlayerAdminName(thePlayer) .. " offline kitiltotta " .. targetPlayer .. " játékost a szerverről. Indok: " .. reason .. " Időtartam: " .. ido .. "", targetPlayer, accountid)
local oldBan = dbExec(con, "INSERT INTO oldbans SET accountID=?, bannedBy=?, banEnd=" .. timeSave .. ", banStart=NOW(), playerSerial=?, reason=?, playername=?, ipadress=?, status=?", accountid, getPlayerAdminName(thePlayer), serial, reason, targetPlayer, ip, 2)
if (banSave) then
exports.mta_notifications:createNotification(root, "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kitiltotta a szerverről #00aeef" .. targetPlayer .. "#ffffff játékost.\n#00aeefIndok:#ffffff " .. reason, 6)
dbFree(qh)
dbFree(qh2)
else
outputChatBox(exhiba .. "A játékos kitiltása sikertelen.", thePlayer, 255, 255, 255, true)
end
end
end
end
else
outputChatBox(exhiba .. "Nincs találat.", thePlayer, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("oban", oBan, false, false)
function unBanPlayer(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Teljes_nev]", thePlayer, 255, 255, 255, true)
else
local targetPlayer = targetPlayer:gsub("_", " ")
if (targetPlayer) then
local qh = dbQuery(con, "SELECT * FROM bans WHERE playername='" .. targetPlayer.. "'")
local result, num = dbPoll ( qh, -1 )
if result and num>0 then
for _, row in ipairs( result ) do
accountid = tonumber(row["accountID"])
bannedBy = row["bannedBy"]
status = tonumber(row["status"])
end
if (accountid) then
if getElementData(thePlayer, "acc:admin") < 6 then
if getPlayerAdminName(thePlayer) == bannedBy then
local unban = dbExec(con, "DELETE FROM bans WHERE accountID=" .. accountid .. "")
local oldBan = dbExec(con, "UPDATE oldbans SET status=? WHERE accountID=" .. accountid .. "", 1)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "UNBAN", getPlayerAdminName(thePlayer) .. " feloldotta " .. targetPlayer .. " kitiltását a szerverről.", targetPlayer, accountid)
if (unban) then
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff feloldotta " .. targetPlayer .. " kitiltásait.")
else
outputChatBox(exhiba .. "Nem sikerült feloldani a játékos kitiltásait.", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "Nincs jogosultságod unbannolni a játékost. Hibakód: UNBANAD", thePlayer, 255, 255, 255, true)
return
end
else
local unban = dbExec(con, "DELETE FROM bans WHERE accountID=" .. accountid .. "")
local oldBan = dbExec(con, "UPDATE oldbans SET status=? WHERE accountID=" .. accountid .. "", 1)
local adminlog = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "UNBAN", getPlayerAdminName(thePlayer) .. " feloldotta " .. targetPlayer .. " kitiltását a szerverről.", targetPlayer, accountid)
if (unban) then
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff feloldotta " .. targetPlayer .. " kitiltásait.")
else
outputChatBox(exhiba .. "Nem sikerült feloldani a játékos kitiltásait.", thePlayer, 255, 255, 255, true)
end
end
else
outputChatBox(exhiba .. "Nincs találat.", thePlayer, 255, 255, 255, true)
end
dbFree(qh)
else
outputChatBox(exhiba .. "Nincs találat.", thePlayer, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("unban", unBanPlayer, false, false)
----------------------------------------------------------------------------------------------------------------------------------------
-- /setadminnick, /setadminlevel, /sethelperlevel -- ADMINISZTRÁTOR, ADMINSEGÉD KEZELÉSI PARANCSOK
----------------------------------------------------------------------------------------------------------------------------------------
function setAdminNick(thePlayer, commandName, target, name)
if getElementData(thePlayer, "acc:admin") > 6 then
if not (target) or not (name) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Adminnév]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports["mta_main"]:findPlayer(thePlayer, target)
local adminName = table.concat({name}, " ")
local theName = getPlayerAdminName(thePlayer) or ""
local targetOldName = getPlayerAdminName(targetPlayer) or ""
if not getElementData(targetPlayer, "loggedin") then return end
if (targetPlayer) then
if getElementData(targetPlayer, "acc:aseged") > 0 then
outputChatBox(exhiba .. "Adminsegédnek nincs jogosultságod adminnevet beállítani. Hibakód: SAN2", thePlayer, 255, 255, 255, true)
return
end
local sql = dbExec(con, "UPDATE characters SET anick='" .. adminName .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. theName .. "#ffffff megváltoztatta #00aeef" .. targetOldName .. "#ffffff adminisztrátori nevét. #00aeef(".. adminName ..")", root, 255, 255, 255, true)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINNICK", theName .. " megvaltoztatta " .. targetOldName .. " adminisztratori nevet. (".. adminName ..") [SETADMINNICK]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
setElementData(targetPlayer, "char:anick", adminName)
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni (elmenteni) " .. targetOldName .. " adminisztrátori nevét. Hibakód: SAN1", thePlayer, 255, 255, 255, true)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINNICK1", theName .. " nem tudta megvaltoztatni " .. targetOldName .. " adminisztratori nevet. [Hibakod: SAN1]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
end
end
end
end
addCommandHandler("setadminnick", setAdminNick, false, false)
function setAdminLevel(thePlayer, commandName, targetPlayer, rank)
if getElementData(thePlayer, "acc:admin") >= 7 or enabledSerials[getPlayerSerial(thePlayer)] then
if not (targetPlayer) or not (rank) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Rang]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local rank = tonumber(rank)
local rank = math.floor(rank)
local oldRank = getElementData(targetPlayer, "acc:admin")
if not getElementData(targetPlayer, "loggedin") then return end
if (targetPlayer) then
if (rank) > 69 or (rank) < 0 then
outputChatBox(exhiba .. "Adminisztrátori rangok csak 1 és 10 között vannak.", thePlayer, 255, 255, 255, true)
return
end
setElementData(targetPlayer, "char:adminduty", 0)
if (rank) < 7 then
if getElementData(targetPlayer, "acc:admin") >= 8 and getElementData(thePlayer, "acc:admin") < 10 and not enabledSerials[getPlayerSerial(thePlayer)] then
outputChatBox(exhiba .. "Nincs jogosultságod megváltoztatni #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. Hibakód: SALAD1", thePlayer, 255, 255, 255, true)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINLEVELAD1", "" .. getPlayerAdminName(thePlayer) .. " megprobalta megvaltoztatni " .. getPlayerAdminName(targetPlayer) .. " adminisztratori szintjet. (" .. oldRank .. " => " .. rank ..") [ACCES DENIED]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
if getElementData(targetPlayer, "acc:admin") < getElementData(thePlayer, "acc:admin") or enabledSerials[getPlayerSerial(thePlayer)] or getElementData(thePlayer, "acc:admin") == 10 then
local sql = dbExec(con, "UPDATE accounts SET admin='" .. rank .. "' WHERE id='".. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. #00aeef(" .. oldRank .. " => " .. rank ..")", root, 255, 255, 255, true)
setElementData(targetPlayer, "acc:admin", rank)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. getPlayerAdminName(targetPlayer) .. " adminisztratori szintjet. (" .. oldRank .. " => " .. rank ..")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
if (rank) == 0 then
setElementData(targetPlayer, "char:aduty", 0)
dbExec(con, "UPDATE characters SET adminduty='0' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
end
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni (elmenteni) #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. Hibakód: SAL1", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "Nincs jogosultságod megváltoztatni #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. Hibakód: SALAD3", thePlayer, 255, 255, 255, true)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINLEVELAD1", "" .. getPlayerAdminName(thePlayer) .. " megprobalta megvaltoztatni " .. getPlayerAdminName(targetPlayer) .. " adminisztratori szintjet. (" .. oldRank .. " => " .. rank ..") [ACCES DENIED]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
end
elseif (rank) >= 7 then
if getElementData(thePlayer, "acc:admin") == 10 or enabledSerials[getPlayerSerial(thePlayer)] then
local sql = dbExec(con, "UPDATE accounts SET admin='" .. rank .. "' WHERE id='".. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. #00aeef(" .. oldRank .. " => " .. rank ..")", root ,255, 255, 255, true)
setElementData(targetPlayer, "acc:admin", rank)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. getPlayerAdminName(targetPlayer) .. " adminisztratori szintjet. (" .. oldRank .. " => " .. rank ..")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni (elmenteni) #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. Hibakód: SAL2", thePlayer, 255, 255, 255, true)
end
elseif getElementData(thePlayer, "acc:admin") >= 8 and (rank) <= 7 and getElementData(targetPlayer, "acc:admin") < getElementData(thePlayer, "acc:admin") then
local sql = dbExec(con, "UPDATE accounts SET admin='" .. rank .. "' WHERE id='".. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. #00aeef(" .. oldRank .. " => " .. rank ..")", root ,255, 255, 255, true)
setElementData(targetPlayer, "acc:admin", rank)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. getPlayerAdminName(targetPlayer) .. " adminisztratori szintjet. (" .. oldRank .. " => " .. rank ..")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni (elmenteni) #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. Hibakód: SAL2", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "Nincs jogosultságod megváltoztatni #00aeef" .. getPlayerAdminName(targetPlayer) .. "#ffffff adminisztrátori szintjét. Hibakód: SALAD2", thePlayer, 255, 255, 255, true)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETADMINLEVELAD1", "" .. getPlayerAdminName(thePlayer) .. " megprobalta megvaltoztatni " .. getPlayerAdminName(targetPlayer) .. " adminisztratori szintjet. (" .. oldRank .. " => " .. rank ..") [ACCES DENIED]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
end
end
end
end
end
addCommandHandler("setadminlevel", setAdminLevel, false, false)
function setHelperLevel(thePlayer, commandName, targetPlayer, level)
if getElementData(thePlayer, "acc:admin") >= 3 or enabledSerials[getPlayerSerial(thePlayer)] then
if not (targetPlayer) or not (level) then
if getElementData(thePlayer, "acc:admin") >= 3 and getElementData(thePlayer, "acc:admin") <= 6 then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [0 = Játékos | 1 = Ideiglenes adminsegéd]", thePlayer, 255, 255, 255, true)
else
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [0 = Játékos | 1 = IDG adminsegéd | 2 = Örök AS]", thePlayer, 255, 255, 255, true)
end
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local level = tonumber(level)
local oldLevel = getElementData(targetPlayer, "acc:aseged")
if not getElementData(targetPlayer, "loggedin") then return end
local admin = getPlayerAdminName(thePlayer)
local adminID = getElementData(thePlayer, "acc:id")
local targetID = getElementData(targetPlayer, "acc:id")
local targetN = targetPlayerName
if level < 0 or level > 2 then
outputChatBox(exhiba .. "A adminsegédi szintek 0 és 2 között vannak.", thePlayer, 255, 255, 255, true)
return
end
if level == 0 then
if oldLevel == 2 then
if getElementData(thePlayer, "acc:admin") >= 6 or enabledSerials[getPlayerSerial(thePlayer)] then
local sql = dbExec(con, "UPDATE accounts SET aseged='" .. level .. "' WHERE id='" .. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff adminsegéd szintjét. #00aeef(".. oldLevel .. " => " .. level .. ")", root, 255, 255, 255, true)
setElementData(targetPlayer, "acc:aseged", level)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ")", targetN, targetID)
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni a játékos adminsegéd szintjét. Hibakód: SHL1", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL1", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminseged szintjet. (".. oldLevel .. " => " .. level .. ") [Hibakod: SHL1]", targetN, targetID)
end
else
outputChatBox(exhiba .. "Nincs jogosultságod elvenni a játékos adminsegéd szintjét. Hibakód: SHLAD1", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVELAD1", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminseged szintjet. (".. oldLevel .. " => " .. level .. ") [ACCES DENIED] [Hibakod: SHLAD1]", targetN, targetID)
end
else
local sql = dbExec(con, "UPDATE accounts SET aseged='" .. level .. "' WHERE id='" .. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff adminsegéd szintjét. #00aeef(".. oldLevel .. " => " .. level .. ")", root, 255, 255, 255, true)
setElementData(targetPlayer, "acc:aseged", level)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ")", targetN, targetID)
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni a játékos adminsegédi szintjét. Hibakód: SHL2", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL2", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ") [Hibakod: SHL2]", targetN, targetID)
end
end
elseif level == 1 then
if oldLevel == 2 then
if getElementData(thePlayer, "acc:admin") >= 6 or enabledSerials[getPlayerSerial(thePlayer)] then
local sql = dbExec(con, "UPDATE accounts SET aseged='" .. level .. "' WHERE id='" .. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megvaltoztatta #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff adminsegéd szintjét. #00aeef(".. oldLevel .. " => " .. level .. ")", root, 255, 255, 255, true)
setElementData(targetPlayer, "acc:aseged", level)
dbExec(con, "UPDATE accounts SET aseged='0' WHERE id='" .. getElementData(targetPlayer, "acc:id") .. "'")
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ")", targetN, targetID)
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni a játékos adminsegédi szintjét. Hibakód: SHL3", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL3", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ") [Hibakod: SHL3]", targetN, targetID)
end
else
outputChatBox(exhiba .. "Nincs jogosultságod elvenni a játékos adminsegéd szintjét. Hibakód: SHLAD2", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVELAD2", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ") [ACCES DENIED] [Hibakod: SHLAD2]", targetN, targetID)
end
else
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff adminsegéd szintjét. #00aeef(".. oldLevel .. " => " .. level .. ")", root, 255, 255, 255, true)
setElementData(targetPlayer, "acc:aseged", level)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ")", targetN, targetID)
end
elseif level == 2 then
if getElementData(thePlayer, "acc:admin") >= 7 or enabledSerials[getPlayerSerial(thePlayer)] then
local sql = dbExec(con, "UPDATE accounts SET aseged='" .. level .. "' WHERE id='" .. getElementData(targetPlayer, "acc:id") .. "'")
if (sql) then
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff adminsegéd szintjét. #00aeef(".. oldLevel .. " => " .. level .. ")", root, 255, 255, 255, true)
setElementData(targetPlayer, "acc:aseged", level)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ")", targetN, targetID)
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni a játékos adminsegédi szintjét. Hibakód: SHL4", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVEL4", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ") [Hibakod: SHL4]", targetN, targetID)
end
else
outputChatBox(exhiba .. "Nincs jogosultságod 2-esre változtatni a játékos adminsegéd szintjét. Hibakód: SHLAD3", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, admin, adminID, "SETHELPERLEVELAD3", "" .. getPlayerAdminName(thePlayer) .. " nem tudta megvaltoztatni " .. targetPlayerName:gsub("_", " ") .. " adminsegedi szintjet. (".. oldLevel .. " => " .. level .. ") [ACCES DENIED] [Hibakod: SHLAD3]", targetN, targetID)
end
end
end
end
end
addCommandHandler("sethelperlevel", setHelperLevel, false, false)
function togpm(Player)
if getElementData(Player,"acc:admin") >5 then
if not getElementData(Player,"togglepm") then
outputChatBox(rovid.." #990000Letiltottad#ffffff a PM-ek fogadását!",Player,255,255,255,true)
setElementData(Player,"togglepm",true)
else
outputChatBox(rovid.." #009900Bekapcsoltad#ffffff a PM-ek fogadását!",Player,255,255,255,true)
setElementData(Player,"togglepm",false)
end
end
end
addCommandHandler("togpm",togpm)
function privateMessage(thePlayer, commandName, targetPlayer, ...)
if not getElementData(thePlayer, "loggedin") then
outputChatBox("nem szabad", thePlayer)
return
end
if not (targetPlayer) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/".. commandName .. " [Név / ID] [Üzenet]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then return end
local message = table.concat({...}, " ")
local playerRank = tonumber(getElementData(thePlayer, "acc:admin")) or 0
local targetRank = tonumber(getElementData(targetPlayer, "acc:admin")) or 0
local targetHelper = tonumber(getElementData(targetPlayer, "acc:aseged")) or 0
local adminduty = getElementData(targetPlayer, "char:adminduty")
local playerName = getPlayerName(thePlayer):gsub("_", " ")
local playerNameTarget = targetPlayerName:gsub("_", " ")
local adminNameTarget = getPlayerAdminName(targetPlayer)
local adminName = getPlayerAdminName(thePlayer)
local playerID = getElementData(thePlayer, "playerid")
local targetID = getElementData(targetPlayer, "playerid")
if getElementData(targetPlayer,"togglepm")==true then outputChatBox(rovid.." Ez az adminisztrátor letiltotta a PM-ek fogadását!",thePlayer, 255, 255, 255, true) return end
if playerRank == 0 then
if targetHelper > 0 then
outputChatBox("#ff9000[PM - Tőled]#ffffff #ffffff" .. playerNameTarget .. " (#ffffff" .. targetID .. "):#ff9000 " .. message, thePlayer, 255, 255, 255, true)
outputChatBox("#ff9000[PM - Neked]#ffffff #ffffff" .. playerName .. " (#ffffff" .. playerID .. "):#ff9000 " .. message, targetPlayer, 255, 255, 255, true)
triggerClientEvent(targetPlayer, "privatUzenetErkezett", targetPlayer)
triggerClientEvent(thePlayer, "enter", thePlayer)
elseif targetRank > 0 then
if (adminduty) == 1 then
outputChatBox("#ff9000[PM - Tőled]#ffffff #ffffff" .. adminNameTarget .. " (#ffffff" .. targetID .. "):#ff9000 " .. message, thePlayer, 255, 255, 255, true)
outputChatBox("#ff9000[PM - Neked]#ffffff #ffffff" .. playerName .. " (#ffffff" .. playerID .. "):#ff9000 " .. message, targetPlayer, 255, 255, 255, true)
triggerClientEvent(thePlayer, "enter", thePlayer)
triggerClientEvent(targetPlayer, "privatUzenetErkezett", targetPlayer)
else
outputChatBox(exhiba .. "#ffffff" .. adminNameTarget .. "#ffffff nincs szolgálatban. Csak szolgálatban lévő adminra tudsz privát üzenetet írni.", thePlayer, 255, 255, 255, true)
end
end
elseif playerRank > 0 then
if playerRank < 6 then
outputChatBox(exhiba .. "Nincs jogosultságod privát üzenetet írni. Használd a /vá parancsot! Hibakód: PMAD1", thePlayer, 255, 255, 255, true)
else
if targetRank > 0 then
outputChatBox("#ff9000[PM - Tőled]#ffffff #ffffff" .. adminNameTarget .. " (#ffffff" .. targetID .. "):#ff9000 " .. message, thePlayer, 255, 255, 255, true)
outputChatBox("#ff9000[PM - Neked]#ffffff #ffffff" .. adminName .. " (#ffffff" .. playerID .. "):#ff9000 " .. message, targetPlayer, 255, 255, 255, true)
else
outputChatBox("#ff9000[PM - Tőled]#ffffff #ffffff" .. playerNameTarget .. " (#ffffff" .. targetID .. "):#ff9000 " .. message, thePlayer, 255, 255, 255, true)
outputChatBox("#ff9000[PM - Neked]#ffffff #ffffff" .. adminName .. " (#ffffff" .. playerID .. "):#ff9000 " .. message, targetPlayer, 255, 255, 255, true)
end
triggerClientEvent(thePlayer, "enter", thePlayer)
triggerClientEvent(targetPlayer, "privatUzenetErkezett", targetPlayer)
end
end
end
end
addCommandHandler("pm", privateMessage, false, false)
function valasz(thePlayer, commandName, targetPlayer, ...)
if getElementData(thePlayer, "acc:admin") >= 1 or getElementData(thePlayer, "acc:aseged") >= 1 then
if not (targetPlayer) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Üzenet]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local message = table.concat({...}, " ")
local adminName = getPlayerAdminName(thePlayer)
if (targetPlayer) then
if getElementData(thePlayer, "acc:admin") > 0 then
outputChatBox("#ff9000[Segítség]#ffffff " .. getPlayerAdminName(thePlayer) .. " (#ffffff" .. getElementData(thePlayer, "playerid") .. "#ffffff):#ffffff " .. message, targetPlayer, 255, 255, 255, true)
outputChatBox("#ff9000[Segítség => #ffffff" .. targetPlayerName:gsub("_", " ") .. " (#ffffff" .. getElementData(targetPlayer, "playerid") .. "#ffffff)#ff9000]:#ffffff " .. message, thePlayer, 255, 255, 255, true)
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 1 and getElementData(v, "loggedin") then
if getElementData(v, "status:togva") == false then
outputChatBox("#D64541[Segítségnyújtás] #00aeef"..getPlayerAdminName(thePlayer) .. "#ffffff válaszolt #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff játékosnak.", v, 255, 255, 255, true)
outputChatBox("#D64541[Segítségnyújtás] #00aeefSzöveg: #ffffff" .. message, v, 255, 255, 255, true)
end
end
end
triggerClientEvent(thePlayer, "enter", thePlayer)
elseif getElementData(thePlayer, "acc:aseged") > 0 then
outputChatBox("#ff9000[Segítség]#ffffff " .. getPlayerName(thePlayer):gsub("_", " ") .. " (#ffffff" .. getElementData(thePlayer, "playerid") .. "#ffffff):#ffffff " .. message, targetPlayer, 255, 255, 255, true)
outputChatBox("#ff9000[Segítség => " .. targetPlayerName:gsub("_", " ") .. " (#ffffff" .. getElementData(targetPlayer, "playerid") .. "#ffffff)#ff9000]:#ffffff " .. message, thePlayer, 255, 255, 255, true)
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 1 and getElementData(v, "loggedin") then
if not getElementData(v, "status:togva") then
outputChatBox("#D64541[Segítségnyújtás] #00aeef"..getPlayerName(thePlayer):gsub("_"," ") .. "#ffffff válaszolt #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff játékosnak.", v, 255, 255, 255, true)
outputChatBox("#D64541[Segítségnyújtás] #00aeefSzöveg: #ffffff" .. message, v, 255, 255, 255, true)
end
end
end
triggerClientEvent(thePlayer, "enter", thePlayer)
end
end
end
end
end
addCommandHandler("vá", valasz, false, false)
function togValaszolasok(thePlayer, commandName)
if getElementData(thePlayer, "acc:admin") >= 1 then
local allapot = getElementData(thePlayer, "status:togva")
if allapot == false then
outputChatBox("Kikapcsoltad a #00aeef/vá#ffffff parancs listázását.", thePlayer, 255, 255, 255, true)
setElementData(thePlayer, "status:togva", 1)
else
outputChatBox("Bekapcsoltad a #00aeef/vá#ffffff parancs listázását.", thePlayer, 255, 255, 255, true)
setElementData(thePlayer, "status:togva", false)
end
end
end
addCommandHandler("togvá", togValaszolasok, false, false)
-----------------------------[SET COLOR]---------------------------------
function setColor(player, commandName, r1, g1, b1, r2, g2, b2 )
if getElementData(player, "acc:admin") > 5 then
if not (r1) or not (g1) or not (b1) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [R] [G] ", player, 255, 255, 255, true)
else
local veh = getPedOccupiedVehicle(player)
if (veh) then
local r1, g1, b1, r2, g2, b2 = tonumber(r1), tonumber(g1), tonumber(b1), tonumber(r2), tonumber(g2), tonumber(b2)
local color = setVehicleColor(veh, r1, g1, b1, r2, g2, b2)
local sql = dbQuery(con, "UPDATE vehicle SET color=? WHERE id=?", toJSON({r1, g1, b1, r2, g2, b2}), getElementData(veh, "veh:id"))
dbFree(sql)
if (color) or (sql) then
outputChatBox(exinfo .. "Sikeresen átszínezted a járművet.", player, 255, 255, 255, true)
outputAdminMessage(getPlayerAdminName(player) .. " átszínezett egy " .. getVehicleName(veh) .. " járművet. (ID: " .. getElementData(veh, "veh:id") .. ")")
-- id-t megadni
else
outputChatBox(exhiba .. "Nem sikerült átszínezni a járművet.", player, 255, 194, 14, true)
end
end
end
end
end
addCommandHandler("setcolor", setColor, false, false)
----------------------------------------------------------------------------------------------------------------------------------------
-- /goto, /gethere, /gotocar, /getcar, /fixveh, /fuelveh, /sethp, /setarmor, /sethunger, /setskin, /setdim, /setint, /setvehint, /setvehdim, /ajail, /unjail -- ADMINISZTRÁTORI PARANCSOK
----------------------------------------------------------------------------------------------------------------------------------------
function gotoPlayer(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local x, y, z = getElementPosition(targetPlayer)
local veh = getPedOccupiedVehicle(thePlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if getElementData(targetPlayer, "loggedin") == true then
if isPedInVehicle(thePlayer) then
teleport = setElementPosition(veh, x, y+1, z)
else
teleport = setElementPosition(thePlayer, x, y+1, z)
end
if (teleport) then
setElementInterior(thePlayer, getElementInterior(targetPlayer))
setElementDimension(thePlayer, getElementDimension(targetPlayer))
outputChatBox("#ffffffSikeresen elteleportáltál #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff játékoshoz.", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff hozzád teleportált.", targetPlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nem sikerült elteleportálni a játékoshoz. Hibakód: GOTO1", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "A játékos nincs bejelentkezve.", thePlayer ,255, 255, 255, true)
end
end
end
end
addCommandHandler("goto", gotoPlayer, false, false)
function SgotoPlayer(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local x, y, z = getElementPosition(targetPlayer)
local veh = getPedOccupiedVehicle(thePlayer)
if getElementData(targetPlayer, "loggedin") == true then
if isPedInVehicle(thePlayer) then
teleport = setElementPosition(veh, x, y+1, z)
else
teleport = setElementPosition(thePlayer, x, y+1, z)
end
if (teleport) then
setElementInterior(thePlayer, getElementInterior(targetPlayer))
setElementDimension(thePlayer, getElementDimension(targetPlayer))
outputChatBox("#ffffffSikeresen elteleportáltál #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff játékoshoz. #FF0000(Secret)", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef"..getPlayerAdminName(thePlayer) .. "#ffffff titokban elteleportált " .. targetPlayerName:gsub("_"," ") .. " játékoshoz.")
--outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff hozzád teleportált.", targetPlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nem sikerült elteleportálni a játékoshoz. Hibakód: SGOTO1", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "A játékos nincs bejelentkezve.", thePlayer ,255, 255, 255, true)
end
end
end
end
addCommandHandler("sgoto", SgotoPlayer, false, false)
function getPlayerHere(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >=1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local x, y, z = getElementPosition(thePlayer)
if getElementData(targetPlayer, "loggedin") == true then
if getElementData(targetPlayer, "adminjail") == 1 and getElementData(thePlayer, "acc:admin") < 6 then
outputChatBox(exhiba .. "A játékos adminjailban van. Nem tudod getelni.", thePlayer, 255, 255, 255, true)
return
end
if isPedInVehicle(targetPlayer) then
local veh = getPedOccupiedVehicle(targetPlayer)
teleport = setElementPosition(veh, x, y+1, z)
else
teleport = setElementPosition(targetPlayer, x, y+1, z)
end
if (teleport) then
setElementInterior(targetPlayer, getElementInterior(thePlayer))
setElementDimension(targetPlayer, getElementDimension(thePlayer))
outputChatBox("Sikeresen magadhoz teleportáltad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost.", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff magához teleportált téged.", targetPlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nem sikerült magadhoz teleportálni a játékost. Hibakód: GETHERE1", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "A játékos nincs bejelentkezve.", thePlayer ,255, 255, 255, true)
end
end
end
end
addCommandHandler("gethere", getPlayerHere, false, false)
function gotoCar(thePlayer, commandName, id)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (id) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Jármű ID]", thePlayer, 255, 255, 255, true)
else
local veh = findVehicle(id)
local x, y, z = getElementPosition(veh)
if not veh then
outputChatBox(exhiba .. "Hibás jármű ID.", thePlayer, 255, 255, 255, true)
return
end
local teleport = setElementPosition(thePlayer, x+2, y+2, z)
local int = getElementInterior(veh)
local dim = getElementDimension(veh)
if getElementDimension(veh) >= 100000 then return end
if (teleport) then
setElementInterior(thePlayer, int)
setElementDimension(thePlayer, dim)
outputChatBox("#ffffffSikeresen elteleportáltál a járműhöz. (ID: #00aeef" .. id .. "#ffffff)", thePlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nem sikerült elteleportálni a járműhöz. Hibakód: GOTOC1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("gotocar", gotoCar, false, false)
function getCar(thePlayer, commandName, id)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (id) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Jármű ID]", thePlayer, 255, 255, 255, true)
else
local veh = findVehicle(id)
if not veh then
outputChatBox(exhiba .. "Hibás jármű ID.", thePlayer, 255, 255, 255, true)
return
end
local x, y, z = getElementPosition(thePlayer)
local int = getElementInterior(thePlayer)
local dim = getElementDimension(thePlayer)
if getElementDimension(veh) >= 100000 then return end
local teleport = setElementPosition(veh, x+2, y+2, z+1)
if (teleport) then
setElementInterior(veh, int)
setElementDimension(veh, dim)
outputChatBox("#ffffffSikeresen magadhoz teleportáltad a járművet. (ID: #00aeef" .. id .. "#ffffff)", thePlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nem sikerült magadhoz teleportálni a járművet. Hibakód: GETCAR1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("getcar", getCar, false, false)
function fixPlayerVehicle(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >=1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local adminduty = getElementData(thePlayer, "char:adminduty")
local alevel = getElementData(thePlayer, "acc:admin")
local veh = getPedOccupiedVehicle(targetPlayer)
if not targetPlayer or not getElementData(targetPlayer, "loggedin") then return end
if veh then
if (adminduty) == 0 then
if (alevel) >= 6 then
fixVehicle(veh)
triggerClientEvent(root, "setvehicleCompVisible", root, targetPlayer)
outputChatBox("#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff megjavította a járművedet. ", targetPlayer, 255, 255, 255, true)
outputChatBox("Sikeresen megjavítottad #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff járművét.", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megjavította #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff járművét.")
--adminlog
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "FIXVEH", "" .. getPlayerAdminName(thePlayer) .. " megjavította " .. targetPlayerName:gsub("_"," ") .. " járművét.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nincs jogosultságod adminduty-n kívül megjavítani a járművet. Hibakód: FIXVEHAD1", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "FIXVEHAD1", "" .. getPlayerAdminName(thePlayer) .. " megpróbálta megjavitani " .. targetPlayerName:gsub("_"," ") .. " járművét. [ACCES DENIED] [Hibakod: FIXVEHAD1]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
else
triggerClientEvent(root, "setvehicleCompVisible", root, targetPlayer)
fixVehicle(veh)
outputChatBox("#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff megjavította a járművedet. ", targetPlayer, 255, 255, 255, true)
outputChatBox("Sikeresen megjavítottad #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff járművét.", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megjavította #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff járművét.")
--adminlog
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "FIXVEH", "" .. getPlayerAdminName(thePlayer) .. " megjavította " .. targetPlayerName:gsub("_"," ") .. " járművét.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
else
outputChatBox(exhiba .. "A játékos nincsen járműben.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("fixveh", fixPlayerVehicle, false, false)
function setVehicleHealth(thePlayer, commandName, targetPlayer, health)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) or not (health) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [Szint]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local health = tonumber(health)
local veh = getPedOccupiedVehicle(targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if health < 0 or health > 1000 then
outputChatBox(exhiba .. "A szint csak 0 és 1000 között lehet.", thePlayer, 255, 255, 255, true)
return
end
if getElementData(thePlayer, "acc:admin") < 6 and getElementData(thePlayer, "char:adminduty") == 0 then
outputChatBox(exhiba .. "Nincs jogosultságod admindutyn kívül megváltoztatni egy játékos járművének az állapotát.", thePlayer, 255, 255, 255, true)
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETCARHP1", "" .. getPlayerAdminName(thePlayer) .. " megpróbálta megváltoztatni " .. targetPlayerName:gsub("_"," ") .. " járművének az állapotát (" .. health .. "). [ACCES DENIED] [Hibakod: SETCHPAD]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
return
end
if not (veh) then
outputChatBox(exhiba .. "A játékos nincs járműben.", thePlayer, 255, 255, 255, true)
else
local sql = dbExec(con, "UPDATE vehicle SET hp='" .. health .. "' WHERE id='" .. getElementData(veh, "veh:id") .. "'")
if (sql) then
setElementHealth(veh, health)
outputChatBox("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a járműved állapotát. (" .. health .. ")", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #3399FF" .. targetPlayerName:gsub("_"," ") .. " #ffffffjárművének állapotát. #00aeefF(" .. health .. ")")
local adminlogsql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETCARHP", "" .. getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " járművének állapotát. (" .. health .. ")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni a játékos járművének állapotát. Hibakód: SETCHP1", thePlayer, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("setcarhp", setVehicleHealth, false, false)
function fuelPlayerVehicle(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >=1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local adminduty = getElementData(thePlayer, "char:adminduty")
local alevel = getElementData(thePlayer, "acc:admin")
local veh = getPedOccupiedVehicle(targetPlayer)
if not getElementData(targetPlayer, "loggedin") then return end
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if isPedInVehicle(targetPlayer) then
if (adminduty) == 0 then
if (alevel) >= 6 then
setElementData(veh, "veh:fuel", 100)
outputChatBox("#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff megtankolta a járművedet. ", targetPlayer, 255, 255, 255, true)
outputChatBox("Sikeresen megtankoltad #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff járművét.", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megtankolta #00aeef" .. targetPlayerName:gsub("_"," ") .. " #ffffffjárművét.")
--adminlog
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "FUELVEH", "" .. getPlayerAdminName(thePlayer) .. " megtankolta " .. targetPlayerName:gsub("_"," ") .. " járművét.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nincs jogosultságod adminduty-n kívül megtankolni a járművet. Hibakód: FUELVEHAD1", thePlayer, 255, 255, 255, true)
--adminlog
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "FUELVEHAD1", "" .. getPlayerAdminName(thePlayer) .. " megpróbálta megtankolni " .. targetPlayerName:gsub("_"," ") .. " járművét. [ACCES DENIED] [Hibakod: FUELVEHAD1]", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
else
setElementData(veh, "veh:fuel", 100)
outputChatBox("#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff megtankolta a járművedet. ", targetPlayer, 255, 255, 255, true)
outputChatBox("Sikeresen megtankoltad #00aeef" .. targetPlayerName:gsub("_", " ") .. "#ffffff járművét.", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megtankolta #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff járművét.")
--adminlog
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "FUELVEH", "" .. getPlayerAdminName(thePlayer) .. " megtankolta " .. targetPlayerName:gsub("_"," ") .. " járművét.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
end
else
outputChatBox(exhiba .. "A játékos nincsen járműben.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("fuelveh", fuelPlayerVehicle, false, false)
function setPlayerHealth(thePlayer, commandName, targetPlayer, level)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) or not (level) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Életerő]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local level = tonumber(level)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if (level) < 0 or (level) > 100 then
outputChatBox(exhiba .. "Az értékek 0 és 100 között vannak.", thePlayer, 255, 255, 255, true)
return false
end
local setHealth = setElementHealth(targetPlayer, level)
if (setHealth) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff életerejét. (" .. level .. ")", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_"," ") .. " #fffffféleterejét. (" .. level .. ")")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETHP", "" .. getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " életerejét. (" .. level .. ")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni " .. targetPlayerName:gsub("_"," ") .. " életerejét. Hibakód: SHP1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("sethp", setPlayerHealth, false, false)
function setPlayerHealth1(thePlayer)
setElementHealth(thePlayer, 100)
setPlayerArmor(thePlayer, 100)
end
addEvent("setPlayerHealth", true)
addEventHandler("setPlayerHealth", getRootElement(), setPlayerHealth1)
function setPlayerArmorLevel(thePlayer, commandName, targetPlayer, level)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) or not (level) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [armor szint]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local level = tonumber(level)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if (level) > 100 then
outputChatBox(exhiba .. "Az értékek 0 és 100 között vannak.", thePlayer, 255, 255, 255, true)
return false
end
local setArmor = setPlayerArmor(targetPlayer, level)
if (setArmor) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff páncél szintjét. (" .. level .. ")", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff páncél szintjét. (" .. level .. ")")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETARMOR", "" .. getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " páncél szintjét. (" .. level .. ")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni " .. targetPlayerName:gsub("_"," ") .. " páncél szintjét. Hibakód: SARMOR1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setarmor", setPlayerArmorLevel, false, false)
function setPlayerHungerLevel(thePlayer, commandName, targetPlayer, level)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) or not (level) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Éhségszint]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local level = tonumber(level)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if (level) > 100 then
outputChatBox(exhiba .. "Az értékek 0 és 100 között vannak.", thePlayer, 255, 255, 255, true)
return false
end
local setHunger = setElementData(targetPlayer, "char:hunger", level)
if (setHunger) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff éhségszintjét. (" .. level .. ")", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff éhségszintjét. (" .. level .. ")")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETHUNGER", "" .. getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " éhség szintjét. (" .. level .. ")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni " .. targetPlayerName:gsub("_"," ") .. " éhségszintjét. Hibakód: SHUNGER1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("sethunger", setPlayerHungerLevel, false, false)
function setName(thePlayer, commandName, targetPlayer, ...)
if getElementData(thePlayer, "acc:admin") >= 3 then
if not (targetPlayer) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Új_nev]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local newName = table.concat({...}, "_")
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if not getElementData(targetPlayer, "loggedin") then return end
local qh = dbQuery(con, "SELECT * FROM characters WHERE charname='" .. newName:gsub("_", " ") .. "'")
local result, num = dbPoll(qh, -1)
if num>0 then
outputChatBox(exhiba .. "Ez a név már használatban van.", thePlayer, 255, 255, 255, true)
return
end
local sql = dbExec(con, "UPDATE characters SET charname='" .. newName:gsub("_"," ") .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad " .. targetPlayerName:gsub("_"," ") .. " nevét. (" .. newName .. ")", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " nevét. (" .. newName .. ")")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETNAME", "" .. getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " nevét. (" .. newName .. ")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
setPlayerName(targetPlayer, newName)
local newNameS = newName:gsub("_"," ")
setElementData(targetPlayer, "char:charname", newName)
setElementData(targetPlayer, "char:name", newNameS)
setElementData(targetPlayer, "char:oldName", newName)
else
end
end
end
end
addCommandHandler("setname", setName, false, false)
function setPlayerSkin(thePlayer, commandName, targetPlayer, skin)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) or not (skin) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [Skin ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local skin = tonumber(skin)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if getElementModel(targetPlayer) == skin then
outputChatBox(exhiba .. "A játékoson már ez a skin van.", thePlayer, 255, 255, 255, true)
return
end
if setElementModel(targetPlayer, skin) then
outputChatBox("Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff skinjét.", thePlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_"," ") .. " #ffffffskinjét.#ffffff (" .. skin .. ")")
dbExec(con, "UPDATE characters SET skin = ? WHERE ID = ?",skin,getElementData(targetPlayer, "acc:id"))
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETSKIN", "" .. getPlayerAdminName(thePlayer) .. " megvaltoztatta " .. targetPlayerName:gsub("_"," ") .. " skinjet. (" .. skin .. ")", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült megváltoztatni #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff skinjét. Hibakód: SSKIN1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("skin", setPlayerSkin, false, false)
--[[local factions = {
[7]="Rendőrség",
[8]="Mentőszolgálat",
[9]="Sheriffség",
[10]="SWAT",
[11]="Szerelőtársaság",
[12]="FBI",
[13]="Taxi",
[14]="Yakuza",
[15]="Speed Fighters Team",
[16]="Los Santos Piru Bloods",
[17]="Mara Salvatrucha XIII",
[18]="Torosyan Group",
[19]="Dean :O'Z",
}
local factionSkins = {
--skin id, frakció id
{274, 8},
}
function checkSkin(player)
for index, value in ipairs(factionSkins) do
end
end]]
function setDim(thePlayer, commandName, targetPlayer, value)
if getElementData(thePlayer, "acc:admin") >=6 then
if not (targetPlayer) or not (value) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [Dimension ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local dim = tonumber(value)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if setElementDimension(targetPlayer, dim) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad " .. targetPlayerName:gsub("_"," ") .. " dimenzióját. (" .. dim .. ")", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a dimenziódat. (" .. dim .. ")", targetPlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setdim", setDim, false, false)
function setInt(thePlayer, commandName, targetPlayer, value)
if getElementData(thePlayer, "acc:admin") >=6 then
if not (targetPlayer) or not (value) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [Dimension ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local value = tonumber(value)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if setElementInterior(targetPlayer, value) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad " .. targetPlayerName:gsub("_"," ") .. " interiorját. (" .. value .. ")", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a interiorodat. (" .. value .. ")", targetPlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setint", setInt, false, false)
function setVehDim(thePlayer, commandName, id, value)
if getElementData(thePlayer, "acc:admin") >=6 then
if not (id) or not (value) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [ID] [Dimension ID]", thePlayer, 255, 255, 255, true)
else
local veh = findVehicle(id)
local dim = tonumber(value)
if setElementDimension(veh, dim) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad " .. id .. " dimenzióját. (" .. dim .. ")", thePlayer, 255, 255, 255, true)
-- outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a dimenziódat. (" .. dim .. ")", targetPlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setvehdim", setVehDim, false, false)
function setVehInt(thePlayer, commandName, id, value)
if getElementData(thePlayer, "acc:admin") >=6 then
if not (id) or not (value) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [ID] [Dimension ID]", thePlayer, 255, 255, 255, true)
else
local veh = findVehicle(id)
local dim = tonumber(value)
if setElementInterior(veh, dim) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad " .. id .. " interiorját. (" .. dim .. ")", thePlayer, 255, 255, 255, true)
-- outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a dimenziódat. (" .. dim .. ")", targetPlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setvehint", setVehInt, false, false)
function setVehInt(thePlayer, commandName, targetPlayer, value)
if getElementData(thePlayer, "acc:admin") >=6 then
if not (targetPlayer) or not (value) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [Dimension ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local value = tonumber(value)
if setElementInterior(targetPlayer, value) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad " .. targetPlayerName:gsub("_"," ") .. " interiorját. (" .. value .. ")", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a interiorodat. (" .. value .. ")", targetPlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setvehint", setInt, false, false)
function adminJail(thePlayer, commandName, targetPlayer, ido, ...)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) or not (ido) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Perc] [Indok]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local ido = tonumber(ido)
local reason = table.concat({...}, " ")
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if not getElementData(targetPlayer, "loggedin") then return end
if (ido) <= 0 then
outputChatBox(exhiba .. "A percek 0 alatt nem adhatóak vannak.", thePlayer ,255, 255, 255, true)
return
elseif (ido) > 120 and getElementData(thePlayer, "acc:admin") < 2 then
outputChatBox(exhiba .. "Nincs jogosultságod 120 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
elseif (ido) > 300 and getElementData(thePlayer, "acc:admin") < 3 then
outputChatBox(exhiba .. "Nincs jogosultságod 300 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
elseif (ido) > 400 and getElementData(thePlayer, "acc:admin") < 4 then
outputChatBox(exhiba .. "Nincs jogosultságod 400 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
elseif (ido) > 500 and getElementData(thePlayer, "acc:admin") < 5 then
outputChatBox(exhiba .. "Nincs jogosultságod 500 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
elseif (ido) > 600 and getElementData(thePlayer, "acc:admin") < 6 then
outputChatBox(exhiba .. "Nincs jogosultságod 600 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
end
if not (targetPlayer) then
return
end
--közbe
if getElementData(targetPlayer, "adminjail") == 1 then
outputChatBox(exhiba .. "A játékos már adminjailben van.", thePlayer, 255, 255, 255, true)
outputChatBox("Ha frissíteni szeretnéd a büntetést, először vedd ki a #00aeef/unjail#ffffff paranccsal, majd próbálkozz újra.", thePlayer, 255, 255, 255, true)
return
end
outputChatBox("#FF0000[AdminJail]:#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff bebörtönözte #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost #1a75ff" .. ido .. "#ffffff percre.", root ,255, 255, 255, true)
outputChatBox("#FF0000[AdminJail]:#00aeef Indok:#ffffff " .. reason, root ,255, 255, 255, true)
--outputChatBox("#ffffffA hátralévő bünetetésed lekérdezéséhez használd a #00aeef/börtönidő#ffffff parancsot.", targetPlayer, 255, 255, 255, true)
local theTimerCheck = getElementData(targetPlayer, "adminjail:theTimer")
local theTimerCheck2 = getElementData(targetPlayer, "adminjail:theTimerAccounts")
if isTimer(theTimerCheck) then
killTimer(theTimerCheck)
end
if isTimer(theTimerCheck2) then
killTimer(theTimerCheck2)
end
if isPedInVehicle(targetPlayer) then
removePedFromVehicle(targetPlayer)
end
fadeCamera(targetPlayer, false, 1.0)
showChat(targetPlayer, false)
setElementFrozen(targetPlayer, true)
if isPedInVehicle(targetPlayer) then
toggleAllControls(targetPlayer, false, false, false)
end
setTimer(function()
triggerClientEvent(targetPlayer, "triggerAdminjail", targetPlayer, thePlayer, reason, ido, 1, false)
end, 500, 1)
setTimer( function()
local idoTelik = setTimer(idoTelikLe, 60000, ido, targetPlayer)
local theTimer = setElementData(targetPlayer, "adminjail:theTimer", idoTelik)
local idoTelikMentes = setElementData(targetPlayer, "idoTelik", ido)
local idoLetelt = setElementData(targetPlayer, "idoLetelt", 0)
local setPosition = setElementPosition(targetPlayer, 198.0009765625, 175.1279296875, 1003.0234375)
local setInterior = setElementInterior(targetPlayer, 3)
local setDimension = setElementDimension(targetPlayer, 132+getElementData(targetPlayer, "acc:id"))
local adminjailed = setElementData(targetPlayer, "adminjail", 1)
local adminjail_reason = setElementData(targetPlayer, "adminjail:reason", reason)
local alapido = setElementData(targetPlayer, "adminjail:ido", ido)
local admin = setElementData(targetPlayer, "adminjail:admin", getPlayerAdminName(thePlayer))
local adminSerial = setElementData(targetPlayer, "adminjail:adminSerial", getPlayerSerial(thePlayer))
end, 1500, 1)
setTimer(function()
fadeCamera(targetPlayer, true, 2.5)
setElementFrozen(targetPlayer, false)
toggleAllControls(targetPlayer, true, true, true)
showChat(targetPlayer, true)
end, 7500, 1)
local sql = dbExec(con, "UPDATE characters SET adminjail = ?, adminjail_reason = ?, adminjail_idoTelik = ?, adminjail_alapIdo = ?, adminjail_admin = ?, adminjail_adminSerial = ? WHERE id = '" .. getElementData(targetPlayer, "char:id") .. "'", 1, reason, ido, ido, getPlayerAdminName(thePlayer), getPlayerSerial(thePlayer))
local ajailMentes = dbExec(con, "INSERT INTO adminjails SET jailed_player = ?, jailed_playerSerial = ?, jailed_accountID = ?, jailed_admin = ?, jailed_adminSerial = ?, jailed_reason = ?, jailed_ido = ?, jailed_idopont=CURDATE(), jailed_idopontora=CURTIME()", targetPlayerName:gsub("_"," "), getPlayerSerial(targetPlayer), getElementData(targetPlayer, "acc:id"),getPlayerAdminName(thePlayer), getPlayerSerial(thePlayer), reason, ido)
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "AJAIL", getPlayerAdminName(thePlayer) .. " bebortonozte " .. targetPlayerName .. " jatekost " .. ido .. " percre. Indok:" .. reason .. "", targetPlayerName, getPlayerSerial(targetPlayer))
--sql
end
end
end
addCommandHandler("ajail", adminJail, false, false)
function guardadminJail(thePlayer, commandName, targetPlayer, ido, ...)
if tonumber(getElementData(thePlayer, "acc:guard") or 0) >= 1 then
if not (targetPlayer) or not (ido) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [Perc] [Indok]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local ido = tonumber(ido)
local reason = table.concat({...}, " ")
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if not getElementData(targetPlayer, "loggedin") then return end
if (ido) <= 0 then
outputChatBox(exhiba .. "A percek 0 alatt nem adhatóak vannak.", thePlayer ,255, 255, 255, true)
return
elseif (ido) > 60 and getElementData(thePlayer, "acc:guard") < 2 then
outputChatBox(exhiba .. "Nincs jogosultságod 60 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
elseif (ido) > 250 and getElementData(thePlayer, "acc:admin") < 3 then
outputChatBox(exhiba .. "Nincs jogosultságod 250 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
elseif (ido) > 500 and getElementData(thePlayer, "acc:admin") < 4 then
outputChatBox(exhiba .. "Nincs jogosultságod 500 percet meghaladó adminjailt osztani.", thePlayer, 255, 255, 255, true)
return
end
if not (targetPlayer) then
return
end
--közbe
if getElementData(targetPlayer, "adminjail") == 1 then
outputChatBox(exhiba .. "A játékos már adminjailben van.", thePlayer, 255, 255, 255, true)
outputChatBox("Ha frissíteni szeretnéd a büntetést, először vedd ki a #00aeef/unjail#ffffff paranccsal, majd próbálkozz újra.", thePlayer, 255, 255, 255, true)
return
end
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 7 and getElementData(v, "loggedin") then
outputChatBox("#FF0000[AdminJail]:#00aeef " .. getPlayerName(thePlayer) .. " [Őr]#ffffff bebörtönözte #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost #1a75ff" .. ido .. "#ffffff percre.", v ,255, 255, 255, true)
outputChatBox("#FF0000[AdminJail]:#00aeef Indok:#ffffff " .. reason, v ,255, 255, 255, true)
else
outputChatBox("#FF0000[AdminJail]:#00aeef Egy RP Őr#ffffff bebörtönözte #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost #1a75ff" .. ido .. "#ffffff percre.", v ,255, 255, 255, true)
outputChatBox("#FF0000[AdminJail]:#00aeef Indok:#ffffff " .. reason, v ,255, 255, 255, true)
end
end
--outputChatBox("#ffffffA hátralévő bünetetésed lekérdezéséhez használd a #00aeef/börtönidő#ffffff parancsot.", targetPlayer, 255, 255, 255, true)
local theTimerCheck = getElementData(targetPlayer, "adminjail:theTimer")
local theTimerCheck2 = getElementData(targetPlayer, "adminjail:theTimerAccounts")
if isTimer(theTimerCheck) then
killTimer(theTimerCheck)
end
if isTimer(theTimerCheck2) then
killTimer(theTimerCheck2)
end
if isPedInVehicle(targetPlayer) then
removePedFromVehicle(targetPlayer)
end
fadeCamera(targetPlayer, false, 1.0)
showChat(targetPlayer, false)
setElementFrozen(targetPlayer, true)
if isPedInVehicle(targetPlayer) then
toggleAllControls(targetPlayer, false, false, false)
end
setTimer(function()
triggerClientEvent(targetPlayer, "triggerAdminjail", targetPlayer, "Egy RP Őr", reason, ido, 3, false)
end, 500, 1)
setTimer( function()
local idoTelik = setTimer(idoTelikLe, 60000, ido, targetPlayer)
local theTimer = setElementData(targetPlayer, "adminjail:theTimer", idoTelik)
local idoTelikMentes = setElementData(targetPlayer, "idoTelik", ido)
local idoLetelt = setElementData(targetPlayer, "idoLetelt", 0)
local setPosition = setElementPosition(targetPlayer, 198.0009765625, 175.1279296875, 1003.0234375)
local setInterior = setElementInterior(targetPlayer, 3)
local setDimension = setElementDimension(targetPlayer, 132+getElementData(targetPlayer, "acc:id"))
local adminjailed = setElementData(targetPlayer, "adminjail", 1)
local adminjail_reason = setElementData(targetPlayer, "adminjail:reason", reason)
local alapido = setElementData(targetPlayer, "adminjail:ido", ido)
local admin = setElementData(targetPlayer, "adminjail:admin", "Egy RP Őr")
local adminSerial = setElementData(targetPlayer, "adminjail:adminSerial", getPlayerSerial(thePlayer))
end, 1500, 1)
setTimer(function()
fadeCamera(targetPlayer, true, 2.5)
setElementFrozen(targetPlayer, false)
toggleAllControls(targetPlayer, true, true, true)
showChat(targetPlayer, true)
end, 7500, 1)
local sql = dbExec(con, "UPDATE characters SET adminjail = ?, adminjail_reason = ?, adminjail_idoTelik = ?, adminjail_alapIdo = ?, adminjail_admin = ?, adminjail_adminSerial = ? WHERE id = '" .. getElementData(targetPlayer, "char:id") .. "'", 1, reason, ido, ido, "Egy RP Őr", getPlayerSerial(thePlayer))
local ajailMentes = dbExec(con, "INSERT INTO adminjails SET jailed_player = ?, jailed_playerSerial = ?, jailed_accountID = ?, jailed_admin = ?, jailed_adminSerial = ?, jailed_reason = ?, jailed_ido = ?, jailed_idopont=CURDATE(), jailed_idopontora=CURTIME()", targetPlayerName:gsub("_"," "), getPlayerSerial(targetPlayer), getElementData(targetPlayer, "acc:id"),getPlayerName(thePlayer) .. " [Egy RP Őr]", getPlayerSerial(thePlayer), reason, ido)
local adminlogSql = dbExec(con, adminlog, getPlayerName(thePlayer), getElementData(thePlayer, "acc:id"), "AJAIL", getPlayerName(thePlayer) .. " [Egy RP Őr] bebortonozte " .. targetPlayerName .. " jatekost " .. ido .. " percre. Indok:" .. reason .. "", targetPlayerName, getPlayerSerial(targetPlayer))
--sql
end
end
end
addCommandHandler("ajail", guardadminJail, false, false)
function offlineAdminJail(thePlayer, commandName, targetPlayer, ido, ...)
if getElementData(thePlayer, "acc:admin") >= 4 then
if not (targetPlayer) or not (ido) or not (...) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Teljes_nev] [Perc] [Indok]", thePlayer, 255, 255, 255, true)
else
local targetPlayer = targetPlayer:gsub("_"," ")
local ido = tonumber(ido)
local reason = table.concat({...}, " ")
local charid = false
local sql = dbQuery(con, "SELECT * FROM characters WHERE charname='" .. targetPlayer .. "' LIMIT 1")
local result = dbPoll(sql, -1)
if result then
for _, row in ipairs(result) do
charid = row["id"]
end
local sql = dbExec(con, "UPDATE characters SET adminjail = ?, adminjail_reason = ?, adminjail_idoTelik = ?, adminjail_alapIdo = ?, adminjail_admin = ?, adminjail_adminSerial = ? WHERE id = '" .. charid .. "'", 1, reason, ido, ido, getPlayerAdminName(thePlayer), getPlayerSerial(thePlayer))
local ajailMentes = dbExec(con, "INSERT INTO adminjails SET jailed_player = ?, jailed_playerSerial = ?, jailed_accountID = ?, jailed_admin = ?, jailed_adminSerial = ?, jailed_reason = ?, jailed_ido = ?, jailed_idopont=CURDATE(), jailed_idopontora=CURTIME()", targetPlayer, charid, charid, getPlayerAdminName(thePlayer), getPlayerSerial(thePlayer), reason, ido)
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "OJAIL", getPlayerAdminName(thePlayer) .. " bebortonozte " .. targetPlayer .. " jatekost " .. ido .. " percre. Indok:" .. reason .. "", targetPlayer, charid)
if sql then
outputChatBox("#FF0000[Offline - AdminJail]:#ffffff #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff bebörtönözte #00aeef" .. targetPlayer .. "#ffffff játékost #1a75ff" .. ido .. "#ffffff percre.", root ,255, 255, 255, true)
outputChatBox("#FF0000[Offline - AdminJail]:#ffffff #00aeefIndok: #ffffff" .. reason, root ,255, 255, 255, true)
end
else
outputChatBox(exhiba .. "Nincs találat", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("ojail", offlineAdminJail, false, false)
function idoTelikLe(targetPlayer)
if isElement(targetPlayer) and (getElementType(targetPlayer) == "player") then
local idoTelik = tonumber(getElementData(targetPlayer, "idoTelik")) or false
local idoLetelt = tonumber(getElementData(targetPlayer, "idoLetelt")) or false
if (idoTelik) and (idoLetelt) then
setElementData(targetPlayer, "idoTelik", idoTelik-1)
setElementData(targetPlayer, "idoLetelt", idoLetelt+1)
--outputChatBox(idoTelik .. " van hátra | " .. idoLetelt .. " letelt | " .. getPlayerName(targetPlayer)) --IDG, eltávolítható
local sql = dbExec(con, "UPDATE characters SET adminjail_idoTelik = ? WHERE id = '" .. getElementData(targetPlayer, "char:id") .. "'", idoTelik)
if (idoTelik) <= 1 then
outputChatBox(exinfo .. "Lejárt a büntetésed.", targetPlayer, 255, 255, 255, true)
--outputAdminMessage(getPlayerName(targetPlayer):gsub("_"," ") .. " adminjailje lejárt. [CHECK]") --IDG, eltávolítható
local theTimer = getElementData(targetPlayer, "adminjail:theTimer")
if not (theTimer) then
return false
end
killTimer(theTimer)
setElementData(targetPlayer, "adminjail:theTimer", false)
local adminjailed = setElementData(targetPlayer, "adminjail", false)
local adminjail_reason = setElementData(targetPlayer, "adminjail:reason", false)
local alapido = setElementData(targetPlayer, "adminjail:ido", false)
local admin = setElementData(targetPlayer, "adminjail:admin", false)
local adminSerial = setElementData(targetPlayer, "adminjail:adminSerial", false)
--sql
local sql = dbExec(con, "UPDATE characters SET adminjail = ?, adminjail_reason = ?, adminjail_idoTelik = ?, adminjail_alapIdo = ?, adminjail_admin = ?, adminjail_adminSerial = ? WHERE id = '" .. getElementData(targetPlayer, "char:id") .. "'", 0, false, false, false, false, false)
local idoTelikVege = setElementData(targetPlayer, "idoTelik", false)
local idoLeteltVege = setElementData(targetPlayer, "idoLetelt", false)
--pos
local setPosition = setElementPosition(targetPlayer, 1514.2734375, -1585.375, 13.546875)
local setInterior = setElementInterior(targetPlayer, 0)
local setDimension = setElementDimension(targetPlayer, 0)
end
end
end
end
function unJail(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if getElementData(targetPlayer, "adminjail") == 1 then
local theTimerCheck = getElementData(targetPlayer, "adminjail:theTimer")
local theTimerCheck2 = getElementData(targetPlayer, "adminjail:theTimerAccounts")
if getElementData(targetPlayer, "adminjail:admin") == getPlayerAdminName(thePlayer) then
if isTimer(theTimerCheck) then
killTimer(theTimerCheck)
setElementData(targetPlayer, "adminjail:theTimer", false)
end
if isTimer(theTimerCheck2) then
killTimer(theTimerCheck2)
setElementData(targetPlayer, "adminjail:theTimerAccounts", false)
end
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kiszedte " .. getPlayerName(targetPlayer) .." játékost az adminjailból.") --MARAD ÉS FIXELNI AZ EGÉSZ UNJAILT RANGOKRA
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kivett az adminjailból. ", targetPlayer ,255, 255, 255, true)
local adminjailed = setElementData(targetPlayer, "adminjail", false)
local adminjail_reason = setElementData(targetPlayer, "adminjail:reason", false)
local alapido = setElementData(targetPlayer, "adminjail:ido", false)
local admin = setElementData(targetPlayer, "adminjail:admin", false)
local adminSerial = setElementData(targetPlayer, "adminjail:adminSerial", false)
--sql
local sql = dbExec(con, "UPDATE characters SET adminjail = ?, adminjail_reason = ?, adminjail_idoTelik = ?, adminjail_alapIdo = ?, adminjail_admin = ?, adminjail_adminSerial = ? WHERE id = '" .. getElementData(targetPlayer, "char:id") .. "'", 0, false, false, false, false, false)
local idoTelikVege = setElementData(targetPlayer, "idoTelik", false)
local idoLeteltVege = setElementData(targetPlayer, "idoLetelt", false)
--pos
local setPosition = setElementPosition(targetPlayer, 1514.2734375, -1585.375, 13.546875)
local setInterior = setElementInterior(targetPlayer, 0)
local setDimension = setElementDimension(targetPlayer, 0)
else
if getElementData(thePlayer, "acc:admin") >= 6 then
local theTimerCheck = getElementData(targetPlayer, "adminjail:theTimer")
local theTimerCheck2 = getElementData(targetPlayer, "adminjail:theTimerAccounts")
if isElement(theTimerCheck) then
killTimer(theTimerCheck)
setElementData(targetPlayer, "adminjail:theTimer", false)
end
if isElement(theTimerCheck2) then
killTimer(theTimerCheck2)
setElementData(targetPlayer, "adminjail:theTimerAccounts", false)
end
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kiszedte " .. getPlayerName(targetPlayer) .." játékost az adminjailból.") --MARAD ÉS FIXELNI AZ EGÉSZ UNJAILT RANGOKRA
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff kivett az adminjailból. ", targetPlayer ,255, 255, 255, true)
local adminjailed = setElementData(targetPlayer, "adminjail", false)
local adminjail_reason = setElementData(targetPlayer, "adminjail:reason", false)
local alapido = setElementData(targetPlayer, "adminjail:ido", false)
local admin = setElementData(targetPlayer, "adminjail:admin", false)
local adminSerial = setElementData(targetPlayer, "adminjail:adminSerial", false)
--sql
local sql = dbExec(con, "UPDATE characters SET adminjail = ?, adminjail_reason = ?, adminjail_idoTelik = ?, adminjail_alapIdo = ?, adminjail_admin = ?, adminjail_adminSerial = ? WHERE id = '" .. getElementData(targetPlayer, "char:id") .. "'", 0, false, false, false, false, false)
local idoTelikVege = setElementData(targetPlayer, "idoTelik", false)
local idoLeteltVege = setElementData(targetPlayer, "idoLetelt", false)
--pos
local setPosition = setElementPosition(targetPlayer, 1514.2734375, -1585.375, 13.546875)
local setInterior = setElementInterior(targetPlayer, 0)
local setDimension = setElementDimension(targetPlayer, 0)
else
outputChatBox(exhiba .. "Nincs jogosultságod a játékost kivenni az adminjailból. Hibakód: UNJAILAD", thePlayer, 255, 255, 255, true)
end
end
else
outputChatBox(exhiba .. "" .. targetPlayerName:gsub("_"," ") .. " nincs adminjailben.", thePlayer ,255, 255, 255, true)
end
end
end
end
addCommandHandler("unjail", unJail, false, false)
function getJailedPlayers(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if (targetPlayer) then
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if getElementData(targetPlayer, "adminjail") == 1 then
local admin = getElementData(targetPlayer, "adminjail:admin")
local ido = getElementData(targetPlayer, "adminjail:ido")
local reason = getElementData(targetPlayer, "adminjail:reason")
local letelt = getElementData(targetPlayer, "idoLetelt")
local hatravan = getElementData(targetPlayer, "idoTelik")
outputChatBox("============== Bebörtönzött játékosok lekérdezése =================", thePlayer, 200, 200, 200, true)
outputChatBox("#00aeef" .. getPlayerName(targetPlayer):gsub("_"," ") .. " #00B6FF(" .. getElementData(targetPlayer, "playerid") .. ")#ffffff: Bebörtönözte: #00aeef" .. admin .. "#ffffff, Perc: #00aeef" .. ido .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(targetPlayer):gsub("_"," ") .. " #00B6FF(" .. getElementData(targetPlayer, "playerid") .. ")#ffffff: Indok: #00aeef" .. reason .. "", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(targetPlayer):gsub("_"," ") .. " #00B6FF(" .. getElementData(targetPlayer, "playerid") .. ")#ffffff: Eddig letelt: #00aeef" .. letelt .. " perc#ffffff, Hátra van: #00aeef" .. hatravan .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox(" ", thePlayer, 200, 200, 200, true)
else
outputChatBox(exhiba .. "A játékos nincs adminjailben.", thePlayer, 255, 255, 255, true)
end
if getElementData(targetPlayer, "jailed") == 1 then
local admin = getElementData(targetPlayer, "jailed:player")
local ido = getElementData(targetPlayer, "jailed:ido")
local reason = getElementData(targetPlayer, "jailed:reason")
local letelt = getElementData(targetPlayer, "jailed:idoLetelt")
local hatravan = getElementData(targetPlayer, "jailed:idoTelik")
outputChatBox("============== Őrizetbe vett játékosok lekérdezése =================", thePlayer, 200, 200, 200, true)
outputChatBox("#00aeef" .. getPlayerName(targetPlayer):gsub("_"," ") .. " #00B6FF(" .. getElementData(targetPlayer, "playerid") .. ")#ffffff: Őrizetbe vette: #00aeef" .. admin .. "#ffffff, Perc: #00aeef" .. ido .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(targetPlayer):gsub("_"," ") .. " #00B6FF(" .. getElementData(targetPlayer, "playerid") .. ")#ffffff: Indok: #00aeef" .. reason .. "", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(targetPlayer):gsub("_"," ") .. " #00B6FF(" .. getElementData(targetPlayer, "playerid") .. ")#ffffff: Eddig letelt: #00aeef" .. letelt .. " perc#ffffff, Hátra van: #00aeef" .. hatravan .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox(" ", thePlayer, 200, 200, 200, true)
else
outputChatBox(exhiba .. "A játékos nincs őrizetbe véve.", thePlayer, 255, 255, 255, true)
end
else
count = 0
count2 = 0
for k, v in ipairs(getElementsByType("player")) do
if getElementData(v, "adminjail") == 1 then
local admin = getElementData(v, "adminjail:admin")
local ido = getElementData(v, "adminjail:ido")
local reason = getElementData(v, "adminjail:reason")
local letelt = getElementData(v, "idoLetelt")
local hatravan = getElementData(v, "idoTelik")
outputChatBox("============== Bebörtönzött játékosok lekérdezése =================", thePlayer, 200, 200, 200, true)
outputChatBox("#00aeef" .. getPlayerName(v):gsub("_"," ") .. " #00B6FF(" .. getElementData(v, "playerid") .. ")#ffffff: Bebörtönözte: #00aeef" .. admin .. "#ffffff, Perc: #00aeef" .. ido .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(v):gsub("_"," ") .. " #00B6FF(" .. getElementData(v, "playerid") .. ")#ffffff: Indok: #00aeef" .. reason .. "", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(v):gsub("_"," ") .. " #00B6FF(" .. getElementData(v, "playerid") .. ")#ffffff: Eddig letelt: #00aeef" .. letelt .. " perc#ffffff, Hátra van: #00aeef" .. hatravan .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox(" ", thePlayer, 200, 200, 200, true)
count = count + 1
end
if getElementData(v, "jailed") == 1 then
outputChatBox("============== Őrizetbe vett játékosok lekérdezése =================", thePlayer, 200, 200, 200, true)
outputChatBox("#00aeef" .. getPlayerName(v):gsub("_"," ") .. " #00B6FF(" .. getElementData(v, "playerid") .. ")#ffffff: Őrizetbe vette: #00aeef" .. getElementData(v, "jailed:player") .. "#ffffff, Perc: #00aeef" .. getElementData(v, "jailed:ido") .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(v):gsub("_"," ") .. " #00B6FF(" .. getElementData(v, "playerid") .. ")#ffffff: Indok: #00aeef" .. getElementData(v, "jailed:reason") .. "", thePlayer, 255, 255, 255, true)
outputChatBox("#00aeef" .. getPlayerName(v):gsub("_"," ") .. " #00B6FF(" .. getElementData(v, "playerid") .. ")#ffffff: Eddig letelt: #00aeef" .. getElementData(v, "jailed:idoLetelt") .. " perc#ffffff, Hátra van: #00aeef" .. getElementData(v, "jailed:idoTelik") .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox(" ", thePlayer, 200, 200, 200, true)
count2 = count2 + 1
end
end
if count == 0 and count2 == 0 then
outputChatBox(exinfo .. "Senki sincsen adminjailben.", thePlayer, 255, 255, 255, true)
else
outputChatBox("Összesen #FF0000" .. count .. "#ffffff játékos van adminjailben és #FF0000" .. count2 .. "#ffffff játékos van őrizetben.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("jailed", getJailedPlayers, false, false)
function bortonIdo(thePlayer, commandName)
if getElementData(thePlayer, "adminjail") == 1 then
local admin = getElementData(thePlayer, "adminjail:admin")
local ido = getElementData(thePlayer, "adminjail:ido")
local reason = getElementData(thePlayer, "adminjail:reason")
local letelt = getElementData(thePlayer, "idoLetelt")
local hatravan = getElementData(thePlayer, "idoTelik")
outputChatBox("#FF0000[AJ - Információ]:#ffffff #00aeef" .. admin .. "#ffffff bebörtönzött téged #00aeef" .. ido .. " percre#ffffff.", thePlayer, 255, 255, 255, true)
outputChatBox("#FF0000[AJ - Információ]:#ffffff Indok: #00aeef" .. reason, thePlayer, 255, 255, 255, true)
outputChatBox("#FF0000[AJ - Információ]:#ffffff Hátra van: #00aeef" .. hatravan .. " perc#ffffff, Letelt: #00aeef" .. letelt .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox("#FF0000[AJ - Információ]:#ffffff Típus: #00aeefadminjail", thePlayer, 255, 255, 255, true)
elseif getElementData(thePlayer, "jailed") == 1 then
local admin = getElementData(thePlayer, "jailed:player")
local ido = getElementData(thePlayer, "jailed:ido")
local reason = getElementData(thePlayer, "jailed:reason")
local letelt = getElementData(thePlayer, "jailed:idoLetelt")
local hatravan = getElementData(thePlayer, "jailed:idoTelik")
outputChatBox("#FF0000[Jail - Információ]:#ffffff #00aeef" .. admin .. "#ffffff őrizetbe vett téged #00aeef" .. ido .. " percre#ffffff.", thePlayer, 255, 255, 255, true)
outputChatBox("#FF0000[Jail - Információ]:#ffffff Indok: #00aeef" .. reason, thePlayer, 255, 255, 255, true)
outputChatBox("#FF0000[Jail - Információ]:#ffffff Hátra van: #00aeef" .. hatravan .. " perc#ffffff, Letelt: #00aeef" .. letelt .. " perc", thePlayer, 255, 255, 255, true)
outputChatBox("#FF0000[Jail - Információ]:#ffffff Típus: #00aeefőrizetbe vétel", thePlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nem vagy börtönben, sem adminjailban.", thePlayer, 255, 255, 255, true)
end
end
addCommandHandler("börtönidő", bortonIdo, false, false)
----------------------------------------------------------------------------------------------------------------------------------------
-- /a, /as -- ADMINISZTRÁTOR, ADMINSEGÉD CHAT PARANCSOK
----------------------------------------------------------------------------------------------------------------------------------------
addCommandHandler("a",
function(player,_,...)
if getElementData(player,"loggedin") then
if tonumber(getElementData(player, "acc:admin") or 0) >= 1 then
local message = table.concat({...}, " ")
local szintpername = getPlayerAdminLevel(player)
if ... and message then
for k,v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 1 then
outputChatBox("#FF0000[AdminChat]: #00aeef".. szintpername .. " " .. getPlayerAdminName(player) .. ":#FFFFFF "..message,v,255,255,255,true)
end
end
else
outputChatBox("#00aeefHasználat: #ffffff/a [Szöveg]",player, 255, 194, 14, true)
end
end
end
end
)
function developerChat(thePlayer, commandName, ...)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Üzenet]", thePlayer, 255, 255, 255, true)
else
local msg = table.concat({...}," ")
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 10 then
outputChatBox("#00aeef[DeveloperChat]#00aeef " .. getPlayerAdminName(thePlayer) .. ":#ffffff ".. msg, v, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("dc", developerChat, false, false)
addCommandHandler("as",
function(player,_,...)
if getElementData(player,"loggedin") then
if tonumber(getElementData(player, "acc:aseged")) >= 1 or tonumber(getElementData(player, "acc:admin")) >= 1 then
local message = table.concat({...}, " ")
if ... and message then
for k,v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:aseged") or 0) >= 1 or tonumber(getElementData(v, "acc:admin") or 0) >= 1 then
if getElementData(player,"acc:aseged") >= 1 then
name = getPlayerName(player):gsub("_"," ")
szintpername = getPlayerAsLevel(player)
elseif getElementData(player,"acc:admin") >= 1 then
name = getPlayerAdminName(player)
szintpername = getPlayerAdminLevel(player)
end
outputChatBox("#19B5FE[AdminSegédChat]#00aeef "..szintpername .. " " .. name .. ":#FFFFFF "..message,v,255,255,255,true)
end
end
else
outputChatBox("#00aeefHasználat:#ffffff /as [Szöveg]",player, 255, 194, 14, true)
end
end
end
end
)
function player_Wasted ( ammo, attacker, weapon, bodypart )
local time = getRealTime()
local hours = time.hour
local minutes = time.minute
if minutes < 10 then
minutes = "0" .. minutes
end
if hours < 10 then
hours = "0" .. hours
end
local killog
if (attacker) then
if (getElementType(attacker) == "player") then
if getWeaponNameFromID(weapon) == "Explosion" then
allapot = "Felrobbantotta"
else
allapot = "Fegyver: " .. getWeaponNameFromID(weapon)
end
killog = "[" .. hours .. ":" .. minutes .. "] ".. getPlayerName(attacker):gsub("_"," ") .. " megölte " .. getPlayerName(source):gsub("_"," ") .. " játékost. (" .. allapot .. ")"
if (bodypart) == 9 then
killog = killog .. " (Fejbelövés)"
elseif (bodypart) == 4 then
killog = killog .. " (Seggbelőtték)"
end
elseif (getElementType(attacker) == "vehicle") then
if getWeaponNameFromID(weapon) == "Rammed" then
allapot = "Elütötte"
elseif getWeaponNameFromID(weapon) == "Ranover" then
allapot = "Ráállt DB"
end
killog = "[" .. hours .. ":" .. minutes .. "] " .. getPlayerName(getVehicleController(attacker)):gsub("_"," ") .. " elütötte " .. getPlayerName(source):gsub("_"," ") .. " játékost. (Járművel: " .. allapot .. ")"
elseif (getElementType(attacker) == "ped") then
allapot = "( PET )"
killog = "[" .. hours .. ":" .. minutes .. "] ".. (getElementData(attacker, "ped:name") or "Ismeretlen") .. " "..allapot .. " megölte " .. getPlayerName(source):gsub("_"," ") .. " játékost."
end
else
killog = "[" .. hours .. ":" .. minutes .. "] " .. getPlayerName(source):gsub("_", " ") .. " meghalt."
end
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 1 and getElementData(v, "loggedin") then
outputChatBox("*".. killog, v, 220, 220, 220, true)
end
end
end
addEventHandler ( "onPlayerWasted", getRootElement(), player_Wasted )
----------------------------------------------------------------------------------------------------------------------------------------
-- /restartres, /stopres, /startres -- RESOURCE PARANCSOK
----------------------------------------------------------------------------------------------------------------------------------------
function restartRes(thePlayer, commandName, resourceName)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (resourceName) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Resource név]", thePlayer, 255, 255, 255, true)
else
local resource = getResourceFromName( resourceName )
if not (resource) then
outputChatBox(exhiba .. "A(z) " .. resourceName .. " resource nem található.", thePlayer, 255, 255, 255, true)
return
end
local restart = restartResource(resource)
local get = getResourceState(resource)
if get ~= "running" then
local start = startResource(resource)
if (start) then
outputAdminMessage("#00aeef".. getPlayerAdminName(thePlayer) .. "#ffffff elindította a(z) #00aeef" .. resourceName .. "#ffffff resourcet.")
else
outputChatBox(exhiba .. "Nem sikerült elindítani a resourcet. Hibakód: RESTART1", thePlayer, 255, 255, 255, true)
end
else
if (restart) then
outputAdminMessage("#00aeef"..getPlayerAdminName(thePlayer) .. "#ffffff újraindította a(z) #00aeef" .. resourceName .. "#ffffff resourcet.")
else
outputChatBox(exhiba .. "Nem sikerült újraindítani a resourcet. Hibakód: RESTART2", thePlayer, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("restartres", restartRes, false, false)
function stopRes(thePlayer, commandName, resourceName)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (resourceName) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Resource név]", thePlayer, 255, 255, 255, true)
else
local resource = getResourceFromName( resourceName )
if not (resource) then
outputChatBox(exhiba .. "A(z) " .. resourceName .. " resource nem található.", thePlayer, 255, 255, 255, true)
return
end
local stop = stopResource(resource)
local get = getResourceState(resource)
if get ~= "running" then
outputChatBox(exhiba .. "A(z) " .. resourceName .. " resource nem fut jelenleg.", thePlayer, 255, 255, 255, true)
else
if (stop) then
outputAdminMessage("#00aeef"..getPlayerAdminName(thePlayer) .. "#ffffff leállította a(z) #00aeef" .. resourceName .. "#ffffff resourcet.")
else
outputChatBox(exhiba .. "Nem sikerült leállítani a resourcet. Hibakód: STOP2", thePlayer, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("stopres", stopRes, false, false)
function startRes(thePlayer, commandName, resourceName)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (resourceName) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Resource név]", thePlayer, 255, 255, 255, true)
else
local resource = getResourceFromName( resourceName )
if not (resource) then
outputChatBox(exhiba .. "A(z) " .. resourceName .. " resource nem található.", thePlayer, 255, 255, 255, true)
return
end
local start = startResource(resource)
local get = getResourceState(resource)
if get == "running" then
outputChatBox(exhiba .. "A(z) " .. resourceName .. " már el van indítva.", thePlayer, 255, 255, 255, true)
else
if (start) then
outputAdminMessage("#00aeef".. getPlayerAdminName(thePlayer) .. "#ffffff elindította a(z) #00aeef" .. resourceName .. "#ffffff resourcet.")
else
outputChatBox(exhiba .. "Nem sikerült elindítani a resourcet. Hibakód: START2", thePlayer, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("startres", startRes, false, false)
----------------------------------------------------------------------------------------------------------------------------------------
-- /setpp, /setvip -- KÜLÖNRANGI PARANCSOK
----------------------------------------------------------------------------------------------------------------------------------------
function setPP(thePlayer, commandName, targetPlayer, status, pp)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (targetPlayer) or not (status) or not (pp) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [1 = Beállítás | 2 = Hozzáadás | 3 = Levonás] [PP érték]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
local status = tonumber(status)
local pp = tonumber(pp)
if pp < 0 then outputChatBox(exhiba .. "Az értéknek 0 felett kell lennie.", thePlayer, 255, 255, 255, true) return end
if not getElementData(targetPlayer, "loggedin") then return end
if (status) > 3 or (status) < 1 then
outputChatBox(exhiba .. "A végrehajtási kódok csak 1 és 3 között vannak", thePlayer, 255, 255, 255, true)
return
end
local oldPP = getElementData(targetPlayer, "char:pp") or 0
if (status) == 1 then
local sql = dbExec(con, "UPDATE characters SET premiumpont='" .. pp .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen beállítottad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff prémiumpontjainak számát. (" .. pp ..")", thePlayer, 255, 255, 255, true)
outputDeveloperMessage("#00aeef".. getPlayerAdminName(thePlayer) .. "#ffffff beállította #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff prémiumpontjainak számát. #ff9000(" .. pp .. ")")
setElementData(targetPlayer, "char:pp", pp)
--adminlog
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETPP", getPlayerAdminName(thePlayer) .. " beállította " .. targetPlayerName .. " játékos prémiumpontjainak számát. (".. pp .. ")", targetPlayerName, getElementData(targetPlayer, "char:id"))
end
elseif (status) == 2 then
local sql = dbExec(con, "UPDATE characters SET premiumpont='".. getElementData(targetPlayer, "char:pp") + pp .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff prémiumpontjainak számát. (" .. oldPP .. " => " .. oldPP + pp ..")", thePlayer, 255, 255, 255, true)
outputDeveloperMessage(getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " prémiumpontjainak számát. (" .. oldPP .. " => " .. oldPP + pp .. ")")
setElementData(targetPlayer, "char:pp", oldPP + pp)
--adminlog
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETPP", getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName .. " játékos prémiumpontjainak számát. (" .. oldPP .. " => " .. oldPP + pp .. ")", targetPlayerName, getElementData(targetPlayer, "char:id"))
end
elseif (status) == 3 then
local sql = dbExec(con, "UPDATE characters SET premiumpont='".. getElementData(targetPlayer, "char:pp") - pp .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff prémiumpontjainak számát. (" .. oldPP .. " => " .. oldPP - pp ..")", thePlayer, 255, 255, 255, true)
outputDeveloperMessage(getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " prémiumpontjainak számát. (" .. oldPP .. " => " .. oldPP - pp .. ")")
setElementData(targetPlayer, "char:pp", oldPP - pp)
--adminlog
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETPP", getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName .. " játékos prémiumpontjainak számát. (" .. oldPP .. " => " .. oldPP - pp .. ")", targetPlayerName, getElementData(targetPlayer, "char:id"))
end
end
end
end
end
addCommandHandler("setpp", setPP, false, false)
----------------------------------------------------------------------------------------------------------------------------------------
-- /setmoney -- EGYÉB PARANCSOK
----------------------------------------------------------------------------------------------------------------------------------------
function setMoney(thePlayer, commandName, targetPlayer, status, cash)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (targetPlayer) or not (status) or not (cash) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [1 = Beállítás | 2 = Hozzáadás | 3 = Levonás] [Pénz érték]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
local status = tonumber(status)
local cash = tonumber(cash)
if cash < 0 then outputChatBox(exhiba .. "Az értéknek 0 felett kell lennie.", thePlayer, 255, 255, 255, true) return end
if not getElementData(targetPlayer, "loggedin") then return end
if (status) > 3 or (status) < 1 then
outputChatBox(exhiba .. "A végrehajtási kódok csak 1 és 3 között vannak", thePlayer, 255, 255, 255, true)
return
end
local oldCash = getElementData(targetPlayer, "char:money") or 0
if (status) == 1 then
local sql = dbExec(con, "UPDATE characters SET money='" .. cash .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen beállítottad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékos pénzét. (" .. cash ..")", thePlayer, 255, 255, 255, true)
outputDeveloperMessage("#00aeef".. getPlayerAdminName(thePlayer) .. "#ffffff beállította " .. targetPlayerName:gsub("_"," ") .. " játékos pénzét. (" .. cash .. ")")
setElementData(targetPlayer, "char:money", cash)
--adminlog
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETMONEY", getPlayerAdminName(thePlayer) .. " beállította " .. targetPlayerName .. " játékos pénzét. " .. cash .. "", targetPlayerName, getElementData(targetPlayer, "char:id"))
end
elseif (status) == 2 then
local sql = dbExec(con, "UPDATE characters SET money='".. getElementData(targetPlayer, "char:money") + cash .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékos pénzét. (" .. oldCash .. " => " .. oldCash + cash ..")", thePlayer, 255, 255, 255, true)
outputDeveloperMessage("#00aeef".. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " játékos pénzét. (" .. oldCash .. " => " .. oldCash + cash .. ")")
setElementData(targetPlayer, "char:money", oldCash + cash)
--adminlog
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETMONEY", getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName .. " játékos pénzét. (" .. oldCash .. " => " .. oldCash + cash .. ")", targetPlayerName, getElementData(targetPlayer, "char:id"))
end
elseif (status) == 3 then
local sql = dbExec(con, "UPDATE characters SET money='".. getElementData(targetPlayer, "char:money") - cash .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékos pénzét. (" .. oldCash .. " => " .. oldCash - cash ..")", thePlayer, 255, 255, 255, true)
outputDeveloperMessage("#00aeef".. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta " .. targetPlayerName:gsub("_"," ") .. " játékos pénzét. (" .. oldCash .. " => " .. oldCash - cash .. ")")
setElementData(targetPlayer, "char:money", oldCash - cash)
--adminlog
local adminlogSql = dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "SETMONEY", getPlayerAdminName(thePlayer) .. " megváltoztatta " .. targetPlayerName .. " játékos pénzét. (" .. oldCash .. " =>" .. oldCash - cash .. "", targetPlayerName, getElementData(targetPlayer, "char:id"))
end
end
end
end
end
addCommandHandler("setmoney", setMoney, false, false)
function rtcVehicle(thePlayer, commandName)
if getElementData(thePlayer, "acc:admin") >=2 then
local px, py, pz = getElementPosition(thePlayer)
for k, v in ipairs(getElementsByType("vehicle")) do
vx, vy, vz = getElementPosition(v)
local dist = getDistanceBetweenPoints3D ( px, py, pz, vx, vy, vz )
local int, dim = getElementInterior(thePlayer), getElementDimension(thePlayer)
local tint, tdim = getElementInterior(v), getElementDimension(v)
if dist <= 3 and int == tint and dim == tdim then
local vehicleQ = dbQuery(con,"SELECT * FROM vehicle WHERE id='" .. getElementData(v, "veh:id") .. "'")
local vehicleH,vehszam = dbPoll(vehicleQ,-1)
if #vehicleH > 0 then
for k1,v1 in ipairs(vehicleH) do
pos = fromJSON(v1["pos"])
setElementPosition(v, pos[1], pos[2], pos[3])
setElementInterior(v, pos[4] or 0)
setElementDimension(v, pos[5] or 0)
setElementRotation(v, 0, 0, pos[6] or 0)
setElementData(v, "veh:fuel", 100)
fixVehicle(v)
setVehicleLocked(v, true)
setElementData(v, "veh:light", false)
setVehicleOverrideLights(v, 1)
setElementData(v, "veh:motor", false)
outputChatBox("#D64541[RTC]#ffffff Sikeresen RTC-zted a(z) ID: ".. getElementData(v, "veh:id") .. " járművet.", thePlayer, 255, 255, 255, true)
--adminlog
for k3, v3 in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v3, "acc:admin") or 0) >= 1 and getElementData(v3, "loggedin") then
if getPlayerName(thePlayer) == getPlayerName(v3) then
else
outputChatBox("#D64541[RTC]#ffffff #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff respawnolta a(z) ID: " .. getElementData(v, "veh:id") .. " járművet.", v3, 255, 255, 255, true)
end
end
end
end
end
end
end
end
end
addCommandHandler("rtc", rtcVehicle, false, false)
function rtcVehicle2(thePlayer, commandName)
if getElementData(thePlayer, "acc:admin") >=2 then
local px, py, pz = getElementPosition(thePlayer)
for k, v in ipairs(getElementsByType("vehicle")) do
vx, vy, vz = getElementPosition(v)
local dist = getDistanceBetweenPoints3D ( px, py, pz, vx, vy, vz )
if dist <= 5 then
local vehicleQ = dbQuery(con,"SELECT * FROM vehicle WHERE id='" .. getElementData(v, "veh:id") .. "'")
local vehicleH,vehszam = dbPoll(vehicleQ,-1)
if vehicleH then
for k1,v1 in ipairs(vehicleH) do
setElementDimension(v, 2)
local x, y, z = -2319.1916503906, -1637.2742919922, 483.703125
setElementPosition(v, x, y, z)
setVehicleRespawnPosition(v, x, y, z, 0, 0, 0)
dbExec(con, "UPDATE vehicle SET interior='0', dimension='2', pos='" .. toJSON({x, y, z, 0, 2, 0}) .. "' WHERE id='" .. getElementData(v, "veh:id") .. "'")
--adminlog
for k3, v3 in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v3, "acc:admin") or 0) >= 1 and getElementData(v3, "loggedin") then
if getPlayerName(thePlayer) == getPlayerName(v3) then
else
outputChatBox("#00aeef[RTC2]#ffffff #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff áthelyezte a(z) ID: " .. getElementData(v, "veh:id") .. " járművet.", v3, 255, 255, 255, true)
end
end
end
end
end
end
end
end
end
addCommandHandler("rtc2", rtcVehicle2, false, false)
function delJobVehicles(thePlayer)
if getElementData(thePlayer, "acc:admin") < 6 then return end
for key, value in ipairs(getElementsByType("vehicle")) do
local px, py, pz = getElementPosition(thePlayer)
local px2, py2, pz2 = getElementPosition(value)
if getDistanceBetweenPoints3D(px, py, pz, px2, py2, pz2) <= 5 then
if getElementData(value, "veh:id") or 0 < 0 then
setElementDimension(value, 2)
end
end
end
end
addCommandHandler("deljobvehs", delJobVehicles, false, false)
function fly(thePlayer, commandName)
if (getElementData(thePlayer, "acc:admin")) >= 1 then
triggerClientEvent(thePlayer, "onClientFlyToggle", thePlayer)
end
end
addCommandHandler("fly", fly, false, false)
function getPlayerLevel(player, cmd, target)
if not target then
outputChatBox("#00aeefHasználat: #ffffff/"..cmd.." [Név / ID]", player, 0, 0, 0, true)
return
end
local target, targetName = exports["mta_main"]:findPlayer(player, target)
if not target then
outputChatBox(exhiba.."Nincs ilyen játékos, vagy nincs bejelentkezve.", player, 0, 0, 0, true)
return
else
outputChatBox(exinfo..targetName:gsub("_", " ").." szintje: #00aeef"..exports["mta_score"]:getLevel(target), player, 0, 0, 0, true)
end
end
addCommandHandler("lvl", getPlayerLevel)
function getPlayerOldcarID(player)
if not getElementData(player, "oldcarID") then
outputChatBox(exhiba.."Még nem ültél járműben.", player, 0, 0, 0, true)
else
outputChatBox(exinfo.."Utolsó kocsi ID-je: #00aeef"..getElementData(player, "oldcarID"), player, 0, 0, 0, true)
end
end
addCommandHandler("oldcar", getPlayerOldcarID)
function getPlayerID(player, cmd, target)
if not target then
outputChatBox("#00aeefHasználat: #ffffff/"..cmd.." [Név / ID]", player, 0, 0, 0, true)
return
end
local target, targetName = exports["mta_main"]:findPlayer(player, target)
if not target then
--outputChatBox(exhiba.."Nincs ilyen játékos, vagy nincs bejelentkezve.", player, 0, 0, 0, true)
return
else
outputChatBox(exinfo..targetName:gsub("_", " ").. " ID-je: #00aeef"..getElementData(target, "playerid"), player, 0, 0, 0, true)
end
end
addCommandHandler("id", getPlayerID)
function gotoInterior(thePlayer, commandName, int)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (int) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Interior ID]", thePlayer, 255, 255, 255, true)
else
local qh = dbQuery(con, "SELECT * FROM interiors WHERE id='" .. int .. "'")
local result, num = dbPoll( qh, -1 )
if (num>0) then
for _, row in ipairs(result) do
id = row["id"]
x = row["x"]
y = row["y"]
z = row["z"]
end
setElementPosition(thePlayer, x, y, z)
outputChatBox(exinfo .. "Sikeresen elteleportáltál az interiorhoz. (ID: " .. int .. ")", thePlayer, 255, 255, 255, true)
else
outputChatBox(exhiba .. "Nincs találat.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("gotointerior", gotoInterior, false, false)
function giveLicenses(thePlayer, commandName, targetPlayer, licensz)
if getElementData(thePlayer, "acc:admin") >= 5 then
if not (targetPlayer) or not (licensz) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [1 = Jogosítvány | 2 = Fegyvertartási engedély]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
local licensz = tonumber(licensz)
if not getElementData(targetPlayer, "loggedin") then return end
if licensz > 2 or licensz <= 0 then
outputChatBox(exhiba .. "A licensz csak 1 és 2 lehet.", thePlayer, 255, 255, 255, true)
return
end
if (licensz) == 1 then
setElementData(targetPlayer, "char:drivingLicense", 1)
license = toJSON({1,getElementData(targetPlayer, "char:fegyverengedely")})
sql = dbExec(con, "UPDATE characters SET License='".. license .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen adtál jogosítványt #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékosnak.", thePlayer, 255, 255, 255, true)
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff adott neked jogosítványt.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff adott " .. targetPlayerName:gsub("_"," ") .. " játékosnak jogosítványt.")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "GIVELICENSES", "" .. getPlayerAdminName(thePlayer) .. " adott " .. targetPlayerName:gsub("_"," ") .. " játékosnak jogosítványt.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült jogosítványt adni a játékosnak. Hibakód: GIVELICENSES1", thePlayer, 255, 255, 255, true)
end
elseif (licensz) == 2 then
if getElementData(thePlayer, "acc:admin") >= 6 then
setElementData(targetPlayer, "char:fegyverengedely", 1)
license = toJSON({getElementData(targetPlayer, "char:drivingLicense"),1})
sql = dbExec(con, "UPDATE characters SET License='".. license .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen adtál fegyvertartási engedélyt #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékosnak.", thePlayer, 255, 255, 255, true)
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff adott neked fegyvertartási engedélyt.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff adott " .. targetPlayerName:gsub("_"," ") .. " játékosnak fegyvertartási engedélyt.")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "GIVELICENSES", "" .. getPlayerAdminName(thePlayer) .. " adott " .. targetPlayerName:gsub("_"," ") .. " játékosnak fegyvertartási engedélyt.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült fegyvertartási engedélyt adni a játékosnak. Hibakód: GIVELICENSES2", thePlayer, 255, 255, 255, true)
end
end
end
end
end
end
addCommandHandler("givelicenses", giveLicenses, false, false)
function showLicenses(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "loggedin") then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] ", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if (targetPlayer) then
local x, y, z = getElementPosition(thePlayer)
local x1, y1, z1 = getElementPosition(targetPlayer)
local dist = getDistanceBetweenPoints3D( x, y, z, x1, y1, z1 )
if (dist<10) then
sendLocalMeAction(thePlayer, "felmutatja az engedélyeit " .. targetPlayerName:gsub("_"," ") .. "-nak/nek.")
outputChatBox("-------------------------------------------------------------------------", targetPlayer, 150, 150, 150, true)
outputChatBox("#00aeef" .. getPlayerName(thePlayer) .. "#ffffff játékos engedélyei:", targetPlayer, 255, 255, 255, true)
local jogsi = getElementData(thePlayer, "char:drivingLicense")
local fegyver = getElementData(thePlayer, "char:fegyverengedely")
if jogsi == 1 then
p = "#00aeefVan"
else
p = "#FF0000Nincs"
end
if fegyver == 1 then
r = "#00aeefVan"
else
r = "#FF0000Nincs"
end
outputChatBox("#ffffffJárművezetői engedély: " .. p, targetPlayer, 255, 255, 255, true)
outputChatBox("#ffffffFegyvertartási engedély: " .. r, targetPlayer, 255, 255, 255, true)
outputChatBox("-------------------------------------------------------------------------", targetPlayer, 150, 150, 150, true)
else
outputChatBox(exhiba .. "Túl messze vagy a játékostól.", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("showlicenses", showLicenses, false, false)
function takeLicenses(thePlayer, commandName, targetPlayer, licensz)
if getElementData(thePlayer, "acc:admin") >= 5 then
if not (targetPlayer) or not (licensz) then
outputChatBox("#00aeefHasználat: #ffffff/" .. commandName .. " [Név / ID] [1 = Jogosítvány | 2 = Fegyvertartási engedély]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
local licensz = tonumber(licensz)
if not getElementData(targetPlayer, "loggedin") then return end
if licensz > 2 or licensz <= 0 then
outputChatBox(exhiba .. "A licensz csak 1 és 2 lehet.", thePlayer, 255, 255, 255, true)
return
end
if (licensz) == 1 then
setElementData(targetPlayer, "char:drivingLicense", 0)
local license = toJSON({0,0})
local sql = dbExec(con, "UPDATE characters SET License='".. license .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen elvetted a jogosítványt #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékostól.", thePlayer, 255, 255, 255, true)
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elvette a jogosítványodat.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elvette " .. targetPlayerName:gsub("_"," ") .. " játékosnak a jogosítványát.")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "TAKELICENSES", "" .. getPlayerAdminName(thePlayer) .. " elvette " .. targetPlayerName:gsub("_"," ") .. " játékos jogosítványát.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült jogosítványt elvenni a játékostól. Hibakód: TAKELICENSES1", thePlayer, 255, 255, 255, true)
end
elseif (licensz) == 2 then
if getElementData(thePlayer, "acc:admin") >= 6 then
setElementData(targetPlayer, "char:fegyverengedely", 0)
license = toJSON({getElementData(targetPlayer, "char:drivingLicense"),0})
sql = dbExec(con, "UPDATE characters SET License='".. license .. "' WHERE id='" .. getElementData(targetPlayer, "char:id") .. "'")
if (sql) then
outputChatBox(exinfo .. "Sikeresen elvetted a fegyvertartási engedélyt #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékostól.", thePlayer, 255, 255, 255, true)
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elvette a fegyvertartási engedélyedet.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elvette " .. targetPlayerName:gsub("_"," ") .. " játékosnak a fegyvertartási engedélyét.")
dbExec(con, adminlog, getPlayerAdminName(thePlayer), getElementData(thePlayer, "acc:id"), "TAKELICENSES", "" .. getPlayerAdminName(thePlayer) .. " elvette " .. targetPlayerName:gsub("_"," ") .. " játékos fegyvertartási engedélyét.", targetPlayerName, getElementData(targetPlayer, "acc:id"))
else
outputChatBox(exhiba .. "Nem sikerült jogosítványt elvenni a játékostól. Hibakód: TAKELICENSES2", thePlayer, 255, 255, 255, true)
end
end
end
end
end
end
addCommandHandler("takelicenses", takeLicenses, false, false)
function vhSpawn(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local x, y, z = 1310.3425292969, -1380.1224365234, 13.703497886658
local int = 0
local dim = 0
if not getElementData(targetPlayer, "loggedin") then return end
if isPedInVehicle(targetPlayer) then
removePedFromVehicle(targetPlayer)
end
if not (targetPlayer) then
outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true)
return
end
if getElementData(targetPlayer, "adminjail") == 1 and not getElementData(thePlayer, "acc:admin") >= 6 then outputChatBox("#FF0000[Hiba]:#ffffff Nincs jogosultságod a játékost a városházára teleportálni. (Jailben van.)", targetPlayer, 255, 255, 255, true) return end
local teleport = setElementPosition(targetPlayer, x, y, z), setElementInterior(targetPlayer, int), setElementDimension(targetPlayer, dim)
if (teleport) then
outputChatBox("#ffffffSikeresen elteleportáltad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost a városházára.", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elteleportált téged a #00aeefvárosházára#ffffff.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elteleportálta " .. targetPlayerName:gsub("_"," ") .. " játékost a városházára.")
else
outputChatBox(exhiba .. "Nem sikerült a játékost elteleportálni a városházára. Hibakód: VHSPAWN1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("vhspawn", vhSpawn, false, false)
function akspawn(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 1 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local x, y, z = 2127.4465332031, -1128.3813476563, 25.555187225342
local int = 0
local dim = 0
if not getElementData(targetPlayer, "loggedin") then return end
if isPedInVehicle(targetPlayer) then
removePedFromVehicle(targetPlayer)
end
if not (targetPlayer) then
outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true)
return
end
if getElementData(targetPlayer, "adminjail") == 1 and not getElementData(thePlayer, "acc:admin") >= 6 then outputChatBox("#dc143c[Hiba]:#ffffff Nincs jogosultságod a játékost a autókereskedéshez teleportálni. (Jailben van.)", targetPlayer, 255, 255, 255, true) return end
local teleport = setElementPosition(targetPlayer, x, y, z), setElementInterior(targetPlayer, int), setElementDimension(targetPlayer, dim)
if (teleport) then
outputChatBox("#00aeef[Teleport]#ffffff Sikeresen elteleportáltad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékost a autókereskedéshez.", thePlayer, 255, 255, 255, true)
outputChatBox(" #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elteleportált téged a #0094ffautókereskedéshez#ffffff.", targetPlayer, 255, 255, 255, true)
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff elteleportálta " .. targetPlayerName:gsub("_"," ") .. " játékost a autókereskedéshez.")
else
outputChatBox(exhiba .. "Nem sikerült a játékost elteleportálni a autókereskedéshez. Hibakód: AKSPAWN1", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("akspawn", akspawn, false, false)
addEvent( "gotoMark", true )
addEventHandler( "gotoMark", getRootElement( ),
function( x, y, z, interior, dimension, name )
if type( x ) == "number" and type( y ) == "number" and type( z ) == "number" and type( interior ) == "number" and type( dimension ) == "number" then
if getElementData ( client, "loggedin" ) and getElementData(client, "acc:admin") >= 1 then
setTimer(function(client)
local vehicle = nil
local seat = nil
if(isPedInVehicle ( client )) then
vehicle = getPedOccupiedVehicle ( client )
seat = getPedOccupiedVehicleSeat ( client )
end
if(vehicle and (seat ~= 0)) then
removePedFromVehicle (client )
setElementPosition(client, x, y, z)
setElementInterior(client, interior)
setElementDimension(client, dimension)
elseif(vehicle and seat == 0) then
removePedFromVehicle (client )
setElementPosition(vehicle, x, y, z)
setElementInterior(vehicle, interior)
setElementDimension(vehicle, dimension)
warpPedIntoVehicle ( client, vehicle, 0)
else
setElementPosition(client, x, y, z)
setElementInterior(client, interior)
setElementDimension(client, dimension)
end
name = name or ""
outputChatBox( "#00aeef[EvolutionGaming - Teleport]:#ffffff Sikeresen elteleportáltál a(z) #00aeef".. name .. "#ffffff helyszínre.", client, 0, 255, 0, true )
end, 50, 1, client)
end
end
end
)
function sendLocalText(root, message, r, g, b, distance, exclude)
exclude = exclude or {}
local x, y, z = getElementPosition(root)
local shownto = 0
for index, nearbyPlayer in ipairs(getElementsByType("player")) do
if isElement(nearbyPlayer) and getDistanceBetweenPoints3D(x, y, z, getElementPosition(nearbyPlayer)) < ( distance or 20 ) then
local logged = getElementData(nearbyPlayer, "loggedin")
if not exclude[nearbyPlayer] and not isPedDead(nearbyPlayer) and logged and getElementDimension(root) == getElementDimension(nearbyPlayer) then
outputChatBox(message, nearbyPlayer, r, g, b,true)
shownto = shownto + 1
end
end
end
end
function sendLocalMeAction(thePlayer, message)
sendLocalText(thePlayer, " ***" .. getPlayerName(thePlayer):gsub("_", " ") .. ( message:sub( 1, 1 ) == "'" and "" or " " ) .. message, 194, 162, 218)
triggerClientEvent("onMessageIncome",thePlayer,"***"..message,2)
end
function saveSqlFegyver(player, status)
if isElement(player) then
local jogsi = getElementData(player, "char:drivingLicense")
local save = toJSON({jogsi, 1})
local sql = dbExec(con, "UPDATE characters SET License = ? WHERE id='" .. getElementData(player, "char:id") .. "'", save)
if (sql) then
--outputChatBox(getPlayerName(player) .. " fegyvertartási engedélye mentve lett.")
end
end
end
addEvent("fegyverengMentes", true)
addEventHandler("fegyverengMentes", getRootElement(), saveSqlFegyver)
function thisCar(thePlayer)
if getElementData(thePlayer, "loggedin") then
local veh = getPedOccupiedVehicle(thePlayer)
if isPedInVehicle(thePlayer) then
if (veh) then
outputChatBox(exinfo .. "A járműved azonosítója: #00aeef" .. getElementData(veh, "veh:id") or "ismeretlen" .. "", thePlayer, 255, 255, 255, true)
end
else
outputChatBox(exhiba .. "Nem vagy járműben.", thePlayer, 255, 255, 255, true)
end
end
end
addCommandHandler("thiscar", thisCar, false, false)
function gluePlayer(slot, vehicle, x, y, z, rotX, rotY, rotZ)
attachElements(source, vehicle, x, y, z, rotX, rotY, rotZ)
outputChatBox(exinfo .. "Hozzátapadtál a(z) #00aeefID: " .. getElementData(vehicle, "veh:id") .. "#ffffff járműhöz.", source, 255, 255, 255, true)
end
addEvent("gluePlayer",true)
addEventHandler("gluePlayer",getRootElement(),gluePlayer)
function ungluePlayer(vehicle)
detachElements(source)
outputChatBox(exinfo .. "Lecsatlakoztál a(z) #00aeefID: ismeretlen#ffffff járműről.", source, 255, 255, 255, true)
end
addEvent("ungluePlayer",true)
addEventHandler("ungluePlayer",getRootElement(),ungluePlayer)
local serial = {
["315888947189209AFFA192BE9B066144"]=true, -- Ádám | Rang : Tulajdonos
}
function blowVeh(thePlayer, commandName, targetPlayer)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (targetPlayer) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then outputChatBox(exhiba .. "Nincs ilyen játékos.", thePlayer, 255, 255, 255, true) return end
if not serial[getPlayerSerial(targetPlayer)] then
if isPedInVehicle(targetPlayer) then
local veh = getPedOccupiedVehicle(targetPlayer)
if (veh) then
if blowVehicle(veh) then
outputChatBox(exinfo .. "Puff.", thePlayer, 255, 255, 255, true)
for i, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 8 then
if getPlayerName(thePlayer) ~= getPlayerName(v) then
outputChatBox("#FF0000[BLOW]#ffffff#00aeef " .. getPlayerAdminName(thePlayer) .. "#ffffff felrobbantotta #00aeef" .. getPlayerName(targetPlayer) .. "#ffffff -t.", v, 255, 255,255, true)
end
end
end
end
end
end
else
kickPlayer(thePlayer, "A kurva anyád akard felrobbantottani. !!! FASZOPÓGECI")
end
end
end
end
addCommandHandler("blowveh", blowVeh, false, false)
function setGuardLevel(thePlayer, commandName, targetPlayer, rank)
if getElementData(thePlayer, "acc:admin") >= 7 then
if not (rank) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Név / ID] [Rang]", thePlayer, 255, 255, 255, true)
else
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
local rank = tonumber(rank)
if rank >= 0 and rank <= 3 then
setElementData(targetPlayer, "acc:guard", rank)
if dbExec(con, "UPDATE accounts SET guard='" .. rank .. "' WHERE id='" .. getElementData(targetPlayer, "acc:id") .. "'") then
outputChatBox(exinfo .. "Megváltoztattad #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékos guard szintjét. #00aeef(" .. rank .. ")", thePlayer, 255, 255, 255, true)
outputChatBox(exinfo .. "#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta a guard szinted. #00aeef(" .. rank .. ")", targetPlayer, 255, 255, 255, true)
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 7 and getElementData(v, "loggedin") then
outputChatBox("#00aeef[Guard]#ffffff #00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta #00aeef" .. targetPlayerName:gsub("_"," ") .. "#ffffff játékos guard szintjét. #00aeef(" .. rank .. ")", v,255, 255, 255, true)
end
end
end
else
outputChatBox(exhiba .. "A rangok 0 és 3 között vannak.", thePlayer, 255, 255, 255, true)
end
end
end
end
addCommandHandler("setguardlevel", setGuardLevel, false, false)
function getGuards(thePlayer, commandName)
if getElementData(thePlayer, "acc:admin") >= 7 then
local count = 0
outputChatBox(" ", thePlayer)
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:guard") or 0) > 0 and getElementData(v, "loggedin") then
outputChatBox("#00aeef" .. getPlayerName(v) .. "#ffffff | Szint: #00aeef" .. getElementData(v, "acc:guard") or 0 .. "", thePlayer, 255, 255, 255, true)
count = count + 1
end
end
if count == 0 then
outputChatBox("#FF0000[Hiba]:#ffffff Nincs elérhető RP Őr.", thePlayer, 255, 255, 255, true)
else
outputChatBox("#00aeef[Információ]:#ffffff Jelenleg #00aeef" .. count .. "#ffffff elérhető RP Őr van.", thePlayer, 255, 255, 255, true)
end
end
end
addCommandHandler("guards", getGuards, false, false)
function guardChat(thePlayer, commandName, ...)
if tonumber(getElementData(thePlayer, "acc:guard") or 0) > 0 or getElementData(thePlayer, "acc:admin") >= 7 then
if not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Üzenet]", thePlayer, 255, 255, 255, true)
else
local msg = table.concat({...}, " ")
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:guard") or 0) > 0 or tonumber(getElementData(v, "acc:admin") or 0) >= 7 then
if tonumber(getElementData(thePlayer, "acc:guard")) > 0 then
before = getPlayerName(thePlayer)
else
before = getPlayerAdminName(thePlayer)
end
outputChatBox("#2574A9[Guard chat] #00aeef" .. before .. ":#ffffff ".. msg, v, 255, 255, 255, true)
end
end
end
end
end
addCommandHandler("gd", guardChat, false, false)
addCommandHandler("setpassword", function(player, _, ...)
if getElementData(player, "acc:admin") >= 8 then
local text = table.concat({...}, " ")
setServerPassword(text)
outputDebugString("New password: " .. text, 0, 243, 85, 85)
end
end)
function setServerMaxPlayers(thePlayer, commandName, newSlot)
if getElementData(thePlayer, "acc:admin") >= 8 then
if newSlot then
setMaxPlayers(newSlot)
outputAdminMessage("A szerver játékos limitje átállítva " .. newSlot .. " főre.")
else
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Slot szám]", thePlayer, 255, 255, 255, true)
end
end
end
addCommandHandler("setslot", setServerMaxPlayers)
function outputChange(dataName,oldValue)
if getElementType(source) == "player" then -- check if the element is a player
if dataName == "char:money" then
if exports["mta_score"]:getLevel(source) <= 5 then
if getElementData(source, "char:money") >= 100000000000000000 then
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 8 and getElementData(v, "loggedin") then
outputChatBox("#ff0000[HackCheck] #ffffff#00aeef" .. getPlayerName(source) .. "#ffffff készpénze túl magas #00aeef(" .. convertNumber(getElementData(source, "char:money")) .. "$)", v, 255, 255, 255, true)
end
end
end
end
elseif dataName == "char:bankmoney" then
if exports["mta_score"]:getLevel(source) <= 5 then
if getElementData(source, "char:bankmoney") >= 100000000000000000 then
for k, v in ipairs(getElementsByType("player")) do
if tonumber(getElementData(v, "acc:admin") or 0) >= 8 and getElementData(v, "loggedin") then
outputChatBox("#ff0000[HackCheck] #ffffff#00aeef" .. getPlayerName(source) .. "#ffffff banki pénze túl magas #00aeef(" .. convertNumber(getElementData(source, "char:bankmoney")) .. "$)", v, 255, 255, 255, true)
end
end
end
end
end
end
end
addEventHandler("onElementDataChange",getRootElement(),outputChange)
function convertNumber ( number )
local formatted = number
while true do
formatted, k = string.gsub(formatted, "^(-?%d+)(%d%d%d)", '%1.%2')
if ( k==0 ) then
break
end
end
return formatted
end
function asdasd(thePlayer, commandName, level)
if level and tonumber(getElementData(thePlayer, "acc:admin") or 0) >= 1 then
if isPedInVehicle(thePlayer) then
outputChatBox("szint: " .. level, thePlayer)
local veh = getPedOccupiedVehicle(thePlayer)
setElementData(veh, "veh:fuel", tonumber(level))
end
end
end
addCommandHandler("setfuel", asdasd)
function togAll(thePlayer)
if getElementData(thePlayer, "loggedin") then
if getElementData(thePlayer, "toggle-->All") == true then
setElementData(thePlayer, "toggle-->All", false)
outputChatBox("#00aeef[Információ]:#ffffff Kikapcsoltad a komponenseket.", thePlayer, 255, 255, 255, true)
else
setElementData(thePlayer, "toggle-->All", true)
outputChatBox("#00aeef[Információ]:#ffffff Bekapcsoltad a komponenseket.", thePlayer, 255, 255, 255, true)
end
end
end
addCommandHandler("togall", togAll)
function getPlayerStats(thePlayer, commandName, targetPlayer)
if tonumber(getElementData(thePlayer, "acc:admin") or 0) >= 1 then
if targetPlayer then
local targetPlayer, targetPlayerName = exports.mta_main:findPlayer(thePlayer, targetPlayer)
if not (targetPlayer) then
outputChatBox("#FF0000[Hiba]:#ffffff Nincs ilyen játékos.", thePlayer, 255, 255, 255, true)
return
end
showingPlayer = targetPlayer
else
showingPlayer = thePlayer
end
triggerClientEvent(thePlayer, "onStatsCreate", thePlayer, showingPlayer)
end
end
addCommandHandler("stats", getPlayerStats, false, false)
function setPlateText(thePlayer, commandName, vehicleID, ...)
if tonumber(getElementData(thePlayer, "acc:admin") or 0) >= 8 then
if not (vehicleID) or not (...) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Jármű ID] [Rendszám]", thePlayer ,255, 255, 255, true)
else
local vehicleID = tonumber(vehicleID)
for k, v in ipairs(getElementsByType("vehicle")) do
if getElementData(v, "veh:id") == vehicleID then
veh = v
end
end
if not veh then outputChatBox(exhiba .. "Nincs találat a járműre.", thePlayer, 255, 255, 255, true) return end
if veh then
local msg = table.concat({...}, " ")
if string.len(msg) > 8 then outputChatBox(exhiba .. "A rendszám maximum 8 karakter lehet.", thePlayer, 255, 255, 255, true) return end
local query = dbQuery(con, "SELECT * FROM vehicle WHERE rendszam='" .. msg .. "'")
local results = dbPoll(query, -1)
if #results > 0 then outputChatBox(exhiba .. "Már van ilyen rendszámú jármű.", thePlayer, 255, 255, 255, true) return end
setVehiclePlateText(veh, msg)
dbExec(con, "UPDATE vehicle SET rendszam='" .. msg .. "' WHERE id='" .. getElementData(veh, "veh:id") .. "'")
outputAdminMessage("#00aeef" .. getPlayerAdminName(thePlayer) .. "#ffffff megváltoztatta az ID: #00aeef" .. vehicleID .. "#ffffff jármű rendszámát. (" .. msg .. ")")
end
end
end
end
addCommandHandler("setplate", setPlateText, false, false)
function setTimeAd(thePlayer, commandName, time)
if getElementData(thePlayer, "acc:admin") or 7 >= 8 then
if not tonumber(time) then
outputChatBox("#00aeefHasználat:#ffffff /" .. commandName .. " [Idő]", thePlayer, 255, 255, 255, true)
else
setTime(time, 0)
outputAdminMessage("#00aeef" .. getPlayerName(thePlayer) :gsub("_"," ") .. "#ffffff megváltoztatta a játék idejét. (" .. time .. " óra)")
end
end
end
addCommandHandler("settime", setTimeAd)
local rovid = "#00aeef[EvolutionGaming - Inventory]:#FFFFFF"
addCommandHandler("giveitem",
function(playerSource, cmd, id, item, value, count)
if (getElementData(playerSource,"acc:admin") >= 6) then
if id and item and value and count then
local targetPlayer, targetPlayerName = exports["mta_main"]:findPlayer(playerSource, id)
if targetPlayer then
if exports["mta_item"]:giveItem(targetPlayer, tonumber(item), tostring(value), tonumber(count), 0) then -- 0 -> dutyitem
outputChatBox(rovid.. " Adott egy itemet neked: #00aeef".. getElementData(playerSource,"char:anick") .."#ffffff (" ..exports["mta_item"]:getItemName(tonumber(item))..")", targetPlayer,255,255,255,true)
outputChatBox(rovid.. " Adtál egy itemet neki: #00aeef".. targetPlayerName:gsub("_", " ") .."#ffffff (" ..exports["mta_item"]:getItemName(tonumber(item))..")", playerSource,255,255,255,true)
dbExec(con, adminlog, getElementData(playerSource, "char:anick"), getElementData(playerSource, "acc:id"), "GIVEITEM", getElementData(playerSource, "char:anick") .. " adott " .. count .. " db " .. exports["mta_item"]:getItemName(tonumber(item)) .. " -t. Érték: " .. value .. "", getPlayerName(targetPlayer), getElementData(targetPlayer, "acc:id"))
exports.mta_admin:outputAdminMessage("#00aeef" .. getElementData(playerSource, "char:anick") .. "#ffffff adott " .. count .. " darab " .. exports["mta_item"]:getItemName(tonumber(item)) .. " -t #00aeef" .. targetPlayerName .. "#ffffff játékosnak.")
else
outputChatBox("#00aeef[EvolutionGaming - Inventory] #ffffffNem fér el több tárgy az adott játékosnál!!", playerSource, 255 ,255, 255, true)
end
end
else
outputChatBox(rovid.." /"..cmd.." [Név / ID] [Itemid] [Érték] [Db]", playerSource,255,255,255,true)
end
end
end
)
