Mine

on *:action:*:#: {
  if ($me ison #testing) && (%cm.check != off) && (%cm.nick != $nick) {
    if ($1 == cm) || ($+($chr(32),cm,$chr(32)) isin $1-) || ($gettok($1-,$numtok($1-,32),32) == cm) { 
      msg #testing (CM) >> $+($chr(2),$nick,$chr(2)) << $1-
      set %cm.check off
      .timer 1 2 set %cm.check on
      set %cm.nick $nick
      .timer 1 2 unset %cm.nick
    }
    else if ($1 == gth) || ($+($chr(32),gth,$chr(32)) isin $1-) || ($gettok($1-,$numtok($1-,32),32) == gth) { 
      msg #testing (GTH) >> $+($chr(2),$nick,$chr(2)) << $1-
      set %cm.check off
      .timer 1 2 set %cm.check on
      set %cm.nick $nick
      .timer 1 2 unset %cm.nick
    }
  }
}

on *:text:*:#: {
  if ($me ison #testing) && (%cm.check != off) && (%cm.nick != $nick) {
    if ($1 == cm) || ($+($chr(32),cm,$chr(32)) isin $1-) || ($gettok($1-,$numtok($1-,32),32) == cm) { 
      msg #testing (CM) >> $+($chr(2),$nick,$chr(2)) << $1-
      set %cm.check off
      .timer 1 2 set %cm.check on
      set %cm.nick $nick
      .timer 1 2 unset %cm.nick
    }
    else if ($1 == gth) || ($+($chr(32),gth,$chr(32)) isin $1-) || ($gettok($1-,$numtok($1-,32),32) == gth) { 
      msg #testing (GTH) >> $+($chr(2),$nick,$chr(2)) << $1-
      set %cm.check off
      .timer 1 2 set %cm.check on
      set %cm.nick $nick
      .timer 1 2 unset %cm.nick
    }
  }
}