File KUWA4.SV (save files (Executable program)

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

?>2CXYDH
XO?;DIRECTSV/(?9TEST1SV
.?/BUILDSV^/?
HELPHL^	?IFORLIBRL0M=\RK8EPLSY2Y?NBASICFF+A?<LIB8RL\/?ABSCHRSVT9?$TECOSVFT?4AB3HILSVUA?-AB9SVU9?%KUNOSTSVVA?0UMSCHRSVT)?+AB8SVT9?^AB7BSVT9?+AB3ERSSVUA?)BASICSFVE?<REUMSFTUA?>BASIC$GPH^ <B,F>>G2I<<JK2J%LI,)X)2LIJYC2C-EB2I2B,
D02I2B,$D=P%2I,%P)2I,)2I2B,1DL2I2B,6DA2I2B,;D[HATAF>!I>C\6AB$BJBM>E?AC^B<BBB(?1= HB?YIJKU?UJ=FZK(FBDD?:?F$?<=AGIUF1LAKLB0 B>">&G8???0/G <%E DHGD,=?=DI?EZAJFZK8NGRGZRNGRGZ)8N)"W  ]Z)K?ZC9DZJA9DZA<XJ)JRC*[.WDX$IVZE=*/RB8!ZAZCJ)Z38N*R*Z:N*R*ZF8NF<(.&=+BRB8!9
RC=+B9HZDJD8!ZFJC8 ZCJCZEZJAJFRC<H+9P=H9ZAJ8DZJA9D<P+RJD+S:JB8H:ZBJ<X8!  JE:S.S.REJA=HJD<H9HRE+7  KHBYS-S?4EJZD8NARAZKNARAZQ8NQ=H8!  \E>DRRRR  ^ [AI2IB	;(  JEZQ2I
?
>
=JQ  LBAEZ0J0=H8 ^1;$J3XHJ2Z>8LHC<>(+HLH[[LHZ*8 Z/LH[
LHZ)LHZ+LHZ,J2[LHZ-HH8AZ3R/+
: 8N*< 	38N)K;Z.8J+^-R-J0?HJ.9DJ.J,^-;VJ2[18.3BW/-S-	:	
<
=X7??ARQP
 [AI2IFQ"ZKY*LJUZBJVZCKWK\ [RRZ*0KZ*LXHJBZ;NC[FRCNCKS\H/LDA<=E!E*E7G!G/9?NZK[ZB [2A
6
7+)SCSVE9E/Y]Q[QX$-SZ/ZFCH$GPH^ <B,F>>G2A<<JK2J%LI,)X)2LIJYC2C-EB2A2B,
D02A2B,$D=P%2A,%P)2I,)2A2B,1DL2A2B,6DA2A2B,;D[HATAF>2J%LI,)X)2LIJYC2C-EBZITB(?1= HB?YIJKU?UJ=FZK(FBDD?:?F$?<=AGIUF1LAKLB0 B>">&G8???0/G <%E DHGD,=?=DI?2A2A2A2A2A2A2A2A2A2A2A2A2I2I2I2I.N28C664;.E6S2<3[/27^=!DBFDQFB?X)N-X7L7XGLG

2LH]Z**)X)N.X7L7XG2LH\ZV2ILG8

2L2I*IX)N/X7L7X-L-Z(2LH]Z*P-L-

