;;Ҫɾ
[@SRepairItem]
{
#SAY
What item can i repair for you <$USERNAME>?\\

<Weapon/@SRepair(1)> <$@GetWeaponCost>\
<Clothes/@SRepair(0)> <$@GetArmourCost>\
<Necklace/@SRepair(3)> <$@GetNecklaceCost>\
<Helmet/@SRepair(4)> <$@GetHelmetCost>\
<Shoes/@SRepair(10)> <$@GetFootWearCost>\
<More/@Next>\

[@Next]
#SAY
What item can i repair for you <$USERNAME>?\\
<Left Bracelet/@SRepair(5)> <$@GetLeftBraceCost>\
<Right Bracelet/@SRepair(6)> <$@GetRighBraceCost>\
<Left Ring/@SRepair(7)> <$@GetRingCostLeft>\
<Right Ring/@SRepair(8)> <$@GetRightRingCost>\
<Back/@SRepairItem>\
<Leave/@Exit>

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

[@SRepair()]
#ACT
mov P0 %ARG(1)
GetRepairCost %P0
#IF
CheckGold %P9
#ACT
RepairItem %P0
Take Gold %P9
Goto @SRepairItem
#ELSESAY
You do not have enought gold...\\
<Leave/@Exit>

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

[@GetWeaponCost]
#ACT
;mov P0 1
GetRepairCost 1
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetArmourCost]
#ACT
;mov P0 0
GetRepairCost 0
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetNecklaceCost]
#ACT
;mov P0 3
GetRepairCost 3
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetHelmetCost]
#ACT
;mov P0 4
GetRepairCost 4
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetFootWearCost]
#ACT
;mov P0 1
GetRepairCost 10
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetLeftBraceCost]
#ACT
;mov P0 5
GetRepairCost 5
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetRighBraceCost]
#ACT
;mov P0 6
GetRepairCost 6
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetRingCostLeft]
#ACT
;mov P0 7
GetRepairCost 7
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

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

[@GetRightRingCost]
#ACT
;mov P0 8
GetRepairCost 8
#IF
Equal P9 0
#SAY
{FCOLOR/10}Repaired{FCOLOR/12}
#ELSESAY
Cost: {FCOLOR/10}<$OUTPUT(P9)>{FCOLOR/12}

;----------------------------------
}
;;Ҫɾ