[joligario]

You probably need to learn about strings:

sub EVENT_COMBAT {
  if ($combat_state == 1) {
    quest::settimer("test",3);
  }
  if ($combat_state == 0) {
    quest::stoptimer("test");
  }
}

sub EVENT_TIMER {
  if($timer eq "test") {
    quest::castspell($userid,92);
  }
}

FYI: From http://www.eqemulator.net/wiki/wikka...=QuestTutorial

quest::castspell(id,spellid) - Casts "spell" on entity with "id". This is buggy, if it does not work try $npc->CastSpell(id,spellid);