quest1:
PHP Code:
quest Seon_Pyeongs_Forschung begin
state start begin
when login or levelup with pc.get_level() >=92 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20091)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Seon-Pyeongs Forschung")
end
when button or info begin
say_title("Seon-Pyeongs Forschung")
say("")
say("Seon-Pyeongs sucht dich.")
say("Er wird in manchen Kreisen auch ")
say("OT-Sura genannt")
end
when __TARGET__.target.click or
20091.chat."Quest" begin
target.delete("__TARGET__")
say("Seon-Pyeong:")
--- l
say("Hallo "..pc.get_name()..",")
say("Ich brauche deine Hilfe")
say("um meine Forschung fortzuführen.")
say("Du musst mir 10")
say("Juwel der Missgunst bringen")
say("")
say("")
set_state(go_to_disciple)
end
end
state go_to_disciple begin
when letter begin
send_letter("Auftrag von Seon-Pyeong")
end
when button or info begin
say_title("Quest")
--- l
say("")
say("Seon-Pyeong gab euch den Auftrag")
say("10 Juwel der Missgunst zu sammeln!")
say("Das Item bekommt ihr von Unterwelt-Eisgolem und Unterwelt-Eismann.")
say("Viel Glueck!")
say("")
say_item_vnum(30251)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end
when 1137.kill or 1135.kill begin
if pc.count_item(30251)<10-pc.getqf("collect_count") then
pc.give_item2(30251, 1)
end
end
when 20091.chat."Forschung(1)" with pc.count_item(30251) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(30251, 1)
wait()
if pc.getqf("collect_count")< 9 then
local index = pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say("Seon-Pyeong:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
return
end
say("Seon-Pyeong:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen belohnen!")
wait()
say("Welche Belohnung möchtest du?")
local s = select ("1100 TP", "140 Verteidigung", "60 Angriffswert")
if s == 3 then
say_reward("Du erhälst 60 Angriffswert.")
affect.add_collect_point(POINT_ATT_BONUS,60,60*60*24*365*60)
end
if s == 2 then
say_reward("Du erhälst 140 Verteidigung.")
affect.add_collect(apply.DEF_GRADE_BONUS,140,60*60*24*365*60)
end
if s == 1 then
say_reward("Du erhälst 1100 TP.")
affect.add_collect(apply.TP_GRADE_Bonus,1100,60*60*24*365*60)
end
clear_letter()
return
end
end
end
fehler:vpc sagt nix aber ingame startet sie nicht
quest2:
PHP Code:
quest love_event begin
state start begin
when 71146.use begin
local zeit = 60*60*30 ---Wären 30 Minuten glaube ich
if pc.getqf("open") >= 10 then
pc.remove_item("71146", 1)
return
end
if pc.getqf("truhewarten") <= get_time() then
chat("Du musst noch warten bis du die Truhe öffnen kannst.")
return
end
pc.setqf("open",pc.getqf("open")+1)
pc.setqf("truhewarten", get_time() + zeit)
local r=number(1, 12)
if r==1 then
pc.give_item2("71107", 1)
elseif r==2 then
pc.give_item2("25100", 1)
elseif r==3 then
pc.give_item2("71084", 1)
elseif r==4 then
pc.give_item2("71085", 1)
elseif r==5 then
pc.give_item2("71109", 1)
elseif r==6 then
pc.give_item2("70024", 1)
elseif r==7 then
pc.give_item2("70038", 20)
elseif r==8 then
pc.give_gold(100000)
elseif r==9 then
pc.give_gold(50000)
elseif r==10 then
pc.give_gold(30000)
elseif r==11 then
pc.give_gold(20000)
elseif r==12 then
pc.give_gold(10000)
end
chat("Du hast die Truhe schon "..pc.getqf("open").." von 10 mal geöffnet!")
end
end
end
fehler:vpc sagt nix aber ich kann sie nicht öffnen nichtmal nach 30 minuten.
