module
          Input
          Let.l stdin = d0
          Output
          Let.l stdout = d0

          For.b [a1] zz = #48 to #57
           Write stdout,#zz,#1
          Next [a1]

           Write stdout,#lf,#1

          For.b [a2] zz = #"A" to #"z" Step #3
           Write stdout,#zz,#1
          Next [a2]

          Return
zz  dc.b 0
lf  dc.b 10