demo

if vImmo==nil then
	vImmo=0
end
if ({UnitCastingInfo("player")})[1]=="Immolate" and vImmots==nil then
	vImmo=1
	vImmots=GetTime()
end

if vImmo==1 and GetTime()-vImmots>2 then
	vImmo=0
	vImmots=nil
end

if opener==nil then
	opener=false
 	CastSpellByName("Shadow Bolt");
end

if UnitGUID("pettarget") ~= nil and UnitGUID("target") ~= nil then
	if UnitGUID("pettarget") ~= UnitGUID("target") then
		PetAttack();
	end
end

if UnitHealth("player") < 3000 then
	RunMacroText("/use Fel Healthstone");
end

if UnitHealth("player") > 7000 and (UnitPower("Player") < 3000 or not UnitBuff("player", "Life Tap")) then
	CastSpellByName("Life Tap")
end

if UnitHealth("target")>5000 then
	local i=1
	while(i<=40) do
		local a={UnitDebuff("target",i)};
		if a[1]=="Corruption" and a[8]=="player" and a[7]-GetTime()>0 then
			break
		else
			i=i+1
		end
	end;
	if i>40 and GetSpellCooldown("Corruption")==0 then
		CastSpellByName("Corruption")
	end
end

if UnitHealth("target")>5000 then
	local immo=({GetSpellInfo("Immolate")})[7]/1000;
	local i=1
	while(i<=40) do
		local a={UnitDebuff("target",i)};
		if a[1]=="Immolate" and a[8]=="player" and a[7]-GetTime()>immo then
			break
		else
			i=i+1
		end
	end;
	if i>40 and vImmo==0 and GetSpellCooldown("Immolate")==0 then
		CastSpellByName("Immolate")
	end
end

if UnitBuff("player", "Decimation") then
 CastSpellByName("Soul Fire")
elseif UnitBuff("player", "Molten Core") then
 CastSpellByName("Incinerate")
else
 CastSpellByName("Shadow Bolt")
end