               job  01B6A                                                  01B6
               ctl  6611
               org  420                                                    01B6
  420start     CS   332
  424          CS
  425          CS
  426          C    one,one
  433          bu   uneq
  438          C    two,two
  445          bu   uneq
  450          C    four,four
  457          bu   uneq
  462          C    eight,eight
  469          bu   uneq
  474          C    a,a
  481          bu   uneq
  486          C    j,j
  493          bu   uneq
  498          C    slash,slash
  505          bu   uneq
  510          bss  bskip,b
  515          B    test
  519bskip     C    one,two
  526          bu   n1
  531n1        be   eq
  536          C    two,four
  543          bu   n2
  548n2        be   eq
  553          C    four,eight
  560          bu   n3
  565n3        be   eq
  570          C    a,j
  577          bu   n4
  582n4        be   eq
  587          C    a,slash
  594          bu   n5
  599n5        be   eq
  604          C    j,slash
  611          bu   n6
  616n6        be   eq
  621test      BIN  uneq,?       Reader error
  626          B    uneq,&       What is this?
  631          B    uneq,!       Punch error
  636          A    stuff,count
  643          MCS  count,220
  650          BC9  c9           Carriage channel 9
  655c9        BCV  c12          Carriage channel 12
  660c12       BWZ  wm,a2,1      Word mark
  668wm        BWZ  z12,a2,B     12 zone
  676z12       W
  677          BSS  bbe,C
  682testg     BSS  out,G
  687write     W
  688          B    start
  692bbe       BBE  uneq,a2,8 
  700          BBE  testg,a2,1 
  708          B    uneq
  712out       LCA  ed1,280
  719          MCE  num,280
  726          LCA  ed2,260
  733          MCE  num,260
  740          LCA  ed3,240
  747          MCE  num,240
  754          B    write
  758uneq      H    start
  762eq        B    uneq
  766one       dcw  1
  767two       dcw  2
  768four      dcw  4
  769eight     dcw  8
  770A         dcw  @A@
  771J         DCW  @J@
  772slash     dcw  @/@
  773stuff     DCW  @00AJ/9876543210@
  788count     DCW  @000000000000000@
  803A2        dcw  @A@
  804Ed1       DCW  @   . $0,  @       Edit mask
  814Ed2       DCW  @   . *0,  &CR@    Edit mask
  827Ed3       DCW  @CR&   . 0 ,  @    Edit mask
  840num       DCW  @23020@
               end  start
