The Pinker, by Cynthia

on 1:Input:*:{
  if (!$ctrlenter) && (!$inpaste) && (!$cmdbox) && ($regex($1, /^\/(?:me|say|quit|part|msg|query|describe|kick|notice)\b|^[^\/]/i)) {
    var %text, %leavealone
    if (/* !iswm %text) { %text = $1- }
    if ($regex($1-, /^\/(?:me|say|quit)\b/i)) { %leavealone = $1 | %text = $2- }
    elseif ($regex($1-, /^\/(?:part|msg|query|describe|notice)\b/i)) { %leavealone = $1-2 | %text = $3- }
    elseif ($regex($1-, /^\/kick\b/i)) { %leavealone = $1-3 | %text = $4- }

    ; Make all the text pink.
    %text = $chr(3) $+ 13 $+ %text $+ $chr(3)

    ; Cynthia Note: Other transformations to %text go here

    ; Output the result
    if (!%leavealone) && (%text != $1-) { say %text | haltdef }
    elseif (%leavealone) && (%leavealone %text != $1-) { %leavealone %text | haltdef }
  }
}