烈焰私服服务端自定义装备回收脚本

function ontalk2035(npc,event,player)
	player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
一键回收各种装备给元宝和心法值
飞12首饰/烈焰四格: 心法值1W 元宝1000 
心四首饰：心法值5W 元宝2000
心六首饰：心法值10W 元宝5000
心八首饰：心法值20W 元宝5万
心十首饰：元宝50万
烈焰武器/衣服/圣四格: 心法值5W 元宝2万
圣烈焰武器/衣服: 心法值10W 5万
主宰圣四格: 心法值20W 5万
主宰烈焰武器/衣服: 心法值50W  10万
出生时的装备回收无奖励,仅回收
#&talk_line#&
               <a href='event:M2402,1'>【一键回收装备】</a>
#&talk_line#&
]]);
end

--
ItemA1 = {
{xf=10000,yb=1000,equ={40216,40217,40218,50216,50217,50218,60216,60217,60218,70216,70217,70218,90216,90217,90218,100216,100217,100218,150001,16000,170001,180001}},
{xf=50000,yb=2000,equ={40219,40220,40221,50219,50220,50221,60219,60220,60221,70219,70220,70221,90219,90220,90221,100219,100220,100221}},
{xf=100000,yb=5000,equ={40222,40223,40224,50222,50223,50224,60222,60223,60224,70222,70223,70224,90222,90223,90224,100222,100223,100224}},
{xf=200000,yb=50000,equ={40225,40226,40227,50225,50226,50227,60225,60226,60227,70225,70226,70227,90225,90226,90227,100225,100226,100227}},
{xf=0,yb=500000,equ={40228,40229,40230,50228,50229,50230,60228,60229,60230,70228,70229,70230,90228,90229,90230,100228,100229,100230}},
{xf=50000,yb=20000,equ={20900,30901,30902,150002,150003,150004,160002,160003,160004,170002,170003,170004,180002,180003,180004}},
{xf=100000,yb=50000,equ={20901,30903,30904}},
{xf=200000,yb=50000,equ={150005,150006,150007,160005,160006,160007,170005,170006,170007,180005,180006,180007}},
{xf=500000,yb=100000,equ={20902,30905,30906}},
{xf=0,yb=0,equ={20020,20021,20022,30035,30036,30037,30038,30039,30040,40204,40205,40206,50204,50205,50206,60204,60205,60206,70204,70205,70206,90204,90205,90206,100204,100205,100206}},
};


function ontalk2035_1(npc,event,player)------
	local ItemNum = 0; 
	local xfval = 0;
	local Goldr = 0;
for i = 1,#ItemA1 do
		 for s = 1,#ItemA1[i].equ do
          local n = player:num_item_level(ItemA1[i].equ[s],1);
			if n >= 1 then
				player:remove_item_level(ItemA1[i].equ[s],n,1);
				ItemNum = ItemNum + n;
				xfval = xfval+ ItemA1[i].xf * n;
				Goldr = Goldr + ItemA1[i].yb * n;
			end
	end
end

	if ItemNum >= 1 then
		player:set_param(341,player:get_param(341)+xfval);
		player:add_vcoin(Goldr);
		player:alert(10,0,0,"您一共回收了" .. ItemNum .. "件装备!");
		player:alert(10,0,0,"心法值+" .. xfval .. "  元宝+" .. Goldr .."");
	else
		player:alert(10,0,0,"您没有可回收的装备!");
	end
	ontalk2035(npc,0,player,0);
end

Npc2035Funid = 
{
[0] = ontalk2035;
[1] = ontalk2035_1;
[2] = ontalk2035_2;
[3] = ontalk2035_3;
[4] = ontalk2035_4;
[5] = ontalk2035_5;
[6] = ontalk2035_6;
[7] = ontalk2035_7;
}

function CreatureNpcFun(npc,event,player,funid)
	if Npc2035Funid[funid] ~= nil then 
		Npc2035Funid[funid](npc,evnet,player);
	end
end

RegisterUnitEvent(2035,20,"ontalk2035")
RegisterUnitEvent(2035,29,"CreatureNpcFun")