sm

立即登录 | 账号注册

积分: 0 |用户组: 游客

搜索
服务器租用 传奇3一条龙 支付平台源码 无法下载点击此处反馈
查看: 481|回复: 1

[战神引擎] 传奇手游战神引擎怪物攻城脚本综合

[复制链接]

826

主题

36

回帖

23万

积分

霸王教主

积分
235497
发表于 2023-7-27 00:12:24 | 显示全部楼层 |阅读模式
传奇手游战神引擎怪物攻城脚本综合

内容:怪物攻城在土城举行,每10分钟一波怪,共6波,第六波过5分钟后全BOSS攻城,21:30清空当期地图怪物!

1 活动开始前,服务端原GuardList.txt先备份,然后直接点开原文件手动删除土城的卫士,

该方法目的在于攻城时候去掉土城内大刀卫士,不足之处在于需要重启M2,闲麻烦就不管这个。

2 PsNpcscripts.txt中的NPC可以放到土城,或者直接把脚本内容procedure Execute以下部分全部抠出来放到盟重公告牌里去,

如放在公告牌里为防止一分钟刷2次怪,需要去PsNpcScript.txt中把公告牌最后一个40改到60秒以上
  1. PROGRAM Mir2;

  2. Procedure _doexit;
  3. begin
  4.    This_Npc.CloseDialog(This_Player);
  5. end;

  6. procedure domain;
  7. begin
  8.     This_NPC.NpcDialog(This_Player,
  9.     '欢迎来到开心就好传奇,怪物攻城时间为周五晚上20:00-21:30,\'
  10.         +'在土城举行,每10分钟一波怪,共6波,第六波过5分钟后全BOSS攻城,\'
  11.   +'21:30清空当期怪物\'
  12.     +'|{cmd}<查询/@cx>\');
  13. end;

  14. procedure _cx;

  15. begin  
  16.     if  ((GetHour = 20) and ( GetDayOfWeek = 6) and (GetMin < 60)) or
  17.         ((GetHour = 21) and ( GetDayOfWeek = 6) and (GetMin < 30))  then  
  18.     begin
  19.       This_Npc.NpcDialog(This_Player,
  20.         '当前土城正在遭受怪物肆虐,请注意安全!');
  21.         end else
  22.   This_Npc.NpcDialog(This_Player,
  23.         '不在怪物攻城时间!');
  24.     end;

  25. procedure Execute;
  26. var   
  27. gmin : integer;
  28. begin
  29. gmin := GetMin ;
  30. if (GetDayOfWeek = 6) and (GetHour = 20)  then            //定时刷怪时间点
  31. case gmin of
  32. 0 : begin
  33. This_NPC.CreateMon('3',234,292,5,'僵尸',50);
  34. This_NPC.CreateMon('3',347,376,5,'半兽人',50);
  35. This_NPC.CreateMon('3',380,364,5,'尸王',10);
  36. This_NPC.CreateMon('3',381,330,5,'半兽勇士',10);
  37. This_NPC.CreateMon('3',380,364,5,'双头血魔',1);
  38. This_NPC.CreateMon('3',380,364,5,'双头金刚',1);
  39. This_NPC.SetMonTargetXY(333,333);
  40. This_NPC.NpcNotice('怪物在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  41.     end;
  42. 10 : begin
  43. This_NPC.CreateMon('3',234,292,5,'恶灵僵尸',50);
  44. This_NPC.CreateMon('3',347,376,5,'骷髅长枪兵',50);
  45. This_NPC.CreateMon('3',380,364,5,'尸王',10);
  46. This_NPC.CreateMon('3',381,330,5,'电僵王',10);
  47. This_NPC.SetMonTargetXY(323,323);
  48. This_NPC.NpcNotice('第二波怪物正在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  49.     end;   
  50. 20 : begin
  51. This_NPC.CreateMon('3',234,292,5,'沃玛勇士',50);
  52. This_NPC.CreateMon('3',347,376,5,'沃玛战将',50);
  53. This_NPC.CreateMon('3',380,364,5,'火焰沃玛',10);
  54. This_NPC.CreateMon('3',381,330,5,'沃玛教主',4);
  55. This_NPC.CreateMon('3',381,330,5,'暗之沃玛教主',1);
  56. This_NPC.SetMonTargetXY(337,325);
  57. This_NPC.NpcNotice('第三波怪物正在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  58.     end;   
  59. 30 : begin
  60. This_NPC.CreateMon('3',234,292,5,'祖玛弓箭手',20);
  61. This_NPC.CreateMon('3',347,376,5,'楔蛾',20);
  62. This_NPC.CreateMon('3',380,364,5,'邪恶钳虫',10);
  63. This_NPC.CreateMon('3',381,330,5,'暴牙蜘蛛',10);
  64. This_NPC.CreateMon('3',381,330,5,'血巨人',10);
  65. This_NPC.CreateMon('3',380,364,5,'白野猪',10);
  66. This_NPC.CreateMon('3',381,330,5,'暗之黄泉教主',1);
  67. This_NPC.CreateMon('3',380,364,5,'暗之虹魔教主',1);
  68. This_NPC.SetMonTargetXY(323,337);
  69. This_NPC.NpcNotice('第四波怪物正在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  70.     end;  
  71. 40 : begin
  72. This_NPC.CreateMon('3',234,292,5,'僵尸',50);
  73. This_NPC.CreateMon('3',347,376,5,'半兽人',50);
  74. This_NPC.CreateMon('3',380,364,5,'尸王',10);
  75. This_NPC.CreateMon('3',381,330,5,'半兽勇士',10);
  76. This_NPC.CreateMon('3',234,292,5,'重装使者',2);
  77. This_NPC.CreateMon('3',347,376,5,'暗之双头血魔',1);
  78. This_NPC.CreateMon('3',380,364,5,'暗之双头金刚',1);
  79. This_NPC.CreateMon('3',381,330,5,'暗之骷髅精灵',1);
  80. This_NPC.SetMonTargetXY(337,337);
  81. This_NPC.NpcNotice('第五波怪物正在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  82.     end;  
  83.   50 : begin
  84. This_NPC.CreateMon('3',234,292,5,'虹魔猪卫',5);
  85. This_NPC.CreateMon('3',347,376,5,'黑野猪',20);
  86. This_NPC.CreateMon('3',380,364,5,'邪恶毒蛇',5);
  87. This_NPC.CreateMon('3',381,330,5,'虹魔蝎卫',5);
  88. This_NPC.CreateMon('3',234,292,5,'虹魔猪卫',5);
  89. This_NPC.CreateMon('3',347,376,5,'虹魔教主',1);
  90. This_NPC.CreateMon('3',380,364,5,'牛魔将军',5);
  91. This_NPC.CreateMon('3',381,330,5,'牛魔法师',5);
  92. This_NPC.CreateMon('3',347,376,5,'魔龙刀兵',20);
  93. This_NPC.CreateMon('3',380,364,5,'魔龙力士',5);
  94. This_NPC.CreateMon('3',381,330,5,'魔龙教主',1);
  95. This_NPC.CreateMon('3',347,376,5,'暗之魔龙教主',1);
  96. This_NPC.CreateMon('3',380,364,5,'牛魔王',1);
  97. This_NPC.CreateMon('3',381,330,5,'暗之牛魔王',1);
  98. This_NPC.CreateMon('3',347,376,5,'黄泉教主',1);
  99. This_NPC.CreateMon('3',380,364,5,'魔影巨人',1);
  100. This_NPC.SetMonTargetXY(329,333);
  101. This_NPC.NpcNotice('第六波怪物正在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  102.     end;  
  103. 60 : begin
  104. This_NPC.CreateMon('3',381,330,5,'魔龙教主',1);
  105. This_NPC.CreateMon('3',347,376,5,'暗之魔龙教主',1);
  106. This_NPC.CreateMon('3',380,364,5,'牛魔王',1);
  107. This_NPC.CreateMon('3',381,330,5,'暗之牛魔王',1);
  108. This_NPC.CreateMon('3',347,376,5,'黄泉教主',1);
  109. This_NPC.CreateMon('3',380,364,5,'魔影巨人',1);
  110. This_NPC.CreateMon('3',333,333,5,'祖玛教主',1);
  111. This_NPC.CreateMon('3',333,333,5,'暗之祖玛教主',1);
  112. This_NPC.CreateMon('3',333,333,5,'赤月恶魔',1);
  113. This_NPC.CreateMon('3',333,333,5,'火龙教主',1);
  114. This_NPC.SetMonTargetXY(333,333);
  115. This_NPC.NpcNotice('攻城统帅正在盟重集结即将攻城,请各位勇士踊跃参与,维护一方安定!');
  116.     end;  
  117.   end;
  118. if  (GetDayOfWeek = 6) and (GetHour = 21) and  (GetMin = 30)  then
  119.   begin
  120.     This_NPC.ClearMon('3');
  121.     This_NPC.NpcNotice('怪物攻城结束,请各位勇士下次再来!');
  122.   end;
  123.   end;
  124. Begin
  125.   domain;  
  126. end.
复制代码

文件名称:怪物攻城综合脚本.zip 
下载次数:0  文件大小:1.93 KB 
下载权限: 不限 VIP   [购买VIP]   [充值积分]   [每日签到领积分]
安全检测,请放心下载






上一篇:击杀BOSS首曝奖励战神引擎脚本
下一篇:战神引擎脚本通天塔脚本修复禁止随机
回复

使用道具 举报

1

主题

252

回帖

1070

积分

旋风流星刀

积分
1070
QQ
发表于 2023-12-21 07:41:54 | 显示全部楼层
积分任务
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|美林GM论坛 ( 蜀ICP备2020030293号-2 )|网站地图

禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.如遇版权问题,请及时QQ联系

GMT+8, 2024-4-28 21:31 , Processed in 0.299931 second(s), 57 queries .

Powered by Discuz! X3.5

Copyright © 2001-2024, Tencent Cloud.

快速回复 返回顶部 返回列表