Directory of image this file is from
This file as a plain text file
2 7601 00563 5777 00564 2000 00565 0020 00566 0017 00567 7767 00570 0230 00571 0040 00572 7763 00573 0273 00574 7766 00575 7775 00576 0177 00577 0337 0600 *600 00600 7300 NPAGE,CLA CLL 00601 6131 KSF 100 00602 5201 JMP .-1 00603 6136 KRB 100 00604 0377 AND (177) 00605 3023 DCA PAGES 00606 1023 TAD PAGES 00607 1376 TAD (-60) 00610 7440 SZA 00611 5216 JMP .+5 00612 7200 CLA 00613 1375 TAD (BUFF1) 00614 3022 DCA BUFFER 00615 5774' JMP START 00616 7200 CLA 00617 1373 TAD (BUFF2) 00620 3022 DCA BUFFER 00621 5774' JMP START 0700 *700 00700 7200 BLANK,CLA 00701 1030 TAD POINTR 00702 3020 DCA TEMP 00703 2030 ISZ POINTR||HQ@@p@@ TAD (1000) DCA BUFFER TLS TAD FLAG SZA CLA JMP START TAD (-5200) DCA CNT TAD (BUFF1-1) DCA 12 ISZ FLAG CLEAR,CLA/CLEAR THE BUFFER TAD (40) DCA I 12 @Yl^,~"(}{|"({{Lz0@# U`=FS+0:@*5`T=aS*1;@#5U`=FS+1:@@5(`T=aS*1;@#K2U`=FS+1:@S5 `d}a0*@^5`d=aS0*7,<)MOjV`=FS18.7,<iMOv(V`=FS01+s0K@#2V`=F.u-p@b[~bZ}bZZt[J@|bh{Bi|BZYl^,zZ!Z@yb!ZbHzxZ& Zw2 1zdZbZvb!Zb`!{vZ&!Z3u /!>:3@6btY7btYs8rtY9btYr:rtY;btYqj|}0`=EqL@h5(`4}x\@co [`=E11Mvu8676f?s5T_<=U6V7y_:&;&&~& }c|} L{ l zI<. , zI6@ @b* lI@BD b Lz6`HL*EFVTp zI zI zI zI Lz zKX m`=EuMO^m`}EsMOem`=E4?@k6(`T}4]Mqv `d=x]Mwv`d}s\M~v`d@~f6n@b[~bZ}bZZt[J@|bh{Bi|BZYl^,zZ!Z@yb!ZbHzxZ& Zw2 1zdZbZvb!Zb`!{vZ&!Z3u /!>:3@6btY7btYs8rtY9btYr:rtY;btYqj|p02C*5j*N2:j&2j*1zk(&i?O@2`$BwA@w?s5To<=f6f7yo>&?&&~& }c|} L{ l zI,. , zI@0 )& L@ 48* zI zI zI Lz zKpEFVT1j*1zjh#iOj7j*h)=+hp)J3j*(imC4*jN#(#iM_2`2B}|h)*#hi=*2j*(imX1*j(&)?o@7@~f@~ .-1 TLS CLA TAD (212) TSF JMP .-1 TLS JMP LINEFD *400 CHAR, CLA CLL/GET NEW CHARACTER TAD (337) DCA I POINTR KSF 100 JMP .-1 KRB 100 AND (177) DCA i 9"`8b++tr/ p@nr @Bb("rjb5a1v 8.` `?E!p$P @@^_4!R*2#\p)W(q`Y/KS"U pFtgpqz |VPq-L20 "&;q"M/g%[q)!rb&l /~"}b d|b t
@.h,iB{k@Yl^,zy"(x{w 0zY&J^v@Fnb{kY0J^v@Fnub&{>|'jBtb[jsbnr#q(/po2YRJXJ!RJ&DYJ$G.n!,]&,mb!bJ&DJ bDf.H p @`@2v R@bY|^,~}"(Mz|"({{z" zy'x2w /3y"rv(&!.v*jub&@tb/.s&"r /Cy"rq&p" zo&"tt" zs&y"j| Ln3: /sKdB21 fb(pz-f&# ,pb~ug"cH/FnRo{@w s;pv}_@Yl^,~" z}b|k{b|kPnd& B a'K= ^@.]/+\"P`b t 2[[mE`C XQS%mLA1bdz (Ozy2(Cz&x2!b(/|6w]:{(/`U"P3TQS2(QzRT)`!" r(s{g"VnbQFb`[0M`?Pp6 blp"FMBc(z(/4n('L"HzKs K{k<zszZzRzRzeRzzqzD9zvwz}<znJ*I6)H"6K ? , Gg!HJF2E&nD6KC&X lq|n B"(jzQ$6 bc6 *AJQ@*O$sQ"66)nK8rc(gz6{AD (5777) DCA POINTR JMP CHAR END,TAD (40)/FETCH AND STORE BUFFERS DCA I POINTR 6152 CDF 10 CIF 10 JMP I (200) *600 NPAGE,CLA CLL KSF 100 JMP .-1 KRB 100 AN**********CRUDS7 ************VERSION 4/12/74*****PAGE*2******** MARITALS STAT.:___________________ R DCA TEMP ISZ POINTR TAD POINTR AND (77) SNA CLA JMP BLKFIX TAD I POINTR TAD (-40) SNA CLA JMP BLANK+3 TAD TEMP DCA POINTR JMP CHRKP+6 BLKFIX,TAD TEMP ` AND (177) DCA NEXTC TAD NEXTC TAD (-123) SNA CLA JMP I (2600) TAD NEXTC TAD (-122) SNA CLA JMP I (3200) CDF 00 CIF 00 JMP I (200) NEXTC,0 $$$$$$$$$$$TR TAD (-777) SZA CLA JMP CHAR TAD (BUFF1) DCA POINTR JMP CHAR TAD CHEK/DISPLAY CHARACTER DCA I POINTR ISZ POINTR TAD POINTR TAD (-6000) SZA JMP CHAR TAD (5777) DCA POINTR JMP CHAR END,TAD (40)/FETCH AND STORE BUFFERS DCA I POINTR 6152 CDF 10 CIF 10 JMP I (200) *600 NPAGE,CLA CLL KSF 100 JMP .-1 KRB 100 AND (177) DCA PAGES TAD PAGES TAD (-60) SZA JMP .+5 CLA TAD (BUFF1) DCA BUFFER JMP START CLA TAD (BUFF2) DCA BUFFER JMP START *700 BLANK,CLA TAD POINTR DCA TEMP ISZ POINTR TAD POINTR AND (77) SNA CLA JMP BLKFIX TAD I POINTR TAD (-40) SNA CLA JMP BLANK+3 TAD TEMP DCA POINTR JMP CHRKP+6 BLKFIX,TAD TEMP Note: Lines longer than 256 characters were wrapped