|
You last visited: Today at 08:22
Advertisement
pferde quest
Discussion on pferde quest within the Metin2 Private Server forum part of the Metin2 category.
08/24/2010, 23:18
|
#1
|
elite*gold: 0 
Join Date: Aug 2010
Posts: 335
Received Thanks: 38
|
pferde quest
kann mal bitte jemand die ganznormale Pferde quest posten? ich hab die leider nicht mehr in meinen SF 
|
|
|
|
08/24/2010, 23:38
|
#2
|
elite*gold: 15
Join Date: Mar 2010
Posts: 4,270
Received Thanks: 2,499
|
horse_guard
PHP Code:
quest horse_guard begin
state start begin
when 20349.chat."Informationen über Pferde" begin
local s=number(1, 7)
if 1>=s then -- 14.29% (1/7)
say("Während du ein Pferd reitest, nimmt seine")
say("Erschöpfung zu und seine Gesundheit ab.")
say("Du musst es daher ab und zu rasten lassen, damit")
say("es nicht zusammen bricht.")
elseif 2>=s then -- 14.29% (1/7)
say("Es gibt Pferde für drei Arten von Reitern:")
say("Anfänger, Fortgeschrittene und Experten. Um mit")
say("deinen Fähigketen aufzusteigen, musst du einen")
say("Eignungstest bestehen.")
say("")
elseif 3>=s then -- 14.29% (1/7)
say("Um eine Pferdequest zu starten,")
say("benötigst du eine Pferdemedallie. Du bekommst")
say("sie im Affendungeon")
say("")
elseif 4>=s then -- 14.29% (1/7)
say("Die Fertigkeiten eines Reiters können")
say("unterschiedlich sein. Wenn du dich dazu noch im")
say("Besitz einer Pferdemedallie befindest, kannst du")
say("den Level deines Reittieres verbessern.")
say("")
elseif 5>=s then -- 14.29% (1/7)
say("Je nach ihrer Belastung durch den Reiter")
say("benötigen Pferde unterschiedliche Arten von")
say("Futter. Reitanfänger füttern ihre Tiere am")
say("besten mit Heu, Fortgeschrittene mit Karotten")
say("und Experte, die ihrem Tier viel abverlangen,")
say("sollten ausschließlich roten Ginseng verfüttern,")
say("In dieser Hinsicht können Pferde sehr wählerisch")
say("sein.")
say("")
elseif 6>=s then -- 14.29% (1/7)
say("Es sind Gerüchte im Umlauf, dass ein totes Pferd")
say("mit Affenkraut wiederbelebt werden kann.")
say("Allerdings wird dieses Kraut von Affen")
say("schwer bewacht und ist schwierig zu bekommen.")
elseif 7>=s then -- 14.29% (1/7)
say("Der Zustand des Pferdes wird durch einen")
say("einfachen Indikarot angezeigt: Bei Grün ist es")
say("gesund, im hungrigen Zustand Gelb.")
say("Rote Farbe ist gefährlich, denn sie weist auf")
say("Unterernährung hin. Du musst dein Pferd füttern,")
say("wenn es in den gelben oder gar roten Bereich")
say("gekommen ist. Es ist eine ernste Angelegenheit,")
say("wenn dein Pferd stirbt")
say("")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
horse_levelup
PHP Code:
quest horse_levelup begin
state training1 begin
when letter begin
q.set_counter("³Ñ¾l¶Â*·¥ªÅ@ªk¼Æ¶q", 5-pc.getqf("kill_count"))
end
when 492.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l¶Â*·¥ªÅ@ªk¼Æ¶q", 5-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Bo!")
q.set_title("Töte Bo!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Bo!"..locale.NORMAL_COLOR)
say("Töte 5 Bo.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Bo!"..locale.NORMAL_COLOR)
say("Töte 5 Bo.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 492.kill with pc.getf("horse_levelup","kill_count") >= 5 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training2 begin
when letter begin
q.set_counter("³Ñ¾l¶Â*·¹ë¥D¼Æ¶q", 5-pc.getqf("kill_count"))
end
when 494.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l¶Â*·¹ë¥D¼Æ¶q", 5-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Chuong!")
q.set_title("Töte Chuong!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Chuong!"..locale.NORMAL_COLOR)
say("Töte 5 Chuong.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Chuong!"..locale.NORMAL_COLOR)
say("Töte 5 Chuong.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 494.kill with pc.getf("horse_levelup","kill_count") >= 5 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training3 begin
when letter begin
q.set_counter("³Ñ¾l°*±Ú±N*x¼Æ¶q", 10-pc.getqf("kill_count"))
end
when 635.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l°*±Ú±N*x¼Æ¶q", 10-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Stolzer Ork-General")
q.set_title("Töte Stolzer Ork-General")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Stolzer Ork-General"..locale.NORMAL_COLOR)
say("Töte 10 Stolzer Ork-General.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Stolzer Ork-General"..locale.NORMAL_COLOR)
say("Töte 10 Stolzer Ork-General.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 635.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training4 begin
when letter begin
q.set_counter("³Ñ¾l°*±Ú±O¤M¼Æ¶q", 10-pc.getqf("kill_count"))
end
when 636.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l°*±Ú±O¤M¼Æ¶q", 10-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Schwarzer Ork!")
q.set_title("Töte Schwarzer Ork!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Schwarzer Ork!"..locale.NORMAL_COLOR)
say("Töte 10 Schwarzer Ork.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Schwarzer Ork!"..locale.NORMAL_COLOR)
say("Töte 10 Schwarzer Ork.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 636.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training5 begin
when letter begin
q.set_counter("³Ñ¾l¯µ©v§x¥}ÆF¼Æ¶q", 10-pc.getqf("kill_count"))
end
when 706.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l¯µ©v§x¥}ÆF¼Æ¶q", 10-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Dunkler Peiniger")
q.set_title("Töte Dunkler Peiniger")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Dunkler Peiniger"..locale.NORMAL_COLOR)
say("Töte 10 Dunkler Peiniger.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Dunkler Peiniger"..locale.NORMAL_COLOR)
say("Töte 10 Dunkler Peiniger.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 706.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training6 begin
when letter begin
q.set_counter("³Ñ¾l¯T¬r»jµï¼Æ¶q", 10-pc.getqf("kill_count"))
end
when 2034.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l¯T¬r»jµï¼Æ¶q", 10-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Klauengiftspinne")
q.set_title("Töte Klauengiftspinne")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Klauengiftspinne"..locale.NORMAL_COLOR)
say("Töte 10 Klauengiftspinne.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Klauengiftspinne"..locale.NORMAL_COLOR)
say("Töte 10 Klauengiftspinne.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 2034.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training7 begin
when letter begin
q.set_counter("³Ñ¾lµô¨MªÌ¼Æ¶q", 20-pc.getqf("kill_count"))
end
when 2108.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾lµô¨MªÌ¼Æ¶q", 20-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Wüstenbandit")
q.set_title("Töte Wüstenbandit")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Wüstenbandit"..locale.NORMAL_COLOR)
say("Töte 20 Wüstenbandit.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Wüstenbandit"..locale.NORMAL_COLOR)
say("Töte 20 Wüstenbandit.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 2108.kill with pc.getf("horse_levelup","kill_count") >= 20 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training8 begin
when letter begin
q.set_counter("³Ñ¾l¦BÀJÅ]¼Æ¶q", 10-pc.getqf("kill_count"))
end
when 1107.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l¦BÀJÅ]¼Æ¶q", 10-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Eisgolem")
q.set_title("Töte Eisgolem")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Eisgolem"..locale.NORMAL_COLOR)
say("Töte 10 Eisgolem.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Eisgolem"..locale.NORMAL_COLOR)
say("Töte 10 Eisgolem.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 1107.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state training9 begin
when letter begin
q.set_counter("³Ñ¾lµK¨ªªê¼Æ¶q", 20-pc.getqf("kill_count"))
end
when 2203.kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾lµK¨ªªê¼Æ¶q", 20-pc.getqf("kill_count"))
end
when enter begin
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Kampftiger")
q.set_title("Töte Kampftiger")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Kampftiger"..locale.NORMAL_COLOR)
say("Töte 20 Kampftiger.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Kampftiger"..locale.NORMAL_COLOR)
say("Töte 20 Kampftiger.")
say("Wenn du absteigst")
say("ist deine Prüfung misslungen.")
end
when 2203.kill with pc.getf("horse_levelup","kill_count") >= 20 begin
setstate(report)
end
when unmount begin
setstate(failure)
end
end
state start begin
when 20349.chat."Kampfprüfung" with horse.get_grade()==2 begin
if horse.get_level()==20 then
say("Du kannst dein Pferd")
say("zu einem Militärpferd")
say("ausbilden.")
say("")
elseif pc.countitem("50050")<1 then
say("Du benötigst eine")
say("Pferdemedaille.")
say("")
setstate(need_item50050)
elseif get_time()<pc.getqf("next_time") then
say("Du musst noch warten.")
say("Komm Morgen wieder.")
say("")
elseif horse.get_stamina_pct()<=10 then
say("Dein Pferd ist zu")
say("Erschöpft.")
say("")
elseif horse.get_health_pct()<=10 then
say("Dein Pferd ist zu")
say("Erschöpft.")
say("")
elseif horse.is_riding()==0 then
say("Rufe zuerst dein Pferd.")
elseif (horse.get_level()>=11 and horse.get_level()<=19) then
say("Du möchtest also dein Pferd")
say("weiter Trainieren!")
say("Nun gut hier ist deine")
say("Aufgabe.")
say("Aber pass auf das du nicht")
say("vom Pferd fällst oder absteigst.")
say("")
if is_test_server() then
pc.setqf("next_time", get_time()+10)
else
pc.setqf("next_time", get_time()+number(16, 32)*60*60)
end
if horse.get_level()==11 then
setstate(training1)
elseif horse.get_level()==12 then
setstate(training2)
elseif horse.get_level()==13 then
setstate(training3)
elseif horse.get_level()==14 then
setstate(training4)
elseif horse.get_level()==15 then
setstate(training5)
elseif horse.get_level()==16 then
setstate(training6)
elseif horse.get_level()==17 then
setstate(training7)
elseif horse.get_level()==18 then
setstate(training8)
elseif horse.get_level()==19 then
setstate(training9)
end
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pferdemedaille")
q.set_title("Pferdemedaille")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Gehe ins Affendungeon")
say("und besorge eine Pferdemedaille")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Gehe ins Affendungeon")
say("und besorge eine Pferdemedaille")
setstate(start)
q.done()
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Training Misslungen!")
q.set_title("Training Misslungen!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Training Misslungen!"..locale.NORMAL_COLOR)
say("Bitte versuche es Später erneut.")
say("")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Training Misslungen!"..locale.NORMAL_COLOR)
say("Bitte versuche es Später erneut.")
say("")
setstate(start)
q.done()
end
end
state report begin
when letter begin
local v=find_npc_by_vnum(20349)
if 0==v then
else
target.vid("__TARGET__", v, "")
end
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Rückkehr zum Stallburschen")
q.set_title("Rückkehr zum Stallburschen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Rückkehr zum Stallburschen"..locale.NORMAL_COLOR)
say("Kehre zum Stallburschen zurück")
say("und berichte ihm von deinem Ergebnis.")
end
when info begin
say(locale.NOTICE_COLOR.."Rückkehr zum Stallburschen"..locale.NORMAL_COLOR)
say("Kehre zum Stallburschen zurück")
say("und berichte ihm von deinem Ergebnis.")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say("Hat alles gut geklappt?")
say("Wir werden Morgen dein")
say("Training fortsetzten.")
say("Dein Ergebnis steht auf deiner Pferdemedaille.")
setstate(reward)
q.done()
end
end
state reward begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Ergebnis der Prüfung")
q.set_title("Ergebnis der Prüfung")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Ergebnis der Prüfung"..locale.NORMAL_COLOR)
if horse.get_level()<=10 then
say("Dein Pferd ist zu niedrig.")
elseif horse.get_level()>=20 then
say("Dein Pferd ist zu hoch")
elseif (horse.get_level()>=11 and horse.get_level()<=19) then
local s=number(1, 2)
if 1>=s then -- 50.00% (1/2)
say("Training misslungen.")
say("")
say("Versuche es erneut.")
pc.setqf("next_time", 0)
elseif 2>=s then -- 50.00% (1/2)
say("Training erfolgreich.")
if pc.countitem("50050")>=1 then
char_log(0, "HORSE_ADVANCE", "BEGIN")
pc.removeitem("50050", 1)
char_log(0, "HORSE_ADVANCE", "DEC 50050 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_ADVANCE", "INC horse_advance 1")
char_log(0, "HORSE_ADVANCE", "END")
say("Dein Pferd hat nun Level "..(horse.get_level()).." erreicht.")
say("")
if horse.get_level()==20 then
say("Dein Pferd ist nun gross genug")
say("für die Militärpferde Prüfung.")
pc.setqf("next_time", 0)
else
say("Du solltest weiter Trainieren")
say("bis dein Pferd Level 20 erreicht hat.")
end
else
say("")
end
end
end
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
horse_lv1
PHP Code:
quest pony_buy begin
state start begin
when 20349.chat."Ponyprüfung" with pc.level >= 4 begin
say_title(""..mob_name(20349)..":")
say("")
say("Hallo reisender!")
say("Du hast die Möglichkeit bei mir einen")
say("Anfänger Gaul zu kaufen.")
say("")
say("Möchtest du einen Anfänger Gaul?")
say("")
local a = select("Ja",
"Nein")
if a == 1 then
if pc.count_item(3004)>=1 then
say_title(""..mob_name(20349)..":")
say("")
say("Hallo,")
say("Was hast du da in deiner Hand?")
say("Einen Keilerzahn?! ")
say("Wenn du ihn mir gibst, gebe ich dir ein Pferd")
say("")
say_reward("Na, wie wärs?")
say("")
local b=select("Gerne, hier doch",
"Nein, dass ist meiner!")
if b == 1 then
horse.set_level("10")
pc.change_money("100000")
pc.give_exp2("10000")
pc.give_item2("50051", 1)
say_title("Pferdeprüfung Belohnung")
say("")
say("Du erhälst")
say_reward("Pferd Level 10")
say_reward("100.000 Yang")
say_reward("10.000 Erfahrungspunkte")
say_reward("Eine Pferdebild")
say("")
say_reward("Komm wieder wenn du Level 25 bist!")
say("")
else
say_title(""..mob_name(20349)..":")
say("")
say("Komme wieder wenn du dafür bereit bist.")
setstate(getrequest)
end
else
say_title(""..mob_name(20349)..":")
say("")
say("Du lügst mich also an?")
say("Komme wieder wenn du den Keilerzahn hast!")
setstate(getrequest)
end
else
say_title(""..mob_name(20349)..":")
say("")
say("Komme wieder wenn du dafür bereit bist.")
setstate( getrequest )
end
end
end
state getrequest begin
when letter begin
send_letter("Besorge sein Material")
end
when info or button begin
say_title(""..mob_name(20349)..":")
say("")
say("Besorge mir folgenden Materialien.")
say("")
say("Du benötigst:")
say_reward("- 1 Keilerzahn")
local a = select ("Ich hab den Zahn!",
"Ich brauch noch kurz")
if a == 1 then
say_title(""..mob_name(20349)..":")
say("")
say("Kehre zurück zu mir um dein Pferd")
say("zu erhalten.")
setstate( start )
else
setstate( getrequest )
end
end
end
end
horse_lv11
PHP Code:
quest horse_lv11 begin
state start begin
when 90100.use with pc.get_level() >= 75 begin
if horse.get_level()>=1 then
set_state( gotostable )
pc.remove_item(90100, 1)
end
end
end
state gotostable begin
when letter begin
local v=find_npc_by_vnum(20349)
if 0==v then
else
target.vid("__TARGET__", v, "Gehe zum Stallbursche")
end
end
when letter begin
send_letter("Gehe zum Stallbursche!")
end
when button or info begin
say_title("Gehe zum Stallbursche")
say("Du hast ein Hufeisen gefunden. Der Stallbursche")
say("kann diese immer gebrauchen. Bringe es ihm und")
say("frage ihn ob dein Pferd mittlererweile gut")
say("genug ist um zusammen mit dir gegen Gegner")
say("zu kämpfen.")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Stallbursche:")
say("")
say("Ein Hufeisen?")
say("Dankeschön.. ich kann nie genug davon haben..")
say("so viele Leute kommen Tag für Tag zu mir, nur weil")
say("sie neue Hufeisen brauchen..")
say("Aber egal.. warum erzähle ich dir das..")
say("")
wait()
say("Dein Pferd? Du willst wissen ob es stark genug")
say("geworden ist? Mhh nunja eigentlich..")
wait()
say("Ja ich denke es kann es mittlererweile mit")
say("einigen Gegnern aufnehmen. Ich gebe dir nun")
say("eine Rüstung und bringe deinem Pferd bei,")
say("wie es sich verhalten muss, wenn du mit")
say("ihm kämpfst.")
wait()
horse.set_level("11")
pc.remove_item(50051, 1)
pc.give_item2("50052")
horse.unride()
horse.summon()
horse.ride()
say_reward("Kampfpferd erhalten.")
say_reward("Waffenpferdebuch erhalten.")
setstate( __COMPLETE__ )
q.done()
end
end
state __COMPLETE__ begin
end
end
horse_lv21
PHP Code:
quest horse_lv21 begin
state start begin
when 90101.use with pc.get_level() >= 90 begin
if horse.get_level()>=1 then
set_state( gotostable21 )
pc.remove_item(90101, 1)
end
end
end
state gotostable21 begin
when letter begin
local v=find_npc_by_vnum(20349)
if 0==v then
else
target.vid("__TARGET__", v, "Gehe zum Stallbursche")
end
end
when letter begin
send_letter("Gehe zum Stallbursche!")
end
when button or info begin
say_title("Gehe zum Stallbursche")
say("Du hast ein Hufeisen gefunden. Der Stallbursche")
say("kann diese immer gebrauchen. Bringe es ihm und")
say("frage ihn ob dein Pferd mittlererweile gut")
say("genug ist um die Fertigkeiten des Millitärpferdes")
say("zu erlernen.")
say("")
end
when __TARGET__.target.click begin
target.delete("__TARGET__")
say_title("Stallbursche:")
say("")
say("Ein Hufeisen?")
say("Dankeschön.. ich kann nie genug davon haben..")
say("so viele Leute kommen Tag für Tag zu mir, nur weil")
say("sie neue Hufeisen brauchen..")
say("Aber egal.. warum erzähle ich dir das..")
say("")
wait()
say("Dein Pferd? Du willst wissen ob es stark genug")
say("geworden ist? Mhh nunja eigentlich..")
wait()
say("Ja.. Ich denke es ist mittlererweile stark")
say("und schlau genug die Fertigkeiten des")
say("Millitärpferdes zu erlernen. Ich werde")
say("sie ihm sofort beibringen.")
wait()
horse.set_level("21")
pc.remove_item(50051, 1)
pc.remove_item(50052, 1)
pc.give_item2("50053")
horse.unride()
horse.summon()
horse.ride()
say_reward("Millitärpferd erhalten.")
say_reward("Millitärpferdebuch erhalten.")
setstate( __COMPLETE__ )
q.done()
end
end
state __COMPLETE__ begin
end
end
horse_menu
PHP Code:
quest horse_menu begin
state start begin
when 20030.click begin show_horse_menu() end
when 20101.click begin show_horse_menu() end
when 20102.click begin show_horse_menu() end
when 20103.click begin show_horse_menu() end
when 20104.click begin show_horse_menu() end
when 20105.click begin show_horse_menu() end
when 20106.click begin show_horse_menu() end
when 20107.click begin show_horse_menu() end
when 20108.click begin show_horse_menu() end
when 20109.click begin show_horse_menu() end
end
end
horse_revive
PHP Code:
quest horse_revive begin
state start begin
when 20349.chat."Mein Pferd ist Tod" with horse.get_grade()==3 and horse.is_dead() and pc.countitem("50059")<1 begin
say("Hallo Reiter")
say("wie ich sehe ist dein Pferd gestorben.")
say("Du brauchst ein spezielles Kraut")
say("Vom Affen König um es Wiederzubeleben.")
if pc.countitem("50058")>=1 then
say("Du besitzt das Falsche Kraut.")
elseif pc.countitem("50057")>=1 then
say("Du besitzt das Falsche Kraut.")
end
end
when 20349.chat."Mein Pferd ist Tod" with horse.get_grade()==3 and horse.is_dead() and pc.countitem("50059")>=1 begin
say("Wie ich sehe ist dein Pferd")
say("Gestorben.")
wait()
say("Du hast das Geheimnissvolle Kraut.")
say("[DELAY value=400]. . .[/DELAY]")
horse.summon()
wait()
say("Ich belebe damit dein Pferd wieder.")
say("Vergiss nicht dein Pferd zu Füttern.")
if pc.countitem("50059")>=1 then
pc.removeitem("50059", 1)
horse.revive()
end
end
when 20349.chat."Mein Pferd ist Tod" with horse.get_grade()==2 and horse.is_dead() and pc.countitem("50058")<1 begin
say("Hallo Reiter")
say("wie ich sehe ist dein Pferd gestorben.")
say("Du brauchst ein spezielles Kraut")
say("Vom Affen König um es Wiederzubeleben.")
if pc.countitem("50059")>=1 then
say("Du besitzt das Falsche Kraut.")
elseif pc.countitem("50057")>=1 then
say("Du besitzt das Falsche Kraut.")
end
end
when 20349.chat."Mein Pferd ist Tod" with horse.get_grade()==2 and horse.is_dead() and pc.countitem("50058")>=1 begin
say("Wie ich sehe ist dein Pferd")
say("Gestorben.")
wait()
say("Du hast das Geheimnissvolle Kraut.")
say("[DELAY value=400]. . .[/DELAY]")
horse.summon()
wait()
say("Ich belebe damit dein Pferd wieder.")
say("Vergiss nicht dein Pferd zu Füttern.")
if pc.countitem("50058")>=1 then
pc.removeitem("50058", 1)
horse.revive()
end
end
when 20349.chat."Mein Pferd ist Tod" with horse.get_grade()==1 and horse.is_dead() and pc.countitem("50057")<1 begin
say("Hallo Reiter")
say("wie ich sehe ist dein Pferd gestorben.")
say("Du brauchst ein spezielles Kraut")
say("Vom Affen König um es Wiederzubeleben.")
if pc.countitem("50059")>=1 then
say("Du besitzt das Falsche Kraut.")
elseif pc.countitem("50057")>=1 then
say("Du besitzt das Falsche Kraut.")
end
end
when 20349.chat."Mein Pferd ist Tod" with horse.get_grade()==1 and horse.is_dead() and pc.countitem("50057")>=1 begin
say("Wie ich sehe ist dein Pferd")
say("Gestorben.")
wait()
say("Du hast das Geheimnissvolle Kraut.")
say("[DELAY value=400]. . .[/DELAY]")
horse.summon()
wait()
say("Ich belebe damit dein Pferd wieder.")
say("Vergiss nicht dein Pferd zu Füttern.")
if pc.countitem("50057")>=1 then
pc.removeitem("50057", 1)
horse.revive()
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
horse_summon
PHP Code:
quest horse_summon begin
state start begin
function get_horse_summon_prob_pct() local skill_level=pc.get_skill_level(131) if skill_level==1 then return 15 elseif skill_level==2 then return 20 elseif skill_level==3 then return 30 elseif skill_level==4 then return 40 elseif skill_level==5 then return 50 elseif skill_level==6 then return 60 elseif skill_level==7 then return 70 elseif skill_level==8 then return 80 elseif skill_level==9 then return 90 elseif skill_level>=10 then return 100 end return 10 end
when 20349.chat."Pferdebild verloren" with horse.get_grade()==1 and pc.countitem("50051")<1 begin
say("Du bist nicht sehr vorsichtig...")
say("Du solltest dein Pferdebild nicht zu oft verlieren!")
say(")
say_reward("Möchtest du es für 1 Stuek Gold ?")
local b=select("ja", "Invi zu voll")
if 1==b then
if pc.money>=1 then
pc.changemoney(-1)
say("Hier bitte.")
say("Verliere es so schnell nicht wieder!")
pc.give_item2("50051", 1)
else
say("Du hast nicht genug Yang...")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Waffen-Pferdebuch verloren" with horse.get_grade()==2 and pc.countitem("50052")<1 begin
say("Du bist nicht sehr vorsichtig...")
say("Du solltest dein Waffen-Pferdebuch nicht zu oft verlieren!")
say(")
say_reward("Möchtest du es für 1 Stuek Gold ?")
local b=select("Kaufen", "Nicht Kaufen")
if 1==b then
if pc.money>=1 then
pc.changemoney(-1)
say("Hier bitte.")
say("Verliere es so schnell nicht wieder!")
pc.give_item2("50052", 1)
else
say("Du hast nicht genug Yang...")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Millitär-Pferdebuch verloren" with horse.get_grade()==3 and pc.countitem("50053")<1 begin
say("Du bist nicht sehr vorsichtig...")
say("Ein neues Millitär-Pferdebuch ist teuer")
say("und nicht leicht zu bekommen!")
say(")
say_reward("Möchtest du es für 1 Stuek Gold ?")
say_reward("neues Waffen-Pferdebuch kaufen?")
local b=select("Kaufen", "Nicht Kaufen")
if 1==b then
if pc.money>=1 then
pc.changemoney(-1)
say("Hier bitte.")
say("Verliere es so schnell nicht wieder!")
pc.give_item2("50053", 1)
else
say("Du hast nicht genug Yang...")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 50051.use with horse.get_grade()==0 begin
say("Du musst zuerst die Qualifikationsprüfung")
say("für Reiter bestehen, um dein Pferd zu rufen!")
end
when 50051.use with horse.get_grade()==1 begin
if pc.getsp()>=100 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say_title("Information:")
say_reward("Das Pferd ist da :D")
horse.summon()
else
say_title("Information:")
say_reward("Hmmm Fail sry.. Versuche gleich nochmal :D")
end
pc.change_sp(-100)
else
say_title("Information:")
say_reward("Zuwenig Mana -.-")
end
end
when 50051.use with horse.get_grade()==2 begin
say_reward("Falsches Gaul Buch")
end
when 50051.use with horse.get_grade()==3 begin
say_reward("Falsches Gaul Buch")
end
when 50052.use with horse.get_grade()==0 begin
say_reward("Falsches Gaul Buch")
end
when 50052.use with horse.get_grade()==1 begin
say_reward("Falsches Gaul Buch")
end
when 50052.use with horse.get_grade()==2 begin
if pc.getsp()>=200 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say_title("Information:")
say_reward("Das Pferd ist da :D")
horse.summon()
else
say_title("Information:")
say_reward("Hmmm Fail sry.. Versuche gleich nochmal :D")
end
pc.change_sp(-200)
else
say_title("Information:")
say_reward("Zuwenig Mana -.-")
end
end
when 50052.use with horse.get_grade()==3 begin
say_reward("Falsches Gaul Buch")
end
when 50053.use with horse.get_grade()==0 begin
say_reward("Falsches Gaul Buch")
end
when 50053.use with horse.get_grade()==1 begin
say_reward("Falsches Gaul Buch")
end
when 50053.use with horse.get_grade()==2 begin
say_reward("Falsches Gaul Buch")
end
when 50053.use with horse.get_grade()==3 begin
if pc.getsp()>=300 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say_title("Information:")
say_reward("Das Pferd ist da :D")
horse.summon()
else
say_title("Information:")
say_reward("Hmmm Fail sry.. Versuche gleich nochmal :D")
end
pc.change_sp(-300)
else
say_title("Information:")
say_reward("Zuwenig Mana -.-")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
horse_upgrade
PHP Code:
quest horse_upgrade begin
state start begin
when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
if horse.is_dead() then
say("Dein Pferd ist Tod!")
say("Belebe es erst wieder.")
say("")
elseif pc.level<=34 then
say("Dein Level ist zu gering.")
say("")
elseif horse.get_level()<=9 then
say("Dein Pferd ist zu klein!")
say("Bitte Trainiere dein Pferd erst.")
say("")
elseif pc.countitem("50050")<1 then
say("Du hast keine Pferdemedaille!")
say("Bitte hole erst eine.")
say("")
setstate(need_item50050)
elseif pc.countitem("50051")<1 then
say("Du hast kein Pferdebild !")
say("")
elseif horse.get_level()==10 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=35 then
say("Du musst 100 Schlangenbogenschützen")
say("in 30 Minuten töten.")
say("Nur so kann ich sicher gehen")
say("Das du wirklich Qualifiziert")
say("genug bist für ein Kampfpferd.")
say("Möchtest du den Test beginnen?")
say("")
local b=select("Ja", "Öhm, ne du lass mal.")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
setstate(test)
end
elseif 2==b then
say("Komm wieder wenn du soweit bist.")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("")
say("Viel Erfolg.")
say("")
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pferdemedaille")
q.set_title("Pferdemedaille")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Besorge eine Pferdemedaille!")
say("Du bekommst sie im Affendungeon.")
setstate(start)
q.done()
end
end
state test begin
when letter begin
q.set_counter("Bogenschützen", 100-pc.getqf("kill_count"))
end
when 2105.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Bogenschützen", 100-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
end
end
when 2107.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Bogenschützen", 100-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
q.done()
end
end
when letter begin
q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Töte Bogenschützen")
q.set_title("Töte Bogenschützen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Töte Bogenschützen"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("100 Skorpion oder Schlangen ")
say("Bogenschützen zu töten.")
say("Deine Gruppenmitglieder können dir helfen.")
end
when info begin
say(locale.NOTICE_COLOR.."Töte Bogenschützen"..locale.NORMAL_COLOR)
say("Du hast 30 Minuten Zeit um")
say("100 Skorpion oder Schlangen ")
say("Bogenschützen zu töten.")
say("Deine Gruppenmitglieder können dir helfen.")
end
when 2105.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 2107.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 20349.chat."Kampfpferd" begin
say("Du musst in 30 Minuten")
say("100 Skorpionbogenschützen oder")
say("100 Schlangenbogenschützen töten.")
say("Deine Gruppe kann dir helfen.")
end
end
state report begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Geschafft")
q.set_title("Geschafft")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallwächter.")
end
when info begin
say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
say("Geh zum Stallwächter.")
end
when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
say("Herzlichen Glückwunsch")
say("Nun muss ich dir ein ")
say("Waffenpferdebuch erstellen.")
say("Das dauert einen Tag.")
say("Komm morgen wieder")
say("Vergiss nicht er kostet 500.000 Yang.")
if is_test_server() then
pc.setqf("make_time", get_time()+10)
else
pc.setqf("make_time", get_time()+number(8, 16)*60*60)
end
setstate(wait)
end
end
state wait begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Warten auf das Pferdebild")
q.set_title("Warten auf das Pferdebild")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung läuft.")
say("Du musst noch warten.")
end
when info begin
say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
say("Die Pferdebild herstellung läuft.")
say("Du musst noch warten.")
end
when login with get_time()>=pc.getqf("make_time") begin
setstate(buy)
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
say("Ich habe dein Pferdebild")
say("Leider noch nicht fertig.")
say("Komm Morgen wieder.")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Dein Pferdebild ist Fertig!")
q.set_title("Dein Pferdebild ist Fertig!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallwächter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when info begin
say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
say("Gehe zum Stallwächter und")
say("hole dein Pferdebild ab.")
say("Vergiss die 500.000 Yang nicht.")
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
setstate(start)
q.done()
end
when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
setstate(start)
q.done()
end
when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
say("Dein Pferdebild ist Fertig.")
say("Es kostet dich 500.000 Yang.")
local b=select("Kaufen", "Später", "Beenden")
if 1==b then
if pc.money>=500000 then
if pc.countitem("50051")>=1 then
char_log(0, "HORSE_UPGRADE", "BEGIN")
pc.changemoney(-500000)
char_log(0, "HORSE_UPGRADE", "DEC money 500000")
pc.removeitem("50051", 1)
char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
pc.give_item2("50052", 1)
char_log(0, "HORSE_UPGRADE", "INC 50052 1")
char_log(0, "HORSE_UPGRADE", "END")
say("Herzlichen Glückwunsch")
say("Du hast nun ein Kampfpferd.")
say("Fütter es regelmässig.")
say("")
setstate(start)
q.done()
else
say("")
end
else
say("")
end
elseif 2==b then
say("Ok bis später.")
elseif 3==b then
say("Quest wirklich beenden?")
local b=select("Ja", "Nein")
if 1==b then
setstate(start)
q.done()
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Prüfung misslungen")
q.set_title("Prüfung misslungen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Prüfung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
say("Du hast die Kampfpferde Prüfung")
say("nicht bestanden!")
say("")
say("Gehe zum Stallburschen um")
say("es noch einmal zu versuchen.")
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
horse_upgrade2
PHP Code:
quest horse_upgrade2 begin
state start begin
when 20349.chat."Militär-Pferde Prüfung" with horse.get_grade()==2 and horse.get_level()==20 begin
if horse.is_dead() then
say("Dein Pferd ist Tod.")
say("Bitte belebe es erst")
say("wieder.")
elseif pc.level<=49 then
say("Dein Level ist zu gering.")
say("Du musst erst Level 50 erreichen.")
elseif horse.get_level()<=19 then
say("Dein Pferd ist zu klein.")
say("Dein Pferd muss erst")
say("Level 20 erreichen.")
elseif pc.countitem("50050")<1 then
say("Du besitzt keine")
say("Pferdemedaille.")
say("Bitte besorge erst")
say("eine.")
say("")
say("")
setstate(need_item50050)
elseif pc.countitem("50052")<1 then
say("Du hast kein Kampf-Pferdebild.")
say("Bitte kauf erst eins.")
elseif horse.get_level()==20 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=50 then
say("Dein Pferd ist nun")
say("groß genug für die")
say("Militär Pferde Prüfung.")
say("Du musst 300 Dämonenbogenschützen")
say("in 30 Minuten töten.")
say("Möchtest du den Test beginnen?")
say("")
local b=select("Test beginnen", "Nein, noch nicht.")
if 1==b then
if pc.countitem("50050")>=1 then
pc.removeitem("50050", 1)
setstate(test)
end
elseif 2==b then
say("Komm später wieder.")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("Viel erfolg.")
say("")
say("")
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Pferdemedaille")
q.set_title("Pferdemedaille")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Gehe ins Affendungeon")
say("und besorge eine Pferdemedaille.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
say("Gehe ins Affendungeon")
say("und besorge eine Pferdemedaille.")
setstate(start)
q.done()
end
end
state test begin
when letter begin
q.set_counter("³Ñ¾l¤`ÆF¤}½b¤â", 300-pc.getqf("kill_count"))
end
when 1002.party_kill begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("³Ñ¾l¤`ÆF¤}½b¤â", 300-pc.getqf("kill_count"))
if get_time()>=pc.getqf("limit_time") then
setstate(failure)
q.done()
end
end
when letter begin
q.set_clock("³Ñ¾l®É¶¡", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when leave begin
q.done()
end
when letter begin
setskin(NOWINDOW)
makequestbutton("Militär-Pferde Prüfung")
q.set_title("Militär-Pferde Prüfung")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Militär-Pferde Prüfung"..locale.NORMAL_COLOR)
say("Töte 300 Dämonenbogenschützen")
say("in 30 Minuten.")
say("")
say("Deine Gruppe kann dir helfen.")
end
when info begin
say(locale.NOTICE_COLOR.."Militär-Pferde Prüfungç"..locale.NORMAL_COLOR)
say("Töte 300 Dämonenbogenschützen")
say("in 30 Minuten.")
say("")
say("Deine Gruppe kann dir helfen.")
end
when 1002.party_kill with pc.getf("horse_upgrade2","kill_count") >= 300 and pc.getqf("limit_time")>=get_time() begin
setstate(report)
end
when 20349.chat."¬d¬Ý¥Ø«eª¬ªp" begin
say("30¤ÀÄÁ¤º®ø·À300¥u¤`ÆF¤}½b¤â")
say("")
say("¤¹³\²Õ¶¤§¹¦¨¡A¦ý*n¨D±z¬°²Õ¶¤¶¤ªø")
local b=select("±µ¨ü", "©ñ±ó")
if 1==b then
elseif 2==b then
say("¯uªº*n¤¤³~©ñ±ó¦¹¦¸¾÷·|¶Ü¡H")
local b=select("¬Oªº", "¶}ª±¯º")
if 1==b then
say("¯¬§A¤U¦¸¦³¦n¹B")
setstate(start)
q.done()
elseif 2==b then
say("²{¦b¨S¦³®É¶¡¦b³oùض¢²á")
say("§Ö¥h®ø·À¤`ÆF¤}½b¤â")
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state report begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Rückkehr zum Stallburschen")
q.set_title("Rückkehr zum Stallburschen")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Rückkehr zum Stallburschen"..locale.NORMAL_COLOR)
say("Sage dem Stallburschen")
say("das du es Geschafft hast.")
end
when info begin
say(locale.NOTICE_COLOR.."Rückkehr zum Stallburschen"..locale.NORMAL_COLOR)
say("Sage dem Stallburschen")
say("das du es Geschafft hast.")
end
when 20349.chat."HORSE2 QUEST STATE REPAIR" with horse.get_grade()!=2 begin
setstate(start)
q.done()
end
when 20349.chat."Ich hab es Geschafft!" with horse.get_grade()==2 begin
say("Na dann")
say("Herzlichen Glückwunsch.")
say("Ich stelle dir nun dein")
say("Militär-Pferdebuch her.")
say("Es dauert 24 Stunden.")
if is_test_server() then
pc.setqf("make_time", get_time()+10)
else
pc.setqf("make_time", get_time()+number(8, 16)*60*60)
end
setstate(wait)
end
end
state wait begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Warten auf das Militär-Pferdebuch")
q.set_title("Warten auf das Militär-Pferdebuch")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Warten auf das Militär-Pferdebuch"..locale.NORMAL_COLOR)
say("Warte bis der Stallbursche")
say("das Militär-Pferdebuch fertig hat.")
end
when info begin
say(locale.NOTICE_COLOR.."Warten auf das Militär-Pferdebuch"..locale.NORMAL_COLOR)
say("Warte bis der Stallbursche")
say("das Militär-Pferdebuch fertig hat.")
end
when login with get_time()>=pc.getf("horse_upgrade2","make_time") begin
setstate(buy)
end
when 20349.chat."HORSE2 UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=2 begin
setstate(start)
q.done()
end
when 20349.chat."Militär-Pferdebuch?" with horse.get_grade()==2 begin
say("Es tut mir leid aber")
say("das Militär-Pferdebuch")
say("ist noch nicht fertig.")
say("")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Dein Pferdebuch ist Fertig!")
q.set_title("Dein Pferdebuch ist Fertig!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Dein Pferdebuch ist Fertig!"..locale.NORMAL_COLOR)
say("Geh zum Stallburschen und hole")
say("dein Militär-Pferdebuch ab.")
say("Es kostet 1.000.000 Yang.")
say("")
end
when info begin
say(locale.NOTICE_COLOR.."Dein Pferdebuch ist Fertig!"..locale.NORMAL_COLOR)
say("Geh zum Stallburschen und hole")
say("dein Militär-Pferdebuch ab.")
say("Es kostet 1.000.000 Yang.")
say("")
end
when 20349.chat."HORSE2 UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=2 begin
setstate(start)
q.done()
end
when 20349.chat."HORSE2 UPGRADE QUEST STATE REPAIR" with horse.get_grade()==2 and horse.get_level()!=20 begin
setstate(start)
q.done()
end
when 20349.chat."Mein Militär-Pferdebuch!" with horse.get_grade()==2 and horse.get_level()==20 begin
say("Dein Militär-Pferdebuch ist fertig.")
say("Es kostet dich 1.000.000 Yang.")
say("Möchtest du das Militär-Pferdebuch")
say("nun kaufen?")
say("")
say("")
local b=select("Kaufen", "Später", "Quest beenden")
if 1==b then
if pc.money>=1000000 then
if pc.countitem("50052")>=1 then
char_log(0, "HORSE_UPGRADE2", "BEGIN")
pc.changemoney(-1000000)
char_log(0, "HORSE_UPGRADE2", "DEC money 1000000")
pc.removeitem("50052", 1)
char_log(0, "HORSE_UPGRADE2", "DEC 50052 1")
horse.unride()
horse.advance()
horse.ride()
char_log(0, "HORSE_UPGRADE2", "INC horse_advance 1")
pc.give_item2("50053", 1)
char_log(0, "HORSE_UPGRADE2", "INC 50053 1")
pc.give_item2("50060", 1)
char_log(0, "HORSE_UPGRADE2", "INC 50060 1")
char_log(0, "HORSE_UPGRADE2", "END")
say("Herzlichen Glückwunsch.")
say("Du besitzt nun ein Militär Pferd")
say("Bitte Fütter es Regelmässig.")
say("")
say("")
say("")
setstate(start)
q.done()
else
say("")
end
else
say("")
end
elseif 2==b then
say("Bis Später.")
elseif 3==b then
say("Möctest du wirklich die")
say("Quest abbrechen?")
local b=select("Ja", "Nein")
if 1==b then
setstate(start)
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
makequestbutton("Prüfung misslungen!")
q.set_title("Prüfung misslungen!")
q.start()
end
when button begin
say(locale.NOTICE_COLOR.."Prüfung misslungen!"..locale.NORMAL_COLOR)
say("Du hast es leider nicht geschafft")
say("300 Dämonenbogenschützen in")
say("30 minuten zu töten.")
say("Gehe zum Stallburschen um es noch")
say("einmal zu versuchen.")
setstate(start)
q.done()
end
when info begin
say(locale.NOTICE_COLOR.."Prüfung misslungen!"..locale.NORMAL_COLOR)
say("Du hast es leider nicht geschafft")
say("300 Dämonenbogenschützen in")
say("30 minuten zu töten.")
say("Gehe zum Stallburschen um es noch")
say("einmal zu versuchen.")
setstate(start)
q.done()
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
Naja das mit Buch kaufen ist in Gold und kostet immer 1 Gold Stück ^^
|
|
|
|
|
08/25/2010, 00:01
|
#3
|
elite*gold: 0
Join Date: Aug 2010
Posts: 335
Received Thanks: 38
|
schonmal danke aber die DE prüfungen sind das auch nicht^^
brauch die quest für denn anfang wo er sag blablabla geh in den leichen AD und bring mir eine PM
|
|
|
|
|
08/25/2010, 01:01
|
#4
|
elite*gold: 0
Join Date: Jun 2010
Posts: 89
Received Thanks: 5
|
Ich finde das endgut!
Danke das du threat gemacht hast da muss ich nicht suchen^^
|
|
|
|
|
10/26/2010, 16:51
|
#5
|
elite*gold: 0
Join Date: Jan 2010
Posts: 45
Received Thanks: 2
|
geil die queset ist der hamma = )
|
|
|
|
 |
Similar Threads
|
[Hilfe]Pferde Quest
09/09/2010 - Metin2 Private Server - 4 Replies
Hallo,
Ich wollte fragen ob mir einer einen quest schicken kann bzw. machen kann...
Weil ich mich selber genau 0 mit den Scripten auskenne
Was will ich haben:
- Kg grigt man wenn man 50 wildhunde tötet
- Mg bekommt man wenn man einen 90 Metin killt
|
pferde quest
08/15/2010 - Metin2 - 12 Replies
ich bin ein lvl 47er krieger und habe nur pferd lvl 1 und wollte jetzt irgendwann mal kg aber wenn ich stalli anklicke steht da nur info über pferde und reitkarte ich warte schon 3tage nichts passiert
|
Pferde Quest Bot
07/25/2010 - Metin2 - 7 Replies
hi Leute ka obs sowas schon gibt habe noch nichts gefunden aber gibts villt sowas wie ein Pferde Quest bot?
Allso so ein bot der für dich die pferde quests machs zb. die questen von kg bis mg?
Wer sowas machen kann oder sowas kennt hir posten:)
Danke:D
|
Pferde Quest 7
02/09/2010 - Metin2 Private Server - 6 Replies
Ist es bei euch auch so das die Pferde Quest 7 verbugt ist ? keine Punkte auf der karte
|
Pferde quest
01/17/2010 - Metin2 Private Server - 0 Replies
Hallo ich suche einer der schon eine quest geschrieben hat wo mann ein pferd lvl 15 und dass zugehörige buch dazu bekommt aber mann muss dafür yang bezahlen :D
wenn einer so ne quest hat dann bitte hier posten ich weiß leider noch nicht wie dass geht und hab grade auch nicht die zeit dazu
ich Vergebe auch Thx
MFG
Megaload
|
All times are GMT +1. The time now is 08:23.
|
|
