All pastes #182201 Raw Edit

Something

public text v1 · immutable
#182201 ·published 2006-09-25 20:39 UTC
rendered paste body
alias ascii {
  var %i = 32
  var %col = 1
  var %row = 1
  echo 7 -s $chr(160)
  echo 7 -s ASCII $chr(187) Printing Table...
  while (%i < 256) {
    if (%i < 127 || %i > 144) && (%i < 147 || %i > 159) {
      if (!$calc(%col % 6)) {
        inc %row
      }
      var %str [ $+ [ %row ] ] %str [ $+ [ %row ] ] $chr(124) $iif(%i < 100,$chr(160)) $+ $!chr( $+ %i $+ ) $chr(187) $chr(%i) $+ $iif(%i == 32,$chr(160))
      ;if (%i < 10)  { %str [ $+ [ %row ] ] = $chr(160) $+ %str [ $+ [ %row ] ] }
      ;if (%i < 100) { %str [ $+ [ %row ] ] = $chr(160) $+ %str [ $+ [ %row ] ] }
      inc %col
    }
    inc %i
  }

  %i = 1
  while (%i <= %row) {
    echo 7 -s %str [ $+ [ %i ] ]
    inc %i
  }
  echo 7 -s ASCII $chr(187) Table Printed.
  echo 7 -s $chr(160)
}