欢迎来到九三版本库(www.93bbk.com)上千版本等您选购!版本:共 738 个
传奇手游版本库-传奇手游SF版本-战神引擎版本库-传奇手游网
新手礼包/新手路费Npc脚本

新手礼包/新手路费Npc脚本

立即购买
  • 引擎类型脚本素材
  • 生肖展示亥猪
  • 发布日期2022/5/1 15:53:33
  • 人气74
  • 版本价格20 积分
用于战神引擎的新手礼包npc脚本,脚本是明文版的,gm可以根据自己的要求,任意修改礼包里面的礼品内容,还有领取码,脚本文件是单文件版本,使用起来也是非常的方便,直接把文件放到脚本文件夹,然后把NPC信息添加到NPC脚本文件即可。文件有一份用来储存礼包领取码的文件,放在D:\Mud2.0\Mir200\Envir下面。

用于战神引擎的新手礼包npc脚本,脚本是明文版的,gm可以根据自己的要求,任意修改礼包里面的礼品内容,还有领取码,脚本文件是单文件版本,使用起来也是非常的方便,直接把文件放到脚本文件夹,然后把NPC信息添加到NPC脚本文件即可。文件有一份用来储存礼包领取码的文件,放在D:\Mud2.0\Mir200\Envir下面。

新手礼包/新手路费Npc脚本

部分脚本

program mir2; 
procedure _youjian; 
begin    
        This_NPC.InputDialog(This_Player,'请输入推广密钥',0,123) ;
end;
procedure p123;
begin
   if This_NPC.InputOK  then             
         begin 
      if This_Npc.ChkStrInFile('推广码1.txt', This_NPC.InputStr) = true  then          //检测文档是否有该推广码 
           This_NPC.NpcDialog(This_Player,'推广码错误,或已使用!' +'{cmd}<返回/@main>') ;
         end;
    end; 
procedure jxyb1;
begin
      if This_Npc.ChkStrInFile('推广人员1.txt', This_Player.Name) = False  then  //检测该玩家名字是否在此文本      False=否
	   begin
      if This_Player.FreeBagNum >= 5 then                                           //检测该玩家背包是否有3个及以上空格
        begin
      if This_Npc.ChkStrInFile('推广码1.txt', This_NPC.InputStr) = true  then    //防刷,再次检测文档是否有该推广码   true=是
	   begin
		This_Player.GiveBindItem('小通灵珠',1);
		This_Player.GiveBindItem('一介封魔卷',1);
        This_Player.PlayerNotice('[声望]:增加100点,当前声望:['+inttostr(This_Player.MyShengwan)+']点!',2);		
        ServerSay('恭喜玩家<' + This_Player.Name + '>获得了群推广大礼包,请继续努力哦!', 1);		
        This_NPC.NpcDialog(This_Player,
        '恭喜:你获得推广礼包!' ); 
		end else
        This_NPC.NpcDialog(This_Player,'推广码有误,请重新输入。');
        end else
        This_NPC.NpcDialog(This_Player,'背包请留出5个空格');
        end else
        This_NPC.NpcDialog(This_Player,'你已经领取过一次奖励了!无法领取');
 end;
//================================================================无限领取说明
 {
//  以上内容为玩家只能领取一次奖励 如果要无限领取奖励只需要添加 4 个 // 即可,位置如下
   if This_Npc.ChkStrInFile('5元推广人员.txt', This_Player.Name) = False  then      //检测该玩家名字是否在此文本      False=否
	begin
    end else
    This_NPC.NpcDialog(This_Player,'你已经领取过一次奖励了!无法领取'); 
找到对应的地方直接最前面添加 // 即可,如果再不会 建议你找块豆腐,干啥你应该清楚	
 }
 //================================================================无限领取说明
begin
  This_Npc.NpcDialog(This_Player,
      '|<>      <◇/fcolor=70><品/fcolor=69><牌/fcolor=68><好/fcolor=67><服/fcolor=131><◇/fcolor=94><通/fcolor=149><灵/fcolor=149><传/fcolor=149><奇/fcolor=149><◇/fcolor=94><独/fcolor=131><家/fcolor=67><手/fcolor=68><游/fcolor=69><◇/fcolor=70>|\'
	   +'|<【关注奖励】>:<一介封魔卷 * 1/fcolor=254>|\'  
	   +'<【关注有礼】>:  不定期公众哈留言抽奖|\'  
	   +'<【领取密码】>:  <输入:666666/fcolor=243>|\'  
	   +'<【更多福利】>:  请联系客服咨询|\'   	   
       +'|{cmd}<领取奖励/@youjian>         ^<关闭此页/@exit> |\ \'
   );
end.


立即购买