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

夜游神

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

1. Procedure _doexit;
   
2. 
   
3. begin
   
4.    This_Npc.CloseDialog(This_Player);
   
5. end;
   
6. 
   
7. procedure domain;
   
8. 
   
9. 
   
10. 
    
11. begin
    
12.     This_NPC.NpcDialog(This_Player,
    
13.    '|<☆☆每晚19.30分刷新一只活动BOSS☆☆/c=254>\'+
    
14.    '|<☆☆20点以后无法进入.☆☆/c=253>\'+
    
15.    '|<☆☆爆火龙以上全部首饰剑甲.☆☆/c=252>\'+
    
16.    '|<☆☆必爆中华烟冰激凌矿泉水等实物.☆☆/c=252>\'+
    
17.    '| {cmd}<我要进入/@sg>\'
    
18.    );
    
19. end;
    
20. 
    
21. 
    
22. procedure _sg;
    
23. 
    
24. begin
    
25.      if  (GetHour = 19) and (GetMin >= 30) then //and (GetMin <= 59) then  
    
26.        begin
    
27.            This_Player.Flyto('D5071~30',11 + random(3) - 1,12 + random(3) - 1);
    
28.                ServerSay('玩家<' + This_Player.Name + '>进入了BOSS必爆！',5);
    
29.          end else
    
30.          This_NPC.NpcDialog(This_Player,
    
31.         '没到规定时间，不能进入\|'
    
32.         +'{cmd}<返回/@main>');
    
33. end;
    
34. 
    
35. 
    
36. 
    
37. 
    
38. Begin
    
39. {
    
40.    if  (GetHour = 19) and (GetMin >= 30) and (GetMin <= 32)  then
    
41.    begin
    
42.          if (This_NPC.CheckMapMonByName('D5071~30','公益老人') = 0) then
    
43.      begin
    
44.                This_NPC.CreateMon('D5071~30', 25, 25, 1, '公益老人', 1);
    
45.       end;
    
46.           end;
    
47.          
    
48.    if  (GetHour = 13) and (GetMin >=0 ) and (GetMin <= 2)  then
    
49.    begin
    
50.          if (This_NPC.CheckMapMonByName('3','公益恶魔') = 0) then
    
51.      begin
    
52.                This_NPC.CreateMon('3', 355, 336, 1, '公益恶魔', 1);
    
53.       end;
    
54.           end;}
    
55.   domain;
    
56. end.

复制代码

文件名：焚天免授权传奇手游服务端40大陆魂环BOSs首曝( 售价： 5积分 )

已经过安全软件检测无毒，请您放心下载

Chinese.Doll

积分任务

moxiaojiutian

试玩一下。

kingscome

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

lm79522

试试吧！感谢分享！