热点推荐

小喇叭+ 发布

01-16 02:17
01-16 02:04
01-13 17:30
查看: 806|回复: 0

[脚本示例] 传奇开区时申请首富封号NPC教程

[复制链接]
avatar

签到天数: 350 天

[LV.8]以坛为家I

7651

主题

255

回帖

31万

积分

司徒主管

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

UID
1
司徒币
260203
传世币
3000
元宝
0
在线时间
266 小时

最佳新人灌水之王

QQ
online_admin 发表于 2021-11-26 09:43:13 | 显示全部楼层 |阅读模式
脚本无错,自己可以修改或者添加,复制粘贴自由发挥你的想象力吧! 内容来自dedecms
         dedecms.com

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

         织梦好,好织梦
       
        [@hc]
         
        1:首富可以获得[龙行靴]
           内容来自dedecms

         内容来自dedecms
       
        2:当别人给你砸鲜花,扔鸡蛋都将获得100万,50万经验享受.   dedecms.com

             织梦内容管理系统

          织梦好,好织梦

         织梦内容管理系统

       
        [@赠鲜花]
        #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花 dedecms.com

        DelayCall 500 @80花
        DelayCall 1000 @81花
        DelayCall 1500 @82花
        DelayCall 2000 @83花
        DelayCall 2500 @86花
        GOTO @main
        break
        #ELSEACT
        MessageBOX 你今天3次已用完,明天在来吧! 织梦内容管理系统

         copyright dedecms
        [@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 内容来自dedecms 本文来自织梦
       
        [@仍鸡蛋]
        #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 内容来自dedecms

        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次已用完,明天在来吧! 内容来自dedecms
         copyright dedecms
       
        [@sqsf]
        #if
        checkgamegold >
        #act
        MOV S12
        mov A9
        mov G7
        mov A2
        CLEARNAMELIST sjsf.txt
        ADDNAMELIST sjsf.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 提示:你被迫下线重新登陆. copyright dedecms

        S12.kick
        mov S12 0
        #elseact
        messagebox 你的元宝数量无法申请.
        [@xsfhm]
        #IF
        checklevelex > 34
        checkNAMELIST sjsf.txt
        #act
        mov G0 1
        SETRANKLEVELNAME %s┠元宝首富┨
        messagebox 封号显示成功
        #elseact
        SENDMSG 7 首富35级才可以显示封号.
        close
        [@ycfhm]
        #IF
        checkNAMELIST sjsf.txt
        #act
        mov G0 0
        SETRANKLEVELNAME %s
        messagebox 封号隐藏成功
        #elseact
        SENDMSG 7 你无权使用.
        close dedecms.com

         织梦好,好织梦

         copyright dedecms
        [@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 copyright dedecms
         本文来自织梦
       
        [@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 copyright dedecms

帖子地址: 





上一篇:既可封长字刷屏又可封短句刷屏的改法
下一篇:传奇服务端当前地图怪清理干净教程
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【乱回复灌水将给予禁言处理】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则