用于战神引擎的一键满血满蓝，支持主号和英雄的npc脚本，之前看到的都是主号，没有英雄的，今天发现了，提取出来，方便大家添加到英雄合击的脚本里面。

部分脚本

 begin
   This_Npc.NpcDialog(This_Player,
   '对不起,您元宝不足1000。'
   ); 
    end;
end;
procedure _manxuefuh1;
var AddHP: integer;
begin
   if This_Player.YBNum >= 1000 then
   begin
   This_Player.ScriptRequestSubYBNum(1000);
   AddHP :=100;
   This_Player.AddplayerAbil(17, AddHP,0);
   This_Player.AddheroAbil(17, AddHP,0);
   This_Player.PlayerNotice('提示：满血满蓝成功！',3);
   This_Player.PlayerNotice('提示：满血满蓝成功！',3);
   This_NPC.CloseDialog(This_Player);
    end 
 else
 begin
   This_Npc.NpcDialog(This_Player,
   '对不起,您元宝不足1000。'
   ); 
    end;
end;
procedure DoImportantThing();
begin
       //这个函数,玩家是无法通过发包刷的
end;
 function YB_NewComeBag(price, num: Integer):boolean; //YB_NewComeBag为自定义回调函数名称，其余参数为固定格式 ，不可以改变 
begin
   result := true; 
end;
//=========================================================属性服务========================================================================
Begin
      This_Npc.NpcDialog(This_Player,
      '你好，欢迎光临，我这里能提供瞬间回血回蓝服务！\'
      +'每次1000元宝能瞬间回血回蓝！\ \'
      +'|{cmd}<一键满血满蓝/@manxuefuh>'
	      +'|{cmd}<一键英雄满血满蓝/@manxuefuh1>'
	  );
end.
  );
end.