Descriere: Cu ajutorul acestui quest poti activa statusul VIP permanent.
Questul ofera posibilitatea schimbarii numelui, in cazul in care acesta este prea lung(8 caractere)
Imagini: Fara.
Quest:
Cod: Selectaţi tot
quest cufar_vip begin
state start begin
when 38053.use begin
say_title(string.format("Salut %s[ENTER]", pc.get_name()))
say("Odata cu deschiderea acestui cufar")
say("vei primi iteme corespunzatoare,")
say("si tagul VIP in fata numelui,")
say("PERMANENT.[ENTER]")
say_title("Doresti activarea statusului Premium User?")
if select("Da", "Nu") == 2 then
return
else
pc.remove_item(38053, 1)
pc.give_item2(70021, 1)
pc.give_item2(41324, 1)
pc.give_item2(41325, 1)
pc.give_item2(50513, 50)
pc.give_item2(80007, 1)
pc.give_item2(80007, 1)
local hostname="nume server"
name = pc.get_name()
lname = string.len(name)
if lname <= 8 then
mysql_query("UPDATE player.player SET name='[VIP]"..pc.get_name().."' WHERE name='"..pc.get_name().."'")
say_title("Nume schimbat cu succes!")
say("Felicitari! Acum esti VIP pe "..hostname)
say("")
say("")
say("Informatie")
say_reward("Schimbarea in statusul (VIP) poate dura 15-20 de minute..")
elseif lname > 8 then
say_title("Numele tau!")
say("Numnele tau este prea lung.")
say("Numele nu are voie sa aiba mai mult de 8 caractere.")
say("Daca nu respecti regula, la schimbarea numelui, ")
say("acesta poate fi incomplet")
say("")
say_reward("Vrei totusi sa continui?")
if select("Da", "Nu") == 2 then
return
else
say_title("Schimbarea numelui")
say("Introdu numele dorit:")
say_reward("Fii atent!Nu mai mult de 8 caractere.")
local inp = input()
if string.len(inp) > 8 or inp == "" then
say("Numele tau are mai mult de 8 caractere[ENTER]sau nu ai introdus un nume.")
say("Imi pare sincer rau.")
return
else
say_title("In regula")
say("Numele tau respecta cerinta.")
say("")
say("Esti sigur ca vrei sa activezi statusul VIP")
say("cu numele (VIP)", inp," ?")
if select("Da", "Nu") == 2 then
return
else
mysql_query("UPDATE player.player SET name='[VIP]"..inp.."' WHERE name='"..pc.get_name().."'")
say_title("Nume schimbat cu succes!")
say("Felicitari! Acum esti VIP pe "..hostname)
say("")
say("")
say("Info")
say_reward("Schimbarea in statusul (VIP) poate dura 15-20 de minute..")
end
end
end
end
end
end
end
endCod: Selectaţi tot
mysql_query = function(query)
if not pre then
local rt = io.open('CONFIG','r'):read('*all')
pre,_= string.gsub(rt,'.+PLAYER_SQL:%s(%S+)%s(%S+)%s(%S+)%s(%S+).+','-h%1 -u%2 -p%3 -D%4')
end
math.randomseed(os.time())
local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2^10),{},{}
-- os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi)
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi)
for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'t')) end; os.remove(fi);
for i = 2, table.getn(t) do table.foreach(t[i],function(a,B)
out[i-1] = out[i-1] or {}
out[i-1][a] = tonumber(B) or b or 'NULL'
out[t[1][a]] = out[t[1][a]] or {}
out[t[1][a]][i-1] = tonumber(B) or b or 'NULL'
end) end
return out
endCod: Selectaţi tot
mysql_querySalvaţ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).
Te loghezi în FreeBSD / putty şi scrii î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.
Puteti modifica itemele oferite, prin modificarea in quest a vnum-urilor
Cod: Selectaţi tot
pc.give_item2(70021, 1)
pc.give_item2(41324, 1)
pc.give_item2(41325, 1)
pc.give_item2(50513, 50)
pc.give_item2(80007, 1)
pc.give_item2(80007, 1)
de 
de 
de 
de