Someone

on 1:INPUT:*: {
  if ($1 = haha) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ e  $2- | halt }
  if ($1 = hehe) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ e  $2- | halt }
  if ($1 = lol) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ ut  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ oud $2- | halt }
  if ($1 = ?) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active $read(utilities/emo/qh.txt) $+  $2- | halt }
  if ($1 = !) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active $read(utilities/emo/shoxxx.txt) $+  $2- | halt }
  if ($1 = wb) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ elcome  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ack $2- | halt }
  if ($1 = tyt) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ ake  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ our  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ ime $2- | halt }
  if ($1 = np) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ P $+ $cgtz(2) $+ roblem $2- | halt }
  if ($1 = yw) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ ou  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ elcome $2- | halt }
  if ($1 = brb) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ R $+ $cgtz(2) $+ ight  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ack $2- | halt }
  if ($1 = bbl) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ack  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ ater $2- | halt }
  if ($1 = bbs) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ack  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ oon $2- | halt }
  if ($1 = tc) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ ake  $+ $cgtz(1) $+ C $+ $cgtz(2) $+ are $2- | halt }
  if ($1 = omg) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ h  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ G $+ $cgtz(2) $+ od $2- | halt }
  if ($1 = ok) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ k $2- | halt }
  if ($1 = okay) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ kay $2- | halt }
  if ($1 = k) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ k $2- | halt }
  if ($1 = yes) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ es $2- | halt }
  if ($1 = yup) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ up $2- | halt }
  if ($1 = yep) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ ep $2- | halt }
  if ($1 = yupe) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ upe $2- | halt }
  if ($1 = no) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ o $2- | halt }
  if ($1 = nope) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ ope $2- | halt }
  if ($1 = nop) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ op $2- | halt }
  if ($1 = ty) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ hank  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ ou $2- | halt }
  if ($1 = gtg) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ G $+ $cgtz(2) $+ ot  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ G $+ $cgtz(2) $+ o $2- | halt }
  if ($1 = asl) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ A $+ $cgtz(2) $+ ge  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ ex  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ ocation $2- | halt }
  if ($1 = gts) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ G $+ $cgtz(2) $+ ot  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ leep $2- | halt }
  if ($1 = jk) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ J $+ $cgtz(2) $+ ust  $+ $cgtz(1) $+ K $+ $cgtz(2) $+ idding $2- | halt }
  if ($1 = j/k) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ J $+ $cgtz(2) $+ ust  $+ $cgtz(1) $+ K $+ $cgtz(2) $+ idding $2- | halt }
  if ($1 = pls) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ P $+ $cgtz(2) $+ lease $2- | halt }
  if ($1 = ic) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ I $cgtz(1) $+ S $+ $cgtz(2) $+ ee $2- | halt }
  if ($1 = btw) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ ay $2- | halt }
  if ($1 = nbd) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ig  $+ $cgtz(1) $+ D $+ $cgtz(2) $+ eal $2- | halt }
  if ($1 = imho) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ I $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ onest  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ pinion $2- | halt }
  if ($1 = imo) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ I $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ pinion $2- | halt }
  if ($1 = ltns) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ ong  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ ime  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ ee $2- | halt }
  if ($1 = ltnc) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ ong  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ ime  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ ee $2- | halt }
  if ($1 = oic) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ h  $+ $cgtz(1) $+ I $cgtz(1) $+ S $+ $cgtz(2) $+ ee $2- | halt }
  if ($1 = thx) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ hanks $2- | halt }
  if ($1 = tnx) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ hanks $2- | halt }
  if ($1 = ctc) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ C $+ $cgtz(2) $+ are  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ C $+ $cgtz(2) $+ hat $2- | halt }
  if ($1 = wtf) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ hat  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ uck $2- | halt }
  if ($1 = gtf) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ G $+ $cgtz(2) $+ et  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ uck $2- | halt }
  if ($1 = gth) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ G $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ ell $2- | halt }
  if ($1 = jic) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ J $+ $cgtz(2) $+ ust  $+ $cgtz(1) $+ I $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ C $+ $cgtz(2) $+ ase $2- | halt }
  if ($1 = wth) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ hat  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ ell $2- | halt }
  if ($1 = bye) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ye  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ye $2- | halt }
  if ($1 = nm) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ evermind $2- | halt }
  if ($1 = nvm) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ evermind $2- | halt }
  if ($1 = cool) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ C $+ $cgtz(2) $+ ool $2- | halt }
  if ($1 = kewl) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ K $+ $cgtz(2) $+ ewl $2- | halt }
  if ($1 = ttyl) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ alk  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ ou  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ ater $2- | halt }
  if ($1 = bbiaf) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ e  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ack  $+ $cgtz(1) $+ I $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ A F $+ $cgtz(2) $+ ew $2- | halt }
  if ($1 = rofl) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ R $+ $cgtz(2) $+ olling  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ loor  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing $2- | halt }
  if ($1 = rotfl) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ R $+ $cgtz(2) $+ olling  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ loor  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing $2- | halt }
  if ($1 = rotflmao) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ R $+ $cgtz(2) $+ olling  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ loor  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ A $+ $cgtz(2) $+ ss  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ ff $2- | halt }
  if ($1 = roflmao) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ R $+ $cgtz(2) $+ olling  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ n  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ loor  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ A $+ $cgtz(2) $+ ss  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ ff $2- | halt }
  if ($1 = bs) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ B $+ $cgtz(2) $+ ull  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ hit $2- | halt }
  if ($1 = hs) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ oly  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ hit $2- | halt }
  if ($1 = ys) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ ou  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ uck $2- | halt }
  if ($1 = wd) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ ell  $+ $cgtz(1) $+ D $+ $cgtz(2) $+ one $2- | halt }
  if ($1 = nw) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ N $+ $cgtz(2) $+ o  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ ay $2- | halt }
  if ($1 = cya) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ S $+ $cgtz(2) $+ ee  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ a $2- | halt }
  if ($1 = heh) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ H $+ $cgtz(2) $+ eh $2- | halt }
  if ($1 = afk) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ A $+ $cgtz(2) $+ way  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ rom  $+ $cgtz(1) $+ K $+ $cgtz(2) $+ eyboard $2- | halt }
  if ($1 = fyi) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ or  $+ $cgtz(1) $+ Y $+ $cgtz(2) $+ our  $+ $cgtz(1) $+ I $+ $cgtz(2) $+ nformation $2- | halt }
  if ($1 = lmfao) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ ucking  $+ $cgtz(1) $+ A $+ $cgtz(2) $+ ss  $+ $cgtz(1) $+ O $+ $cgtz(2) $+ ff $2- | halt }
  if ($1 = lmao) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ L $+ $cgtz(2) $+ aughing  $+ $cgtz(1) $+ M $+ $cgtz(2) $+ y  $+ $cgtz(1) $+ A $+ $cgtz(2) $+ ss $+ $cgtz(1) O $+ $cgtz(2) $+ ff $2- | halt }
  if ($1 = ftw) && ($left($1-,1) != /) && ($left($1-,1) != .) { .msg $active  $+ $cgtz(1) $+ F $+ $cgtz(2) $+ or  $+ $cgtz(1) $+ T $+ $cgtz(2) $+ he  $+ $cgtz(1) $+ W $+ $cgtz(2) $+ in $2- | halt }
}

alias -l $cgtz {
  if ($1 == 1) return $iif(%colour1,%colour1,4)
  if ($1 == 2) return $iif(%colour2,%colour2,14)
}

alias color1 {
  if ($1 isnum 0-15) set %colour1 $1
}

alias color2 {
  if ($1 isnum 0-15) set %colour2 $1
}