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."Horse Sword." with horse.get_grade()==1 and pc.countitem("50051")<1 begin
say("So you need a Horse Sword?")
local b=select("Yes", "No")
if 1==b then
if pc.money>=10000 then
pc.changemoney(-10000)
say("Here is your new Horse Sword.")
pc.give_item2("50051", 1)
else
say("You lack teh gold.")
say_reward("Get teh 50000 gold!!")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Armed Horse Picture." with horse.get_grade()==2 and pc.countitem("50052")<1 begin
say("So you need an Armed Horse Picture?")
local b=select("Yes", "No")
if 1==b then
if pc.money>=50000 then
pc.changemoney(-50000)
say("Here is your new armed horse picture.")
pc.give_item2("50052", 1)
else
say("You lack teh gold.")
say_reward("Get teh 50000 gold!!")

end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Military Horse Painting." with horse.get_grade()==3 and pc.countitem("50053")<1 begin
say("So you need a Military Horse Painting?")
local b=select("Yes", "No")
if 1==b then
if pc.money>=100000 then
pc.changemoney(-100000)
say("Here is your new Military Horse Painting.")
pc.give_item2("50053", 1)
else
say("You lack teh gold.")
say_reward("Get teh 50000 gold!!")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 50051.use with horse.get_grade()==0 begin
say("You dont have a Horse!")
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("Your horse was called.")
say("")
horse.summon()
else
say("It has unfortunately not worked out")
say("to call your horse.")
say("Try again.")
end
pc.change_sp(-100)
else
say("You do not have enough mana")
say("to call your horse.")
say("You need 100 mana")
end
end
when 50051.use with horse.get_grade()==2 begin
say("You used the wrong horse picture.")
end
when 50051.use with horse.get_grade()==3 begin
say("You used the wrong horse picture.")
end
when 50052.use with horse.get_grade()==0 begin
say("You used the wrong horse picture.")
end
when 50052.use with horse.get_grade()==1 begin
say("You used the wrong horse picture.")
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("Your horse was called.")
say("")
horse.summon()
else
say("It has unfortunately not worked out")
say("to call your horse.")
say("Try again.")
end
pc.change_sp(-200)
else
say("You do not have enough mana")
say("to call your horse.")
say("You need 200 mana")
end
end
when 50052.use with horse.get_grade()==3 begin
say("You used the wrong horse picture.")
end
when 50053.use with horse.get_grade()==0 begin
say("You used the wrong horse picture.")
end
when 50053.use with horse.get_grade()==1 begin
say("You used the wrong horse picture.")
end
when 50053.use with horse.get_grade()==2 begin
say("You used the wrong horse picture.")
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("Your horse was called.")
say("")
horse.summon()
else
say("It has unfortunately not worked out")
say("to call your horse.")
say("Try again.")
end
pc.change_sp(-300)
else
say("You do not have enough mana")
say("to call your horse.")
say("You need 300 mana")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end