设为首页收藏本站 本站已运行

图片管理

 找回密码
 立即注册

QQ登录

只需一步,快速开始

小喇叭+ 发布

80族长充值比例1:100
03-29 22:52
02-20 14:51
查看: 569|回复: 0

[脚本] 战神引擎:需要达到一定级别、人数才能开放地图脚本实例

[复制链接]

升级   100%

  • TA的每日心情
    奋斗
    昨天 07:59
  • 签到天数: 330 天

    [LV.8]以坛为家I

    629

    主题

    44

    回帖

    9302

    积分

    管理员

    Rank: 9Rank: 9Rank: 9

    积分
    9302
    发表于 2021-1-12 00:41:50 | 显示全部楼层 |阅读模式
    80家族网:本站力求让你一站在手资源全有!

    QQ截图20210112003433.jpg

    脚本实例分享:
    {
    *******************************************************************}

    Program Mir2;
    {$I lostcommon.pas}
    var
    ml, bgl, my, ss, ly, hl, xy, hy, wl, sm: string;
    jishu, jishu1, jishu2, jishu3, jishu4, jishu5, jishu6, jishu7, jishu8, jishu9: Integer;



    Procedure _doexit;
    begin
       This_NPC.CloseDialog(This_Player);
    end;


    Procedure _buguilu;
    begin                                        
    if GetG(21,46) >= 10 then
      begin
      bgl := '开启';
      end
      else   bgl := '关闭';
             begin       

          This_NPC.NpcDialog(This_Player,
          +'|<不归路/c=253> \'  
              +'|<怪物:/c=250><统领.千年树妖.万年树妖/c=103> \'
              +'|<爆率:/c=250><可爆雷霆.奔雷.战神.狂战.特戒等装备/c=103> \'
              +'|<条件:/c=250>全服<10/c=254>人达到<44/c=254>级.系统自动开启不归路\'          
              +'|<人数:/c=250>当前全服44级人数 [ <'+inttostr(GetG(21,46))+'/c=254> ] 人 \'
              +'|<状态:/c=250><[ '+ bgl +' ]/c=146>\'          
              +'|{cmd}<进入不归路/@buguilu1>    ^<返回/@gaoji>\' );          
       end;
    end;


    procedure _buguilu1;
    begin
    if GetG(21,46) >= 10 then
       begin
      if This_Player.Level >= 44 then   
       begin   
    This_Player.RandomFlyto('cmzc1');
    ServerSay('玩家['+This_Player.Name+']进入[不归路].希望他满载而归!', 2);
    end else
           This_Npc.NpcDialog(This_Player,
              '进入不归路失败: \'
         +'|状态:<[ '+ bgl +' ]/c=146> '          
         +'|原因:你的等级不足44级,不能让你去送死! |\'
             +'|<返回上一页/@buguilu>^<返回首页/@main>\'
              );
    end else
           This_Npc.NpcDialog(This_Player,
              '进入不归路失败: \'
         +'|状态:<[ '+ bgl +' ]/c=146> '          
             +'|原因:全服44级人数不足[ 10 ]人.目前[ <'+inttostr(GetG(21,46))+'/c=254> ]人| \'

             +'|<返回上一页/@buguilu>^<返回首页/@main>\'
              );
       end;



    游客,如果您要查看本帖隐藏内容请回复






    上一篇:战神引擎欧皇传奇复古三职业+安卓+工具+外网教程
    下一篇:传奇手游战神引擎显示角色行会名的修改路径
    回复

    使用道具 举报

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

    本版积分规则

    欢迎访问80家族网
    本站创建于:2020-07-22,稳定运行了6月19天09时, 本站已被访问12163人次!

    QQ|Archiver|手机版|小黑屋|图片管理 ( 鲁ICP备19060415号 )

    GMT+8, 2026-2-6 09:18 , Processed in 0.071781 second(s), 35 queries .

    Powered by Discuz! X3.4 Licensed

    © 2001-2023 Discuz! Team.

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