1               /
   2               / Absolute Clear
   3               /
   4               / Frederick R. Kling
   5               / Educational Testing Service
   6               / Princeton, NJ 08540
   7               /
   8               / As described in DECUSscope, 1968 - Volume 7, Number 1
   9               /
  10               *7771
  11 007771  3776          DCA I .+5       /START, AC=0
  12 007772  2011          ISZ 11
  13 007773  2376          ISZ .+3
  14 007774  5371          JMP .-3
  15 007775  3374          DCA .-1
  16 007776  0001          0001
  17 007777  4411          JMS I 11
  18 000000  3411          DCA I 11
  19               / VRS:
  20               / Load Cruft before and after, to test boundary cases.
  21 000001  7402          HLT
  22               *7770
  23 007770  7402          HLT
  24               $