at cdr 0370Dnew.cd
at lpt 0370Dnew.out
br 400
b cdr
d 934 '0
d ssc 1
d 1252 '1
at cdr 0370D.in
c
q