string ascii " " ! ~ "#" $ % & ' ( ) * + , - . / 
string ascii 0 1 2 3 4 5 6 7 8 9
string ascii ":" ";" < = > ? @
string ascii A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
string ascii [ \ ] ^ _ `
string ascii a b c d e f g h i j k l m n o p q r s t u v w x y z
string ascii { | } ~

{+ascii_print
set INDEX = 0
while INDEX != @ascii
  write ascii[INDEX]
  set INDEX + 1
endwhile
}
