Evaluated proc coolfont3 args { regsub -all {\x03(\d+)} [regsub -all {[a-z]} [rwfg $args Letters 18] X] "\\1,\\1"}