correction to above.... oh dear oh dear

Code:
alias -l channel return #bot
on *:text:!stfu *:$($channel): {
  if ($nick !isop $chan) { .timer.!stfu.chan 1 1 .msg $chan $nick your not oped in $chan }
  elseif ($2 == $me) { .timer.!stfu.chan 1 1 .msg $chan $nick leave me alone. }
  else {
    if ($2 == -d) { while ($0 >= 3) { set %stfu.list $remtok(%stfu.list,$3,1,32) | tokenize 32 $1 $2 $4- } }
    elseif ($2 != -l) {
      if ($2 == -a) { tokenize 32 $1 $2 $$4- }
      while ($0 >= 3) { set %stfu.list $addtok(%stfu.list,$3,32) | tokenize 32 $1 $2 $4- }
    }
    .timer.!stfu.notice 1 1 .notice $nick !stfu list is % $+ stfu.list
  }
}
on *:text:*:$($channel): { if ($istok(%stfu.list,$nick,32) { .timer.!stfu.chan 1 1 msg $chan STFU $nick } }