File KUWA3A.SV (save files (Executable program)

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

}|3 HH@X	LV !L	
Y *bWb7U(zLx0'&(&[&\(0Z" b;`F6C;dEE70;c;LE{ 7ES'L1<=ajwao[2h\LhTuRSbha t,~vGwizCVDyo0 H2(148),I3(4,148),IKN(148),FACH(2,42) DIMENSION N(67) WRITE (1,570) 100 FORMAT (A2) C BEGINN SCHLEIFE: DRUCK DER LISTEN 99 DO 300 IFA=3,67 IF (N(IFA)+2016)120,3 p{ <@< LI )0)
lJC&EK L01 $K=% L%0) L)0 L1 1 6K L;1p[@Y{Z0% DO 180 K2=2,4 IF (I3(1,K1))180,180,140 140 IF (I3(K2,K1)/10-IFA)180,150,180 150 I2(K1)=I3(1,K1) IKN(K1)=K2 K0=K0+1 180 CONTINUE IF (K0-1)300,3OR.n bDB(|h  T&*
-1L=VVVVVVVJ, h Z.C$=B"&L5 DB |
LC&+J^}gy@ ZJ(/VJ$]F"+,X,:Z9eZJ!.KJbKH.G ,EH+-S-HIb EIKJb!HnG& KBzzno7 JbJej (?V, IV C(VzB V R Q)&6ML
H w 1~[<$6}"An8zDb6|R( ~< j rFB{ /Mz /Kf.M !,O&,MkM L HUfBtLvx]zLojl:np;rD@ |&!#%')N.~rsvvN] xRC `0 &
c d0 c daf>atHf666b& bC n PhbP8b(J . Jhb&.fJ(b8J~&}f}a(]z
 PJ |(2z{H/zy"P0
0! c (bbcoz n r` gK?poc @`?M|b n4c)F)c )bDnbDf)r$+ )P@/$!f)b3n**4:*c*Fc(&{@Bz!NDd@BzHf!.b f&b$czPHo@f.bDoR"S..f/! hnnDBHrH~wJ t&c F4nH?! hD L 'Ih h G~}w ( 00bH ~1d~3&2>&c|(H#[ * n/c_c)c+c,2bcc-b3f/_J n* ?s){2.n+-'-0BH.rD.b,-'V2bqn39  @OR!W7(T(?'LX LV !L
Y *bWb7U(zLx0'&(&[&\(0Z" b;`F6C;dEE70;c;LE{ 7ES'L1<=ajwao[2h\LhTuRSbha t,~vGwizCVDyo0 Hlm7!3"d"6"N <8L 0!b"n#%@J bh@/z!f3&"h!f &&~ }v-|RGn|brt{]KH/Dq-n{rC b oH/I"rr|^Fzbty]iq-|ytz]Hz 78W`Xq p{<@< LI )0)
lJC&EKL01 $K=%L%0) L)0L1 1 6KL;1 LI )0)
lJC&EK [@Y{Z0%s L L L L L L L LLL LLLL L L L L @3(!48 2:)[z[+ m.%^M6;l<m[r\^ai*z'*0?)-7676_7 B*)j).c77c l& C_g L )&/767-6-(6 B*-d-_77d)b72 -7)
l-&IK8-7'7B7g)&JK87y2*7d776*@ @p cN((bG*&(C[*c(]z7`K <H%abE
H NI|z&l%+ |N)mBRzb nO`bPwjEOR)@Cz NN&O&PH/&.NNC|DP.PfNU:NP~! )bE;T;JQ C3$Wsf-JC;*SP*.f| MM7.|`SS7/;&SUJSM&SBS)tC _T&2S&/;&W>>
I)e3&Wenu:m 
)QFs l
@ UA%SN~B @}B
@~BKBD @Q/*x(<mi@&|!. {C|b&!.zH/y>&x&w!.H/jv+u"jp @ \~B=BD @D @DBD @~BZB}(E ,~ , (D @}(E ,~ , 6D @D @Y/*o';LS ECQ' ,`I#"' ,rL,SiIls@n*/`)CBLRM3R' l ` `lIso+i0!|b!l{|r{C{{s!j" ~H/}!>!n|G|E|!>{H/zy3x|3wvr!wc(zHzu:2)&
|y3!~b!(o*H/*t+wCsrrEBqC @U7xUspGr(E ,o < U7U8F nm7r(E ,l < U7U8F nk7r*  ,>w" p.'EB~C
@U7xUsF}C|{rEBzC @U7xUsF}Cy{rEBxC @U7xUsF}Cw{rEBvC @U7xUsF}Cu{rEBtC @U7xUsF}Cs{rEBrC @U7xUsF}Cq{r/p $ #"!   EB~D
@U7xUsF~D}|rEB|D @U7xUsF~D{x zL U'|(E ,y L Wx8G ~wG7W!>wC!7hUwyD BU|rEBvD @WusG~Dw7xWs!lw!>7Ux vL U'|* G$ '"/ & % EB~D
@W}sG|D{7xWs!l{!>7Ux ~L U'z(E ,y L Wx8G |{G7W!>{C!7hUwyD BUzrEBwD @WvsG|D{7xWs!l{!>7Ux wL U'z(E ,u L Wt8G |{G#" !  / z7W!>~C!7hUw}E BU|rEB{E
@WzsGyE~7xWs!l~!>7Ux {\ U'|(E ,x \ Ww8G y~W7W!>~C!7hUwxE BU|rEByE @WvsGyE~7xWs!l~!>7Uz6q7Y%$" # /.~E BU}rEB}E
@W|sG~E{7xWs!l{!>7U|z|zzS!~bHgz'B BU7xUslyys=&6=5CHUMRUWxR!lw[zv!.wG[u"!lw[zt!.wG[s"!lwx ', U'w78Uw#x"!lrz/ 'p7*L'MNwO)r`(r'/"& B hFU7xUs(zHz~"!l}x| l 
{ l zzEz!>yH/Cx"E+B|F @U7xUs!lw!>(=zA=*), zv7C.( |lxD *u'uEu!>xH/dx"E,B-B @ahD N B ~GmhD
 [*u-2," +\&*V~B ~G hD
  ,~vD @ B ~GhD  ! ,~*vD @"B ~G5hD  # ,~@vD @$B ~GKhD  % ,~VvD @&B ~GahD  ~ l~lvD @}:XT# Tt@# T@/r l<1K,Lp2J,r`lr @( ,hUg7U<~}w}E}!>|H/N}#!|b{zrH/B!~ HLz1(
y|<xD .?* i, }!>|{'z(H /!.~~7jyGCD @yGGx|xxS!wbHv{'B BoxD _  p' / .*.D @2*X1[(L)<@ ,!>~G}G/B|G
@{k}G)GD @,2*)`zk}G9GD @>8*(mIi@yk xC!l~x}|/,| | I 0( EL, BLOCK 1 [A, BLOCK 1 DUMMY [0 DUMMY [1 Ws#\`/ 
 T O!N!(/X~b2 b}3&L2H- 5c5L#0 +4,b57j2f)
f4$&#@# nJ> n!"b|G#]#V3f{Urz xO33$HVbn?d . ny
W0%?2:A1=i~+Q xRfxTxWBxX-xY#x`x}G| }c{z(yy yxy)w(zvu)$t)A$ kbklsA7A|I!AgVkbHzsi6Aj6 yA^d.AA&kJrisjr!f ls(?\A$AgA NA ~k-j Abeles7 |e 3(WJ'Y+xo)8*W8~}7} ~|b'{"zhd~yz)H?!hF *xzxzi~}@? lw!>}S(}@?O!.vuz} Hz f} .~>zxz)OD,~<Z}C!o}b`vy J .xz)1 tC@s{ozrZJtc(S{yz)S: e O. Ee80- {Pz+% >NKf Lf l~~NO7})| R2y`yUyS y{6yMhO
oP lMRlHKJLKKj MfL<J}/K .{ z(?H,~yR zGM]Jx0 ~E\K&Y(O oKU]*{S ~w Uj'lNJ lb BK] .|p]')W>n iHZ *8:Oe(~(?}" 8)| {H/zy"xC0(wy0~C -z2b *z8$ 2lv2u 2}t 8K2 /4Z.xCsr(3zq@.z/94*H:zq^&o# b o>/? "r|mRDnVntm<'{jZP@or$--/sp?JM{! @`W 2  ~8U
~OP l}(?M@/|"O}G l}{2@zOoHPJQP lz }GyCx(/P!.}@/ wiRlHQ }>HIz}H>}vsvgu>u}st}s}'5 ,}r0}|0 }C{H/%Qd>w PP&RH/ {3ux3tsr!tc(mzHmzr<x{3!j|pZ z)xtK#)
$ ("  .) bn ~6 Cl 4X7h 1Fn(hn! JDD"@~b>z*N*C*(O?D"(>z*3JDl**6D*+!Dfj }6|6{z0b{jxj }2}~|2|~{2{{sH nzyxDHE+
}D>}|s|g{>{|j00  F}l(?~9hw/&xO z/"{-0}E70(/l0(|y{ ?##Kz}!Yf#> O9z n y`xY2,*wZOZIznnsv'Y>J, ~W&}Y"HbnO0Ya(V
oY],Z>uC Yfmt"xYkz)%,U*e`8z? 28(*)8} .G =f l~vEz}|`O UO SO@W "={K~E!7h~ziy<&x=&~7x~@5z!l~XF
*jG b=d /5}"wG} .=v"uCH$zts)O bFbblWE3c=Sc$ScScSckScRScJSc1ScZ0S e|#{O9*8:ON)5N^F]`bXn,bn4 n4bG ~C(WzU"b(;z!b@;zbHf.bf/JC .bAj@"@HzfiH/@/Rf.X l}ye"onh rm
~nx |Gn { ~mfVbkn?n;r&s&hmf Ehn8b tbcc l8Ef ~C}ck)). |`Xn)){ 0Df.bf*0@b&b&b&5N>i`zH/NC)GJE(/X$X$X$EGjh/q&fb`cz* X"DnHD{" G~'}'F>fj, COMMN xp&cF6&&cF cb7#j&c7F c l68 G~68 ~G}68 }GVN4&k6{  C| ~Cb{@/kz"yiKJ./!f G~}w ([c bdhU
[<Vn\=&>(L :h^SK!, BLOCK 1N^}tP5N^mF;^hn'& c F c F"b"bbbf~&f.bfy(J  P;rAn<<4 n<<4ir"&!.}"f|A&X`H/\)f.bf{AV"bbi L9Nh lzpz*cpefnl >A~0~&J0n4"cF%& &&c' @H1~fn~bl}|y 6:&7c7BF 7c7Fc n66,{7rzy{Hf.bfl}N{V
1 xC wr xG hC^hdh_6L\Nhdj/ LFE]&&P O f&c!d6N@>H1~ b(r zz /2" ~GoB" zzV OP O@/j(/yH.oQ"(^zG Ob(yz(/c "G O BjO OP(P xR xO
xP xR vB" `o 2=1,4) 40 FORMAT(4I8) END
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