Becouse donot run...

[jonathan508]

I create this script, i want this script repair items... but he detect
1/33 dura exp and script detect money need use in repair especial

this is codec


[@SpecialRepairitem]
#SAY
Please Select which Item you want repaired. \
\
< Armour/@SRepairFunc(0)> | < Helmet/@SRepairFunc(4)> \
< Necklace/@SRepairFunc(3)> | < Shoes/@SRepairFunc(10)> \
< Bracelet

/@SRepairFunc(5)> | < Bracelt

/@SRepairFunc(6)> \
< Ring

/@SRepairFunc(7)> | < Ring

/@SRepairFunc(8)> \
\
< Back/@main> | < Exit/@exit>
[@SRepairFunc()]
#ACT
mov P0 %ARG()
GetRepairCost %P0
#IF
small P9 0
#ACT
break
#IF
CheckGold %P9
#ACT
mov D0 %P0
mov D1 %P9
#say
El coste es de : <$OUTPUT(P9)> Reparar el item?\
<si/@si> <no/@exit>
[@si]
#ACT
GetRepairCost %D0
#IF
Equal D1 %P9
#ACT

RepairItem %D0
Take Gold %P9

#say
Tu item ha sido reparado.\
<Quiero reparar otro item/@specialrepairitem> <Salir/@exit>
#elsesay
No tienes suficiente dinero o eres tonto\


beacouse no run? Since I can do that it repairs everything at one stroke and calculates the total price?​

 

[chimera]

Not my work but works perfectly:

#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 D9 %P8

#IF
checkgold %D9
#ACT
goto @chimerarepnow
#ELSESAY
You need at least <$output(%D9)>, You don't have enough.\\
<EXIT/@exit>

[@chimerarepnow]
#IF
#ACT
RepairItem 0
RepairItem 1
RepairItem 3
RepairItem 4
RepairItem 5
RepairItem 6
RepairItem 7
RepairItem 8
RepairItem 10
Take Gold %D9
#Say
All Repaired.\\
<EXIT/@exit>
;;Spec repair all script supplied by Mick aka IdabigA aka Sting

 

[jonathan508]

ty jejeje