Evaluated proc bigfont {str n} {regsub -all {:} [regsub -all {([a-z]|[A-Z])} [rcolorize [scale [fg $str Doh] $n]] \u2588] \u2588}