File FOCFPS.SV (save files (Executable program)

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

}|PH@@8?888
7:<9<
89<:<989
88
78<989
:7
68
6
96
692
78.5	pp$0.-'=(3**,00000A??P           /P<=N-1. PR POINTS TO RE[X(P=N-1)]
10547  7201  SETC,   CLA IAC
10550  3040          DCA C           /C<=1. C BREAKS BUILD LOOP EVERY S ITERATIONS
10551  1032  BUILD,  TAD P    $$	n`@C
?||p)`QMp)F)VP|p@O.Ap?~?0p`Rs}{w?gDH<I D/QP7S]5<EUQg=PjDpFvbThC,Ela\f[OquAh{^@_~N2n<v ?~}02f0&|_9_0f^ijp1$eX5 /o02f7t)i^_6J" (zng. &Yp(&. ij w{fx'y& oy'h)7fj^j[e,"F,b7b7^ijoe,"77&^j[/og=0@7b@ 7bB0o z.5fgP7`?B)#PMTe[\\ 55H#zf &sloY~]5p ()zf5`/ r)l)r7f)oY]5] v .k AN/[)/Q:k G Ba boy707 n & C 7B7 n &7A+v//0 Sc Sd6 [jS0A]c ]d6v d~ &j]oKs&k0skKo0 ` P4`"Weyfo&^6J /+Za9x*6[)^aq*6N hv[^aqzv`j ojef:7 /d^b6J /'q)(<zf5@/rl>r)7"j.*Zk5h/<b)7 iaoC;6C$T(/Rj)C?CC4CCK:pU 6 H?d!.6 /XU# b,oUUD@Uk@!:f7@ :(/hhK xz^rc`{~Vr2mc)E&%H/hOO`9{/^^ .s!YIi96i" oyf[Y vgxP`{|o)h[Y `{|oi\Y \\Y]]];vxx ]0x PPP_>%bXzH`Z{x[)\;8<&\8v)@jU'`C/""++{{""''fD ??"hhf**f'vX][[*eW/ .f`irW#.(JY6[)>)NT'v6&Y Sa{*9^)e7*j;b^=)+(:7ei7 /b7ii6" Nz^e7[)7&fo0&2vi7di7t)&4<^Ib`mB_a0.2fc`}mB_l(%"!#$: }~,;Tm'o
^)6" oy*2_i^ao:6N 1"16b /8"r2aio$:^k-1.&~v1,k|f&Bq2b8Kz!>1(/i/ blH? 9"/*DH>D1"@PzZk "aboyy"b1bG|B |IXPp$!>| /<$ Bx}bix Z .Y?,[-[.[[^-miY*cY)
m9#F Bo X&E,"(&z(oR,"MH/kk)oy,&M"@v!.-H/G-"J nX;&- /]$PPP&-"(Z{v-,k)mz-[)O&\-&^mkY*c*\$PfT]$ _bikov `k ovW +-/*^([<)]>,;}~=\]$H/)lP!h3,M"@{,L"`t0v-v)!,b oy^!
f,^I6J" 1z ./&U!.(/,7U:&:(?Q&a.//":rC . &/ . &/0"0b bb/& 7bJ- 4I6aicg[qhgW8T4vs6r /ZY9 >Z>
 i`
Pe0ni5B@qylq7 "i1,`U&U& &7a.s(//0"qi zt.f0RHi"6(/HD"6b<(?b5_R 7j /P<#(~<6zD>*_"N66?"(Ez6h"Ru9 nbJ n Vj`!
070'1 /r0f jK9!Lss((LV0l \T0VA;B[TvTvO7hN)>b7)~6bi0BG&1$b@//.b)G"b)D!6b(}r=(/|{2::bz~ zr(Tz:N Wx <KNW(N 2gJ1t)1bab/Wo9 
h 1 n2Wk  <l0C qK&f+`1 P tG ~K(6!.:c F H?:" z #::c::k@N0}k|Chz|g B28ci`u_I+2" 9z!.@/N{2:l2OJ:N0? /L .2 n&:=01NkR:S= Ez:Fz}~EEU }~P6I /b6Ba,&,H/b62rh/bbKGp@`,!\tx&q.x/Zx2l7 QNf^ib^b^bC ~I^bIS ;b)9x" -I)Q1}$ Y6N h[}6Nv `5 o /m'7W/;b99"99"YYYt8b[7|0^6=(/{.6aoo."D6b.^if." _{oe*zw$9(h{`qv<P)P,[)6[)16&a v)6vi,i+-v96kW! xPg:i`"TeoOCMKi `S;a |,+^-4W &%:b$4k;a ]_F^9G" + ~b4%b }r&%fF.f.|&&4dW{{X!) N&Za2^h"_) pY) z;@tu:l&)2; |>vWZv( x&w9vvV~x6x!>''v6 !Kl'v&P`?%f{$&W >[YtoIv z+ YtZ+9AZkYto+[Y>oyv&&Wk` {]$^Q^iPV7WWW+y`3Lo yY
62[16ai onwFnp6 ' PwO`xk|;|o6#wDawaawaawa+w+W0" {~}Y toI+[Y>&vi/"f& "&F%|b$WkYto+[%{Dzb[Y>P~vHv$M&"$$s 1J6F"(y{Y YYx9j@+h7f)jw)v0+77Zk^`L+nbn7 %usUaM@,{a[(UuUOUzU,U}BUwU`:%NX.0 123456789M0(6rMMb`UM3@0Y +(<!.T.H?z(+{;3)T.jT ~&}3)@J+|2MMcMHO)3)G ;3){3)TMkzF kWK6y" `zxi*3k&3&k3Wd kfW?wvcHu{to! ,vwa 2 `xpDJvQ]wV6h666666666^U ^ joo,[)^i6~" oy^iev7b}{8[) |" c(oy[v#\i$#[YtO@"8vih{1zgYK]$y1x /Ov)7wi6[),[);6&Yv,v6v1&Y8vi8Wk'g`v|'0qCwSFIIDGCATL
EEWWMQROOVB RIFPPEoye7~.{ p@}b4|b3|b/kY 126ai oy6ai oS,[)^wf Uv1b|V 7g yo+@wfTIv,de!pC,F,bn$&$f+Mp`} u8<p!4 )eiPwv6 7Y ^9w+KgPgfm 2w,"gwI x@./K(K;<+J3.KT0 K n%&faLR6"N%Bh)&^ii6&&&^iQn00&&,00;,:.f,b@HzAGjiw\KVi)wao2w ~I}BOb0bwib,|{z\kK4yT2T /)*~"4}k|{"z3&}y2{z"}kxw)}0bzw vv70z3&0
uB Kt2fN&^y`|?+z^_6J" 0z_!tb$K0>*s6&_;61jrIHK[\5\[)0Bqp' o'n' wIIi9`1o x(oy`w9hKh0pPDpLTk )Bc& ETwK'w~}9|{ o~0fb n1lY1oIwz yC0vi]i] 5 Z0SGC EDD* * >*wBKS0\6[)CKv 6]i
J+9x3 W0wZxU+vC[q l c[u[9U0klg9 q |l0Zfi cI 9PV*h)N!.(rW*b(!zNUWU"Hz bU n@/bH3z@/~b:}c:X&:!.:|bXXS{H/5X':QJXT*b(hzW"`gzU@/!n!.b(/]"HoAX(CJ>b)C .XX&* z WXK >&VeJ VfK #K.z>b X8VlJ Vfm %(&%H )s]vO\
z&$%f'Gf(6b(/E" z (f~6}(/(06|"({j',"F2hG Oo~6"FH/62{`/62N '#&b"%b!EfHHVHF#&"!fVE20'D'f&.&%b%fE.EHk@'#"'n&""&n%!"%nEE&V0@!bHP~!f"."#b#f gKg89byl&;`rUZb%@r~b)}$H/ /|h/){b )k jzyw\
&$`.]xb$Ri]%Jy(?8w"H4z g$[BNy4ov $8J\ &xu)t2bH!~%b@Er~b)%$$s@/Mr"% n$ /]%q v:`Gb)]0C aK  <f0P)dE 2v?yE{F9<|s{-s 6H(/~)6I" z}|}!f{$&zy6x /&)~z'"i(/@?1)96)w &&}/fgfh`@=bC
lF @vbuf& uBc'f#bhC < WzVcbUlCt7t=0 s{tr0uf&CKJ b0eK qC kz Lh08*\k ;Z~w#`G;r1*O @r B* &+* (z~  F ^ &*F.C`(&z}*&*(?,*&| {*z&{yz
&K/& 79 |/0Jye<xwyv9utsy% /H$&%&f'yk\$\ ]$+HU .*#f% /o\]Y$] ;cj\;] r*^y+ry98]Ffm@P>TjDZnVg;l]gKl#gbCL@'!.'&b oA&f% .A~%k%(&r(Fz!(/"(/#(/ 2!$b(8zb@!~OOb[H/:"@2zlO.8* b PiO5JK @/A$"@{C$"@r`{ $&!%&"&&#'&0g0f$hhz#fe 'aJ&O%'Fg&Q0sw>$%f&aj@%H/n%&b&f'.'$dll;_ }~p bSHg@?>f=%be!rf"f)&e!rf"f)2 ;#be%rf&f)'e!rf"f)#f@%&?&&>'&@'@6ABfCDf()'@K!(/o !nS@g~ @R K@$$&X%`!@/ (f%(/}H?)!(}{S->`@#b!#f" .A~"!b oA!fg0(H/)wC}.Zn(+6*b,@n+.+*bz@-b*f,J+.,c!~b+,b@+c++t*b++7{++E&:+}b,oR@"&"-n%!"Az%-b&n+.+bf,4J+&&%&.>Z,d4Z"%b&+ '.k| r%('r(&r(pz%D.HmzR`$$&d{)rZ $Zk%H!~Hzyr7lw^si?Ato 
&K/&  G/Je< BiKY tOKK)-?b /o-G K -f~0e}7(/|-4{u;FT"BF3TN1FTRC#** * *Wz+[Yto+3@Nv/@Wk RVZ{P C [K
nn@`k`h(Z{i(/Z76hziYZ~7xg|,,ERED. 10702 2040 CNOTS, ISZ C /C<=C+1. ANOTHER NODE PAIR HAS BEEN HANDLED. 10703 5704 JMP I RBUILD /DO NEXT NODE PAIR IN THIS AREA. 10704 0551 RBUILD, BUILD ~ ) 0
+ = 62/D3=O=0$%&'8 `IJKLMnr @ B$3 :0p LF 8 ?O@pYKT"U pFthpqz |VPq-L20 "&;q"M/hqtpPj}vf[6!L",^c(Jz$F^^r}`\^&J,2" yN|(J{"ZZbb(/Qz"~(PJ*8jVfS}K>jWfT}KDjXfU}KHJYl @ND.$,[KyR;_]C czB nz_&,uj_]'].}\] lz\`KTm UQ~p !&
NfNnM& ~cgMJ }B|c{&|z ,yxwxvxMu!bn!!bt`M) ,s<!f!(?G ,r|qx)px)qx)o , nm7 lgk0jx)M0x Q < wgiK(pz-f&# ,p+|uJ 0kcQ@ 7|? `/^]h
\p6 '~0 c n C d 6 C t +(/!,.)6(0}y. |{z@>T/z 7GyI/ 8K.| xIW{i Wb!zc 8G8<@Tbxz <77slVyi0/ 9.9wv/u LI0ts|r{y/3 <c?~ hQ2+3UDD$1%5 SiNPc(/KP#P@OM~"PKd$zJ}0QJcTSJJC}RJT0J nSJ. SfJJE(/H ,E< 6z|r{4&F ,N-j4?dUOK,40HozK>bJj KfyP&tKQ .x/AFBbE nP?&O /wU&yP& Kfv0
uBiKLb!ehkqt`TBvpQf?j~iGGb(yje'eeC@Bz}e&hF.i`fL'LhBJ ni`gL'LMDBd$Iz HC O2|"/Gb NI/8d`/I {M&7L&jz"(Vzjz"(KzLZ8Y8b!ZfZ8"(PzZ
Y0G NIk GZkfrG y.1/SGyk&3ffRi 0dk|/ Pb~wO / Ob}|rM{bLzby |IKUx0xyU+x $0w ,vv7+K. x 0u0bS|tys52sxrRrbPqc lpa>/O"psp|2.9o/n0m ,lW209{ \K.kN5t`^ UQ yerf$dr`8"
NI
Q ! ,Q R& +&
~I>d0 QI !}|{f{ |~}n((t{+Z ~I}:A4*z ~}}B@~(yr((t(0x&w(&v&(?u('(t0(sr((7(DNr"qpsoG{(^z!R*o Id+0R2U %I. ? |y!
AW240~}|&{AAz"BAb QIy P&O& QI x~}w/&{SUS" QI"y /P&0O&Sz"Hk QI 0 "dC|:{vUhS ,Q"@yut Q D0P[&RsUA ,N@s^UGS`"!S&s(C2F~WwWWGWWC}WwWWC|~{ /zy"CkXxiS ,Q"@w Q 0vOXXtXXtPX'XXGXBBX#{u tIsrsyqgs Fp)o ,nn72K@ lmlrkrq2{0T~S? 8 &/"$ ; 7
* :>(+ *@2J |W 33C#!CmA?w>xR  ~52~{} |C Tf3!.|<UUb{{HAfP&P.CUb{FnPH&Uz !(o MfU{ 5L& 0Ay DHoJ0)9AryDhEzR R 0x6 Bw|10v@(@uv@@U MI  < .'8B4Vp#@1 f0y(~}'J0~ |K1 {Czy'{c"l0@o xK<002.2$.'/$//. -2 ',/2$09&?;2 /$./+M+<5   ?9> % &> $ 8N@BN02 %2 %@0f/"##c(z L ,##b#! /09.?~ {&
!J"@N#K&$0 REALLY? 6v  /Ixz  !I
3<(B{00b4Fn11b5@/67"81r5H/9F.n:;'0< Jn12f15"2@Oe="12bFn1b>0r?Fn@A'B?<&! WD>nZc~@Zbffb} ZfB~fWZ2@yWWC(lxddb|D&ZW$WZ6WWCeDb{ /zy"XXb xGeB!Zb(\zXY&YXC HzwXXv9XwZWd~WE&dE'EY'WWCvDYXi D|"uDrf ,t{X.s/ru! k9'5`1wqm!X./ 0 XgXXC({XXgXXDX~7X{X XC O'+($Xb} ,N)j$X&|2 1H/{z"+0WWWtW(?E.)y/X C |2x2XWgWXDG ,20'3>{tPZPE#d 0 10767 3041 DCA ADD2 10770 5517 MQA /MQ0=AUGEND11,MQ1=ADDEND11 10771 7044 CMA RAL /L=AUGEND11 COMPLEMENTED,AC0=ADDEND11 COMPLEMENTED'%6,'$/%!0,9, .$$/&f&% %%7$+2.'%&- 2, %7&2&* 89 >.f%66. @BZ
9? 88 2>8 & &=>  &>& ?$<(#,$ $ < `  LF 1/1Lw <M| &K }S ('B88c88k 2K @ C3K= 8kP<B I=Q=C ID0@E|_ooJ , cvaZb@OuG~K  
~]AV}fyy|DHydy]9Hy GI"  l&"Q&"]"&~}=|}"0R}{Q&}}"Q}zyy0 ,7.Z L"y" z9hy I"yU ({@Gz Iy""P lxr ~"C Gwl" |w&"Qy"]vu"t"s"r"q"p"o"&n Lb)ehkqtwzn Q `WZZ]T I"YP"P`)@{  GIQ&m I"m&"Q"U@H+ ,"
 > |I"Y H:z IU""P I"Y""Y&]P&a&e&i&Y" E90Hng`Hng`Hngto^"y/4L;h}OqZ^U
!w`#SDv{F,k&0ST}w*3b I&PH H?n"G"u b#$w%s(~s(@z I&""0 l7!>"C ;z C!l# ?; ,!>$C@!~@o <" G9Hy GI"}U HWz I}""P l l""&|{&zyxQ&w&v"ys ,"u"t LY*mp*sZ!vy*|Q)ON8D.97 9.n98bn7:&9t8rDo:O9N@8b87bo9N@:b76b6b96&6H. G7.w5 492  78.5 #$#090 08 0 +#$#$,#$#0 ,!
!!2 /-#$<(+ .! !+! ,! >(C;}3*<LL2<=($$;& $? $ $/0PP$=3 
A??'1C11 AND 11015 3235 DCA SIGN /PUT AWAY AT SIGN (= 1 IF -; =0 IF +) 11016 5521 MUY /DO MULTIPLICATION 11017 7402 ARG2, HLT /ARGU 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