最新最全最权威的各类手游,端游,页游游戏信息开服信息,尽在游民之家. 订阅微信

战神引擎传奇手游私服设置开区补偿脚本

发表时间:2020-01-08 11:02点击人气:责任编辑:admin打个赏:打赏

大部分游戏管理员都会在开区前先测试,等正式开区后就会清理数据。但是这样的弊端就是会流失部分玩家,为了更好的留住传奇私服玩家,那么添加这个脚本的意义就很明显了。

言归正传,这里就跟大家介绍下此脚本的用法。

1  需要在客户端Mir200\Envir下面新建3个空白txt :32.txt  35.txt 38.txt,
通过函数接口把玩家名字加入txt中
即使重新开区G,V,S变量全部初始化也对其无影响。
2  测试区使用  测试奖励-3.pas    正式区使用 测试奖励-3.pas,改成同一个名字

3 本人只测试了函数接口,都是能够有效添加名字进txt中及删除
其他的请大家自己测试,这个脚本功能可以衍生出很多的脚本用途哟。

 

 测试奖励-3.pas  这个NPC脚本的代码如下,复制进去即可:

PROGRAM Mir2;

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

procedure domain;
begin
    This_NPC.NpcDialog(This_Player,
    '欢迎来到战神热血传奇!现在是测试阶段 在测试阶段\'
 +'|等级到达32级,35级,38级在我这里登记,开区就可以在我这里领取 \'
  +'|32级30W,35级80W,38级150万补偿!\'
 +'|{cmd}<我到了32级/@se>        ^<我到了35级/@sw>    ^<我到了38级/@sb> \');
end;
procedure _se;
begin
      if This_Player.Level >=32 then //检测文档有有该玩家名字 
       begin 
      if This_Npc.ChkStrInFile('32.txt', This_Player.Name) = false  then  //检测文档没有有该玩家名字 
        begin                           
      This_Npc.AddStrToFile('32.txt', This_Player.Name); {添加该玩家名字到 
         Mir200\Envir下的32.txt中 ,32.txt需要自己建一个 
         } 
        end
       else
         This_NPC.NpcDialog(This_Player,'你已经登记过了!');
       end
       else  This_NPC.NpcDialog(This_Player,'你的等级没有达到32级'); 
 end; 
procedure _sw;
begin
      if This_Player.Level >=35 then //检测文档有有该玩家名字 
       begin 
      if This_Npc.ChkStrInFile('35.txt', This_Player.Name) = false  then  //检测文档没有有该玩家名字 
        begin                           
      This_Npc.AddStrToFile('35.txt', This_Player.Name); {添加该玩家名字到 
         Mir200\Envir下的35.txt中 ,35.txt需要自己建一个 
         } 
        end
       else
         This_NPC.NpcDialog(This_Player,'你已经登记过了!');
       end
       else  This_NPC.NpcDialog(This_Player,'你的等级没有达到35级!'); 
 end; 
 
procedure _sb;
begin
      if This_Player.Level >=38 then //检测文档有有该玩家名字 
       begin 
      if This_Npc.ChkStrInFile('38.txt', This_Player.Name) = false  then  //检测文档没有有该玩家名字 
        begin                           
      This_Npc.AddStrToFile('38.txt', This_Player.Name); {添加该玩家名字到 
         Mir200\Envir下的38.txt中 ,38.txt需要自己建一个 
         } 
        end
       else
         This_NPC.NpcDialog(This_Player,'你已经登记过了!');
       end
       else  This_NPC.NpcDialog(This_Player,'你的等级没有达到38级!'); 
 end; 
begin
domain;
end.

打赏

打赏是种鼓励,不打赏是鞭策

扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在