alias ascii {
  window -klb -t5,10,15,20,25,30,35,40,45,50,55,60,65,70,75,80,85,90 +stb @Ascii $_gcoord(ascii,-1 -1 660 450) @ascii $_@font | titlebar @Ascii Table | var %n = 1
  while (%n < 256) {
    var %c = $chr(%n)
    if (!%c) || ($istok(2.3.4.9.15.22.31.32,%n,44)) var %c = <null>
    elseif (%n == 2) var %c = <bold> | elseif (%n == 3) var %c = <color> | elseif (%n == 9) var %c = <tab>
    elseif (%n == 22) var %c = <revrs> | elseif (%n == 31) var %c = <uline> | elseif (%n == 32) var %c = <space>
  var %n2 = %n2 %n $chr(9) %c $chr(9) | if (8 // %n) { aline @ascii %n2 | unset %n2 } | inc %n } | if (%n2) aline @ascii %n2
  window -b @ascii
}