脚本无错,自己可以修改或者添加,复制粘贴自由发挥你的想象力吧!
[@main]
如果你有够多的元宝可以申请元宝首富.\
申请首富只记录你的元宝数量并不会扣除你的元宝.<首富有什么好处?/@hc>\
申请首富成功后可以获得[首富封号+龙行靴]\
<龙行靴:防御10-10魔御10-10攻击10-10魔法10-10道术10-10>\
<该靴只能首富才能佩戴其他人无法佩戴.>\
假如首富已被申请你的元宝数量多于他你便可以顶替他.\
<每天每人限3次机会哦每次砸或扔一次有500万经验奖励./AUTOCOLOR=250253254241>\
<申请首富/@sq><显示封号/@xhm><隐藏封号/@ycfhm>【<砸鲜花/@赠鲜花>】【<扔鸡蛋/@仍鸡蛋>】\
元宝首富:<$STR(A9)> 元宝数量:<$STR(G7)> 被砸鲜花:<$STR(G269)> 被扔鸡蛋:<$STR(G270)>\\
[@hc]
\
1:首富可以获得[龙行靴]\
<龙行靴:防御10-10魔御10-10攻击10-10魔法10-10道术10-10>\\
2:当别人给你砸鲜花扔鸡蛋都将获得100万50万经验享受.\\
<如果你是首富请尽量保持在线享受额外经验享受>\\
<返回上页/@main>\
[@赠鲜花]
#if
equalG2710
#ACT
MESSAGEBOX暂无首富不能砸鲜花哦!
BREAK
#if
checklevelex<47
#ACT
MESSAGEBOX您的等级可能不足47级,不能参与此功能!
BREAK
#if
CHECKVARHUMAN鲜花鸡蛋>0
#act
GOTO@xianhua
INCG2691
CHANGEEXP+5000000
CALCVARHUMAN鲜花鸡蛋-1
SAVEVARHUMAN鲜花鸡蛋..\QuestDiary\数据文件\鲜花鸡蛋Save.txt
ADDNAMELIST..\QuestDiary\数据文件\鲜花鸡蛋名单.txt
SETWEATHEREFFECT3215
GuildNoticeMsg1510〖%s〗给元宝首富〖<$STR(A9)>〗砸了1次鲜花获得500万经验奖励!
GuildNoticeMsg1510首富〖<$STR(A9)>〗被砸1次鲜花获得100万经验奖励谢谢大家支持!
DelayCall100@79花
DelayCall500@80花
DelayCall1000@81花
DelayCall1500@82花
DelayCall2000@83花
DelayCall2500@86花
GOTO@main
break
#ELSEACT
MessageBOX你今天3次已用完明天在来吧!
[@79花]
#ACT
GMEXECUTESHOWEFFECT79
[@80花]
#ACT
GMEXECUTESHOWEFFECT80
[@81花]
#ACT
GMEXECUTESHOWEFFECT81
[@82花]
#ACT
GMEXECUTESHOWEFFECT82
[@83花]
#ACT
GMEXECUTESHOWEFFECT83
[@86花]
#ACT
GMEXECUTESHOWEFFECT86
[@仍鸡蛋]
#if
equalG2710
#ACT
MESSAGEBOX暂无首富不能仍鸡蛋哦!
BREAK
#if
checklevelex<47
#ACT
MESSAGEBOX您的等级可能不足47级,不能参与此功能!
BREAK
#if
CHECKVARHUMAN鲜花鸡蛋>0
#act
GOTO@jidan
INCG2701
CHANGEEXP+5000000
CALCVARHUMAN鲜花鸡蛋-1
SAVEVARHUMAN鲜花鸡蛋..\QuestDiary\数据文件\鲜花鸡蛋Save.txt
ADDNAMELIST..\QuestDiary\数据文件\鲜花鸡蛋名单.txt
SETWEATHEREFFECT3310
GuildNoticeMsg1510〖%s〗给元宝首富〖<$STR(A9)>〗仍了1次鸡蛋获得500万经验奖励!
GuildNoticeMsg1510首富〖<$STR(A9)>〗被仍1次鸡蛋获得50万经验奖励敢不敢送砸鲜花!
GMEXECUTESHOWEFFECT78
GMEXECUTESHOWEFFECT79
GMEXECUTESHOWEFFECT80
GMEXECUTESHOWEFFECT81
GMEXECUTESHOWEFFECT82
GMEXECUTESHOWEFFECT83
GMEXECUTESHOWEFFECT84
GMEXECUTESHOWEFFECT87
GOTO@main
break
#ELSEACT
MessageBOX你今天3次已用完明天在来吧!
[@sq]
#if
checkgamegold><$STR(G7)>
#act
MOVS12<$STR(A9)>
movA9<$USERNAME>
movG7<$GAMEGOLD>
movA2<$DATETIME>
CLEARNAMELISTsj\.txt
ADDNAMELISTsj\.txt
MOVG2690
movG2700
MOVG2711
movA70元宝数量<$GAMEGOLD>\↘本区元宝首富↙\<$USERNAME>
GMEXECUTEzgfzz龙行靴
SENDMSG0【公告】%s成功申请为本区的元宝首富[名誉与经验双收].
SENDMSG0【公告】%s成功申请为本区的元宝首富[名誉与经验双收].
SENDMSG7恭喜你申请成为本区的元宝首富获得奖励[龙行靴].
messagebox建议您时刻保持在线可获得砸鲜花扔鸡蛋经验额外享受.
goto@zdej
S12.SENDMSG7提示:你的首富称号已经被别人抢去.
S12.SENDMSG7提示:你被迫下线重新登陆.
S12.kick
movS120
#elseact
messagebox你的元宝数量无法申请.
[@xhm]
#IF
checklevelex>34
checkNAMELISTsj\.txt
#act
movG01
SETRANKLEVELNAME%s\┠元宝首富┨
messagebox封号显示成功
#elseact
SENDMSG7首富35级才可以显示封号.
close
[@ycfhm]
#IF
checkNAMELISTsj\.txt
#act
movG00
SETRANKLEVELNAME%s\
messagebox封号隐藏成功
#elseact
SENDMSG7你无权使用.
close
[@xianhua]
#IF
#act
MOVS12<$STR(A9)>
#IF
SMALLG210100
CheckOnline<$STR(A9)>
#act
INCG2101
S12.CHANGEEXP+1000000
S12.SENDMSG7首富:有人给您砸了一次鲜花您获得100万经验.
S12.SendCenterMsg2500首富:有人给您砸了一次鲜花您获得100万经验.06
break
[@jidan]
#IF
#act
MOVS12<$STR(A9)>
#IF
SMALLG210100
CheckOnline<$STR(A9)>
#act
INCG2101
S12.CHANGEEXP+500000
S12.SENDMSG7首富:有人给您扔了一次鸡蛋您获得50万经验.
S12.SendCenterMsg2500首富:有人给您扔了一次鸡蛋您获得50万经验.06
break
[@main]
如果你有够多的元宝可以申请元宝首富.\
申请首富只记录你的元宝数量并不会扣除你的元宝.<首富有什么好处?/@hc>\
申请首富成功后可以获得[首富封号+龙行靴]\
<龙行靴:防御10-10魔御10-10攻击10-10魔法10-10道术10-10>\
<该靴只能首富才能佩戴其他人无法佩戴.>\
假如首富已被申请你的元宝数量多于他你便可以顶替他.\
<每天每人限3次机会哦每次砸或扔一次有500万经验奖励./AUTOCOLOR=250253254241>\
<申请首富/@sq><显示封号/@xhm><隐藏封号/@ycfhm>【<砸鲜花/@赠鲜花>】【<扔鸡蛋/@仍鸡蛋>】\
元宝首富:<$STR(A9)> 元宝数量:<$STR(G7)> 被砸鲜花:<$STR(G269)> 被扔鸡蛋:<$STR(G270)>\\
[@hc]
\
1:首富可以获得[龙行靴]\
<龙行靴:防御10-10魔御10-10攻击10-10魔法10-10道术10-10>\\
2:当别人给你砸鲜花扔鸡蛋都将获得100万50万经验享受.\\
<如果你是首富请尽量保持在线享受额外经验享受>\\
<返回上页/@main>\
[@赠鲜花]
#if
equalG2710
#ACT
MESSAGEBOX暂无首富不能砸鲜花哦!
BREAK
#if
checklevelex<47
#ACT
MESSAGEBOX您的等级可能不足47级,不能参与此功能!
BREAK
#if
CHECKVARHUMAN鲜花鸡蛋>0
#act
GOTO@xianhua
INCG2691
CHANGEEXP+5000000
CALCVARHUMAN鲜花鸡蛋-1
SAVEVARHUMAN鲜花鸡蛋..\QuestDiary\数据文件\鲜花鸡蛋Save.txt
ADDNAMELIST..\QuestDiary\数据文件\鲜花鸡蛋名单.txt
SETWEATHEREFFECT3215
GuildNoticeMsg1510〖%s〗给元宝首富〖<$STR(A9)>〗砸了1次鲜花获得500万经验奖励!
GuildNoticeMsg1510首富〖<$STR(A9)>〗被砸1次鲜花获得100万经验奖励谢谢大家支持!
DelayCall100@79花
DelayCall500@80花
DelayCall1000@81花
DelayCall1500@82花
DelayCall2000@83花
DelayCall2500@86花
GOTO@main
break
#ELSEACT
MessageBOX你今天3次已用完明天在来吧!
[@79花]
#ACT
GMEXECUTESHOWEFFECT79
[@80花]
#ACT
GMEXECUTESHOWEFFECT80
[@81花]
#ACT
GMEXECUTESHOWEFFECT81
[@82花]
#ACT
GMEXECUTESHOWEFFECT82
[@83花]
#ACT
GMEXECUTESHOWEFFECT83
[@86花]
#ACT
GMEXECUTESHOWEFFECT86
[@仍鸡蛋]
#if
equalG2710
#ACT
MESSAGEBOX暂无首富不能仍鸡蛋哦!
BREAK
#if
checklevelex<47
#ACT
MESSAGEBOX您的等级可能不足47级,不能参与此功能!
BREAK
#if
CHECKVARHUMAN鲜花鸡蛋>0
#act
GOTO@jidan
INCG2701
CHANGEEXP+5000000
CALCVARHUMAN鲜花鸡蛋-1
SAVEVARHUMAN鲜花鸡蛋..\QuestDiary\数据文件\鲜花鸡蛋Save.txt
ADDNAMELIST..\QuestDiary\数据文件\鲜花鸡蛋名单.txt
SETWEATHEREFFECT3310
GuildNoticeMsg1510〖%s〗给元宝首富〖<$STR(A9)>〗仍了1次鸡蛋获得500万经验奖励!
GuildNoticeMsg1510首富〖<$STR(A9)>〗被仍1次鸡蛋获得50万经验奖励敢不敢送砸鲜花!
GMEXECUTESHOWEFFECT78
GMEXECUTESHOWEFFECT79
GMEXECUTESHOWEFFECT80
GMEXECUTESHOWEFFECT81
GMEXECUTESHOWEFFECT82
GMEXECUTESHOWEFFECT83
GMEXECUTESHOWEFFECT84
GMEXECUTESHOWEFFECT87
GOTO@main
break
#ELSEACT
MessageBOX你今天3次已用完明天在来吧!
[@sq]
#if
checkgamegold><$STR(G7)>
#act
MOVS12<$STR(A9)>
movA9<$USERNAME>
movG7<$GAMEGOLD>
movA2<$DATETIME>
CLEARNAMELISTsj\.txt
ADDNAMELISTsj\.txt
MOVG2690
movG2700
MOVG2711
movA70元宝数量<$GAMEGOLD>\↘本区元宝首富↙\<$USERNAME>
GMEXECUTEzgfzz龙行靴
SENDMSG0【公告】%s成功申请为本区的元宝首富[名誉与经验双收].
SENDMSG0【公告】%s成功申请为本区的元宝首富[名誉与经验双收].
SENDMSG7恭喜你申请成为本区的元宝首富获得奖励[龙行靴].
messagebox建议您时刻保持在线可获得砸鲜花扔鸡蛋经验额外享受.
goto@zdej
S12.SENDMSG7提示:你的首富称号已经被别人抢去.
S12.SENDMSG7提示:你被迫下线重新登陆.
S12.kick
movS120
#elseact
messagebox你的元宝数量无法申请.
[@xhm]
#IF
checklevelex>34
checkNAMELISTsj\.txt
#act
movG01
SETRANKLEVELNAME%s\┠元宝首富┨
messagebox封号显示成功
#elseact
SENDMSG7首富35级才可以显示封号.
close
[@ycfhm]
#IF
checkNAMELISTsj\.txt
#act
movG00
SETRANKLEVELNAME%s\
messagebox封号隐藏成功
#elseact
SENDMSG7你无权使用.
close
[@xianhua]
#IF
#act
MOVS12<$STR(A9)>
#IF
SMALLG210100
CheckOnline<$STR(A9)>
#act
INCG2101
S12.CHANGEEXP+1000000
S12.SENDMSG7首富:有人给您砸了一次鲜花您获得100万经验.
S12.SendCenterMsg2500首富:有人给您砸了一次鲜花您获得100万经验.06
break
[@jidan]
#IF
#act
MOVS12<$STR(A9)>
#IF
SMALLG210100
CheckOnline<$STR(A9)>
#act
INCG2101
S12.CHANGEEXP+500000
S12.SENDMSG7首富:有人给您扔了一次鸡蛋您获得50万经验.
S12.SendCenterMsg2500首富:有人给您扔了一次鸡蛋您获得50万经验.06
break

