;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@allplgmyp]
{
#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
<金创药（中）     [价格220]/@goumaiy(金创药（中）,550)>\
<魔法药（中）     [价格220]/@goumaiy(魔法药（中）,550)>\
<金创药（大）     [价格550]/@goumaiy(金创药（大）,550)>\
<魔法药（大）     [价格550]/@goumaiy(魔法药（大）,550)>\
<金创药（特）     [价格1375]/@goumaiy(金创药（特）,1375)>\
<魔法药（特）     [价格1375]/@goumaiy(魔法药（特）,1375)>\
<太阳水           [价格550]/@goumaiy(太阳水,550)>\
<强效太阳水       [价格1100]/@goumaiy(强效太阳水,1100)>\
<清心丸(中)       [价格660]/@goumaiy(清心丸(中),660)>\
<急救丸(中)       [价格660]/@goumaiy(急救丸(中),660)>\
<清心丸(大)       [价格1980]/@goumaiy(清心丸(大),1980)>\
<急救丸(大)       [价格1980]/@goumaiy(急救丸(大),1980)>\
<清心丸(特)       [价格3850]/@goumaiy(清心丸(特),3850)>\
<急救丸(特)       [价格4620]/@goumaiy(急救丸(特),4620)>\
<万年雪霜	  [价格2200]/@goumaiy(万年雪霜,2200)>\
<离开/@exit>

[@goumaiy()]
#IF
checkbaggage
#ACT
Mov  A3     %ARG(1)           ;;物品
Mov  D3     %ARG(2)           ;;金钱
#SAY 
请输入你想要购买的{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}数量：\
<输入购买数量/@@数量>(一次购买最多200个)\
<返回/@allplgmyp> 

#ELSESAY
注意你的背包是否有空余，否则东西掉地上我不负责的.\
<返回/@allplgmyp>


[@@数量] 
#IF
#ACT
mov  D4  %INPUTSTR
Mov  S1  3
#IF 
Small D4 1 
#SAY 
您要买多少个{FCOLOR/10} <$OUTPUT(A3)> {FCOLOR/12}？\\ 
请输入数值 {FCOLOR/10}1 至 200{FCOLOR/1}\
<返回/@allplgmyp>\
#ACT 
break 

#IF 
Large D4 200 
#SAY 
一次购买物品的最大数量为{FCOLOR/10} 200 {FCOLOR/12}个！\\ 
<返回/@allplgmyp>\
#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} 的价格是：{FCOLOR/10} <$OUTPUT(D2)> {FCOLOR/12}金币.\
注意你的背包是否有空余，否则东西掉地上我不负责的.\
<确定购买/@进行购买>\
<<返回/@allplgmyp>>\
#ACT 
break


[@进行购买]
#IF
equal   S1  3
checkgold   %D2
#ACT
give   %A3  %D4
take  金币  %D2
Mov    S1  0
#SAY
购买成功！\
您花了 {FCOLOR/10}<$OUTPUT(D2)> {FCOLOR/12}金币，购买了 {FCOLOR/10}<$OUTPUT(D4)>{FCOLOR/12} 个 {FCOLOR/10}<$OUTPUT(A3)>{FCOLOR/12} .\\
<<返回/@allplgmyp>\

#ELSESAY
您没有 {FCOLOR/10}<$OUTPUT(D2)>{FCOLOR/12} 金币，我无法买给你 {FCOLOR/10}<$OUTPUT(D4)>{FCOLOR/12} 个 {FCOLOR/10}<$OUTPUT(A3)> {FCOLOR/12}.\\
<返回/@allplgmyp>\
<离开/@exit>\ \
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;