用于战神引擎的多功能，自定义装备锻造/合成Npc脚本，脚本里面的装备内观图是直接调用对应装备的背包素材，不需要单独添加，在脚本里面有对应的素材ID号，你们添加到自己的版本里面的时候，记得写上自己数据库对应的编号。

部分脚本

Program Mir2;
procedure _wsx1;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[鼠]精品') >= 2) then
	begin
	This_Player.Take('[鼠]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[鼠]完美',1);
	//ServerSay('玩家【' + This_Player.Name + '】在土城合成了[鼠]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[鼠]精品x2', 0);
	end;
	procedure _wsx2;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[牛]精品') >= 2) then
	begin
	This_Player.Take('[牛]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[牛]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[牛]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[牛]精品x2', 0);
	end;
procedure _wsx3;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[虎]精品') >= 2) then
	begin
	This_Player.Take('[虎]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[虎]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[虎]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[虎]精品x2', 0);
	end;
	procedure _wsx4;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[兔]精品') >= 2) then
	begin
	This_Player.Take('[兔]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[兔]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[兔]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[兔]精品x2', 0);
	end;
	procedure _wsx5;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[龙]精品') >= 2) then
	begin
	This_Player.Take('[龙]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[龙]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[龙]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[龙]x2', 0);
	end;
procedure _wsx6;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[蛇]精品') >= 2) then
	begin
	This_Player.Take('[蛇]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[蛇]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[蛇]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[蛇]精品x2', 0);
	end;
	procedure _wsx7;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[羊]精品') >= 2) then
	begin
	This_Player.Take('[羊]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[羊]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[羊]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[羊]精品x2', 0);
	end;
	procedure _wsx8;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[马]精品') >= 2) then
	begin
	This_Player.Take('[马]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[马]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[马]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[马]精品x2', 0);
	end;
	procedure _wsx9;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[猴]精品') >= 2) then
	begin
	This_Player.Take('[猴]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[猴]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[猴]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[猴]精品x2', 0);
	end;
	procedure _wsx10;
	begin
	if (This_Player.YBNum >= 200000) and (This_Player.GetBagItemCount ('[鸡]精品') >= 2) then
	begin
	This_Player.Take('[鸡]精品',2);	
	This_Player.ScriptRequestSubYBNum(200000);
	This_Player.Give('[鸡]完美',1);
	ServerSay('玩家【' + This_Player.Name + '】在土城合成了[鸡]完美', 2);
	end else
	This_Player.PlayerNotice('你材料不足：200000元宝+[鸡]x2', 0);
	end;