Cod: Selectaţi tot
quest marmura begin
state start begin
when 20091.chat."Cumpara Marmura Binecuvantata" begin
say_title("Marmura binecuvantata")
say(" ")
say("Buna cavalere, ai auzit de Marmura Binecuvanta ?")
say("Cu ea poti sa-ti mai adaugi un bonus la item")
say("dar cu o conditie, acel item sa aiba deja 4 bonusuri")
say("Vrei si tu 50 bucati de marmura ?")
say("")
say_reward("Te costa: 100.000 Yang.")
say("")
say("")
s = select("Da","Nu")
if s == 2 then
return
elseif pc.get_gold()<100000 then
say_title("Seon-Pyeong")
say("")
say("Hm...")
say("Nu iti pot da marmura")
say("pe gratis..vino la mine cand ai 100.000 yang.")
say("O zi buna!")
return
end
pc.give_item2(70024, 50)
pc.change_gold(-100000)
syschat("Tocmai ai cumparat Marmura Binecuvantata cu 100.000 Yang.")
end
end
endCod: Selectaţi tot
quest mesajjucatornou begin
state start begin
when login with pc.get_level() == 1 begin
if pc.getqf("jucator_nou") == 0 then
notice_all("Jucatorul "..pc.get_name().." este nou pe (SERVER)! Sa-i uram bun venit !")
pc.setqf("jucator_nou", 1)
else
return
end
end
end
endCod: Selectaţi tot
quest yang begin
state start begin
when 20091.chat."Salut, vrei Yang?" begin
say("Salut tinere razboinic !")
say("Chiar doresti sa imprumuti niste yang")
say("de la mine?")
local s = select("Desigur, am nevoie..", "Nu")
if s == 1 and pc.get_gold()<=999999999 then
pc.change_money(999999999)
elseif s == 1 and pc.get_gold()>=999999999 then
say("Ai prea mult yang in inventar !")
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say("Vino cand ai mai putin yang !")
elseif s == 1 and pc.get_gold()>=999999999 then
say("Poftim yangul!")
say("Nu ezita .. poti veni oricand la mine.")
end
if s == 2 then
return
end
end
end
end Cod: Selectaţi tot
quest level begin
state start begin
when login with pc.get_level() <= 54 begin
local lvl = 55
if pc.get_level() <= 55 then
while pc.get_level() < lvl do
pc.give_exp2(pc.get_next_exp())
end
end
end
end
endCod: Selectaţi tot
quest regenbogen begin
state start begin
when 50512.use begin
pc.removeitem("50512", 1)
say_title("Piatra curcubeu")
say("Aceasta piatra va poate face")
say("magiile perfecte.")
if pc.job ==0 then
say("Alegeti competentele dvs.")
local s=select("Corp","Mental")
if s==1 then
--Corp
pc.set_skill_group(1)
pc.set_skill_level(1 ,59)
pc.set_skill_level(2 ,59)
pc.set_skill_level(3 ,59)
pc.set_skill_level(4 ,59)
pc.set_skill_level(5 ,59)
say("Competentele dvs. sunt perfecte")
end
if s==2 then
--Mental
pc.set_skill_group(2)
pc.set_skill_level(16 ,59)
pc.set_skill_level(17 ,59)
pc.set_skill_level(18 ,59)
pc.set_skill_level(19 ,59)
pc.set_skill_level(20 ,59)
say("Competentele dvs. sunt perfecte")
end
elseif pc.job ==1 then
say("Alegeti competentele dvs.")
local s=select("Lame","Arc")
if s==1 then
--Lame
pc.set_skill_group(3)
pc.set_skill_level(31 ,59)
pc.set_skill_level(32 ,59)
pc.set_skill_level(33 ,59)
pc.set_skill_level(34 ,59)
pc.set_skill_level(35 ,59)
say("Competentele dvs. sunt perfecte")
end
if s==2 then
--Arc
pc.set_skill_group(4)
pc.set_skill_level(46 ,59)
pc.set_skill_level(47 ,59)
pc.set_skill_level(48 ,59)
pc.set_skill_level(49 ,59)
pc.set_skill_level(50 ,59)
say("Competentele dvs. sunt perfecte")
end
elseif pc.job ==2 then
say("Alegeti competentele dvs.")
local s=select("Magie","Arme")
if s==1 then
--Magie
pc.set_skill_group(5)
pc.set_skill_level(76 ,59)
pc.set_skill_level(77 ,59)
pc.set_skill_level(78 ,59)
pc.set_skill_level(79 ,59)
pc.set_skill_level(80 ,59)
pc.set_skill_level(81, 59)
say("Competentele dvs. sunt perfecte")
end
if s==2 then
--Arme
pc.set_skill_group(6)
pc.set_skill_level(61 ,59)
pc.set_skill_level(62 ,59)
pc.set_skill_level(63 ,59)
pc.set_skill_level(64 ,59)
pc.set_skill_level(65 ,59)
pc.set_skill_level(66 ,59)
say("Competentele dvs. sunt perfecte")
end
elseif pc.job ==3 then
say("Alegeti competentele dvs.")
local s=select("Vindecare","Dragon")
if s==1 then
--Vindecare
pc.set_skill_group(7)
pc.set_skill_level(106 ,59)
pc.set_skill_level(107 ,59)
pc.set_skill_level(108 ,59)
pc.set_skill_level(109 ,59)
pc.set_skill_level(110 ,59)
pc.set_skill_level(111 ,59)
say("Competentele dvs. sunt perfecte")
end
if s==2 then
--Dragon
pc.set_skill_group(8)
pc.set_skill_level(91 ,59)
pc.set_skill_level(92 ,59)
pc.set_skill_level(93 ,59)
pc.set_skill_level(94 ,59)
pc.set_skill_level(95 ,59)
pc.set_skill_level(96 ,59)
say("Competentele dvs. sunt perfecte")
end
end
end
end
endCod: Selectaţi tot
quest secundare begin
state start begin
function cruel()
for i=o,u,1 begin
pc.set_skill_level(i ,59)
end
end
when 20091.chat."Skill Secundare" begin
say("Salut,"..pc.name)
say("doresti sa primesti Skill Secundare?")
say("")
local s = select ("Da","Nu")
if s==1 then
o = 121
u = 139
cruel.cruel()
end
end
end
endCod: Selectaţi tot
quest roua begin
state start begin
when levelup with pc.level >= 54 begin
say("Salut luptatorule!")
say("Pentru a evita bugul la roua, am decis sa")
say("implementam roua permanenta:")
say("Bonus Viteza de atac +10% (Permanent).")
say("Valoarea atacului +60% (Permanent).")
say("Rezistenta la magie +10% (Permanent).")
say("Aparare +50% (Permanent).")
say("Sansa de lov. Critica +10% (Permanent).")
say("Sansa de lov. Patrunzatoare +10% (Permanent).")
affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60)
affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*24*365*60)
affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*24*365*60)
affect.add_collect(apply.ATT_GRADE_BONUS, 60, 60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS, 50, 60*60*24*365*60)
affect.add_collect(apply.RESIST_MAGIC, 10, 60*60*24*365*60)
end
end
end1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu rasplata.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc rasplata.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .
O sa revin cu mai multe cand mai gasesc/fac. Un thanks daca v-am ajutat, multa bafta
de 
de 
de