--== A simple and Easyway to get to Varanas west       ==--
--== Needs to have the RoM Addon "TITLES" installed    ==--
--== See http://rom.curseforge.com/addons/titles/      ==--
--== Has only 10 Minutes Cooldown!                     ==--
--== Version 1.0                                       ==--


function GetToVaranas() 
	if player.Level <62 then
		error ("The Level of your current char ist too low. For GetToVaranas() you need to be at least Level 62!",0);
	end
	-- Remember current Setskill-Settings
	SlashCommand ("saveskill 1");
	yrest(200);
	SlashCommand ("setskill 1 "..GetIdName(117210));
	yrest(200);
	SlashCommand ("cast "..GetIdName(117210));
	yrest(3000);
	--Wait until Portal apears
	
	SlashCommand ("loadskill 1");
	i=0
	repeat
		portal = player:findNearestNameOrId(117210);
		yrest(500);
		i=i+1
	until  portal ~=nil or i >= 120;
	if i>=120 then 
		cprintf(cli.lightred,"%s did somehow not appear!\n",GetIdName(117210));
		error("abort",0);
		return false
	end 
	yrest(250);
	player:target_NPC(117210);
	waitForLoadingScreen(); 

--Die
	 RoMScript ("SetCameraPosition(-12572,33,-9999)");
	 yrest(8500);
	 RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
	 waitForLoadingScreen(); 
--	yrest(1000);SlashCommand ("loadtitle");
	return true;
end