on *:INPUT:*: {
  if (!mimic == $1) && ($2 != $null) {
    aecho Begun mimicking of $2
    set %mimic $addtok(%mimic,$2,32)
    aecho The mimic variable now consists of 12 %mimic
  }
  if (!delmimic == $1) {
    if ($2 == $null) {
      aecho The mimic variable has been cleared.
      set %mimic $null
      aecho The mimic variable is currently 4 Empty
    }
    if ($2 != $null) {
      aecho Deleted $1 from the mimic variable.
      set %mimic $deltok(%mimic,$findtok(%mimic,$2,1,32),32)
      if (%mimic != $null) {
        aecho The mimic variable now consists of 12 %mimic
      }
      if (%mimic == $null) {
        aecho The mimic variable is currently 4 Empty
      }
    }
  }
  if (!mimic == $1) && ($2 == $null) {
    if (%mimic != $null) {
      aecho The mimic variable is currently 12 %mimic
    }
    if (%mimic == $null) {
      aecho The mimic variable is currently 4 Empty
    }
  }
  if (!amimic == $1) {
    if (%mimic != $null) {
      /msg $chan 3The mimic variable is currently 12 %mimic 12{7GregScript12}
    }
    if (%mimic == $null) {
      /msg $chan 3The mimic variable is currently 4Empty 12{7GregScript12}
    }
  }
}

on *:TEXT:*:# {
  if ($istok(%mimic,$nick,32) == $true) {
    msg $chan $1-
 }
}

on *:ACTION:*:# {
  if ($istok(%mimic,$nick,32) == $true) {
   describe $chan $1-
 }
}