烈焰私服服务端增加龙魔神殿传送NPC脚本

function ontalk2202(npc,event,player)
	if player:GetMapId() == 12 then
	player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&  	
在勇士们携带龙卫心法离开神殿的一瞬间，神殿晃动了，原本的雕像居然复活了，并且咆哮向勇士们袭来。经过激烈的战斗，最终在其他勇士的掩护下，龙卫心法最终被带回了烈焰城，但是修炼龙卫心法的条件非常严苛，只有强大的勇士才能修炼龙卫心法。
#&talk_line#&           
           <font color="#FFFF00">一层主要掉落心4装备，二层主要掉落心6装备</font>
#&talk_line#&           
           <a href='event:M2402,1'>【龙魔神殿第1层】</a>
#&talk_line#&
       <font color="#FFFF00">小子，既然给你找到我，想要获得龙卫心法没点本事不行哦，或者....你懂得....嘿嘿..</font>
#&talk_line#&
        <a href='event:M2402,3'>1W元宝换取50W心法修炼经验</a>			

       <a href='event:M2402,4'>10W元宝换取500W心法修炼经验</a>
#&talk_line#&		
	
]]);
	else
	player:echo(0,npc:GetLowGUID(),[[
<a href='event:M2402,2'>【龙魔神殿第2层】</a>(需要v5)
]]);
	end
end

function ontalk2202_1(npc,event,player)
	player:randomthismap(421);
	g_alert("玩家[<font color='#FF0000'>"..player:GetName().."</font>]通过传送员进入龙魔神殿第1层",2,1000,0,1);
end

function ontalk2202_2(npc,event,player)
	if player:get_player_type() >= 5 then
		player:randomthismap(422);
		g_alert("玩家[<font color='#FF0000'>"..player:GetName().."</font>]通过传送员进入龙魔神殿第2层",2,1000,0,1);
	else
		player:alert(10,0,0,"v5以上玩家才能进入2层");
		ontalk2202(npc,0,player,0);
	end
end

function ontalk2202_3(npc,event,player)
	if   player:get_vcoin() >= 10000 then
		 player:sub_vcoin(10000);
		 player:set_param(341,player:get_param(341) + 500000 );
		 player:alert(10,0,0,"您获得了500000点元力,当前心法元力"..player:get_param(341).."点");
	else
			player:alert(10,0,0,"您没有1W元宝别戏耍我！");
	end
	ontalk2202(npc,0,player,0);
end

function ontalk2202_4(npc,event,player)
	if   player:get_vcoin() >= 100000 then
		 player:sub_vcoin(100000);
		 player:set_param(341,player:get_param(341) + 5000000 );
		 player:alert(10,0,0,"您获得了5000000点元力,当前心法元力"..player:get_param(341).."点");
		else
			player:alert(10,0,0,"您没有10W元宝别戏耍我！");
		end
	ontalk2202(npc,0,player,0);
end

Npc2202Funid = 
{
[0] = ontalk2202;
[1] = ontalk2202_1;
[2] = ontalk2202_2;
[3] = ontalk2202_3;
[4] = ontalk2202_4;
}

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

RegisterUnitEvent(2202,20,"ontalk2202")
RegisterUnitEvent(2202,29,"CreatureNpcFun")