/script local n,s,k,j,d,f={"Immol","Abomi","Sarge"},{"Immolate","Corruption","Curse of Agony"};for k=1,3 do f=nil;for j=1,16 do d=UnitDebuff("target",j);if d and strfind(d,n[k]) then f=1;break;end;end;if not f then CastSpellByName(s[k]);break;end;end;