战神引擎天下第一Npc脚本集成版(带Gm清理后台)

用于战神引擎玩家在线申请天下第一Npc脚本集成版，相比之前需要6个指定NPC外观的传统版，这个更简单，更方便，一个NPC，就包含了三职业，GM可以直接在线清理，非常的方便。不需要去单独删除记录文件，脚本需要用到盘古插件，因为有属性领取。这个你们看引入文件就知道。

脚本是明文版，默认是三职业版的。如果用于单职业，就直接删除法道显示即可。脚本最低申请属性点你们看MaxMC、MaxDC、MaxSC后面的判断。根据自己的版本，换成自己的想要的数值。

使用方法

天下第一.txt这个文件要放到D:\mud2.0\Mir200\Share\config这个文件夹下面

gaojishuxing.pas文件可以根据自己的需要，单独提取属性添加到版本里面，如果原先的版本没有这个文件，可以直接覆盖进去。

使用之前，升级GM模式，点开Npc，清理一次变量，才能使用，否则无法使用！！！！

战神引擎天下第一Npc脚本集成版(带Gm清理后台)

部分脚本

procedure _sqdy; 
begin			   
if (This_Player.Gender = 0) and (This_Player.Job = 0) then			   
begin	
    if This_Player.MaxDC > GetG(10,10) then
begin	
	if This_Player.MaxDC >= 50 then
begin     
    SetG(10,10,This_Player.MaxDC);	                   
    This_Player.SetV(10,16,1);
    ServerSay('系统：玩家【' + This_Player.Name + '】成功申请天下第一男战士！', 0);
	WriteIniSectionStr('天下第一.txt','第一男战士','姓名',+This_Player.Name);
    WriteIniSectionStr('天下第一.txt','第一男战士','攻击',+inttostr(This_Player.MaxDC));  
    This_NPC.NpcDialog(This_Player,'申请成功：您的成就让人敬佩！|' 
    +'|                                                           <返回/@main>') ;  
  end else 	
   This_NPC.NpcDialog(This_Player,'申请失败：你的攻击不足50不能申请！|' 
    +'|                                                           <返回/@main>') ;	
  end else 	
   This_NPC.NpcDialog(This_Player,'<申请失败/c=250>：<你攻击低于了/c=250><'+inttostr(GetG(10,10))+'/c=249><点/c=250>！|' 
    +'|                                                           <返回/@main>') ;
  end else 
if (This_Player.Gender = 1) and (This_Player.Job = 0) then			   
begin	
    if This_Player.MaxDC > GetG(10,11) then
begin	
	if This_Player.MaxDC >= 50 then
begin     
    SetG(10,11,This_Player.MaxDC);	                   
   This_Player.SetV(10,16,1);
    ServerSay('系统：玩家【' + This_Player.Name + '】成功申请天下第一女战士！', 0);
	WriteIniSectionStr('天下第一.txt','第一女战士','姓名',+This_Player.Name);
    WriteIniSectionStr('天下第一.txt','第一女战士','攻击',+inttostr(This_Player.MaxDC));  
    This_NPC.NpcDialog(This_Player,'申请成功：您的成就让人敬佩！|' 
    +'|                                                           <返回/@main>') ;  
  end else 	
   This_NPC.NpcDialog(This_Player,'申请失败：你的攻击不足50不能申请！|' 
    +'|                                                           <返回/@main>') ;	
  end else 	
   This_NPC.NpcDialog(This_Player,'<申请失败/c=250>：<你攻击低于了/c=250><'+inttostr(GetG(10,11))+'/c=249><点/c=250>！|' 
    +'|                                                           <返回/@main>') ;
  end else       
if (This_Player.Gender = 0) and (This_Player.Job = 1) then			 
begin	
    if This_Player.MaxMC > GetG(10,12) then
begin	
	if This_Player.MaxMC >= 30 then
begin     
    SetG(10,12,This_Player.MaxMC);	                   
   This_Player.SetV(10,16,1);
    ServerSay('系统：玩家【' + This_Player.Name + '】成功申请天下第一男法师！', 0);
	WriteIniSectionStr('天下第一.txt','第一男法师','姓名',+This_Player.Name);
    WriteIniSectionStr('天下第一.txt','第一男法师','攻击',+inttostr(This_Player.MaxMC));  
    This_NPC.NpcDialog(This_Player,'申请成功：您的成就让人敬佩！|' 
    +'|                                                           <返回/@main>') ;  
  end else 	
   This_NPC.NpcDialog(This_Player,'申请失败：你的魔法不足30不能申请！|' 
    +'|                                                           <返回/@main>') ;	
  end else 	
   This_NPC.NpcDialog(This_Player,'<申请失败/c=250>：<你魔法低于了/c=250><'+inttostr(GetG(10,12))+'/c=249><点/c=250>！|' 
    +'|                                                           <返回/@main>') ;
  end else      
if (This_Player.Gender = 1) and (This_Player.Job = 1) then

分享到：

赞(0)