All In One Special Repair

Join Discord

LightningStar

LOMCN Veteran
Veteran
Loyal Member
May 28, 2007
408
7
65
Essex, UK
Hiya,

I was just wondering if anyone would share how to repair all items at once instead of repairing them one by one because it gets annoying.

Any help will be much appriciated.

Thanks in advance
 

Falador

Dedicated Member
Dedicated Member
May 13, 2007
221
1
64
I experimented with that for that and it functions, unfortunately the NPc deducts you only 1 gold instead of the Calculated Amount vllt have somebody ne idea?




;;
[@main]
#if
checkpkpoint 2
#elsesay
Hallo, waehle deine Sprache aus.\
Hello, choose your language.\
<Deutsch/@german>\
<english/@english>\
<exit/@exit>
#act
mapmove 81 127 266

[@german]
#if
#say
Hallo,ich bin ein Meister der repaeratur,\
ich kann dir deine ganze Ausrüsung die du\
am Koerper traegst reparieren, gegen eine\
Gebuehr natuerlich.\\
<Repariere alles,bitte./@rep>\
<Nein Danke./@exit>\
[@rep]
#if
#ACT
GetRepairCost 0
Mov P1 %P9 ;Stores the Value of P9 (Repair Cost) in the Variable P1
GetRepairCost 1
Inc P1 %P9 ;Increments (Adds) the Value of P9 to P1
GetRepairCost 3
Inc P1 %P9
GetRepairCost 4
Inc P1 %P9
GetRepairCost 5
Inc P1 %P9
GetRepairCost 6
Inc P1 %P9
GetRepairCost 7
Inc P1 %P9
GetRepairCost 8
Inc P1 %P9
GetRepairCost 10
Inc P1 %P9
#SAY
Die reperatur kostet dich <$OUTPUT(P1)>\ ;Shows the value of P1
Moechtest du reparieren?\
<Ja bitte repariere/@check>\
<exit/@exit>\

[@check]
#if
checkgold %P1
#ACT
RepairItem 0 ;Armour
RepairItem 1 ;Waffe
RepairItem 3 ;Necklace
RepairItem 4 ;Helm
RepairItem 5 ;Brace links
RepairItem 6 ;Brace rechts
RepairItem 7 ;Ring links
RepairItem 8 ;Ring rechts
RepairItem 10 ;Boots
take gold %P1
#SAY
Es ist nun alles repariert,bis zum naechstenmal.\
\
(Deine Ausruestung am Koerper ist repariert!)\\
<exit/@exit>\
#elsesay
Du hast nicht genug Gold bei dir.\\
<Exit/@exit>\
[@english]
#if
#say
Hello,i am a Master of the repair,\
I can your whole Kit the at on you\
body carry repair, against for\
a Price.\\
<repair all,pls./@rep1>\
<no thanks./@exit>\
[@rep1]
#if
#ACT
GetRepairCost 0
Mov P1 %P9 ;Stores the Value of P9 (Repair Cost) into the variables P1
GetRepairCost 1
Inc P1 %P9 ;Increments (Adds) the Value of P9 to P1
GetRepairCost 3
Inc P1 %P9
GetRepairCost 4
Inc P1 %P9
GetRepairCost 5
Inc P1 %P9
GetRepairCost 6
Inc P1 %P9
GetRepairCost 7
Inc P1 %P9
GetRepairCost 8
Inc P1 %P9
GetRepairCost 10
Inc P1 %P9
#SAY
This wants cost you <$OUTPUT(P1)>\ ;Shows the value of P1
Do you want to repair?\\
<Yes/@check1>\
<Exit/@exit>\

[@check1]
#if
checkgold %P1
#say
(youre Kit on youre Body ist repaired!)
#ACT
RepairItem 0 ;Armour
RepairItem 1 ;Waffe
RepairItem 3 ;Necklace
RepairItem 4 ;Helm
RepairItem 5 ;Brace links
RepairItem 6 ;Brace rechts
RepairItem 7 ;Ring links
RepairItem 8 ;Ring rechts
RepairItem 10 ;Boots
take gold %P1
#SAY
It is now all repair,cya with again.\\
<Exit/@exit>\
#elsesay
You havent enought Gold!\\
<Exit/@exit>\
 
Upvote 0

chimera

LOMCN VIP
VIP
Jul 30, 2003
1,054
23
235
UK
To get repair Cost:

#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

therefore total repair cost is D9
 
Upvote 0