兑换灵符脚本

传奇服务端

[@能量兑换]
{
#if
#act
mov p6 0
mov p3 300
#say
能量兑换标准。1个元宝可以用以能量兑换一张灵符，\
我也可以把你传送到天庭将你的能量点能量兑换成灵符；\
能量兑换标准：300能量点可以用以能量兑换一张灵符，\
如您进行灵符的能量兑换，则说明您已经同意以上能量兑换规则。\
<查询灵符/@chaxun>\
你还没有能量兑换灵符。\
<加一张/@zjyi> <加五张/@zjwu> <加十张/@zjshi>　　　　<减一张/@jsyi> <减五张/@jswu> <减十张/@jsshi>\
<确定使用元宝能量兑换/@yesdh>　　　　　　<任意能量兑换灵符/@@InPutInteger6>　　　　　<返回/@main>
[@yesdh]
你还没有选择要能量兑换的灵符数量！\ \
<返回/@能量兑换>

[@dhyi]
能量兑换标准。1个元宝可以用以能量兑换一张灵符，\
我也可以把你传送到天庭将你的能量点能量兑换成灵符；\
能量兑换标准：500能量点可以用以能量兑换一张灵符，\
如您进行灵符的能量兑换，则说明您已经同意以上能量兑换规则。\
<查询灵符/@chaxun>\
你打算能量兑换：<$str(p6)>张灵符。\
<加一张/@zjyi> <加五张/@zjwu> <加十张/@zjshi>　　　　<减一张/@jsyi> <减五张/@jswu> <减十张/@jsshi>\
<确定使用能量兑换/@yesdh1>　　　　　　<任意能量兑换灵符/@@InPutInteger6>　　　　　<返回/@main>

[@zjyi]
#act
inc P6 1
break
goto @jinxing
[@zjwu]
#act
inc P6 5
break
goto @jinxing
[@zjshi]
#act
inc P6 10
break
goto @jinxing
[@jsyi]
#if
large p6 0
#act
dec P6 1
break
goto @jinxing
#elseact
mov p6 0
break
goto @jinxing
[@jswu]
#if
large p6 4
#act
dec P6 5
break
goto @jinxing
#elseact
mov p6 0
break
goto @jinxing
[@jsshi]
#if
large p6 9
#act
dec P6 10
break
goto @jinxing
#elseact
mov p6 0
break
goto @jinxing
[@@InPutInteger6]
#ACT
DELAYGOTO 1 ~InPutInteger6
[~InPutInteger6]
#ACT
MOV P6 <$str(N6)>
break
goto @jinxing

[@yesdh1]
#ACT
MUL N7 <$str(P6)> <$str(P4)>
DEC N7 1
GOTO @yesdh3
[@yesdh3]
#IF
CHECKGAMEPOINT > N7
#ACT
GAMEPOINT - <$STR(N7)>
GAMEGIRD + <$STR(P6)>
SENDMSG 6 交易成功！您当前的灵符数量为：<$GAMEGIRD>个
break
goto @能量兑换
#ELSEACT
SENDMSG 6 [失败]：你帐号中的能量点不够
break
goto @能量兑换
}