好sf网站手游_迷失传奇私服发布网手游

[@Startup] #if #act MOVA540 MOVG540 MOVA550 MOVG550 #IF #ACT #CALL[\\红叶制作\重要数据.txt]@炸全迷失传奇私服发布网手游局变量声明 ;------------------------------------------------------------------------------------- ;此脚本段，服务器启动时执行一次 ;------------------------------------------------------------------------------------- #IF #ACT #CALL[\16sky.com\变量数据\变量申明.txt]@玩家全局变量 #CALL[\一休啦啦论坛提供\全局变量.txt]@加载全局变量 [@Login] #IF CHECKLEVELEX，0 #ACT #CALL[\\红叶制作\重要数据.txt]@牌九个人变量声明 #IF CHECKLEVELEX，0 #ACT #CALL[\16sky.com\变量数据\变量申明.txt]@玩家私人变量 #if #act SENDMSG7╔━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━╗ SENDMSG7┃┃ SENDMSG7┃强烈提示：本服没有客服QQ，完全无GM，说自己是GM的全是骗子！┃ SENDMSG7┃强烈提示：本服没有客服QQ，完全无GM，说自己是GM的全是骗子！┃ SENDMSG7┃提示：如果看不到虎威、主宰、传奇装备请去好sf网站手游网站下补丁┃ SENDMSG7┃提示：如果看到不NPC，请小退后登陆即可!┃ SENDMSG7┃开区第二天集体拿沙，奖励2000W元宝!┃ SENDMSG7╚━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━╝ goto@main2 [@main2] #IF CHECKNAMELIST..\QuestDiary\数据文件\会员名单\会员名单.txt #ACT SETRANKLEVELNAME%s\▁▂▃★ＶＩＰ★▃▂▁\ SENDMSG1【提示】ＶＩＰ『%S』已经进入游戏，欢迎指数★★★★★ #if CHECKLEVELEX，0 #act VARString HUMAN 循环怪名 VARInteger HUMAN 循环怪数 VARInteger HUMAN 循环杀怪 set[450]0 VARIntegerHUMANbeisha VARIntegerHUMANsharen LOADVARHUMANbeisha..\QuestDiary\变量数据\被杀数据.txt LOADVARHUMANsharen..\QuestDiary\变量数据\杀人数据.txt LOADVARHUMAN循环杀怪..\QuestDiary\重要数据\任务记录.txt LOADVARHUMAN循环怪名..\QuestDiary\重要数据\任务记录.txt LOADVARHUMAN循环怪数..\QuestDiary\重要数据\任务记录.txt VARIntegerHUMAN五行怪物 VARIntegerHUMAN天魔怪物 #CALL[\登陆\登陆脚本.txt]@登陆设置 #CALL[\\钻石登陆\钻石登陆.txt]@钻石登陆 #CALL[\登陆\封号脚本.txt]@封号设置 #CALL[\\服务\等级封号.txt]@等级封号 VARIntegerHUMAN元宝消费 VARIntegerHUMAN消费积分 LOADVARHUMAN元宝消费..\QuestDiary\一休啦啦论坛提供\重要数据\元宝消费Save.txt LOADVARHUMAN消费积分..\QuestDiary\一休啦啦论坛提供\重要数据\消费积分Save.txt VARIntegerHUMAN充值元宝 LOADVARHUMAN充值元宝..\QuestDiary\元宝消费总额.txt #CALL[\游戏触发\排行刷新.txt]@排行刷新 #CALL[\变量\转生封号.txt]@转生封号 #IF CHECKNAMELIST..\QuestDiary\登陆\管理员.txt #ACT CHANGEMODE11 CHANGEMODE21 CHANGEMODE31 break #if checknamelist..\QuestDiary\数据文件\会员名单\会员名单.txt #act sendmsg0尊贵的会员玩家%s，登陆游戏,大家热烈欢迎! #if CHECKLEVELEX，0 check[173]0 #act set[173]1 [@Login] #IF CHECKLEVELEX，0 #ACT #CALL[\\红叶制作\重要数据.txt]@牌九个人变量声明 #if CHECKBONUSPOINT，2000 #act RESTBONUSPOINT BONUSPOINT=1800 [@特权处理] #IF CHECKUSEITEM4 CHECKITEMTYPE416 #ACT SendCenterMsg2550请在10秒内尽快取下非法装备,重新登陆游戏即可.010 SENDMSG5请在10秒内尽快取下非法装备,重新登陆游戏即可! DelayCall10000@RUNGATEDLQ非法装备踢下线_别跟我重名 break #IF CHECKUSEITEM14 CHECKITEMTYPE1415 #ACT SendCenterMsg2550请在10秒内尽快取下非法装备,重新登陆游戏即可.010 SENDMSG5请在10秒内尽快取下非法装备,重新登陆游戏即可! DelayCall10000@RUNGATEDLQ非法装备踢下线_别跟我重名 break [@RUNGATEDLQ非法装备踢下线_别跟我重名] #IF #ACT SENDMSG5由于您佩戴了非法装备踢下线! KICK break [@金刚圣龙] #IF CHECKLEVELEX，80 #SAY 盟重书店附近出现一只金刚圣龙，,杀死它会爆出大量元宝\\ 积分和超级装备哦!!我可以免费带你去~~~\\\ 现在就去/@金刚圣龙1，\ [@金刚圣龙1] #if #act mapmoveM1011936 give回城卷1 break [@杀鸡活动] #IF CHECKLEVELEX，85 #SAY 本服超好玩活动现在开始!\ 杀鸡地图出现大量活鸡,中间有一只必爆超级装备~!\ 敢快去杀了它吧,谁先找到就是谁的!\ 现在就去/@杀鸡去，\ [@杀鸡去] #if #act mapmovesjhd give回城卷1 break [@装备BOSS] #IF CHECKLEVELEX，85 #SAY 本服超好玩活动现在开始!\ 此怪有机率暴皓月和怒血皓月装备!~~~\ 敢快去杀了它吧,谁先找到就是谁的!\ 现在就去/@装备BOSS1，\ [@装备BOSS1] #if #act mapmovehuodong3 give回城卷 break [@道具BOSS] #IF CHECKLEVELEX，85 #SAY 本服超好玩活动现在开始!\ 此怪必暴超级祝福油.怒血碎片,五彩玉兔！~~~\ 敢快去杀了它吧,谁先找到就是谁的!\ 现在就去/@道具BOSS1，\ [@道具BOSS1] #if #act mapmovehuodong2 give回城卷 break [@挖矿了1] #IF #say 挖矿活动现在开始！\ 可以挖出大量《元宝》《经验》《装备》《金币》！\ 限时10分钟.哥们挖个矿抽根烟休息下吧！，\ 下次开始时间为：14:30，\ \\ 现在就去/@挖矿矿了1，\ [@挖矿矿了1] #if #act TimeRecall10 mapmovezxp2 give回城卷 give鹤嘴锄 break [@挖矿了2] #IF #say 挖矿活动现在开始！\ 可以挖出大量《元宝》《经验》《装备》《金币》！\ 限时10分钟.哥们挖个矿抽根烟休息下吧！，\ 下次开始时间为：16:30，\ \\ 现在就去/@挖矿矿了2，\ [@挖矿矿了2] #if #act TimeRecall10 mapmovezxp2 give回城卷 give鹤嘴锄 break [@挖矿了3] #IF #say 挖矿活动现在开始！\ 可以挖出大量《元宝》《经验》《装备》《金币》！\ 限时10分钟.哥们挖个矿抽根烟休息下吧！，\ 下次开始时间为：18:30，\ \\ 现在就去/@挖矿矿了3，\ [@挖矿矿了3] #if #act TimeRecall10 mapmovezxp2 give回城卷 give鹤嘴锄 break [@挖矿了4] #IF #say 挖矿活动现在开始！\ 可以挖出大量《元宝》《经验》《装备》《金币》！\ 限时10分钟.哥们挖个矿抽根烟休息下吧！，\ 下次开始时间为：20:30，\ \\ 现在就去/@挖矿矿了4，\ [@挖矿矿了4] #if #act TimeRecall10 mapmovezxp2 give回城卷 give鹤嘴锄 break [@挖矿了5] #IF #say 挖矿活动现在开始！\ 可以挖出大量《元宝》《经验》《装备》《金币》！\ 限时10分钟.哥们挖个矿抽根烟休息下吧！，\ 下次开始时间为：明天中午12:30，\ \\ 现在就去/@挖矿矿了5，\ [@挖矿矿了5] #if #act TimeRecall10 mapmovezxp2 give回城卷 give鹤嘴锄 break [@树] #IF #SAY 元宝树已出现在土药361344，必爆5000元宝，\ 是否过去消灭他。\ \\『立刻传我过去/@杀2222，』\\ \\『不，我不敢去/@exit，』\ [@杀2222] #IF #ACT mapmove3351339 give回城卷1 close [@魔王] #IF #SAY 超级魔王已出现在65229，爆黄金、特殊装备，\ 是否过去消灭他。\ \\『立刻传我过去/@杀2221，』\\ \\『不，我不敢去/@exit，』\ [@杀2221] #ACT mapmove364224 give回城卷1 close ;—————————————————————————————————— [@下注结束] #IF LARGEM700 #ACT SENDMSG7ぐ【玩家坐庄】：本局你下注【$STR(M70)，】元宝押【$STR(S23)，】 SENDMSG7ぐ【玩家坐庄】：本局你下注【$STR(M70)，】元宝押【$STR(S23)，】 SENDMSG7ぐ【玩家坐庄】：本局你下注【$STR(M70)，】元宝押【$STR(S23)，】 SENDMSG7ぐ【玩家坐庄】：本局你下注【$STR(M70)，】元宝押【$STR(S23)，】 BREAK [@猜点结帐] #IF check[68]1 #ACT movD0$STR(I41)， movD1$STR(I42)， movD2$STR(I43)， playdice3@cube_cds3 break #SAY \ ╔═══════════════╗你所拥有的元宝数：【$GAMEGOLD，】\ ║┏━━━┓┏━━━┓┏━━━┓║\ ║┃●●┃┃●●┃┃●●┃║庄家姓名：【$GLOBAL(庄家姓名)，】\ ║┃●●┃┃●●┃┃●●┃║\ ║┃●●┃┃●●┃┃●●┃║庄家本钱数：【$GLOBAL(庄家钱数)，】\ ║┗━━━┛┗━━━┛┗━━━┛║\ ╚═══════════════╝你下注【$STR(M70)，】元宝押【$STR(S23)，】\ #IF CHECKVARGLOBAL庄家姓名=$USERNAME， #ACT movD0$STR(I41)， movD1$STR(I42)， movD2$STR(I43)， playdice3@cube_cds4 break [@猜点清零] #ACT SET[68]0 SET[69]0 MOVM700 MOVM720 MOVS23 BREAK [@cube_cds3] #if equalI41$STR(I42)， EQUALI42$STR(I43)， #ACT SENDMSG6ぐ提示：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！[$STR(I41)，豹子.庄家通吃]！ goto@猜点清零 BREAK #ELSEACT MOVD40 INCD4$STR(D0)， INCD4$STR(D1)， INCD4$STR(D2)， #IF check[68]1 LARGED410 EQUALS23大 LARGEM700 #ACT MULM72$STR(M70)，2 GAMEGOLD+$STR(M72)， CALCVARGLOBAL奖金总数-$STR(M72)， SENDMSG6提示：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！！[$STR(D4)，点大]！恭喜你中奖，你获得了$STR(M72)，元宝的奖励！ GuildNoticeMsg252112ぐ【玩家坐庄】：闲家[$USERNAME，]在玩家坐庄局中赢得元宝：$STR(M72)，个！ SET[68]0 MOVM720 MOVM700 MOVS23 #IF check[68]1 SMALLD411 EQUALS23小 LARGEM700 #ACT MULM72$STR(M70)，2 GAMEGOLD+$STR(M72)， CALCVARGLOBAL奖金总数-$STR(M72)， SENDMSG6提示：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！！[$STR(D4)，点小]！恭喜你中奖，你获得了$STR(M72)，元宝的奖励！ GuildNoticeMsg252112ぐ【玩家坐庄】：闲家[$USERNAME，]在玩家坐庄局中赢得元宝：$STR(M72)，个！ SET[68]0 MOVM720 MOVM700 MOVS23 #IF check[68]1 #ACT SENDMSG6提示：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！您猜大小猜错了！ goto@猜点清零 BREAK [@cube_cds4] #if equalI41$STR(I42)， EQUALI42$STR(I43)， #ACT SENDMSG6ぐ提示：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！[$STR(I41)，豹子.庄家通吃]！十秒后开始结帐,在结帐前请不要小退或离线！ BREAK #say 提示：\\ 骰子点数为：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！\\ [$STR(I41)，豹子.庄家通吃]，十秒后开始结帐！\\ 在结帐前请不要离线或退出游戏！\\ #ELSEACT MOVD40 INCD4$STR(D0)， INCD4$STR(D1)， INCD4$STR(D2)， #IF LARGED410 CHECKVARGLOBAL庄家姓名=$USERNAME， #ACT SENDMSG6ぐ提示：骰子点数为：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！[$STR(D4)，点大]十秒后开始结帐,在结帐前请不要小退或离线！ BREAK #say 提示：\\ 骰子点数为：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！\\ [$STR(D4)，点大]，十秒后开始结帐！\\ 在结帐前请不要离线或退出游戏！\\ #IF CHECKVARGLOBAL庄家姓名=$USERNAME， #ACT SENDMSG6ぐ提示：骰子点数为：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！[$STR(D4)，点小]十秒后开始结帐,在结帐前请不要小退或离线！ BREAK #say 提示：\\ 骰子点数为：骰子点数为：$STR(D0)，点。$STR(D1)，点。$STR(D2)，点！\\ [$STR(D4)，点小]，十秒后开始结帐！\\ 在结帐前请不要离线或退出游戏！\\ [@庄家结帐] #IF CHECKVARGLOBAL庄家姓名=$USERNAME， CHECKVARGLOBAL奖金总数=0 check[69]1 #act set[69]0 GuildNoticeMsg1500ぐ【玩家坐庄】：庄家『$GLOBAL(庄家姓名)，』在博中收回了【$GLOBAL(奖金总数)，】元宝! CLOSE BREAK #IF CHECKVARGLOBAL庄家姓名=$USERNAME， check[69]1 #act set[69]0 GAMEGOLD+$GLOBAL(奖金总数)， GuildNoticeMsg1500ぐ【玩家坐庄】：庄家『$GLOBAL(庄家姓名)，』在博中收回了【$GLOBAL(奖金总数)，】元宝! CLOSE BREAK #IF #ACT goto@dutouzi_cds-lk [@dutouzi_cds-lk] #ACT Set[65]0 Set[66]0 Set[67]0 MOVM780 MOVM790 MOVM800 MOVM810 MOVM820 MOVM830 MOVM840 MOVM850 MOVM860 MOVM870 MOVM880 [@OnTimer2] #IF checklevelex135 ISONMAPJQPKT #ACT CHANGEEXP+50000 BREAK #ELSEACT GOTO@HUIKAB2 BREAK [@HUIKAB2] #IF ISONMAPJQPKT #ACT SETOFFTIMER2 MESSAGEBOX您的等级大于135级不好意思,送您回土城,! MAPMOVE3330333 BREAK #ELSEACT SETOFFTIMER2 [@OnTimer17] #IF ISONMAPQ012 #ACT GAMEGOLD-500 BREAK #ELSEACT GOTO@HUIKAB17 [@HUIKAB17] #IF ISONMAPQ012 #ACT SETOFFTIMER17 MESSAGEBOX您的元宝数量小于500个不好意思,送您回土城,子弹带多一点在来! MAPMOVE3330333 BREAK #ELSEACT SETOFFTIMER17 [@OnTimer3] #IF ISONMAPPD3 CHECKGAMEGOLD，9999 #ACT GAMEGOLD-10000 CHANGEEXP+100000000 BREAK #ELSEACT GOTO@HUIKAB1 [@HUIKAB1] #IF ISONMAPPD3 #ACT SETOFFTIMER3 MESSAGEBOX您的元宝数量小于10000个不好意思,送您回土城,子弹带多一点在来! MAPMOVE3330333 BREAK #ELSEACT SETOFFTIMER3 [@风雷召唤] #IF EQUALA98$USERNAME， #ACT BREAK #IF HaveGuild CheckOfGuild$STR(A99)， #SAY 同门师兄弟〖$STR(A98)，〗需要帮助！\ 貌似在一个角落被‘群P’了！\ 你是否愿意前往？\\ 告急！！！告急！！！告急！！！告急！！！，\ 前往帮助/@风雷召唤_1，不前往帮助/@EXIT，\ #ACT BREAK #ELSEACT BREAK [@风雷召唤_1] #IF HaveGuild CheckOfGuild$STR(A99)， #ACT REGOTO$STR(A98)， BREAK #ELSEACT BREAK [@执行跟随1] #act GetRandomText.\QuestDiary\固定数据\行动.txtS5 GMEXECUTE追杀$STR(S5)， DelayGoto1000@回城 goto@随机飞啊 break [@回城] #IF #act GetRandomText.\QuestDiary\固定数据\传送数据.txtS6 mapmove$STR(S6)， break [@执行跟随] #IF IsOnMap3 #act goto@随机飞啊 break #IF IsOnMap001 #act goto@随机飞啊 break #IF IsOnMapGA0 #act goto@随机飞啊 break [@随机飞啊] #IF random7 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 MOVRP83 INCP8333 MOVRP73 INCP7266 mapmove0$STR(P8)，$STR(P7)， GMEXECUTE表情$STR(S10)， DelayCall6000@5900312 BREAK #IF random6 #ACT MOVRP83 INCP8649 MOVRP73 INCP7629 mapmove0$STR(P8)，$STR(P7)， GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 GetRandomText.\QuestDiary\固定数据\喊话系统二.txtS99 GMEXECUTE表情$STR(S10)， GuildNoticeMsg0151(!)%s:$STR(S99)，MAP DelayCall7000@5900312 BREAK #IF random5 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 MOVRP83 INCP8288 MOVRP73 INCP7615 mapmove0$STR(P8)，$STR(P7)， GMEXECUTE表情$STR(S10)， DelayCall8000@5900312 BREAK #IF random4 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 MOVRP83 INCP8147 MOVRP73 INCP7337 mapmove5$STR(P8)，$STR(P7)， GetRandomText.\QuestDiary\固定数据\喊话系统二.txtS99 GMEXECUTE表情$STR(S10)， GuildNoticeMsg0151(!)%s:$STR(S99)，MAP DelayCall9000@5900312 BREAK #IF random3 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 MOVRP83 INCP8177 MOVRP73 INCP7324 mapmove11$STR(P8)，$STR(P7)， GetRandomText.\QuestDiary\固定数据\喊话系统一.txtS99 GMEXECUTE表情$STR(S10)， GuildNoticeMsg0151(!)%s:$STR(S99)，MAP DelayCall4000@5900312 BREAK #IF random2 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 MOVRP83 INCP8242 MOVRP73 INCP7202 mapmove4$STR(P8)，$STR(P7)， GetRandomText.\QuestDiary\固定数据\喊话系统一.txtS99 GMEXECUTE表情$STR(S10)， GuildNoticeMsg0151(!)%s:$STR(S99)，MAP DelayCall3000@5900312 BREAK #IF random1 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 MOVRP83 INCP8130 MOVRP73 INCP7150 mapmove6$STR(P8)，$STR(P7)， GetRandomText.\QuestDiary\固定数据\喊话系统二.txtS99 GMEXECUTE表情$STR(S10)， GuildNoticeMsg0151(!)%s:$STR(S99)，MAP DelayCall2000@5900312 BREAK [@5900312] #IF random8 #ACT GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10 CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， GetRandomText.\QuestDiary\固定数据\喊话系统.txtS99 GMEXECUTE表情$STR(S10)， GuildNoticeMsg0151(!)%s:$STR(S99)，MAP DelayCall286000@随机飞啊 BREAK #IF random7 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall196000@随机飞啊 BREAK #IF random6 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall176000@随机飞啊 BREAK #IF random5 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall156000@随机飞啊 BREAK #IF random4 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall146000@随机飞啊 BREAK #IF random3 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall136000@随机飞啊 BREAK #IF random2 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall126000@随机飞啊 BREAK #IF random1 #ACT CHANGEEXP+1000 MOVRP818 INCP8321 MOVRP717 INCP7323 mapmove3$STR(P8)，$STR(P7)， DelayCall1526000@随机飞啊 BREAK ;------------------------------------------------------------------------------------- ;------------------------------------------------------------------------------------- ;玩家玩家闲家结算 ;------------------------------------------------------------------------------------- ;------------------------------------------------------------------------------------- [@玩家玩家闲家结算] #IF CHECKNAMELIST..\QuestDiary\16sky.com\玩家玩家\当局参与名单.txt #ELSEACT BREAK ;#IF ;CheckOffline ;#ACT ;BREAK #IF CHECK[99]0 #ACT #CALL[\16sky.com\变量数据\变量申明.txt]@玩家私人变量 #IF CHECKVARHUMANNiuNiuFreeze=0 #ACT BREAK #IF CHECKLEVELEX，0 #ACT MOVI111 MOVI121 MOVI130 MOVI140 MOVI150 MOVI160 GOTO@玩家玩家闲家结算B [@玩家玩家闲家结算B] ;玩家0-玩家6一倍；玩家7-玩家8二倍；玩家9三倍；玩家玩家四倍；四炸及五花五倍 ;PlayMusicwin.wav ;PlayMusiclose.wav ;PlayMusic平局.wav ;-------------------------------------------------------------------------- #IF CHECKVARHUMANNiuNiuBetR，0 CHECKVARGLOBAL$玩家玩家顺门赢输=WIN #ACT MOVI13$HUMAN(NiuNiuBetR)， MULI13$STR(I13)，$GLOBAL($玩家玩家顺门倍数)， INCI11$STR(I13)， GAMEGOLD+$STR(I13)， GAMEGOLD+$HUMAN(NiuNiuBetR)， SENDMSG6[提示]：您押【顺门】$HUMAN(NiuNiuBetR)，，赢$STR(I13)，个元宝。 SendCenterMsg25115『$USERNAME，』在【玩家】中押注【顺门】$HUMAN(NiuNiuBetR)，，翻$GLOBAL($玩家玩家顺门倍数)，翻,『赢』得$STR(I13)，个元宝！1 #IF CHECKVARHUMANNiuNiuBetR，0 CHECKVARGLOBAL$玩家玩家顺门赢输=LOSE #ACT MOVI13$HUMAN(NiuNiuBetR)， MULI13$STR(I13)，$GLOBAL($玩家玩家庄家倍数)， INCI12$STR(I13)， CALCVARHUMANNiuNiuFreeze+$HUMAN(NiuNiuBetR)， CALCVARHUMANNiuNiuFreeze-$STR(I13)， SENDMSG6[提示]：您押【顺门】$HUMAN(NiuNiuBetR)，，按庄牌翻$GLOBAL($玩家玩家庄家倍数)，翻,输$STR(I13)，个元宝。 SendCenterMsg2226『$USERNAME，』在【玩家】中押注【顺门】$HUMAN(NiuNiuBetR)，，按庄牌翻$GLOBAL($玩家玩家庄家倍数)，翻,『输』掉$STR(I13)，个元宝！1 ;-------------------------------------------------------------------------- #IF CHECKVARHUMANNiuNiuBetM，0 CHECKVARGLOBAL$玩家玩家天门赢输=WIN #ACT MOVI14$HUMAN(NiuNiuBetM)， MULI14$STR(I14)，$GLOBAL($玩家玩家天门倍数)， INCI11$STR(I14)， GAMEGOLD+$STR(I14)， GAMEGOLD+$HUMAN(NiuNiuBetM)， SENDMSG6[提示]：您押【天门】$HUMAN(NiuNiuBetM)，，赢$STR(I14)，个元宝。 SendCenterMsg25115『$USERNAME，』在【玩家】中押注【天门】$HUMAN(NiuNiuBetM)，，翻$GLOBAL($玩家玩家天门倍数)，翻,『赢』得$STR(I14)，个元宝！1 #IF CHECKVARHUMANNiuNiuBetM，0 CHECKVARGLOBAL$玩家玩家天门赢输=LOSE #ACT MOVI14$HUMAN(NiuNiuBetM)， MULI14$STR(I14)，$GLOBAL($玩家玩家庄家倍数)， INCI12$STR(I14)， CALCVARHUMANNiuNiuFreeze+$HUMAN(NiuNiuBetM)， CALCVARHUMANNiuNiuFreeze-$STR(I14)， SENDMSG6[提示]：您押【天门】$HUMAN(NiuNiuBetM)，，按庄牌翻$GLOBAL($玩家玩家庄家倍数)，翻,输$STR(I14)，个元宝。 SendCenterMsg2226『$USERNAME，』在【玩家】中押注【天门】$HUMAN(NiuNiuBetM)，，按庄牌翻$GLOBAL($玩家玩家庄家倍数)，翻,『输』掉$STR(I14)，个元宝！1 ;-------------------------------------------------------------------------- #IF CHECKVARHUMANNiuNiuBetL，0 CHECKVARGLOBAL$玩家玩家反门赢输=WIN #ACT MOVI15$HUMAN(NiuNiuBetL)， MULI15$STR(I15)，$GLOBAL($玩家玩家反门倍数)， INCI11$STR(I15)， GAMEGOLD+$STR(I15)， GAMEGOLD+$HUMAN(NiuNiuBetL)， SENDMSG6[提示]：您押【反门】$HUMAN(NiuNiuBetL)，，赢$STR(I15)，个元宝。 SendCenterMsg25115『$USERNAME，』在【玩家】中押注【反门】$HUMAN(NiuNiuBetL)，，翻$GLOBAL($玩家玩家反门倍数)，翻,『赢』得$STR(I15)，个元宝！1 #IF CHECKVARHUMANNiuNiuBetL，0 CHECKVARGLOBAL$玩家玩家反门赢输=LOSE #ACT MOVI15$HUMAN(NiuNiuBetL)， MULI15$STR(I15)，$GLOBAL($玩家玩家庄家倍数)， INCI12$STR(I15)， CALCVARHUMANNiuNiuFreeze+$HUMAN(NiuNiuBetL)， CALCVARHUMANNiuNiuFreeze-$STR(I15)， SENDMSG6[提示]：您押【反门】$HUMAN(NiuNiuBetL)，，按庄牌翻$GLOBAL($玩家玩家庄家倍数)，翻,输$STR(I15)，个元宝。 SendCenterMsg2226『$USERNAME，』在【玩家】中押注【反门】$HUMAN(NiuNiuBetL)，，按庄牌翻$GLOBAL($玩家玩家庄家倍数)，翻,『输』掉$STR(I15)，个元宝！1 ;-------------------------------------------------------------------------- #IF CHECKVARHUMANNiuNiuFreeze，0 #ACT GAMEGOLD+$HUMAN(NiuNiuFreeze)， SENDMSG6系统返还冻结元宝$HUMAN(NiuNiuFreeze)，个。 CALCVARHUMANNiuNiuFreeze=0 MOVI130 MOVI140 MOVI150 ;-------------------------------------------------------------------------- #IF EQUALI11$STR(I12)， #ACT MOVI110 MOVI120 PlayMusic平局.wav SENDMSG6您本局总的平局! #IF LARGEI12$STR(I11)， #ACT DECI12$STR(I11)， SENDMSG6您本局总输$STR(I12)，个元宝,下盘赢回来! PlayMusiclose.wav BREAK #IF LARGEI11$STR(I12)， #ACT DECI11$STR(I12)， #IF CHECKVARGLOBAL$玩家玩家抽税率，0 LARGEI110 #ACT MOVI16$STR(I11)， MULI16$STR(I16)，$GLOBAL($玩家玩家抽税率)， DIVI16$STR(I16)，100 #IF LARGEI160 #ACT GAMEGOLD-$STR(I16)， SENDMSG6您本局总赢$STR(I11)，个元宝,其中扣$GLOBAL($玩家玩家抽税率)，%的手续费$STR(I16)，个元宝! PlayMusicwin.wav MOVI110 MOVI120 MOVI160 ;------------------------------------------------------------------------------------- ;玩家玩家闲家数据清空 ;------------------------------------------------------------------------------------- [@玩家玩家闲家数据清空] #IF CHECKNAMELIST..\QuestDiary\16sky.com\玩家玩家\当局参与名单.txt #ELSEACT BREAK #IF CheckOffline #ACT BREAK #IF CHECK[99]0 #ACT #CALL[\16sky.com\变量数据\变量申明.txt]@玩家私人变量 #IF CHECKLEVELEX，0 #ACT CALCVARHUMANNiuNiuBetR=0 CALCVARHUMANNiuNiuBetM=0 CALCVARHUMANNiuNiuBetL=0 CALCVARHUMANNiuNiuBetTatol=0 CALCVARHUMANNiuNiuWinTatol=0 BREAK ;------------------------------------------------------------------------------------- ;玩家玩家庄家自动下庄 ;------------------------------------------------------------------------------------- [@玩家玩家庄家自动下庄] #IF CHECKVARGLOBAL$玩家玩家庄家姓名=$USERNAME， CHECKVARGLOBAL$玩家玩家庄家本钱$GLOBAL($最低下庄数)， CHECKVARGLOBAL$玩家玩家庄家本钱，0 #ACT CALCVARGLOBAL$玩家玩家庄家姓名=$位置空缺 GAMEGOLD+$GLOBAL($玩家玩家庄家本钱)， MESSAGEBOX[提示]：因为你庄家本钱不足$GLOBAL($最低下庄数)，,系统自动收回庄家资格！\您此轮收回了$GLOBAL($玩家玩家庄家本钱)，元宝。 CALCVARGLOBAL$玩家玩家庄家本钱=0 ;------------------------------------------------------------------------------------------- ;------------------------------------------------------------------------------------------- ;玩家玩家被赶下庄 ;------------------------------------------------------------------------------------------- ;------------------------------------------------------------------------------------------- [@玩家玩家被赶下庄] #IF CHECKLEVELEX，0 #ACT MESSAGEBOX[被赶下庄]：\\玩家【$GLOBAL($玩家玩家庄家姓名)，】用【$GLOBAL($玩家玩家庄家本钱)，】元宝【将你赶下了庄】！\您的元宝已经退回,请查收。 [@坐牢玩家检测] #IF ISONMAP0156 CheckNameList..\QuestDiary\通缉文本\坐监名单.txt$STR(S51)， #ACT BREAK #IF CheckNameList..\QuestDiary\通缉文本\坐监名单.txt$STR(S51)， #ACT MAPMOVE0156 SETRANKLEVELNAME%s\“我罪孽深重，不得不去坐牢去了”\☆★正在享受牢狱之苦★☆ CHANGENAMECOLOR253 MESSAGEBOX你是逃不出去的，安心坐牢吧!! BREAK [@月宫灵符] #IF CHECKGAMEGIRD，2 ISONMAPzhuxian3 #ACT GAMEGIRD-1 break #IF ISONMAPzhuxian3 #ACT HumanHP-300 break #IF CHECKGAMEGIRD，2 ISONMAPzhuxian1 #ACT GAMEGIRD-1 break #IF ISONMAPzhuxian1 #ACT HumanHP-300 break #IF CHECKGAMEGIRD，2 ISONMAPchuanqi003 #ACT GAMEGIRD-1 break #IF ISONMAPchuanqi003 #ACT HumanHP-300 break [@激情派对开始] #say 土城药店，激情派对开始了。\ 只要站在指定坐标就可以获得经验与元宝！\ \ \ \ 我要前往/@我要前往， [@我要前往] #IF #ACT MAPMOVE3352336 [@激情派对经验] #IF ISDUPMODE #ACT BREAK #IF CheckHumInRange33513350 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange33513360 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange33513370 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange33523370 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange33533370 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange3353336 #ACT CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange33533350 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 #IF CheckHumInRange33523350 #act CHANGEEXP+$str(g390)， SendCenterMsg246249激情派对：【%s】参加激情派对获得经验！11 Gmexecuteshoweffect85 [@激情派对结束] #ACT sendmsg0激情派对结束.离下一次开启时间还有60分钟.. sendmsg0激情派对结束.离下一次开启时间还有60分钟.. sendmsg0激情派对结束.离下一次开启时间还有60分钟.. sendmsg0激情派对结束.离下一次开启时间还有60分钟.. sendmsg0激情派对结束.离下一次开启时间还有60分钟.. sendmsg0激情派对结束.离下一次开启时间还有60分钟.. [@激情派元宝与经验] #IF CheckRangeHumCount33523361=1 #ACT movg38970 movg3901000000 #IF CheckRangeHumCount33523361=2 #ACT movg38940 movg390500000 #IF CheckRangeHumCount33523361=3 #ACT movg38930 movg390330000 #IF CheckRangeHumCount33523361=4 #ACT movg38925 movg390250000 #IF CheckRangeHumCount33523361=5 #ACT movg38920 movg390200000 #IF CheckRangeHumCount33523361=6 #ACT movg38916 movg390160000 #IF CheckRangeHumCount33523361=7 #ACT movg38914 movg390140000 #IF CheckRangeHumCount33523361=8 #ACT movg38912 movg390120000 #IF CheckRangeHumCount33523361，8 #ACT movg38910 movg390100000 [@激情检查] #IF ISONMAPjqpd CheckRangeHumCountjqpd1010105 #ACT CHANGEEXP+10000000 SendCenterMsg180251激情泡点人数少于5，每人每秒1000W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=5 #ACT CHANGEEXP+9000000 SendCenterMsg180251激情泡点人数等于5，每人每秒900W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=6 #ACT CHANGEEXP+8000000 SendCenterMsg180251激情泡点人数等于6，每人每秒800W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=7 #ACT CHANGEEXP+7000000 SendCenterMsg180251激情泡点人数等于7，每人每秒700W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=8 #ACT CHANGEEXP+6000000 SendCenterMsg180251激情泡点人数等于8，每人每秒600W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=9 #ACT CHANGEEXP+5000000 SendCenterMsg180251激情泡点人数等于9，每人每秒500W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=10 #ACT CHANGEEXP+4000000 SendCenterMsg180251激情泡点人数等于10，每人每秒400W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=11 #ACT CHANGEEXP+3000000 SendCenterMsg180251激情泡点人数等于11，每人每秒300W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=12 #ACT CHANGEEXP+2000000 SendCenterMsg180251激情泡点人数等于12，每人每秒200W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=13 #ACT CHANGEEXP+1000000 SendCenterMsg180251激情泡点人数等于13，每人每秒100W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=14 #ACT CHANGEEXP+500000 SendCenterMsg180251激情泡点人数等于14，每人每秒50W经验！01 #IF ISONMAPjqpd CheckRangeHumCountjqpd101010=15 #ACT SendCenterMsg180251激情泡点人数15以上，没有经验！01 [@进入抗日战场] #IF #ACT DelayCall50000@关闭窗口 #say 行会战场开启了！赶快准备好进入吧！\ 行会战场内每1秒增加一次经验和元宝！/SCOLOR=250，条件：战场内小于30人，\ 占领中心点,经验元宝加倍！/AUTOCOLOR=253，\ 进入此地图必须加入行会\ 您是否愿意进入行会战场/AUTOCOLOR=250,253,254，?\\ 我愿意/@进入荣誉之战，现在不愿意/@exit，\ [@关闭窗口] #IF #ACT CLOSE BREAK [@进入荣誉之战] #IF IsOnMapkss #ACT MESSAGEBOX你现在是犯人，哪都别想去，好好在这呆着吧！ #ELSEACT goto@进入荣誉之战1 [@进入荣誉之战1] #if EQUALG2791 #ACT goto@kaiqi1 #ELSEACT messagebox行会战场没有开启,2小时开启一次 [@kaiqi1] #if HAVEGUILD #act SetOnTimer151 mapmovebbbb1916 give回城卷1 SetOnTimer181 sendmsg6此地图攻击模式强制行会模式 sendmsg6战场提示：行会战场每1秒增加10W经验5个元宝(中心点加倍)! SENDMSG1提示:提示:[$GUILDNAME，]行会的玩家[$USERNAME，]进入到《行会战场》！ BREAK #ELSEACT messagebox请先加入行会! BREAK [@OnTimer18] #IF IsOnMapbbbb #ACT SetHumAttackMode53600 #ELSEACT SetOffTimer18 BREAK [@OnTimer15] #IF IsOnMapbbbb #act goto@战场奖励 #ELSEACT SetOffTimer15 BREAK [@战场奖励] #IF #ACT goto@新区奖励 break [@新区奖励] #IF CheckRangeHumCountbbbb22202030 #act goto@战场奖励1 #ELSEACT GuildNoticeMsg2550行会战场人数超过30个，不再增加经验和元宝。赶快清人吧！Self GuildNoticeMsg2550行会战场人数超过30个，不再增加经验和元宝。赶快清人吧！Self GuildNoticeMsg2550行会战场人数超过30个，不再增加经验和元宝。赶快清人吧！Self BREAK [@战场奖励1] #IF CHECKINMAPRANGEbbbb15160 #ACT #CALL[\回收奖励\240万.txt]@240万 GAMEGOLD+1000 GuildNoticeMsg255233行会战场-(中心占领者)系统每秒奖励你240W经验1000个元宝!Self #ELSEACT goto@战场奖励2 break [@战场奖励2] #IF #ACT #CALL[\回收奖励\120万.txt]@120万 GAMEGOLD+500 GuildNoticeMsg255233行会战场-系统每秒奖励你120W经验500个元宝(占领中心点双倍)!Self break。