File CCL.SV (save files (Executable program)

Directory of image this file is from
This file as a plain text file

}|DHE@A		
8        7 7777777 7$7)CK 14 INCH, ZBLOCK 40 LDRTST, 0 TAD I (CWTMP TAD (-200 SNA CLA /LEADER? JMP I (CWREX /YES, EXIT CWR DCA I (LDRFLG /NO EXIT LDRTST
ENTERO, TAD (COBUF DCA I (COPTR JMS I (+.~C Bl}@@.B(|C {B 0zzZy <x&6wv2u |"tGsI@zr!qKp*onm@%zlk0Jnj@&ih4 JG.B!<GB+
j <XXboJX2kYJJK ^gJ@_Y.pvB(WzX')8n8pkUX/T&!.!V\uha(<Of~2(}{ L@7|<{z2(zy /H<<x2{ ~w)xviut"sssr /uq"p|<0 L@P|);po 'nw')3 Lx<kLx@kyLDk`L8HkLLSFdmi@ dDXL l o32"c X{) k e'X:k_{ob
}'iPNUr}/UG`y4kb(krJn~("l} <I|iMvI /$M&k"@=zC{bkbzC NgCt7Cwky xywk@ovu9t ?G$(?sI6Nrq9(lfN[6[ (mzpo)@ D]d&NlBqNd2MNdN0[_/|p*,RyXA!<b@ ;& L }P%eP3@uZO`L}( PPO aXbc}]a -Y `  [ aP%+I X`<M1&L P='<qP =#&L }X`<!MHX`@$-D)P%%P% \X`-7 X`DM% P4@(404@X /`U UU%U(/U69U@CUJQUT[UbiUlsUv}U fff")f03f:=f@CfFIfY$ s-ptpp
r tpMqpp tt Bt&pqpt Bt&pk @`{w*******$`#w p{v|Mv [OgirG
MY~b,k}Y b,kP|Y6{,&0zY6,&m=yYxb,kwYvb, kuYtb,&ksY6r,&q-[ Np@o4;Y r n{!.YbYbm(l4k9i0jQ0j U0}l /YP2kij4aY+****>(<Ryc99MG9ZwV5GV1EVy?V=}m#Cf'V ~ \(/}|2{iz\(ysx2@w{v\( zuV8V(V(V(#*tVsV8\(/rF>Hr(:zZ /2q):zZ|bgww pg(/o2(n{m(/lk2(Szj /ih7gfXeade7]\$i:V{Z _y:=(t\#{0"&x.p pN/`L%_<ok Y8= 981I7p ~"!0f,}i/O& ..|"`{b./%&ff,D.-0bHoz06-$,","y"/bHz{,+x!w`?>"(SzV&U&N&O&v(?(/W.MubP ltsOr'11@ q /X2p /X2 /Xo9?XKON ySBtgTJ{q,8 \9_0` 8/ $sfb njkf~}(fz|/~{" zr(9zy(/1"xgbwkv"@zkH.&/ukt" jt;$tk&s)usI}@r" ={q ?po2[hpu9[hY"[hp{n)dm9>.R ~x)[>w [[Kl+CRI9,c\7Sz<z?p|A#]/ (/-#(/b7b~c(7r(z}(#(o4c*|b {cz/$y9!x"H~Fnw8 2(s(v{D !f(?92(EzD<#9u9"@tIsr)L (RI6IRq X`6p2(soyX72 z: URT@L 4 .JT{oDJ
p/RO9 Yjx&($/~p.oNt & .{}@|b"z{P.~/Kzyxbg+J&0Fw(0zv(/<u"(?zt/+F0F(s(/0r"? 
C FKq0(p{o"Vnn ~mFl`7Bk(/ji3z. ?:/#px.|p\')W(q`^U/ F"Thy"L (/~0}0b n h(0|({2|{/ ( {z(( 0iyi?4&irxiw //42 f/i2w(//P2vB(zu(//i2O!,M&,}rL/kjTT4hlh <
h <h|@ Yzj(/jT t//j si,Jt}]Jt. ?Bt4o~ 6}|) @ @{z)y<xCwcb(v{{z)z)z)Bu D Ku L$Ku T(KQ7Z7PU7<4DT@@DHD>tld(?Ss)Dztr2(Mzq& b pG@0o&n&t^,ml0km' YK#
rf_q`: p`yTpe$d J@(|dZ PA0(/~8}|#EW*#{ z0y6xw'vu)i&0##4(#{t$il <t b(*{- } (/\s"(Czr /q< |#EW*i&{}#ER*#Yf #EB*#Yz70* <*hKg>p]D&9{/{:
nXI,0K//G/~" {K }|{ERz0TE{YHXYHKI(/)y" x{w()(${)MY 00?0d0@6 /0/3v(/0{9.?u t?@u ?&0s9sYEPr(?q(?x<_ |pO0p[2 sIJNs&\.Ks?KijC oz<?`R/ypT/*#;IkZl ? .&~' | b}{|lC (O&{"({z /~"G K yxi(({w /+"vuytsrqrpiocCncl ^m"blbBblk9J ndk9FnbkbDLj+ NiQsr)l,qz?LP 7Y1xI0n.@OF]D:_{<(z~(/}"(z|(/{"sz B& n&y " &bAb xbBAbz
BBz,B!.b=@n=w"?zAz)D@vx9c@ut'sr'qp6 bsbrqypcobtC{H  @KH0/w)LF) pfp
~(}y|(/b{P z |y6 Nx6w(3v"b~ u2!bHGztC NMzF.ftCst|t <r(Jq"HPhpGp!>z <(Jzo[o9e3Jo]o9n3Jbn$@Tzmb& b(lrkj)bP+ihG bKa@H<0`p:pvTz[@8G,tPFy :O] @h6~x|(TzYYbFn~`WWb}X&XC EFY| XXb{[&YJ.z`YYbyZXJ.P&zxwUzXvY"YWbuW WC YB@tb2z|s"XlX <? nr rib NrXqiZq) riw[Rqpo9n;m3l \{kl7\0c < <c0|/zKNUj*Tz-y|X
PMp<6)@?~9}3FNn|*&{,* |*zC,),,yxwi%v)+wi$+", +,(u}0+*t (}{+,* |*,KL8k~ s<3<vI|b*hhr /qh8(q{ (oS.z ?qh8)hhpbpbxhx++bvof+o)f[*)<+
* <*hK!nd^'<An:@z6re(z~B~G K0}|{ z9 Kyy6zixK w5t0wI5''Kvu!>0ktsrs6Fn<0C OA@A0 _ffqp(TzoI{nco ?`"_d`"M y?%+dB &] ?)A+`!bjC
Fx:N9?\(jTN%81 ?6 N6Cd cdswJ K /)0"91b82b73g45';b6~y }g|:k|g(Enrp{@oVz# Vz<<4TTc(~TTtT ?<f>  < y&x wC(vrult <H~sr)l,q |yQ!!.&X-<0`?@!4z\ku&\EUM JMP I (ENTERO / RETURN TO CONT1 FXMOUT, TAD I (ENTR CDF 0 DCA I (OUNIT CDF 10 JMS I (SETMAG JMP YAHAOU
FILTYP, 0 BINTYP, 0 /SET BINARY TYPE - DON'T TOUCH LINK IAC IADXct@kp
c@ t CO0Pr0@Opl:@O9@O%RA%RF%%%=@ %tHDt O0+ t@d8Ae A4U34n-#K$!e;@Di$[EKTp QiMh@U-Ht oX%@N/[dAPBPCP\d G
~"b.hH}{|{' I zI"& byiIT@&z KCV~{xL@w&XbZhU@*v2P{bNzZS !cu(8zZF$X /2JZS YdF" ~.KX dzXC n gjXct@bk  Yf /Zu@Z(???qXfoBr
F.`&Cf '8r /" t, F. KCERC OMNCL3 VR1`6N O 3 TNO PT0B# AU?@ `A5: `DE3: `O@ DA0lo0,`O @`NT8G5 O @CN 5HNER`1AI 8N S8THS PRQE 0CNTMMIO R8 Y4z@I
GLNVTON` a@4TU0ST T@BDNT #IT5R8A  8R2C  CMA3
8N`!VR1 WBDMPIH G1L* @BxDNaINCBDIU P# NSCMA38O 8N@1IO R8NB`CLSI R 5LE Q$0BDCL3TOB8DVC@CN5DCTIR@SCx8RIN 8` HL   )TDT V@T0VA@V4AV @PPVRDCMV@I@@VD80VAPVR@F AT@V D@VB@LAVCDRVCDVEOVC
TVA@P0VDODV@RVD0VADVAPVIMMR]UX]Z]]`d]im]rRR0@aA@A4P CA@6#0UUT@EDMCCPCBSREBR1 y@nn nAdTUCO3SQESR@T@5P@VD?vI (x)_wut,sr{q 6!}Bp < X~o|;0n?2xMA#L0L C DLA1 N2 E EN P$O 3XL`!Hpoob n m`@"_-QO( L<q{"LITKC_=MER READSZ, 2010 /READ 20 PAGES INTO FIELD 1 OBUFFER /LOCATION 4000 IBLOCK, 0 /INPUT BLOCK NUMBER JMP QER4 /INPUT ERROR TAD IBLOCK TAD INTEN DCA IBLOCK /UPDATE BLOCK NUMBER TAD Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search