Evaluated proc coolfont args {regsub -all {[a-zA-Z0-9]} [rwfg $args Letters 18] \u2588}