uses console
int i,j
string c
for i=0 to 255
  select case i
    case 32 : c="spc"
    case 127: c="del"
    case >13 : c=chr i
    case 0  : c="null"
    case 7  : c="bell"
    case 8  : c="bksp"
    case 9  : c="tab"
    case 10 : c="lf"
    case 13 : c="cr"
    case else : c=chr i
  end select
  print i " " c tab
  j++
  if j = 8 'columns
    print cr
    j=0
  endif
next
pause