当前位置: > 3000ok > 文章内容


---------------NPC--------------[@main]风声的第3个原创脚本[立即进入]/@fs进入组队练级地图][@fs进入组队练级地图]#ifISGROUPMASTER#act#ELSEACTgoto @mainMESSAGEBOX 提示:您不是队长。无权操作。break#IFCHECKGAMEGOLD 1999#ACTGETGROUPCOUNT P1mov m1 $STR(p1)mov a780 $USERNAMEmov g780 $STR(p1)GROUPMAPMOVE ZDPDDT 14 13 1 @风声组队泡经验break#ELSEACTgoto @mainMESSAGEBOX 提示:您的元宝不是很多。不能进入breakQF最新传奇sfunction-0.txt================[@风声组队泡经验];======检测是否离线=======#ifISOFFLINEMODE#ACTmov s78 $STR(a780)mapmove 3 330 330HCall $STR(s78) @离线组队不能进Break;======检测是否元宝充足==默认是7780元宝=====#IFCHECKGAMEGOLD 7788#ACTmov s78 $STR(a780)mov a782 $USERNAMEmapmove 3 330 330HCall $STR(s78) @组队闭关元宝不足SENDMSG 7 提示:您的元宝不足。无法随队伍进入组队闭关地图。Break;======检测是否等级满足==默认是70级=====;======#IF;======CHECKLEVELEX 70;======#ACT;======mov s78 $STR(a780);======mov a782 $USERNAME;======HCall $STR(s78) @组队闭关等级不足;======mapmove 3 330 330;======SENDMSG 7 提示:您的等级不足。无法随队伍进入组队闭关地图。;======Break;======检测完毕后开始把组队标记存进私有变量=======#IF#A51区攻略CTmov s77 有元宝mov s78 $STR(a780)mov m78 $STR(g780)SETOFFTIMER 10SETONTIMER 10 1SETOFFTIMER 9SETONTIMER 9 1SENDMSG 7 提示:当前在本地图闭关的队员总人数为$STR(m78)人,队长是$STR(s78).Break[@fszdrszjgx];======检测是否元宝充足==默认是7780元宝=====#IFCHECKGAMEGOLD 7788#ACTSETOFFTIMER 10SETOFFTIMER 9SETONTIMER 9 1SETONTIMER 10 1mov s78 $STR(a780)mov a782 $USERNAMESENDMSG 7 提示:您的元宝不足。Break;======检测是否等级满足==默认是70级=====;======#IF;======CHECKLEVELEX 70;======#ACT;======mov s78 $STR(a780);======mov a782 $USERNAME;======HCall $STR(s78) @组队闭关等级不足1;======mapmove 3 330 330;======Messagebox 您的元宝不足。无法随队伍进入组队闭关地图。;======Break#IF#ACTmov s77 有元宝mov s78 $STR(a780)mov m78 $STR(g780)SETOFFTIMER 10SETONTIMER 10 1SETOFFTIMER 9SETONTIMER 9 1SENDMSG 7 提示:当前在本地图闭关的队员总人数为$STR(m78)人,队长是$STR(s78).Break[@fszdrsjsgx];======检测是否元宝充足==默认是7780元宝=====#IFCHECKGAMEGOLD 7788#ACTSETOFFTIMER 10SETOFFTIMER 9SETONTIMER 9 1SETONTIMER 10 1mov s78 $STR(a780)mov a782 $USERNAMESENDMSG 7 提示:您的元宝不足。Break;======检测是否等级满足==默认是70级=====;======#IF;======CHECKLEVELEX 70;======#ACT;======mov s78 $STR(a780);======mov a782 $USERNAME;======HCall $STR(s78) @组队闭关等级不足1;======mapmove 3 330 330;======Messagebox 您的元宝不足。无法随队伍进入组队闭关地图。;======Break#IF#ACTmov s77 有元宝mov s78 $STR(a780)mov m78 $STR(g780)SETOFFTIMER 10SETONTIMER 10 1SETOFFTIMER 9SETONTIMER 9 1SENDMSG 7 提示:当前在本地图闭关的队员总人数为$STR(m78)人,队长是$STR(s78).Break[@队长换新队长了];======检测是否等级满足==默认是70级=====;==#IF;==CHECKLEVELEX 70;==#ACT;==mov s78 $STR(a780);==mov a782 $USERNAME;==mov s79 等级不足;==SETOFFTIMER 10;==SETOFFTIMER 9;==mapmove 3 330 330;==HCall $STR(s78) @组队闭关等级不足1;==Messagebox 您的元宝不足。无法随队伍进入组队闭关地图。;==Break#IF#ACTmov s77 有元宝mov s78 $STR(a780)mov m78 $STR(g780)SETOFFTIMER 10SETOFFTIMER 9SETONTIMER 9 1SETONTIMER 10 1SENDMSG 7 提示:当前在本地图闭关的队员总人数为$STR(m78)人,队长是$STR(s78).Break[@风声组队离线组队不能进]#IF#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330SENDMSG 7 提示:队员$STR(a782)是离线挂机玩家,导致大伙都进不去。Break[@风声组队队员元宝不足]#IF#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330SENDMSG 7 提示:队员$STR(a782)的元宝不足,导致大伙都进不去。Break[@风声组队队员等级不足]#IF#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330SENDMSG 7 提示:队员$STR(a782)的等级不足,导致大伙都进不去。Break[@半途进组队员元宝不足因此减人数]#IFEQUAL s77 元宝不足#ACTBreak#IF#ACTmov s77 有元宝mov s78 $STR(a780)mov m78 $STR(g780)SETOFFTIMER 10SETOFFTIMER 9SETONTIMER 9 1SETONTIMER 10 1SENDMSG 7 提示:当前在本地图闭关的队员总人数为$STR(m78)人,队长是$STR(s78).Break[@半途进组队员等级不足因此减人数]#IF#ACTmov s77 有元宝mov s78 $STR(a780)mov m78 $STR(g780)SETOFFTIMER 10SETOFFTIMER 9SETONTIMER 9 1SETONTIMER 10 1SENDMSG 7 提示:当前在本地图闭关的队员总人数为$STR(m78)人,队长是$STR(s78).Break-===========QManage.txt===========[@离线组队不能进]#IF#ACTSETOFFTIMER 10SETOFFTIMER 9GROUPMAPMOVE 3 330 330 1 @风声组队离线组队不能进SENDMSG 7 提示:队员$STR(a782)是离线挂机用户。不能带他进去。break[@组队闭关元宝不足]#IF#ACTSETOFFTIMER 10SETOFFTIMER 9GROUPMAPMOVE 3 330 330 1 @风声组队队员元宝不足SENDMSG 7 提示:队员$STR(a782)的元宝不足。不能带他进去。break[@组队闭关等级不足]#IF#ACTSETOFFTIMER 10SETOFFTIMER 9GROUPMAPMOVE 3 330 330 1 @风声组队队员等级不足SENDMSG 7 提示:队员$STR(a782)的等级不足70级。不能带他进去。break[@组队闭关元宝不足1]#IF#ACTdec m78 1mov a780 $USERNAMEmov g780 $STR(m78)GROUPMAPMOVE ZDPDDT 14 13 1 @半途进组队员元宝不足因此减人数MESSAGEBOX 队员$STR(a782)的元宝不足,影响了队伍升级经验。break [@组队闭关等级不足1]#IF#ACTdec m78 1mov a780 $USERNAMEmov g780 $STR(m78)GROUPMAPMOVE ZDPDDT 14 13 1 @半途进组队员等级不足因此减人数MESSAGEBOX 对不起,队员$STR(a782)的等级不足,影响了队伍升级经验,请踢了他。break[@OnTimer9];=====开始检测人数变化,如有人进组或者退组将会全体触发1次。#IFISGROUPMASTEREQUAL s78 $USERNAME#ACTGETGROUPCOUNT P1mov m0 $STR(p1)goto @检测本次和上次人数是否变化break#IFISGROUPMASTER#ACT;=====既然队长名字已经变了,那说明队长退组了。所以通知全体换队长dec m78 1mov a780 $USERNAMEmov g780 $STR(m78)GROUPMAPMOVE ZDPDDT 14 13 1 @队长换新队长了break #IFCheckGroupCount 1#ACTbreak#IF#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330Messagebox 提示:您的队伍已经解散或者少于2人。Break[@检测本次和上次人数是否变化];=====通过本系统可以实现进组后自动传进地图。#IF;=====如果人数没变化EQUAL m0 $STR(m1)#ACT;=====那么更新一下最新人数mov m1 $STR(m0)break#IF;=====如果有人进组LARGE m0 $STR(m1)#ACT;=====那么增加1个有效名额,并开始全体更新mov m1 $STR(m0)inc m78 1mov a780 $USERNAMEmov g780 $STR(m78)GROUPMAPMOVE ZDPDDT 14 13 1 @fszdrszjgxbreak#IF;=====如果有人退组SMALL m0 $STR(m1)#ACT;=====那么减少1个有效名额,并开始全体更新mov m1 $STR(m0)dec m78 1mov a780 $USERNAMEmov g780 $STR(m78)GROUPMAPMOVE ZDPDDT 14 13 1 @fszdrsjsgxbreak#IF#ACTbreak [@OnTimer10];===检测当前闭关地图人数#IF;===10个人以上LARGE m78 10ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 110000冰雪Break#IFEQUAL m78 10ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 100000Break#IFEQUAL m78 9ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 90000Break#IFEQUAL m78 8ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 80000Break#IFEQUAL m78 7ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 70000Break#IFEQUAL m78 6ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 60000Break#IFEQUAL m78 5ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 50000Break#IFEQUAL m78 4ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 40000Break#IFEQUAL m78 3ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 30000Break#IFEQUAL m78 2ISONMAP ZDPDDTCHECKGAMEGOLD 999#ACTGAMEGOLD - 1000CHANGEEXP + 20000Break#IFCheckGroupCount 2EQUAL s77 元宝不足ISONMAP ZDPDDT#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330Messagebox 您脱离了队伍。。。Break#IFISGROUPMASTERCheckGroupCount 2EQUAL s77 元宝不足#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330Messagebox 您脱离了队伍。。。Break#IFISGROUPMASTEREQUAL s77 元宝不足LARGE m4 0#ACTdec m4 1SENDMSG 7 提示:元宝不足,请您$STR(m4)秒内退组,否则会被小退。break#IFISGROUPMASTEREQUAL s77 元宝不足EQUAL m4 0#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330kickSENDMSG 5 提示:元宝不足,请您小退再上。break#IFISGROUPMASTERCHECKGAMEGOLD 1000#ACTmov s77 元宝不足mov m4 10SENDMSG 7 提示:您的元宝不足。充值元宝后再进组。Break#IFEQUAL s77 元宝不足LARGE m0 0#ACTdec m0 1SENDMSG 7 提示:元宝不足,请您$STR(m0)秒内退组,否则会被小退。break#I龙版合击FEQUAL s77 元宝不足EQUAL m0 0#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330kickSENDMSG 5 提示:元宝不足,请您小退再上。break#IFCHECKGAMEGOLD 1000#ACTmov s77 元宝不足mov m0 10SENDMSG 7 提示:您的元宝不足。充值元宝后再进组。Break#IFISONMAP ZDPDDT#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330Messagebox 对不起,您的队伍人数太少。自动返回土城Break#IFCheckGroupCount 2#ACTSETOFFTIMER 10SETOFFTIMER 9mapmove 3 330 330Messagebox 对不起,您的队伍人数太少。自动返回土城Break #IFISGROUPMASTERISONMAP ZDPDDT#ACTbreak#IF#ACTmapmove ZDPDDTMessagebox 对不起神迹私服,组队修炼过程中,不得擅自离开闭关地图如果想离开,请您先退组。Break

相关文章