GOM引擎元宝首富脚本实例，传奇开区时申请首富封号NPC教程

admin

                               
登录/注册后可看大图

脚本无错，自己可以修改或者添加，复制粘贴自由发挥你的想象力吧！

[@main]
如果你有够多的元宝,可以申请元宝首富.\
申请首富只记录你的元宝数量并不会扣除你的元宝.  \
申请首富成功后可以获得[首富封号+龙行靴]\
\
\
假如首富已被申请,你的元宝数量多于他,你便可以顶替他.\
\
         【】   【】\
元宝首富:　元宝数量:　被砸鲜花:　被扔鸡蛋:\ \

[@hc]
　 \
1:首富可以获得[龙行靴] \
\ \

2:当别人给你砸鲜花,扔鸡蛋都将获得100万,50万经验享受. \ \

　　　\ \

\

[@赠鲜花]
#if
equal G271 0
#ACT
MESSAGEBOX 暂无首富不能砸鲜花哦！
BREAK
#if
checklevelex < 47
#ACT
MESSAGEBOX 您的等级可能不足47级，不能参与此功能！
BREAK
#if
CHECKVAR HUMAN 鲜花鸡蛋 > 0
#act
GOTO @xianhua
INC G269 1
CHANGEEXP + 5000000
CALCVAR HUMAN 鲜花鸡蛋 - 1
SAVEVAR HUMAN 鲜花鸡蛋 ..\QuestDiary\数据文件\鲜花鸡蛋Save.txt
ADDNAMELIST ..\QuestDiary\数据文件\鲜花鸡蛋名单.txt
SETWEATHEREFFECT 3 2 15
GuildNoticeMsg 151 0 〖%s〗给元宝首富〖〗砸了1次鲜花获得500万经验奖励！
GuildNoticeMsg 151 0 首富〖〗被砸1次鲜花获得100万经验奖励,谢谢大家支持！
DelayCall 100 @79花
DelayCall 500 @80花
DelayCall 1000 @81花
DelayCall 1500 @82花
DelayCall 2000 @83花
DelayCall 2500 @86花
GOTO @main
break
#ELSEACT
MessageBOX 你今天3次已用完,明天在来吧！
[@79花]
#ACT
GMEXECUTE SHOWEFFECT 79
[@80花]
#ACT
GMEXECUTE SHOWEFFECT 80
[@81花]
#ACT
GMEXECUTE SHOWEFFECT 81
[@82花]
#ACT
GMEXECUTE SHOWEFFECT 82
[@83花]
#ACT
GMEXECUTE SHOWEFFECT 83
[@86花]
#ACT
GMEXECUTE SHOWEFFECT 86


[@仍鸡蛋]
#if
equal G271 0
#ACT
MESSAGEBOX 暂无首富不能仍鸡蛋哦！
BREAK
#if
checklevelex < 47
#ACT
MESSAGEBOX 您的等级可能不足47级，不能参与此功能！
BREAK
#if
CHECKVAR HUMAN 鲜花鸡蛋 > 0
#act
GOTO @jidan
INC G270 1
CHANGEEXP + 5000000
CALCVAR HUMAN 鲜花鸡蛋 - 1
SAVEVAR HUMAN 鲜花鸡蛋 ..\QuestDiary\数据文件\鲜花鸡蛋Save.txt
ADDNAMELIST ..\QuestDiary\数据文件\鲜花鸡蛋名单.txt
SETWEATHEREFFECT 3 3 10
GuildNoticeMsg 151 0 〖%s〗给元宝首富〖〗仍了1次鸡蛋获得500万经验奖励！
GuildNoticeMsg 151 0 首富〖〗被仍1次鸡蛋获得50万经验奖励,敢不敢送砸鲜花！
GMEXECUTE SHOWEFFECT 78
GMEXECUTE SHOWEFFECT 79
GMEXECUTE SHOWEFFECT 80
GMEXECUTE SHOWEFFECT 81
GMEXECUTE SHOWEFFECT 82
GMEXECUTE SHOWEFFECT 83
GMEXECUTE SHOWEFFECT 84
GMEXECUTE SHOWEFFECT 87
GOTO @main
break
#ELSEACT
MessageBOX 你今天3次已用完,明天在来吧！

[@sqsf]
#if
checkgamegold >
#act
MOV S12
mov A9
mov G7
mov A2
CLEARNAMELIST sj\sf.txt
ADDNAMELIST sj\sf.txt
MOV G269 0
mov G270 0
MOV G271 1
mov A70 元宝数量\↘本区元宝首富↙\
GMEXECUTE zgfzz 龙行靴
SENDMSG 0 【公告】%s成功申请为本区的元宝首富[名誉与经验双收].
SENDMSG 0 【公告】%s成功申请为本区的元宝首富[名誉与经验双收].
SENDMSG 7 恭喜你申请成为本区的元宝首富,获得奖励[龙行靴].
messagebox 建议您时刻保持在线,可获得砸鲜花扔鸡蛋经验额外享受.
goto @zdej
S12.SENDMSG 7 提示:你的首富称号已经被别人抢去.
S12.SENDMSG 7 提示:你被迫下线重新登陆.
S12.kick
mov S12 0
#elseact
messagebox 你的元宝数量无法申请.
[@xsfhm]
#IF
checklevelex > 34
checkNAMELIST sj\sf.txt
#act
mov G0 1
SETRANKLEVELNAME %s\┠元宝首富┨
messagebox 封号显示成功
#elseact
SENDMSG 7 首富35级才可以显示封号.
close
[@ycfhm]
#IF
checkNAMELIST sj\sf.txt
#act
mov G0 0
SETRANKLEVELNAME %s\
messagebox 封号隐藏成功
#elseact
SENDMSG 7 你无权使用.
close


[@xianhua]
#IF
#act
MOV S12
#IF
SMALL G210 100
CheckOnline
#act
INC G210 1
S12.CHANGEEXP + 1000000
S12.SENDMSG 7 首富:有人给您砸了一次鲜花您获得100万经验.
S12.SendCenterMsg 250 0 首富:有人给您砸了一次鲜花您获得100万经验. 0 6
break

[@jidan]
#IF
#act
MOV S12
#IF
SMALL G210 100
CheckOnline
#act
INC G210 1
S12.CHANGEEXP + 500000
S12.SENDMSG 7 首富:有人给您扔了一次鸡蛋您获得50万经验.
S12.SendCenterMsg 250 0 首富:有人给您扔了一次鸡蛋您获得50万经验. 0 6
break


来源：网络
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！