夜游神 发表于 2024-1-5 04:40:27

焚天免授权传奇手游服务端40大陆魂环BOSs首曝

焚天免授权传奇手游服务端40大陆魂环BOSs首曝

Procedure _doexit;

begin
   This_Npc.CloseDialog(This_Player);
end;

procedure domain;



begin
    This_NPC.NpcDialog(This_Player,
   '|<☆☆每晚19.30分刷新一只活动BOSS☆☆/c=254>\'+
   '|<☆☆20点以后无法进入.☆☆/c=253>\'+
   '|<☆☆爆火龙以上全部首饰剑甲.☆☆/c=252>\'+
   '|<☆☆必爆中华烟冰激凌矿泉水等实物.☆☆/c=252>\'+
   '| {cmd}<我要进入/@sg>\'
   );
end;


procedure _sg;

begin
   if(GetHour = 19) and (GetMin >= 30) then //and (GetMin <= 59) then
       begin
         This_Player.Flyto('D5071~30',11 + random(3) - 1,12 + random(3) - 1);
               ServerSay('玩家<' + This_Player.Name + '>进入了BOSS必爆!',5);
         end else
         This_NPC.NpcDialog(This_Player,
      '没到规定时间,不能进入\|'
      +'{cmd}<返回/@main>');
end;




Begin
{
   if(GetHour = 19) and (GetMin >= 30) and (GetMin <= 32)then
   begin
         if (This_NPC.CheckMapMonByName('D5071~30','公益老人') = 0) then
   begin
               This_NPC.CreateMon('D5071~30', 25, 25, 1, '公益老人', 1);
      end;
          end;
         
   if(GetHour = 13) and (GetMin >=0 ) and (GetMin <= 2)then
   begin
         if (This_NPC.CheckMapMonByName('3','公益恶魔') = 0) then
   begin
               This_NPC.CreateMon('3', 355, 336, 1, '公益恶魔', 1);
      end;
          end;}
domain;
end.焚天免授权传奇手游服务端40大陆魂环BOSs首曝

Chinese.Doll 发表于 2024-1-5 09:46:47

积分任务

moxiaojiutian 发表于 2024-1-14 18:30:43

试玩一下。

kingscome 发表于 2024-1-18 03:29:59

还是来看看吧,谢谢分享了

lm79522 发表于 2024-2-26 13:16:39

试试吧!感谢分享!
页: [1]
查看完整版本: 焚天免授权传奇手游服务端40大陆魂环BOSs首曝