传奇另类砍小小猪元宝捐献升级脚本

(@@InPutInteger@@InPutString)
[@main]
我是一只小小小小猪...却想跑也跑不了...\
天天被人追着砍、如今想想反正被追着砍...\
还不如收点元宝过小日子只要你给的起元宝\
我就给的起经验你元宝给的越多砍我附加经验越高.\
比例:1000元宝=每砍一下猪多附加30W经验...\
每小时清理一次你捐款的元宝...你当前元宝为：<$GAMEGOLD>颗\\
<我这就给你元宝让我砍吧!/@@InPutInteger10>　　<没米下次再捐吧/@exit>\\
<$USERNAME><你当前总捐款元宝数量是：/SCOLOR=254><$HUMAN(捐款经验元宝数量)>颗\
<$USERNAME><你当前砍猪附加经验是：/SCOLOR=254><$HUMAN(元宝捐款经验)>

[@InPutInteger10]
#IF
EQUALN100
#ACT
MESSAGEBOX输入数据等于0，请重新输入。
break

#IF
CHECKLEVELEX>214
#ACT
MESSAGEBOX[提示]：你等级大于215级无法在捐款！
BREAK

#IF
SMALLN101000
#ACT
MESSAGEBOX[提示]：输入醉少要1000元宝。
BREAK

#IF
LARGEN10100000
#ACT
MESSAGEBOX[提示]：输入不能超过10W元宝。
BREAK

#IF
CHECKVARHUMAN捐款经验元宝数量>499000
#ACT
MESSAGEBOX[提示]：你捐款经验元宝数量大于50万无法在捐款！
BREAK

#IF
CHECKGAMEGOLD><$STR(N10)>
CHECKVARHUMAN元宝捐款经验<100000000
#ACT
GAMEGOLD-<$STR(N10)>
CALCVARHUMAN捐款经验元宝数量+<$STR(N10)>
SAVEVARHUMAN捐款经验元宝数量..\QuestDiary\元宝捐款\元宝捐款经验S呵呵e.txt
MULN11<$STR(N10)>300
CALCVARHUMAN元宝捐款经验+<$STR(N11)>
SAVEVARHUMAN元宝捐款经验..\QuestDiary\元宝捐款\元宝捐款经验S呵呵e.txt
SendCenterMsg2230[小猪告白]：恭喜(<$USERNAME>)用<$STR(N10)>元宝附加了砍猪<$STR(N11)>经验！110
SENDMSG0[小猪告白]：恭喜(<$USERNAME>)用<$STR(N10)>元宝附加了砍猪<$STR(N11)>经验！
SENDMSG0[小猪告白]：恭喜(<$USERNAME>)用<$STR(N10)>元宝附加了砍猪<$STR(N11)>经验！
GOTO@main
break
#ELSESAY
\\
对不起，您身上没有<$STR(N10)>以上的元宝~\
或者你的捐款经验数量已超过啦！！！\
你可别想从我这里作弊。\\
　　　　　<关闭对话框/@exit>\