用于战神引擎用元宝批量购买疗伤药品Npc脚本，脚本默认支持购买1包、5包、10包疗伤药，默认使用元宝购买，脚本是明文版，单文件，添加进去就能直接使用，里面的药品名称和元宝都可以自由更改，非常的简单。

部分脚本

program mir2;
function Gaoji0LB(price, num: Integer):boolean;
begin                                               
  result := true;
end;
procedure _yibao;
     begin
    if This_Player.FreeBagNum > 0 then
	begin
   if This_Player.YBnum >= 1 then 
  begin
  This_Player.Give('疗伤药包',1);
  This_Player.ScriptRequestSubYBNum(1); 
  end else
    This_Player.PlayerDialog(
    '对不起，你元宝不足，不能购买疗伤药包！'
    );
  end else
   This_Player.PlayerDialog(
	'对不起，你背包已满！'
	);
	end;
procedure _wubao;
     begin
    if This_Player.FreeBagNum > 0 then
	begin
   if This_Player.YBnum >= 5 then 
  begin
  This_Player.Give('疗伤药包',5);
  This_Player.ScriptRequestSubYBNum(5); 
  end else
    This_Player.PlayerDialog(
    '对不起，你元宝不足，不能购买疗伤药包！'
    );
  end else
   This_Player.PlayerDialog(
	'对不起，你背包已满！'
	);
	end;
procedure _shibao;