[SERVICE] Die Questkontrolle

quest horse_getting begin
state start begin
when 20349.chat."Mein Pferd" with horse.get_level()==0 begin
say_title("Stallbursche")
say("Hallo "..pc.get_name())
say("Um ein Pferd von mir zu bekommen")
say("Musst du mir etwas bringen um mein Waffe zu verstärken")
say("Dann ist das Pferd deins.")
say_item_vnum(71084, 200)	
if pc.count_item("71084, 200")==0 then
say("Wenn du mir das holst")
say("Dann werde ich dir sehr Dankbar sein.")
return
end
say("Möchtest du mir das geben?")
local s=select("Ja", "Nein")
if s==2 then
say_title("Stallbursche")
say("Schade, dann geh bitte wieder.")
return
end
if pc.count_item("71084, 200")==0 then
chat("ERROR!!!!")
return
end
pc.remove_item("71084, 200", 1)
pc.give_item2("50051", 1)	
say_title("Stallbursche")
say("Oh danke! Hier kriegst du ein Pferd.")
say("Pass gut drauf auf!")
pc.set_skill_level(131, 10)
horse.set_level(1)
horse.summon()	
horse.ride()	
end
when 20349.chat."Mein Kampfpferd" with horse.get_level()==1 and pc.get_level()>=20 begin
say_title("Stallbursche")
say("Hallo "..pc.get_name())
say("Um ein Kampfpferd von mir zu bekommen")
say("musst du mir etwas Yang bezahlen.")
say("Die Pferde pflegen sich nicht von")
say("alleine und mir geht bald das Futter")
say("aus. Wenn du mir ein Kampfpferd für")
say("7kk Yang abkaufst währe ich dir sehr")
say("dankbar.")
local s = select("Kaufen", "Nicht kaufen")
if s==2 then return end
say_title("Stallbursche")
if pc.get_gold()<7000000 then
say("Du hast zu wenig Yang um mir")
say("eines abzukaufen.")
return
end	
say("Oh danke! Hier kriegst du ein Kampfpferd.")
say("Pass gut drauf auf!")
pc.change_gold(-7000000)
pc.give_item2("50052", 1)
pc.remove_item("50051", 1)
horse.unride()
horse.set_level(11)
horse.summon()	
horse.ride()
end
when 20349.chat."Mein Millitärspferd" with horse.get_level()==11 and pc.get_level()>=35 begin
say_title("Stallbursche")
say("Hallo "..pc.get_name())
say("Um ein Millitärspferd von mir zu bekommen")
say("musst du mir einen Gefallen tun.")
say("Der Oberork hat letztens eines meiner")
say("Pferde getötet. Um ihn zu rächen wünsche")
say("ich mir von dir, dass du ihn tötest.")
say_reward("Willst du das für mich machen?")
local s=select("Ja", "Nein")
if s==2 then return	end
say_title("Stallbursche")
say("Danke, komme wieder wenn er erledigt")
say("ist.")
set_state(obi)
end
end
state obi begin
when 691.kill begin
pc.setqf("obi", 1)
end
when 20349.chat."Mein Millitärspferd" begin	
if pc.getqf("obi")==0 then
say_title("Stallbursche")
say("Hallo "..pc.get_name())
say("Um ein Millitärspferd von mir zu bekommen")
say("musst du mir einen Gefallen tun.")
say("Der Oberork hat letztens eines meiner")
say("Pferde getötet. Um ihn zu rächen wünsche")
say("ich mir von dir, dass du ihn tötest.")
say_reward("Willst du das für mich machen?")
local s=select("Ja", "Nein")
if s==2 then
return
end	
say_title("Stallbursche")
say("Danke, komme wieder wenn er erledigt")
say("ist.")
return
end
say_title("Stallbursche")
say("Oh danke, du hast ihn getötet!")
say("Hier kriegst du ein Millitärspferd")
say("Pass gut drauf auf!")	
pc.give_item2("50053", 1)
pc.remove_item("50052", 1)
horse.unride()
horse.set_level(21)
horse.summon()
horse.ride()
set_state(ende)	
end
end
state ende begin
end
end