Richard Suchenwirth - When playing APL in Tcl, I wanted to display the real APL symbols (which are sometimes very special). Hunting the web for transliterations between APL and ASCII, I soon found Jim Weigang's APLASCII [L1 ] which looked good to me: he represents any NON-ASCII characters with braced strings. Here's my initial and incomplete converter - it will grow over time, but if you desperately need it, just grab it now ;-) If called with no arguments aplish performs a little self-test.
A free TrueType font, "SImPL", with APL and many alphabet signs, can be downloaded at [L2 ].
proc aplish {s {}} { if {$s==""} { set s "L{<-}(L{iota}':'){drop}L{<-},L @ x{epsilon}y{and}z>0" } regsub -all {\{\{} $s \x81 s ;# protect double braces regsub -all {\}\}} $s \x82 s foreach {a u} { <- \u2190 -> \u2192 <= \u2264 >= \u2265 /= \u2260 and \u22C0 delta \u0394 drop \u2193 epsilon \u220a iota \u03b9 max \u2308 min \u230A neg \u203e or \u22C1 rho \u03C1 rotate \u233d take \u2191 } { regsub -all "\\{$a\\}" $s $u s } regsub -all @ $s \u235d s regsub -all {\x81} $s \{ s regsub -all {\x82} $s \} s set s }
See The Lish family for more natural language converters.