战神引擎魔血石修复Npc脚本(无条件使用)

用于战神引擎魔血石修复Npc脚本,脚本无条件使用,方便玩家修复魔血石、气血石,因为血石的特殊属性,一些版本无法直接通过修复水、修复NPC对血石经行修复,这个时候,就需要专门的NPC来完成,今天帮主更新的这个就是了。

战神引擎魔血石修复Npc脚本(无条件使用)

部分脚本

procedure _sige1;
begin 
 begin
 if This_Player.GetBagItemCount ('二级血石') >= 1 then
 begin
 This_Player.Take('二级血石',1); 
 This_Player.Give('二级血石',1);
 This_NPC.NpcDialog(This_Player,'二级血石,修复成功');
 end else
 if This_Player.GetBagItemCount ('三级血石') >= 1 then
 begin
 This_Player.Take('三级血石',1); 
 This_Player.Give('三级血石',1);
 This_NPC.NpcDialog(This_Player,'三级血石,修复成功');
 end else
 if This_Player.GetBagItemCount ('四级血石') >= 1 then
 begin
 This_Player.Take('四级血石',1); 
 This_Player.Give('四级血石',1);
 This_NPC.NpcDialog(This_Player,'四级血石,修复成功');
 end else
 if This_Player.GetBagItemCount ('五级血石') >= 1 then
 begin
 This_Player.Take('五级血石',1); 
 This_Player.Give('五级血石',1);
 This_NPC.NpcDialog(This_Player,'五级血石,修复成功');
 end else
 if This_Player.GetBagItemCount ('精品嗜血[神器]') >= 1 then
 begin
 This_Player.Take('健健传奇[神器]',1); 
 This_Player.Give('健健传奇[神器]',1);
 This_NPC.NpcDialog(This_Player,'精品嗜血[神器],修复成功');
 end else
 if This_Player.GetBagItemCount ('一级血石') >= 1 then
 begin
 This_Player.Take('一级血石',1); 
 This_Player.Give('一级血石',1);
 This_NPC.NpcDialog(This_Player,'一级血石,修复成功');
 end else  	
   This_NPC.NpcDialog(This_Player, '骚年,你包里什么都没有,修个锤子阿!' ) ;
      
end;
end;
begin
 domain;
end.
分享到:
赞(0)