;;Ҫɾ

[@StableManMain]
{
#IF
Checklevel 15
#SAY
How may i help you?\
To Ride Horse Use:{FCOLOR/10} @M{FCOLOR/12}\
To Get Off your Horse Use: {FCOLOR/10}@L{FCOLOR/12}\\
Buy: <Brown Horse/@BuyHorse(Horse1,15,500000)> Cost: {FCOLOR/10}500,000{FCOLOR/12}\
#IF
CheckLevel 40
#SAY
Buy: <White Horse/@BuyHorse(Horse2,40,20000000)> Cost: {FCOLOR/10}20,000,000{FCOLOR/12}\
#IF
CheckLevel 52
#SAY
Buy: <Red Horse/@BuyHorse(Horse3,52,50000000)> Cost: {FCOLOR/10}50,000,000{FCOLOR/12}\
#IF
CheckLevel 60
#SAY
Buy: <Black Horse/@BuyHorse(Horse4,60,70000000)> Cost: {FCOLOR/10}70,000,000{FCOLOR/12}{FCOLOR/2}(70000000 Gold,Level 60)\
#IF
CheckLevel 80
#SAY
Buy: <Armoured Horse/@BuyHorse(Horse5,80,90000000)> Cost: {FCOLOR/10}90,000,000{FCOLOR/12}{FCOLOR/2}(90000000 Gold,Level 80)\\


#IF
CheckHorse
#SAY
<Sell Horse/@SellHorse> \
<Leave/@exit>

;-------------------------------------

[@BuyHorse()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)
goto @BuyHorse2

;-------------------------

[@BuyHorse2]
#IF
checkhorse
#SAY
You Already Have A Horse.\\
<Leave/@Exit>
#ELSEACT
goto @BuyHorse3

;-------------------------

[@BuyHorse3]
#IF
CheckGold %D1
#ACT
take Gold %D1
horsecall %A0
#SAY
There is your horse.\\
<Leave/@Exit>
#ELSESAY
Sorry.\
You do not have {FCOLOR/10}<$OUTPUT(D1)>{FCOLOR/12} Gold.\
To buy this horse.\\
<Leave/@Exit>

;-------------------------

[@SellHorse]
#SAY
Are you sure you want to sell your horse?\\
#IF
checkhorse 1
#SAY
<Yes, Im Sure/@Sell_Horse1>\
<Leave/@exit>

#IF
checkhorse 2
#SAY
<Yes, Im Sure/@Sell_Horse2>\
<Leave/@exit>

#IF
checkhorse 3
#SAY
<Yes, Im Sure/@Sell_Horse3>\
<Leave/@exit>

#IF
checkhorse 4
#SAY
<Yes, Im Sure/@Sell_Horse3>\
<Leave/@exit>

#IF
checkhorse 5
#SAY
<Yes, Im Sure/@Sell_Horse3>\
<Leave/@exit>

;-------------------------

[@Sell_Horse1]
#ACT
Give Gold 250000
KillHorse
CLOSE

[@Sell_Horse2]
#ACT
Give Gold 1000000
KillHorse
CLOSE

[@Sell_Horse3]
#ACT
Give Gold 25000000
KillHorse
CLOSE

[@Sell_Horse4]
#ACT
Give Gold 35000000
KillHorse
CLOSE

[@Sell_Horse5]
#ACT
Give Gold 45000000
KillHorse
CLOSE

;-------------------------

}

;;Ҫɾ