8P78H),72-7X)2LH\X-OIKH-\7P7H[8A\7*HX)OJKL7K9Z*P7L7X7**A?[ X[L[BKNZ(J(KGZ*2CN([[N*<(+]X7/K2J	HGAX%K!!E2J	HH2J	NA+<[:K,,%:9F8FA52I2J	NBP)K-YRK:ZN: YOK YP+7JF!EQO*X%RBL?<H)CRN: JMYNJ[YOIP=H*&:QNMNC<9DIP8F8FYPMN+U]N9P*!ZFJ)!ER;QT*;%Q"P)CR3WS3S&*-)C*;+S+PJF8F
FZFJFC<MM]MJF8F8FC<MS]SJ/Z;QS+UISYMQSJF]SP))CK
YTJ2YSJ/Z;/W9?HH>2J&LCP)K%Z3W[%O.+5E-2J&LDP)YQ[32J&LK)<L SYNT=.2I
POP
ROP2A8 Z(: J(>(*SJ(")";: J(*H:A")	Q!W/S	Q"AD(/S")KT
UKX
WK(
V2K.AH 9F8DKYXHHHX\HHX!HHX	HHX.HHX3HHX8.)HPKZXIHIXJK[XKHH[F2ALI2Q\JPK+D2A.;LIB8RL3(>G;$C$0A?&?%?$2K2AZ?^2I
&S&S	+];$
)2A/%B+>?Y^=0FORTRLTMPT+2IB$6XTHU$6/-J\MIAXNLN<(+&$6+:B*="R&*M",J	?H*OJ)X<K?
>J*C2K.J(X<J+*L=)R	* ",J&?H*"J)X=K=
>J*C2K.SJ(X=J+*
HATAW?O?JW2IO<C;>(.,K:Z(K9Z)K8Z*K7Z+K6
52AK4
?K4
=2I.,J 
3O38!
22A/CCB2AO1C0<(/J9J8H8 [ZO18D?H8AKZ//
HP
/UA%<(/
H>A%H>7/
HUUHVUHWUC\8??555	L=/PO?W?TAHAP>F2=VFMCVO E,CUR(ECB!N	DKM&,WGLADHEACTBD&TC)K;: AE\C
=?=$KXH[IPD-90PEAA:^\-APDD%<TPEAA=^S9APDA9?<P"DAZ"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BBZ2J?&WIJQZW.LBBJOZ"L2K^J$^%B2B6B0B4B,B	B CNCOCTCECNCKCACSCPCECICCCHCECRCTB	B)I;PK"BNBLBJB BI??N/N/N>RGRIRBRBRI.VAA=X+ABSYM^X*ARGL4\JANDX+BLOCKVX*CALLLX+COMMNNYJCIA
!XJCLA:YJCLL9YJCMA8 YJCML8PX+DECIM	]X+DUMMY-\\JDCAXX*EAP3=X*ENDE\X+ENTRY62X+FORTR[/ZJHLT<BX)IF3ZX+CPAGEV[\ZISZP\JINCPYJIAC8AXJIOF0BXJION0A\JJMP(\JJMS XJKRB0^XZKSF0YX*^EZJOSR<DX*PAGEC\X+PAUSENXJPLYJRAL8DYJRAR8HXJRFC0LXJRRB0JX+SKPDF^DZZSMA=ZZSNA<(ZZSNL< ZZS
L<XZZSPC?H\JTADHX*TEXTN/XJTLS0&XZTSF0!D*ACHPD*ACMQD*ACLRD)ID,A\5B\0BREAD,B\10B+0BIOH,C\FNAMEBP,A^AB40COOPEN,A]3BV,A\NBS,B\60B<,B\20CZ,A\KBT,A^BCC,A^CCU0CSUBSC,C\KARTEB,A^DCR,A^EC(0CWRITE,B\30DQ,A^FC/,A^GDL,A^HDI,A^IDU,Q[0E+,B\200D",B\100E$,B\NUMBU,B\40D6,
^JD90COCLOS,B\50EN,A^KE0BEXIT6RMAINBYPBOPEN91-3 8:2<,<123VD;72;V^:/*7:9717;6=.	Y9+1=0END?[G?VE?QE?UD?SD?CA?DAA0X>\?6??2J$*DWTK+/.;LST<I"[,K4KP[.K,IM9F8F8FAIKP[PKP9PK5>0+6	3".CS>H/XK<-H2HCI7(K;-HW?=]E$&$%UMUHL5RKA18 [A [BB2AY>2AX+ [AC2AXP [AC2I*4(	DATEINAM
:	A6) [BD2AXV2AXP8AZS [BB2AY=2AYZZTRTJT8!K<?H+U [BE2AXT2AXYR [AC2I+C [AC2I+((I3,3(I1,I2),5I2,I1,2I2,I1) [BF2AY;2AZQZTRTJT8!K<?H/:+?]FEC?/=TZLDPCA8 [BE2AXT2AXZI [AC2I/? [AC2I*U(16I3) [BE2A[>2AX[+ 7[+LG>(*"+$8A8!2AO=
< [BF2A[;2AZ6 [AC2AXU [AC2I*9(I4) [G [BF2A[>2A[N [AC2AXU [AC2AXP [AC2I+(I4,	 NOTENKARTEN IN 	,A6,	GESPEICHERT	)/:8A2AO=
=/9 [HK5^7K)^.2C/(=HB<.AA?8A-*X<X\DXUXSAY/2AW?RLRL<HR!:J!>(;XK>Z2JLK=Z3 [AI2A\2*-\8N5R52A.JHJ+Z4J,Z5*7H:AZ2Z)ZLJ4Z$"["XG8: LG9J8J8HZ!J"2A
<"[]"[V:AZ3
;KU
:  F
OJ3R39HKVXG8LG<X+$8J8J8JC92A/W P%?1?>KARTEFT?($2
AT1FM,=? ^A^T2A
=	<8 Z
O=C;K:>(	9*[+2AO3
ASA	<8!
A;VK+?H*O3[)OA[*: 2AO3>(+\SA:A
ASA: 
A8 [+*-: KA"4*M$Y\3-W$O	?Y$
*?8?/*]\)(*]W	?	>O=
?
=: Z[K<*	K;	:O??(;$K9	:O?=H8! [AJ2A\*K8	: [KK8	:*:	?	>Z[O==: 2AO78!I=SO==+O8!	6K5	:O==(+H8 Z\I=8 
>*>K8	:R\<H+D2AW>*<2AO=8!<H:I== 	6R[* *I:K8	:*12AO4=/3Z\>H	:K2R\+Z:O4>(/SK9	:/SB,3B?L+CCK"2602J[\3N7A+EB, +%	O.)E
%0-$OE?;	P&(*7	=	<" ?R"2? "M?U"M?S"K?;"6\OSK*MSL.
[K*M: [MSL*<I=<HKK8 	;2I2AW>+\[K+Y [AM2A]/SK+U+]	; [AQ2A&Z*Z&Z*Z&Z*Z&Z  ,E P+Z(*$8	O
%	?2AO>>(*HK="O*"8:*	?	<"O*KK;=HK:K92AO8 [R.O"
I?>(	7.Y2AO>> *-:J2> **"8*$Z22A.
K6"OK5"O.
R2K=C42A.8:J2> *4;Z2AO8 [RC3K2<(*3K19K:<P*9*4&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z>-?3A???J?M(\!B A? ]W \2*W	?/> [AS2AA>[O[P2IO=<(+M=*RK<SO
=:2IO=K;?*^ [AM2A]/SP*RQ [AN2A],K:2I
=2AO9K8>(KP8!I==8 	7 [AP2A],Q2IO=8D?H+IO=9H
=O68H
6O58H
5O=C4O=K3
=*52IO=C2
=2A.2IO=K;?H %<H/Q;$	7: KP[P+R2KDAMS?UJANS3KDAMS?3JANS1FDAMS?9JANS1RGH?<RQ+Z?:\)PD/4 P"* [LR)*HRL  CI?J(*XH> *[: Z)JKZS8NLY>RLNLY?2A.RL;X 7(KDG9F8TZ(;(DG8!RL*P[DKDK?9K><X*>R*:2AN*R*<(*?KD>(*>R**3[D2AN*Z*KD.*8![D*2IO=XUO<XTO;C:XSHS
;**2IO=HU
=8DO<HT
<8DO;HS
;O;9H8JC:K9	8SD+H/E2IO=9D
=O<8D
<O;8D
;2A/*>$O0OPQRJ?FHSY=2AO?<(.	>\R?($?7,&?8$K?: "?; A??*-\R2AW=.W
?.HS<(:A2A.]"WI?>(	<O;> R.	:I=8![Y"*>OLG<X*98J8J8JC9	8SY*2*,	7[ZOKZ<X+I8A8F8F8F<HLGK6\GSY*>*,I>[WI=KY9HI?XG8/O[Y+! [AT2A]/SY+]2A/Z:2AO58 [Y+-K4	8SY++	:*CFTT9*
%? $8$O?(\2$Y^
(*\)I=8 2A
?8 Z=8 2A
>XS2AW?<H*[	=	<,Y? ,J?U,J?S,G\MW*JHSR=/;2AW>8! 7A>\G:	:	9*J<XUK8Z=
> 7A>LG=*58!2AW> [AJ2A\*XS [K]*2A\U8 HUXUR=HS< *5I=2A
7I=8 J=K6	5PU2ALU=H*$K4	3+OXTHS9FHS8DHTXS2A/WNS:\ A*	42J	3,^2A2J	<I/*/	S1$O0!SD
%?<*(O(*$8	ONZEJNZS8NOROXG: NOROXHJM2A
?2IO>9HXSHT8HXTHU8HXURE*/+C8 ZEHYXW+A&D;XXV2A
=&C+%HG[/.< JEC-2I
>.LH/.EK2ZNK3ZO;([-*PRQ1EP7(HGZC8LH"\XSHW< RXYHVXXLHXTLHXU2IO?"\XP[E2IO>XQO=XR.Z)J)8H8JC<XW;XB)XVJ)C;.\HR9DXRHQ8DXQHP8DXP.*9HRHUXR:DHQHTXQ:DHPHSXP.57N7)HPK:?H+N	CPW+GKE>(+XPR+XPQ+XPP[E+GHW=(+1XW;&HP? +"*: +XHW9D8F=H/DHPHV2I
?HQ
>HR
=/F:XRXQ+*COMMNAISZ?8GC?RQPEJZD8NARAZNNAXGJZXJAZY8LGPGZ: LGXHJZ7*EJXZ\8NYRYZ7: NYXH2IO?"62I
?O>"62I
>O="62I
=RY;VJXZ48.Y8\H.6&IX E2IO?	<XP2IO>XQHWK;=++K:XT	9PT+KHV8DHQ<X8!XV2I
?
>
=HV  WEK[[K\[$ [AS2IK[Z<;VK\Z=*> [AI2A2:;(+S*M.4V7"1*M"0*M+^7N?==40\RQP057N601F4;7(4HEJG^FJHZN8NIRIXG: NIRIXH&C*]HVHXXVHWHYK?XWHPXXHQXYHRXZXPK>ZN&AHX8HXXHY8HXYHZ8HXZ<X&RN*(&D  M$IVZEJE^FJ;[A8N<R<XG: N<R<XH&C+2HVHXXVHY8!HWK=XWXZK<[A;XSHP?H+\&B&HZ8DXZHY8DXY
X8DXX	;SA+VHXXPHYXQHZXR&D  T [AI2A49;(2I
:+0P0*?A??%=?K?ZQ;&ZR2ANQ8 <X9A^Q:0JQZQRR*E.EJSZW8NTRTZ"NTRTXGJSZ%JTZ&8LG*	E9=H81XQXPXR8HXVK>XW2A
=	<  OEJ6Z:8N7R7[B: N7R7XH8LHXG: LHXHJ62A
;J7
:/9HP9HXPHQ8HXQHR8HXR:D2A
=/N/VFLE2IO8< K72I
8  Z:2AO([^S(O([
 [AI2A7\;(+$&Z P.[.O.N1F1EBOUOIOERHXGHG8F8F8DBJUZRJJ0\KD>(0Y8 [H.V;T8&:*:L8-819L:A:=;V;V;V;V;V;V;V0Q*FHG0V:  R0Y*F;Z*FSC*=KB0&0Y*5BJ0\KD> 0Z0L0I*F[C0N*+C^===	BMAB ;ZKJ>(+VSJ+]KF*+0Y+X0Z6:*F69+%KJ8![KKJKK9HKG2I	EKH*+6Y+S6Z9HKI2A	E[KKJ8!9HKGZR2IKK<X+:8F8F8F
HNR^R: KJ[J+%2BHGB2A&Z+V*JARFFAQF)HK?0&669A8A<P*89DK?66K<>(8 Z<*J??JI0\XG+O0&:/MM*J [AI2A8AQRSTUVWXYZCJI[<F!"$%&	();N\HK>=3=6565N8FBJ<A???? ERROR AT LOC GH>JKZP8NLZXRL:0NLXHRL8[!LH8D<XS!9HZALHZBLHZPLHZXJ["2AO"8J8J8JPO"PS"*(JP8J8JJK?["JX8F8DZXJXJS"*8K>XG	=
&	=K!>(+]  I8DBJJTP/JC<<(*2K;=HK:K9 [R/PH [[2C.MH0!+  [["O"<X+/8J8J8JC22A/	??4:D?&H:C?=B A? ?;MBM?<

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