function BEUDSuc()
playerName = UnitName("target");
class = UnitClass("target");
race = UnitRace("target");
	if (playerName == nil) then
		NoClassQ = 1
		FakeRaid();
		return
	end
	if (race == "Blood Elf" or race == "Undead" and class == "Warlock") then
		result=".quest remove 10605";
		result2=".quest add 10605";
		result3=".quest complete 10605";
		result4=".quest remove 10605";
		result5=".quest remove 1472";
		result6=".quest remove 1476";
		result7=".quest remove 1474";
		outSAY(result4);
		outSAY(result5);
		outSAY(result6);
		outSAY(result7);
		outSAY(result);
		outSAY(result2);
		outSAY(result3);
		SendChatMessage("I have given you the first quest in the chain for Succubus called Carendin Summons, " ..playerName.. ". Please finish the chain and you will receive your Succubus pet.", "WHISPER", nil, playerName);
		print("\124cff00B4FF\124Hitem:19:0:0:0:0:0:0:0\124h Quest: Devourer of Souls (ID: 10605) completed for " ..playerName.. " port them to 'MagicQuarter'\124h\124r");
		else
			RaidNotice_AddMessage(RaidBossEmoteFrame,"The targeted player is not a Blood Elf or Undead Warlock, " ..myName, ChatTypeInfo["RAID_WARNING"]);
			PlaySoundFile("Sound\\interface\\RaidWarning.wav");
	end
 end