【芝麻GM论坛】传奇私服脚本系列-另类砍小小猪元宝捐献升级脚本

syrqh

	(@@InPutInteger @@InPutString ) [@main] 我是一只小小小小猪...却想跑也跑不了...\ 天天被人追着砍、如今想想,反正被追着砍...\ 还不如收点元宝过小日子,只要你给的起元宝,\ 我就给的起经验,你元宝给的越多砍我附加经验越高.\ 比例:1000元宝=每砍一下猪多附加30W经验...\ 每小时清理一次你捐款的元宝...你当前元宝为：<$GAMEGOLD> 颗\ \ <我这就给你元宝让我砍吧!/@@InPutInteger10>　　<没钱,下次再捐吧 /@exit>\ \ <$USERNAME><你当前总捐款元宝数量是：/SCOLOR=254><$HUMAN(捐款经验元宝数量)> 颗\ <$USERNAME><你当前砍猪附加经验是：/SCOLOR=254><$HUMAN(元宝捐款经验)> [@InPutInteger10] #IF EQUAL N10 0 #ACT MESSAGEBOX 输入数据等于0，请重新输入。 break #IF CHECKLEVELEX > 214 #ACT MESSAGEBOX [提示]：你等级大于215级无法在捐款！ BREAK #IF SMALL N10 1000 #ACT MESSAGEBOX [提示]：输入最少要1000元宝。 BREAK #IF LARGE N10 100000 #ACT MESSAGEBOX [提示]：输入不能超过10W元宝。 BREAK #IF CHECKVAR HUMAN 捐款经验元宝数量 > 499000 #ACT MESSAGEBOX [提示]：你捐款经验元宝数量大于50万无法在捐款！ BREAK #IF CHECKGAMEGOLD > <$STR(N10)> CHECKVAR HUMAN 元宝捐款经验 < 100000000 #ACT GAMEGOLD - <$STR(N10)> CALCVAR HUMAN 捐款经验元宝数量 + <$STR(N10)> SAVEVAR HUMAN 捐款经验元宝数量 ..\QuestDiary\元宝捐款\元宝捐款经验Save.txt MUL N11 <$STR(N10)> 300 CALCVAR HUMAN 元宝捐款经验 + <$STR(N11)> SAVEVAR HUMAN 元宝捐款经验 ..\QuestDiary\元宝捐款\元宝捐款经验Save.txt SendCenterMsg 223 0 [小猪告白]：恭喜(<$USERNAME>)用<$STR(N10)>元宝附加了砍猪<$STR(N11)>经验！ 1 10 SENDMSG 0 [小猪告白]：恭喜(<$USERNAME>)用<$STR(N10)>元宝附加了砍猪<$STR(N11)>经验！ SENDMSG 0 [小猪告白]：恭喜(<$USERNAME>)用<$STR(N10)>元宝附加了砍猪<$STR(N11)>经验！ GOTO @main break #ELSESAY \ \ 对不起，您身上没有<$STR(N10)>以上的元宝~\ 或者你的捐款经验数量已超过啦！！！\ 你可别想从我这里作弊。\ \ 　　　　　<关闭对话框/@exit>\