(@@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>\ 
以上是另类砍小小猪元宝捐献升级脚本,希望对你有所帮助,本文由传奇私服服务端站长呕心沥血独家撰写,致力于帮助更多新手GM轻松玩转传奇,转载请留链接,谢谢合作!  |