state missao_lv5 begin
when letter begin
send_letter("Missão de Caça Lv. 5")
end
when info begin
say("Missão de Caça Lv. 5")
say("Mata 10 Cães Selvagens Ferozes para")
say("receberes as seguintes recompensas:")
say_reward(" - 500.000 Yang")
say_reward(" - 3000 Experiência")
say("")
pc.setqf("state", 10)
q.set_counter("Cão Selvagem Feroz", 10)
end
when 171.kill begin
local count = pc.getqf("state") - 1
if count <= 10 then
pc.setqf("state", count)
q.set_counter("Cão Selvagem Feroz", count)
end
if count == 0 then
say_title("Missão de Caça Lv. 5")
say("Completas-te a Missão com sucesso!")
say("Acabas-te de receber:")
say_reward(" - 500.000 Yang")
say_reward(" - 3000 Experiência")
pc.change_money(500000)
pc.give_exp(3000)
clear_letter()
set_state(start_lv10)
end
end
end
quest first begin
state missao_lv5 begin
when letter with pc.getqf("dogquest") == 0 begin
send_letter("Missão de Caça Lv. 5")
pc.setqf("dogquest", 1)
else
say("You must kill "pc.getqf, state" dogs")
end
when info begin
say("Missão de Caça Lv. 5")
say("Mata 10 Cães Selvagens Ferozes para")
say("receberes as seguintes recompensas:")
say_reward(" - 500.000 Yang")
say_reward(" - 3000 Experiência")
say("")
pc.setqf("state", 10)
q.set_counter("Cão Selvagem Feroz", 10)
end
when 171.kill begin
local count = pc.getqf("state") - 1
if count <= 10 then
pc.setqf("state", count)
q.set_counter("Cão Selvagem Feroz", count)
end
if count == 0 then
say_title("Missão de Caça Lv. 5")
say("Completas-te a Missão com sucesso!")
say("Acabas-te de receber:")
say_reward(" - 500.000 Yang")
say_reward(" - 3000 Experiência")
pc.change_money(500000)
pc.give_exp(3000)
clear_letter()
set_state(start_lv10)
end
end
end
end
quest stash begin
state start begin -- ???? ??? ??
when 9005.click begin
local l = game.get_safebox_level()
--syschat(l) -- for debug
if l == 0 then
say("Möchtest du ein Lager erstellen?")
if pc.gold < 500 then
say("Du hast leider nicht genug Yang (500 yang)")
else
local s = select("Ja", "Nein")
if s == 1 then
--stash.setlevel(1)
pc.changegold(-500)
game.set_safebox_level(1)
say("Um ein Lager zu erstellen must du 500 yang bezahlen!")
else
say("Ein immoment sehr niedriger Preis!")
end
end
elseif l == 1 then
say("Herzlich Willkommen!")
if pc.getqf("open_count") < 3 then
say("Herzlich Willkommen!")
pc.setqf("open_count",pc.getqf("open_count")+1)
end
local s = select("Lager", "Barren", "Itemshop Lager", "Schließen")
if s == 1 then
game.open_safebox()
elseif s == 2 then
-- ?? ?? ??? ?? ??,?? ????
if pc.getqf("gold_bar_say_count") < 3 then
pc.setqf("gold_bar_say_count",pc.getqf("gold_bar_say_count")+1)
wait()
end
npc.open_shop()
say("Hmmm....")
say("Unsere Goldvorräte sind sehr knapp...")
say("Doch trotzdem biete ich sie dir zu einem fairen Preis an!")
say("Ich hoffe das du auch mein Angebot nutzen wirst!!")
say("Nun gut...sieh dich um in meinem Laden!")
say("")
q.done()
elseif s == 3 then
game.open_mall()
end
elseif l == 2 then
say("Herzlich Willkommen [3]")
local f = pc.getqf("recommendation")
local s = 0
if f <= 1 then
s = select("Test", "Lager", "Barren", "Itemshop Lager", "Schließen")
elseif f == 2 then
s = select("Nicht Bezahlen!", "Lager", "Barren", "Itemshop Lager", "Schließen")
elseif f == 3 then
s = select("Bezahlen", "Lager", "Barren", "Itemshop Lager", "Schließen")
end
if s == 1 then
if f == 1 then
say("AGAIN")
q.set_title(locale.stash.enlarge_2_title)
if pc.countitem(locale.stash.enlarge_2_item) < 1 then
pc.give_item2(locale.stash.enlarge_2_item)
end
elseif f == 2 then
say("KEIN GELD")
pc.setqf("recommendation", 0)
q.done()
elseif f == 3 then
-- ??? ??? ?? ??
if pc.countitem(locale.stash.enlarge_2_mark_item) == 0 then
say("SIE HABEN YANG! 2")
q.set_title(locale.stash.enlarge_2_title)
q.start()
pc.setqf("recommendation", 1)
else
say("SIE HABEN YANG! 3")
game.set_safebox_level(3)
pc.removeitem(locale.stash.enlarge_2_mark_item)
q.done()
end
else
say(locale.stash.enlarge_2_msg1,pc.name,math.mod(pc.job,2)==0 and locale.man_postfix or locale.woman_postfix,locale.stash.enlarge_2_msg2)
if pc.countitem(locale.stash.enlarge_2_item)<1 then
pc.give_item2(locale.stash.enlarge_2_item)
end
pc.setqf("recommendation",1)
q.set_title(locale.stash.enlarge_2_title)
q.start()
end
elseif s == 2 then
game.open_safebox()
elseif s == 3 then
--npc.open_shop()
-- ?? ??? ?? ?? ??
say("Hier ist unser:")
say("Itemshop Lager!")
say("Wir hoffen du wirst hier viele tolle Sachen finden!")
say("Natürlich must du diese im Itemshop kaufen!")
say("Und diese wirst du dann hier vorfinden!")
say("")
q.done()
elseif s == 4 then
game.open_mall()
end
elseif l == 3 then
say("Herzlich Willkommen!")
local s = select("Lager", "Barrem", "Itemshop Lager", "Schließen")
if s == 1 then
game.open_safebox()
elseif s == 2 then
npc.open_shop()
-- ?? ??? ?? ?? ??
say("Hier ist unser:")
say("Itemshop Lager!")
say("Wir hoffen du wirst hier viele tolle Sachen finden!")
say("Natürlich must du diese im Itemshop kaufen!")
say("Und diese wirst du dann hier vorfinden!")
say("")
q.done()
elseif s == 3 then
game.open_mall()
end
--local s = select("TEST ENTLARGE 3", "Lager", "Itemshop Lager", "Schließen")
--if s == 1 then
-- say("Herein Spaziert in die gute Stube!")
-- local s = select("Ja", "Nein")
-- if s == 1 then
-- say(locale.stash.enlarge_try_ok_answer)
-- setstate("enlarge_3")
-- pc.setqf("3_left_time", 30*60)
-- loop_timer("enlarge_3_kill_esoteric",3)
-- pc.setqf("3_left_count",100)
-- q.set_title(locale.stash.enlarge_3_title)
-- q.set_counter_name(locale.stash.enlarge_3_counter)
-- q.set_counter_value(100)
-- q.set_clock_name(locale.stash.enlarge_3_timer)
-- q.set_clock_value(30 * 60)
-- q.start()
-- else
-- say("Kein Gebrauch!")
-- end
--elseif s == 2 then
-- game.open_safebox()
--end
elseif l >= 3 then
say("Herzlich Willkommen")
local s = select("Lager", "Barren", "Itemshop Lager", "Schließen")
if s == 1 then
game.open_safebox()
elseif s == 2 then
npc.open_shop()
-- ?? ??? ?? ?? ??
say("Hier ist unser:")
say("Itemshop Lager!")
say("Wir hoffen du wirst hier viele tolle Sachen finden!")
say("Natürlich must du diese im Itemshop kaufen!")
say("Und diese wirst du dann hier vorfinden!")
say("")
q.done()
elseif s == 3 then
game.open_mall()
end
end
end
when oldwoman.chat.locale.stash.enlarge_2_recommendation with pc.getf("stash","recommendation") == 1 begin
say(locale.stash.enlarge_2_oldwoman_greet)
say(delay(400), ". . . [/DELAY]")
if pc.level < 25 then
-- ??? 25?? ??? ?????? ?? ???.
say(locale.stash.enlarge_2_oldwoman_reject)
pc.setqf("recommendation", 2)
q.set_title(locale.stash.enlarge_2_oldwoman_title1)
else
-- ?????? ??.. ?????? ??? ?? ?.
say(locale.stash.enlarge_2_oldwoman_accept)
pc.setqf("recommendation", 3)
pc.give_item2(locale.stash.enlarge_2_mark_item)
q.set_title(locale.stash.enlarge_2_oldwoman_title2)
end
pc.removeitem(locale.stash.enlarge_2_item)
end
end
state enlarge_stash1 begin
when info begin
setskin(SCROLL)
setbgimage("level_bg.tga")
addimage(20,12,special.levelup_quest[8][4])
setcolor(0,0,0)
say(locale.stash.enlarge_1_info1,item_name(pc.job<3 and locale.stash.enlarge_item1 or locale.stash.enlarge_item2),locale.stash.enlarge_1_info2)
if pc.get_map_index() > 0 and pc.get_map_index() <= table.getn(special.lvq_map) then
for j,i in {8,9,10,11,17} begin
table.foreachi(
special.lvq_map[pc.get_map_index()][i],
function (n,p) addmapsignal(p[1]*100, p[2]*100) end
)
end
setmapcenterposition(200, 0)
end
select(locale.confirm)
clearmapsignal()
setskin(NOWINDOW)
end
when warehouse_keeper.click begin
say("Herzlich Willkommen bei mir!")
local s = select(locale.stash.enlarge_1_take_bear,"Lager", "Itemshop Lager", "Schließen");
if s == 1 then
-- ????? ???? ??
if pc.countitem(locale.stash.enlarge_1_item)>=30 then
say(locale.stash.enlarge_1_success)
pc.removeitem(locale.stash.enlarge_1_item,30)
game.set_safebox_level(2)
setstate(start)
q.done()
cleartimer("enlarge_1_kill_bear")
else
say(locale.stash.enlarge_1_notyet)
end
elseif s == 2 then
game.open_safebox()
elseif s == 3 then
game.open_mall()
end
end
when kill begin
if npc.race >= 112 and npc.race <= 116 and -- ?????
(pc.weapon == 50 or pc.weapon == 5030) then
if math.random(5) == 1 then
-- ?? ??!
syschat(locale.stash.enlarge_1_getone)
pc.give_item2(locale.stash.enlarge_1_item)
if pc.countitem(locale.stash.enlarge_1_item) == 30 then
q.set_counter_value(0)
chat(pc.name,locale.stash.enlarge_1_complete)
elseif pc.countitem(locale.stash.enlarge_1_item) < 30 then
q.set_counter_value(30 - pc.countitem(locale.stash.enlarge_1_item))
end
end
end
end
when enlarge_1_kill_bear.timer begin
setstate(enlarge_1_fail)
end
when login begin
if game.get_safebox_level() == 1 then
setstate(enlarge_1_fail)
else
setstate(start)
end
end
end
state enlarge_1_fail begin
when info begin
say(locale.stash.enlarge_1_fail_info)
end
when warehouse_keeper.click begin
say(locale.stash.enlarge_1_fail_ms)
q.done()
setstate("start")
end
end
state enlarge_3 begin
when info begin
end
when warehouse_keeper.click begin
say("Herzlich Willkommen, Abenteurer!")
local s = select(locale.stash.enlarge_3_complete, "Lager", "Itemshop Lager", "Schließen")
if s == 1 then
-- ????? ???? ??
if pc.getqf("3_left_count")<=0 then
say(locale.stash.enlarge_3_success)
game.set_safebox_level(4)
setstate(start)
q.done()
cleartimer("enlarge_3_kill_esoteric")
else
say(locale.stash.enlarge_3_notyet)
end
elseif s == 2 then
game.open_safebox()
elseif s == 3 then
game.open_mall()
end
end
when kill begin
if npc.race >= 601 and npc.race <= 609 then-- ??????
local n = pc.getqf("3_left_count")-1
pc.setqf("3_left_count",n)
q.set_counter_name(locale.stash.enlarge_3_counter)
q.set_counter_value(n)
end
end
when enlarge_3_kill_esoteric.timer begin
local t = pc.getqf("3_left_time")
if t <= 0 then
setstate(enlarge_3_fail)
cleartimer("enlarge_3_kill_esoteric")
else
pc.setqf("3_left_time",t-3);
end
end
when login begin
local t = pc.getqf("3_left_time")
if t <= 0 then
setstate(enlarge_3_fail)
else
loop_timer("enlarge_3_kill_esoteric",3)
q.set_counter_name(locale.stash.enlarge_3_counter)
q.set_counter_value(pc.getqf("3_left_count"))
q.set_clock_name(locale.stash.enlarge_3_timer)
q.set_clock_value(t)
q.start()
end
end
end
state enlarge_3_fail begin
when warehouse_keeper.click begin
say(locale.stash.enlarge_1_fail_msg)
q.done()
setstate("start")
end
end
end
Quote:
Hallo wo liegt da der fehler? ich verstehe es nicht
wenn ich auf Barren klicke dann amcht sich nichts auf und
ich kann danach auch nichts mehr anklicken hoffe man kann mir helfen ...
Bitte um antwort als PN oder per skype chris.kallscheid oder einfach hier :)
PHP Code:quest stash begin
state start begin -- ???? ??? ??
when 9005.click begin
local l = game.get_safebox_level()
--syschat(l) -- for debug
if l == 0 then
say("Möchtest du ein Lager erstellen?")
if pc.gold < 500 then
say("Du hast leider nicht genug Yang (500 yang)")
else
local s = select("Ja", "Nein")
if s == 1 then
--stash.setlevel(1)
pc.changegold(-500)
game.set_safebox_level(1)
say("Um ein Lager zu erstellen must du 500 yang bezahlen!")
else
say("Ein immoment sehr niedriger Preis!")
end
end
elseif l == 1 then
say("Herzlich Willkommen!")
if pc.getqf("open_count") < 3 then
say("Herzlich Willkommen!")
pc.setqf("open_count",pc.getqf("open_count")+1)
end
local s = select("Lager", "Barren", "Itemshop Lager", "Schließen")
if s == 1 then
game.open_safebox()
elseif s == 2 then
-- ?? ?? ??? ?? ??,?? ????
if pc.getqf("gold_bar_say_count") < 3 then
pc.setqf("gold_bar_say_count",pc.getqf("gold_bar_say_count")+1)
wait()
end
npc.open_shop()
say("Hmmm....")
say("Unsere Goldvorräte sind sehr knapp...")
say("Doch trotzdem biete ich sie dir zu einem fairen Preis an!")
say("Ich hoffe das du auch mein Angebot nutzen wirst!!")
say("Nun gut...sieh dich um in meinem Laden!")
say("")
q.done()
elseif s == 3 then
game.open_mall()
end
elseif l == 2 then
say("Herzlich Willkommen [3]")
local f = pc.getqf("recommendation")
local s = 0
if f <= 1 then
s = select("Test", "Lager", "Barren", "Itemshop Lager", "Schließen")
elseif f == 2 then
s = select("Nicht Bezahlen!", "Lager", "Barren", "Itemshop Lager", "Schließen")
elseif f == 3 then
s = select("Bezahlen", "Lager", "Barren", "Itemshop Lager", "Schließen")
end
if s == 1 then
if f == 1 then
say("AGAIN")
q.set_title(locale.stash.enlarge_2_title)
if pc.countitem(locale.stash.enlarge_2_item) < 1 then
pc.give_item2(locale.stash.enlarge_2_item)
end
elseif f == 2 then
say("KEIN GELD")
pc.setqf("recommendation", 0)
q.done()
elseif f == 3 then
-- ??? ??? ?? ??
if pc.countitem(locale.stash.enlarge_2_mark_item) == 0 then
say("SIE HABEN YANG! 2")
q.set_title(locale.stash.enlarge_2_title)
q.start()
pc.setqf("recommendation", 1)
else
say("SIE HABEN YANG! 3")
game.set_safebox_level(3)
pc.removeitem(locale.stash.enlarge_2_mark_item)
q.done()
end
else
say(locale.stash.enlarge_2_msg1,pc.name,math.mod(pc.job,2)==0 and locale.man_postfix or locale.woman_postfix,locale.stash.enlarge_2_msg2)
if pc.countitem(locale.stash.enlarge_2_item)<1 then
pc.give_item2(locale.stash.enlarge_2_item)
end
pc.setqf("recommendation",1)
q.set_title(locale.stash.enlarge_2_title)
q.start()
end
elseif s == 2 then
game.open_safebox()
elseif s == 3 then
--npc.open_shop()
-- ?? ??? ?? ?? ??
say("Hier ist unser:")
say("Itemshop Lager!")
say("Wir hoffen du wirst hier viele tolle Sachen finden!")
say("Natürlich must du diese im Itemshop kaufen!")
say("Und diese wirst du dann hier vorfinden!")
say("")
q.done()
elseif s == 4 then
game.open_mall()
end
elseif l == 3 then
say("Herzlich Willkommen!")
local s = select("Lager", "Barrem", "Itemshop Lager", "Schließen")
if s == 1 then
game.open_safebox()
elseif s == 2 then
npc.open_shop()
-- ?? ??? ?? ?? ??
say("Hier ist unser:")
say("Itemshop Lager!")
say("Wir hoffen du wirst hier viele tolle Sachen finden!")
say("Natürlich must du diese im Itemshop kaufen!")
say("Und diese wirst du dann hier vorfinden!")
say("")
q.done()
elseif s == 3 then
game.open_mall()
end
--local s = select("TEST ENTLARGE 3", "Lager", "Itemshop Lager", "Schließen")
--if s == 1 then
-- say("Herein Spaziert in die gute Stube!")
-- local s = select("Ja", "Nein")
-- if s == 1 then
-- say(locale.stash.enlarge_try_ok_answer)
-- setstate("enlarge_3")
-- pc.setqf("3_left_time", 30*60)
-- loop_timer("enlarge_3_kill_esoteric",3)
-- pc.setqf("3_left_count",100)
-- q.set_title(locale.stash.enlarge_3_title)
-- q.set_counter_name(locale.stash.enlarge_3_counter)
-- q.set_counter_value(100)
-- q.set_clock_name(locale.stash.enlarge_3_timer)
-- q.set_clock_value(30 * 60)
-- q.start()
-- else
-- say("Kein Gebrauch!")
-- end
--elseif s == 2 then
-- game.open_safebox()
--end
elseif l >= 3 then
say("Herzlich Willkommen")
local s = select("Lager", "Barren", "Itemshop Lager", "Schließen")
if s == 1 then
game.open_safebox()
elseif s == 2 then
npc.open_shop()
-- ?? ??? ?? ?? ??
say("Hier ist unser:")
say("Itemshop Lager!")
say("Wir hoffen du wirst hier viele tolle Sachen finden!")
say("Natürlich must du diese im Itemshop kaufen!")
say("Und diese wirst du dann hier vorfinden!")
say("")
q.done()
elseif s == 3 then
game.open_mall()
end
end
end
when oldwoman.chat.locale.stash.enlarge_2_recommendation with pc.getf("stash","recommendation") == 1 begin
say(locale.stash.enlarge_2_oldwoman_greet)
say(delay(400), ". . . [/DELAY]")
if pc.level < 25 then
-- ??? 25?? ??? ?????? ?? ???.
say(locale.stash.enlarge_2_oldwoman_reject)
pc.setqf("recommendation", 2)
q.set_title(locale.stash.enlarge_2_oldwoman_title1)
else
-- ?????? ??.. ?????? ??? ?? ?.
say(locale.stash.enlarge_2_oldwoman_accept)
pc.setqf("recommendation", 3)
pc.give_item2(locale.stash.enlarge_2_mark_item)
q.set_title(locale.stash.enlarge_2_oldwoman_title2)
end
pc.removeitem(locale.stash.enlarge_2_item)
end
end
state enlarge_stash1 begin
when info begin
setskin(SCROLL)
setbgimage("level_bg.tga")
addimage(20,12,special.levelup_quest[8][4])
setcolor(0,0,0)
say(locale.stash.enlarge_1_info1,item_name(pc.job<3 and locale.stash.enlarge_item1 or locale.stash.enlarge_item2),locale.stash.enlarge_1_info2)
if pc.get_map_index() > 0 and pc.get_map_index() <= table.getn(special.lvq_map) then
for j,i in {8,9,10,11,17} begin
table.foreachi(
special.lvq_map[pc.get_map_index()][i],
function (n,p) addmapsignal(p[1]*100, p[2]*100) end
)
end
setmapcenterposition(200, 0)
end
select(locale.confirm)
clearmapsignal()
setskin(NOWINDOW)
end
when warehouse_keeper.click begin
say("Herzlich Willkommen bei mir!")
local s = select(locale.stash.enlarge_1_take_bear,"Lager", "Itemshop Lager", "Schließen");
if s == 1 then
-- ????? ???? ??
if pc.countitem(locale.stash.enlarge_1_item)>=30 then
say(locale.stash.enlarge_1_success)
pc.removeitem(locale.stash.enlarge_1_item,30)
game.set_safebox_level(2)
setstate(start)
q.done()
cleartimer("enlarge_1_kill_bear")
else
say(locale.stash.enlarge_1_notyet)
end
elseif s == 2 then
game.open_safebox()
elseif s == 3 then
game.open_mall()
end
end
when kill begin
if npc.race >= 112 and npc.race <= 116 and -- ?????
(pc.weapon == 50 or pc.weapon == 5030) then
if math.random(5) == 1 then
-- ?? ??!
syschat(locale.stash.enlarge_1_getone)
pc.give_item2(locale.stash.enlarge_1_item)
if pc.countitem(locale.stash.enlarge_1_item) == 30 then
q.set_counter_value(0)
chat(pc.name,locale.stash.enlarge_1_complete)
elseif pc.countitem(locale.stash.enlarge_1_item) < 30 then
q.set_counter_value(30 - pc.countitem(locale.stash.enlarge_1_item))
end
end
end
end
when enlarge_1_kill_bear.timer begin
setstate(enlarge_1_fail)
end
when login begin
if game.get_safebox_level() == 1 then
setstate(enlarge_1_fail)
else
setstate(start)
end
end
end
state enlarge_1_fail begin
when info begin
say(locale.stash.enlarge_1_fail_info)
end
when warehouse_keeper.click begin
say(locale.stash.enlarge_1_fail_ms)
q.done()
setstate("start")
end
end
state enlarge_3 begin
when info begin
end
when warehouse_keeper.click begin
say("Herzlich Willkommen, Abenteurer!")
local s = select(locale.stash.enlarge_3_complete, "Lager", "Itemshop Lager", "Schließen")
if s == 1 then
-- ????? ???? ??
if pc.getqf("3_left_count")<=0 then
say(locale.stash.enlarge_3_success)
game.set_safebox_level(4)
setstate(start)
q.done()
cleartimer("enlarge_3_kill_esoteric")
else
say(locale.stash.enlarge_3_notyet)
end
elseif s == 2 then
game.open_safebox()
elseif s == 3 then
game.open_mall()
end
end
when kill begin
if npc.race >= 601 and npc.race <= 609 then-- ??????
local n = pc.getqf("3_left_count")-1
pc.setqf("3_left_count",n)
q.set_counter_name(locale.stash.enlarge_3_counter)
q.set_counter_value(n)
end
end
when enlarge_3_kill_esoteric.timer begin
local t = pc.getqf("3_left_time")
if t <= 0 then
setstate(enlarge_3_fail)
cleartimer("enlarge_3_kill_esoteric")
else
pc.setqf("3_left_time",t-3);
end
end
when login begin
local t = pc.getqf("3_left_time")
if t <= 0 then
setstate(enlarge_3_fail)
else
loop_timer("enlarge_3_kill_esoteric",3)
q.set_counter_name(locale.stash.enlarge_3_counter)
q.set_counter_value(pc.getqf("3_left_count"))
q.set_clock_name(locale.stash.enlarge_3_timer)
q.set_clock_value(t)
q.start()
end
end
end
state enlarge_3_fail begin
when warehouse_keeper.click begin
say(locale.stash.enlarge_1_fail_msg)
q.done()
setstate("start")
end
end
end
quest Teleport begin
state start begin
when 20129.chat."Teleport zur FarmMap 2" with pc.get_level() >= 90 begin
say_title("Teleport")
say("Du willst in die naechste eben des Farmens eintauchen ?")
say("Dann Teleportiere dich nun zur 2 Ebene und Farme dort mit dem")
say("Level 90 weiter")
if select ("Ja", "Nein") == 1 then
pc.warp(9216, 1536)
end
end
end
end