[QUEST] Panou administare
Scris: Dum Ian 14, 2024 6:13 pm
Cod: Selectaţi tot
quest panouadmingm begin
state start begin
when 40004.use with pc.is_gm() begin
local inel=select("Arena PvP", "GM Map", "OX Map", "Teleport Map Beta", "Blocheazã / Deblocheazã Soapta", "Nimic")
if 1==inel then
say_gm("Acest mod de teleportare poate fi")
say_gm("folosit doar de catre membrii staff-ului")
say_gm("Teleportarea in arena PvP este rezervata")
say_gm("membrilor echipei si a playerilor DOAR in timpul evenimentului")
say_gm("Player vs Player.")
say_reward("Sfat: ")
say_gm("Nu incercati sa teleportati alte persoane in aceasta")
say_gm("mapa decat daca vrei sa ramaneti fara grad.")
say_gm(" ")
say_gm(" ")
say_reward("Sigur vrei sa te teleportezi?")
local s1=select("Da","Nu")
if s1 == 1 then
pc.warp(844800, 0)
return
end
elseif 2==inel then
say_gm("Acest mod de teleportare poate fi")
say_gm("folosit doar de catre membrii staff-ului")
say_gm("Teleportarea in GM Map este rezervata")
say_gm("membrilor echipei.")
say_reward("Sfat: ")
say_gm("Nu incercati sa teleportati alte persoane in aceasta")
say_gm("mapa decat daca vrei sa ramaneti fara grad.")
say_gm(" ")
say_gm(" ")
say_reward("Sigur vrei sa te teleportezi?")
local s1=select("Da","Nu")
if s1 == 1 then
pc.warp(38300, 64000)
return
end
elseif 3==inel then
say_gm("Acest mod de teleportare poate fi")
say_gm("folosit doar de catre membrii staff-ului")
say_gm("Teleportarea in OX Map este rezervata")
say_gm("membrilor echipei.")
say_reward("Sfat: ")
say_gm("Degeaba incercati sa teleportati alte persoane in aceasta")
say_gm("mapa, ele vor fi teleportate in Map1 imediat.")
say_gm(" ")
say_gm(" ")
say_reward("Sigur vrei sa te teleportezi?")
local s1=select("Da","Nu")
if s1 == 1 then
pc.warp(870400, 0)
return
end
elseif 4==inel then
say_gm_title("Inelul lui Eek")
say("")
say_gm("Ba, eu te pot duce doar pana aici:")
say_gm("")
local teleport = select("Cape Dragon Fire","Nephrite Bay","Thunder Mountains","Guatama Cliff","Iesire")
if teleport2 == 1 then
pc.warp( 1104600, 1788300)
elseif teleport2 == 2 then
pc.warp ( 1087000, 1656300 )
elseif teleport2 == 3 then
pc.warp ( 1134300, 1654900 )
elseif teleport2 == 4 then
pc.warp ( 1226400, 1680900 )
elseif teleport2 == 5 then
send_letter("GM: Panou de administrare")
return
end
elseif 5==inel then
say_gm_title("Inelul lui Eek")
say("Ba, eu sunt creat de Zeref pana la urma. Pot sa pedepsesc lumea, adica sa-i fac sa TACA")
local s1 = select("Blocheazã soapta", "Deblocheazã soapta", "Renuntã ")
if s1 == 1 then
say_gm_title("Panou de administrare")
say("")
say_gm("Introdu numele exact al jucãtorului")
say_gm("cãruia vrei sã-i blochezi soapta.")
say_gm("")
local name = input()
say_gm_title("Inelul lui Eek")
say("")
say_gm("Câte MINUTE doresti sã-i blochezi")
say_gm("soapta jucãtorului "..name.."?")
say_gm("")
local time = input()
local min = math.floor(time) * 60
say_gm_title("Inelul lui Eek")
local block = select("Blocheazã soapta "..name.."" ,"Renuntã ")
if block == 1 then
command("block_chat "..name.." "..min)
command("n Jucãtorului "..name.." i-a fost blocatã soapta de cãtre "..pc.get_name().." timp de "..time.." minute.")
end
elseif s1 == 2 then
say_gm_title("Inelul lui Eek")
say("")
say_gm("Introdu numele exact al jucãtorului")
say_gm("cãruia vrei sã-i deblochezi soapta.")
say_gm("")
local unblock = input()
command("block_chat "..unblock.." 3")
command("n Jucãtorului "..unblock.." i-a fost deblocatã soapta de cãtre "..pc.get_name()..".")
end
elseif 6==inel then
return
end
end
end
end
Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest/.lua
Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
Îl puneţi acolo (să fie .quest sau .lua).
Vă logaţi în FreeBSD / putty şi scrieţi în felul următor: cd /usr/home/game/share/locale/germany/quest (depinde ce server aveţi) apoi ./qc nume_quest.quest/.lua
Intraţi pe server şi scrieţi /reload q
Testaţi quest-ul.