;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@CompleteSpecRepair]
{
#IF
Checkjob Warrior
#SAY
I can repair All your Stuff in 1 Go!!!\
#ACT
GetRepairCost 0
MOV D0 %P9
MOV P0 %D0
GetRepairCost 1
MOV D1 %P9
MOV P1 %D1
GetRepairCost 3
MOV D2 %P9
MOV P2 %D2
GetRepairCost 4
MOV D3 %P9
MOV P3 %D3
GetRepairCost 5
MOV D4 %P9
MOV P4 %D4
GetRepairCost 6
MOV D5 %P9
MOV P5 %D5
GetRepairCost 7
MOV D6 %P9
MOV P6 %D6
GetRepairCost 8
MOV D7 %P9
MOV P7 %D7
GetRepairCost 10
MOV D8 %P9
MOV P8 %D8
INC P1 %P0
INC P2 %P1
INC P3 %P2
INC P4 %P3
INC P5 %P4
INC P6 %P5
INC P7 %P6
INC P8 %P7
MOV P1 %P8
MOV P2 1
MUL P1 P2
MOV D9 %P9
#SAY
{FCOLOR/3}Equipment repair costs as follows:{FCOLOR/12}\\
Total :{FCOLOR/14} <$OUTPUT(D9)> {FCOLOR/12}Gold.\\
{FCOLOR/1}This is for everything on your body!{FCOLOR/12}\\
<[ Repair All ]/@02>\
<[ Exit ]/@exit>\\\
#ELSEACT
GetRepairCost 0
MOV D0 %P9
MOV P0 %D0
GetRepairCost 1
MOV D1 %P9
MOV P1 %D1
GetRepairCost 3
MOV D2 %P9
MOV P2 %D2
GetRepairCost 4
MOV D3 %P9
MOV P3 %D3
GetRepairCost 5
MOV D4 %P9
MOV P4 %D4
GetRepairCost 6
MOV D5 %P9
MOV P5 %D5
GetRepairCost 7
MOV D6 %P9
MOV P6 %D6
GetRepairCost 8
MOV D7 %P9
MOV P7 %D7
GetRepairCost 10
MOV D8 %P9
MOV P8 %D8
INC P1 %P0
INC P2 %P1
INC P3 %P2
INC P4 %P3
INC P5 %P4
INC P6 %P5
INC P7 %P6
INC P8 %P7
MOV P1 %P8
MOV P2 5
MUL P1 P2
MOV D9 %P9
#ELSESAY
{FCOLOR/3}Equipment repair costs as follows:{FCOLOR/12}\\
Total :{FCOLOR/14} <$OUTPUT(D9)> {FCOLOR/12}Gold.\\
{FCOLOR/1}This is for everything on your body!{FCOLOR/12}\\
<[ Repair All ]/@02>\
<[ Exit ]/@exit>\\\

[@02]
#IF
Checkjob Warrior
#ACT
GetRepairCost 0
MOV D0 %P9
MOV P0 %D0
GetRepairCost 1
MOV D1 %P9
MOV P1 %D1
GetRepairCost 3
MOV D2 %P9
MOV P2 %D2
GetRepairCost 4
MOV D3 %P9
MOV P3 %D3
GetRepairCost 5
MOV D4 %P9
MOV P4 %D4
GetRepairCost 6
MOV D5 %P9
MOV P5 %D5
GetRepairCost 7
MOV D6 %P9
MOV P6 %D6
GetRepairCost 8
MOV D7 %P9
MOV P7 %D7
GetRepairCost 10
MOV D8 %P9
MOV P8 %D8
INC P1 %P0
INC P2 %P1
INC P3 %P2
INC P4 %P3
INC P5 %P4
INC P6 %P5
INC P7 %P6
INC P8 %P7
MOV P1 %P8
MOV P2 1
MUL P1 P2
MOV D9 %P9
#ELSEACT
GetRepairCost 0
MOV D0 %P9
MOV P0 %D0
GetRepairCost 1
MOV D1 %P9
MOV P1 %D1
GetRepairCost 3
MOV D2 %P9
MOV P2 %D2
GetRepairCost 4
MOV D3 %P9
MOV P3 %D3
GetRepairCost 5
MOV D4 %P9
MOV P4 %D4
GetRepairCost 6
MOV D5 %P9
MOV P5 %D5
GetRepairCost 7
MOV D6 %P9
MOV P6 %D6
GetRepairCost 8
MOV D7 %P9
MOV P7 %D7
GetRepairCost 10
MOV D8 %P9
MOV P8 %D8
INC P1 %P0
INC P2 %P1
INC P3 %P2
INC P4 %P3
INC P5 %P4
INC P6 %P5
INC P7 %P6
INC P8 %P7
MOV P1 %P8
MOV P2 5
MUL P1 P2
MOV D9 %P9

#IF
CHECKGOLD %D9
#ACT
TAKE Gold %D9
RepairItem 0
RepairItem 1
RepairItem 3
RepairItem 4
RepairItem 5
RepairItem 6
RepairItem 7
RepairItem 8
RepairItem 10
#SAY
{FCOLOR/14}Repairs Completed{FCOLOR/12}!\\
<[ Back ]/@main>\
<[ Exit ]/@exit>\
#ELSESAY
{FCOLOR/14} Not Enough Gold!{FCOLOR/12}!\\
<[ Back ]/@main>\
<[ Exit ]/@exit>\

}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;