;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@suishenNPC]
{
#IF
#ACT
MOV D9 0
#SAY
Welcome you to use along with NPC, this service needs integral 50!\
Along with NPC can purchase the drugs, especially repairs the  equipment and the use integral manages!\
<I must use/@Ҫʹ>\
<Exit/@exit>

[@Ҫʹ]
#IF
equal D9 1
#SAY
Do you have to do what?\
<Purchase drugs/@ҩƷ>\
<Repairs equips/@װ>\
<Eliminates red/@>\
<Return/@Ҫʹ>
#ACT
break

#IF
HLSCRIPTCMD CHECKPOINT 50
#ACT
HLSCRIPTCMD SETPOINT - 50
mov D9 1
#SAY
Do you have to do what?\
<Purchase drugs/@ҩƷ>\
<Repairs equips/@װ>\
<Eliminates red/@>\
<Return/@Ҫʹ>
#ELSESAY
Your integral is insufficient, but also remains {FCOLOR/1}<$HLPOINT>{FCOLOR/12} Points.\

[@ҩƷ]
#if
#act
Mov  A3  0
Mov  D3  0
Mov  D4  0
Mov  D2  0
MOV  D5  0
MOV  N1  0
Mov  S1  0
MOV  D0  0
#SAY
<HPPotion(M)     [Price 220]/@goumaiy1(HPPotion(M),550)>\
<MPPotion(M)     [Price 220]/@goumaiy1(MPPotion(M),550)>\
<HPPotion(L)     [Price 550]/@goumaiy1(HPPotion(L),550)>\
<MPPotion(L)     [Price 550]/@goumaiy1(MPPotion(L),550)>\
<HPPotion(XL)     [Price 1375]/@goumaiy1(HPPotion(XL),1375)>\
<MPPotion(XL)     [Price 1375]/@goumaiy1(MPPotion(XL),1375)>\
<SunPotion(S)           [Price 550]/@goumaiy1(SunPotion(S),550)>\
<SunPotion(M)       [Price 1100]/@goumaiy1(SunPotion(M),1100)>\
<MagicPill(M)       [Price 660]/@goumaiy1(MagicPill(M),660)>\
<LifePill(M)       [Price 660]/@goumaiy1(LifePill(M),660)>\
<MagicPill(L)       [Price 1980]/@goumaiy1(MagicPill(L),1980)>\
<LifePill(L)       [Price 1980]/@goumaiy1(LifePill(L),1980)>\
<MagicPill(XL)       [Price 3850]/@goumaiy1(MagicPill(XL),3850)>\
<LifePill(XL)      [Price 4620]/@goumaiy1(LifePill(XL),4620)>\
<Ginseng	  [Price 2200]/@goumaiy1(Ginseng,2200)>\
<Return/@Ҫʹ>

[@goumaiy1()]
#IF
checkbaggage
#ACT
Mov  A3     %ARG(1)           ;;Ʒ
Mov  D3     %ARG(2)           ;;Ǯ
#SAY 
Please inputs you wants to purchase{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}Quantity:\
<Input purchase quantity/@@1>(Between 1 & 200)\
<Return/@Ҫʹ> 
#ELSESAY
Pays attention your knapsack whether has spatially extra, otherwise  the thing falls above me not responsible.\
<Return/@Ҫʹ>


[@@1] 
#IF
#ACT
mov  D4  %INPUTSTR
Mov  S1  3
#IF 
Small D4 1 
#SAY 
Do you have to buy how many{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}\\ 
Please inputs the value between {FCOLOR/10}1 & 200{FCOLOR/1}\
<Return/@Ҫʹ>\
#ACT 
break 

#IF 
Large D4 200 
#SAY 
One purchase goods greatest quantity is{FCOLOR/10} 200 {FCOLOR/12}.\\ 
<Return/@Ҫʹ>\
#ACT 
break 

#IF
#ACT
MOV P1 %D3
MOV P2 %D4
MUL P1 P2
MOV D2 %P9

#IF 
#SAY 
_{FCOLOR/10}<$OUTPUT(D4)>{FCOLOR/12} - {FCOLOR/10}<$OUTPUT(A3)>{FCOLOR/12} Price is: {FCOLOR/10} <$OUTPUT(D2)> {FCOLOR/12}Gold coin.\
Pays attention your knapsack whether has spatially extra, otherwise  the thing falls above me not responsible.\
<Purchase/@й1>\
<Return/@Ҫʹ>\
#ACT 
break


[@й1]
#IF
equal D9 1
equal   S1  3
checkgold   %D2
#ACT
give   %A3  %D4
take  Gold  %D2
Mov    S1  0
#SAY
Purchases successfully!\
You spend {FCOLOR/10}<$OUTPUT(D2)> {FCOLOR/12}gold coin, purchased {FCOLOR/10}<$OUTPUT(D4)>{FCOLOR/12} - {FCOLOR/10}<$OUTPUT(A3)>{FCOLOR/12}.\
<Return/@Ҫʹ>\

#ELSESAY
You {FCOLOR/10}<$OUTPUT(D2)>{FCOLOR/12} The gold coin, I am unable to buy for you {FCOLOR/10}<$OUTPUT(D4)>{FCOLOR/12} - {FCOLOR/10}<$OUTPUT(A3)> {FCOLOR/12}.\
<Return/@Ҫʹ>\


[@װ]
#IF
equal D9 1
#ACT
HLSCRIPTCMD KINGSREPAIR 0
HLSCRIPTCMD KINGSREPAIR 1
HLSCRIPTCMD KINGSREPAIR 3
HLSCRIPTCMD KINGSREPAIR 4
HLSCRIPTCMD KINGSREPAIR 5
HLSCRIPTCMD KINGSREPAIR 6
HLSCRIPTCMD KINGSREPAIR 7
HLSCRIPTCMD KINGSREPAIR 8
HLSCRIPTCMD KINGSREPAIR 10
#SAY
Your equipment already completely especially fixed, please went down  has a look!\
<Return/@Ҫʹ>\
#ELSESAY
................\


[@]
#IF
#SAY
Wants clear red?\
100 integrals may eliminate 100 pk value\
<Clear Red/@StartClearPK>\
<Return/@Ҫʹ>\

[@StartClearPK]
#IF
checkpkpoint 2
#SAY
Wants clear red?\
{FCOLOR/10}This service needs the integral oh!{FCOLOR/12}\
{FCOLOR/10}100 integrals may eliminate 100 pk value!{FCOLOR/12}\
<Clear 100 PK Points/@clear100pk>\   
<Return/@Ҫʹ>\
#elsesay
{FCOLOR/12}Your not red, needs not to eliminate.{FCOLOR/12}\
<Return/@Ҫʹ>\

[@clear100pk]
#IF
equal D9 1
HLSCRIPTCMD CHECKPOINT 100
#ACT
HLSCRIPTCMD CHANGEPKVALUE - 100
HLSCRIPTCMD SETPOINT - 100   
#SAY
{FCOLOR/10}Already eliminated 100 PK value.{FCOLOR/12}\
You at present the integral is: {FCOLOR/1}<$HLPOINT>{FCOLOR/12} Points\
<Clear 100 PK Points/@clear100pk>\
<Return/@Ҫʹ>\
#elsesay
Your integral is insufficient, but also remains {FCOLOR/1}<$HLPOINT> Points.\
<Return/@Ҫʹ>\
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;