uses console
int i,j
string c
for i=32 to 127
  select case i
    case 32 : c="spc"
    case 127: c="del"
    case else c=chr i
  end select
  print i ": " c tab
  j++
  if j = 8 'columns
    print cr
    j=0
  endif
next
pause