File XMCKBD.SV (save files (Executable program)

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

??2CBP
LH8HA\$ :&"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BBCCX4?AX5/?<N:=<\ ERRHB?;OL=LD PHDBA8G=H((((0*(9,/..S.3.?0G,].!)UCN9<D><C<B<ANH<2C0?0?PA>0B=0D;0 CC] 0GB B%BMBJ?=C BG?$00GG?B1B2B3B4B5B6B7??B0?>??<? **UUHPX (082A$	+[+Z"Z<H	?0B	>X[X\X]X^: X
X&: X$H(X		=	<H
>(*"	;+D*20B;2TI>Z 2A.Z2TX 	:	9$EX> <H*-%C%A$EW> *E*%2TX 	:	9$EX> <H*=%C%A$EW> *E	;+D*52TX H]X^	8	9$EX> <H+Q%C%A$EW> *E	;<H*2	7+I+"YD	6ID>(*D0B*GHRC5XRHPC4K3XP: +[A5<(/*I<A5I<$S/*G?;?<D!FBPGN8PM"0"Z:2TX 2T9J8HK?X%,%*R*.***&*"*^*Z*V	>*VI=*0	=*ZI<*0	<*^I;*0
;*"I:*0	:*&I9*0	9**I8*0	8*.I7*0	7*RX!	6.	52TX .K%MAPMUNGPALPRI.4PU.(REN!-%RESREW).$SETSK)0SQ5)3(SU"-)4TE/TY0%UN,/!$UAUBUCVE2ZERO$HP ;!A!H!O!W!
!	!.DJ	?:X.X/	>"*: X.: X/	="*: X/X.	<"*: X.X/	;"*:I6X.I5X/	:"*:I5X.I6X/	9"*:X\0B..*	8*1X!	7<H	6	5*8I7X!	7<H	6	4*?I8X!	7<H	6	3+FI9X!	7<H	6	2+MI:X!	7<H	6	1+TI;X!	7<H	6	0+[I<X!	7<H	6	/+"I=X!	7<H	6/.OVSVC3ZBJBC)> : [XJB< H 3 , $ \ T M FJP ]A\<\8\3\/\+$8	?*JX!
"	>*J	=H"> 	<	;*UI7X!X"	>*U	=H"> 	:	9* I8X!X"	>* 	=H"> 	8	7*+I9X!X"	>*+	=H"> 	6	5*6I:X!X"	>*6	=H"> 	4	3+AI;X!X"	>+A	=H"> 	2	1+LI<X!X"	>+L	=H"> 	0	/+WI=X!X"	>+W	=H"> 	.$EW> /-/,K1]6HQ/ FNHQ9DXQH 8DX /!I,XLIUF)BE^? 3^1 ,^ $^U \^G T]3 M] F]ULP :I4X0"^"0P0*DI
X0"0"^P0*JH&> *BP	.H(X	ID?H.$68	?%5.I3X1H!I>Z$2AH.\&P&8P1*%H I>Z.2A.^I3X1H!I>Z62AH/\&P&8P1*7H I>[2A.0H5X\"2PO*+HKH9>(+H8PP$S: XPHKX L $S: HK*ED\OWSW<(/WH\>(+!SW+XOWX , %1\KI3$SI0XOLO<(+T$S+*%A-/H4%)H3[=+:HY>(,2%2BAD7(AT $G:H!I>ZHJHZ32AI2X0I3X1X[W8!H.< 	?W
 \&	>W8AH.< 	=W8 \&	<W8!H.< 	?P&8P1*MP0*6H I>Z.2AH&> *H.2AI2X0I3X1X[W8!H/< 	;W8 \&	>W8AH/< 	:W8 \&	<W8!H/< 	;P&8P1*8P0*K*3L&L&L&L&L&L&L&L&L&L&L&:L&/W%2HH??[(A/$V!AF+7K.	>K0[0/,%SAVEN
NV]INI]EN8!H.X3H.",H.\&.X%H.8 H%X3H.8 ",H.8 \&.I8!H/X3H/",H/\&.VX%H/8 H%X3H/8 ",H/8 \&.
X2H I>Z12A	?H!I>Z62A.,;X,I1X-X!	><H+I7X!	=<H+I8X!	<<H+I9X!	;<H+I:X!	:<H+I;X!	9<H+I<X!	8<H+I=X!	7<H+P-/6H,> /5X
.8P-<H.82TX 	4P,/+P2^$ 3 , $ \ T M F XH 8!H!> R.$EV> RG.G:X]X)$EYX*$EZ9F8DX+29	?	>21	?	=2)	?	<2!	?	;2Y	?	:2Q	?	92I	?	82A	?	7ID?H.M	6%H)I0	5	6FIELDS IN THIS SYSTEM	6%FIELDS SEL	D ARE 	4.MF/?>FLOPPYBNF/?=ICSX8BNF/?>MULSLUBNF/?=FPP8ABNF/?=MRI08ABNF/?>RAR3UZT
]N]\]*^^N^\^*^8R;2TI>ZJI/^1N1> *L2A.P)H+8!H*< *X2L8!H*>(R*J?H*)2L8!H*<(*V?H*V2L8!H+<(*V?H*J*V2L8!H*<(*V?H*!*JR2	?*8I.	>	=*<I-	>	<+I,	>	;+DI+	>	:+HI*	>	9+LI)	>	8+PI(	>	7+TI0	>.3DSBNF/?=RK8DSBNF/?=LPD8BNF/?>%CPLOTERBNF/?=-0S030S030S030S03  F M T \ $ ,UZ 3;N
]RNZ^RI	8 F]8B"RR^I	F]"R.Z
J
9F8DA&J
A&I%^^.R:HR?*(J 
?/>: J XHLH[NKN8B"3KN"3*+A	<(,HI$< *<I+LI3=+AI"+LI!< +FI +LI1< +KI
<HI^O.30+W$?0G0A:/O$?:/OOI]O/Z*LOH%X%P++BX%M]< *)/AM 8!HOXO/*I\[52B$)"HLA-[/0>DC:>:=$EU>(*KID?H.I	?.$ET> *	2T8J8HA\I[Z JI/X%	>%V!ID?H.&	=%  .&$ES>(*.JI/%$EW> /<.P"<H*4:J3ZK;Z&*AH!9J8HI[[Q	>WRID?H+X	=RELO ERR AT 	=: X$*	J C:<B: J<B:KQC:<B:H<B: X$*	:H<(8PH!
PH!8!H&>8+<H!X&;$HOX*MMX,GV=BET TUOP"<H*A:J
?K>
=$EU> /<$ET> /;P$<H	:/9H!9J8HI[Z		8&X(	82X,	83X/ID?H+H	7       	6!/;	5+	4+	3+	2+	1<H	0	/IZI/I)	.IY	./;O-C,<B: O?<B:J	C,<B:H&<B:H2<B:H3<B:	6O+<B:/;	7NO PATTERN/!A
(GV UO
FZ4Z(Z\ZPZHZ
UT TVA"V	VEV&XUV	?ALL 0 - .	?ALL 1 - .H	?0000-7777 WCP - .P	?7777-0000 WCP - .\	?2525-5252 WCP - .(	?5252-2525 WCP - .4:K>
=	<[Y	<&[%ID?H+,	?%PARITY ERR, LOC 0=	?  TSTAD=0DA\I0	;	? 1D: X$/:H<B:0DC9<B:H&<B:1D/:AGX2UOTV$/T ID?*F<B*N	?%INT FROM KB0Z: X$.ID?*W<B*		?%UNWANTED INTERRUPT OCCURRED0G: X$/>;XX\.+;ZX\./;Z8HX\.3;Z8^.8:C9DX\.<:CX\/A;ZX[/E;Z8HX[/I:H]8D9XX]/N:H^8D9XX^/U:H]8
9ZX]/\:H^8F9ZX^/:H]8F=IX8JX]/*:H^8F=IX8JX^/3 +$/T :H]AWIVX].:H^AWIVX^.G:H]AUITX].N:H^AUITX^.U:H]ASIRX].\:H^ASIRX^.:H]AQI:X].*:H^AQI:X^.1:H]A4I8X].8:H^A4I8X^.?:H[<(/FSF9F<X/FSF?H/F8%+S:[(H\AP<(+)S(SUSU9D<Q<X+)S(SUSU=Q+
:ID?H/?/UAAAAAAAAAAAAAAAAAY]:H]?R.:H]8D?RF.F:H]8F?RM.M:H]8F8D?RT.T:H]8F8F?R\.\:H]8B8H>PR$.$:H]8B?R,.,:H]8B8D?R3.3:H^?R;.;:H^8D?SA/A:H^8F?SH/H:H^8D8F?SO/O:H^8F8F?SW/W:H^8B8H>PS
/
:H^8B?S	/	:H^8B8D?S./.ID?H.	?%PR LOC  FAIL ADR  GOOD  BAD  PATTERN.ID?H.Z	?%PDP-8E EXT MEM DATA & CHKBD.ZID?H*?	?%SETUP SR & CONT%%C$;.0ID?H/B	?%NO RELOCATION, PROG IN FIELD 2T9F8DIO[]	?: X$/BID?H/!	?%PROG WILL RELOCATE: X$/!T ID?H/?	>NONE/?:X"XI>H ZWI>H!
YJWZ\INH!Z%2AL2A\L2A8!L> 	=P*WH">(2C.HA1G*,1A/<0Y/;	:	9:H5<Q0D0E:H4,;0G1G.82T>(0A.8:O8[^O7[
O6[ O5[!O4["O>[O3[$O2[%O1[&O0[	O/[(O.[)O-[*/,DH&V!V VUZUOUNT3T
T^T]TRT&Z\\R[V3T BEO?[MO>[NO=[OO<[PO;[QO:[RO9[SO8[TO7[UO6[VO5[WO4ZY.Y:O3
2O1
0O/
.O-
,O+
*O)
(O	
&O%
$O
"O!
 O

^O]
\O[
ZKM
?KN
>KO
=KP
<KQ
;KR
:KS
9KT
8KU
7KV
6KW
5.Z[UKWV!%*V %)V%(UZ%	UO%&UN%%T3%$T %T
%"T^%!T]% TR%
T%^%A
U
FZ4Z(Z\ZPZHZY!V&V"	?*E	>*N"P*NR^$=$:(!J^$<$=R.J
> *XJ 8 Z]R
R]*NZ
RP.PDHKMAC  PASS %B8HQ?H>LHP.(0Y*10^C=K<
;O;.0;N9[TR9OTC:<(.9=8P8A8J8J8J$?OTC9<(.9K8=K7K6$?ST*>;	?+^8 KU[UK5
U/UDIKLBASVVV?6DILABDSVVV?0DGV5ABSVVV?3DHVCAASV<BB A
 ??.=BA?,T0
?	>*FO?.0D
==A
<Z-J/Z.N.<(*VO;>(*R-R.*MO:> * O;$?K9$?$=R.RO;.O;K8
;J0J-Z,N,Z,.,*1*9===4=/=.=-=;=<++%+G+P+W++,
7
6	5	42C0G/3
:K> +M	2.[	2/$
7[
:	5
6/VBK> +]8AJ[$S$8	2$9:+WO78 
7	5	2.	5	2.?8DHKLBB,T>1W,M-&/QAB?.>.=1U1V01T"MJK> *GO?ZLRK$;ZK"T.LK>$?O=$?$=.M:O<<QO;8D:O:.T;	9<H.]$=$:,*$8"T$9.]*^WAITING 	9<H./K&> /8S&$:-(HP$<K7$?W6$>NO=XPK5[	$>NHP9F8DO=XPS	+D+8!K4>(+O=K3?H+
O=K2?+
O=C1
=/NK0$?$=*7$=[&./SR= D3RASVVVB?G=H=PBM?=.> +T01T1V1U.=C^*9F8FZQK?ZRJQC>K=$?JQ8F8DZQRR*F.;K<$?J
8 Z K;$?R *[.SD
:0D
9=A
80Y*1	7<H*1$8	6$98R!	6.!$8	6R>$9.3$?Z>J=.3[PKQ> +JKP0&0!+F0"+NKP66R62>.?:KN[P61<H/RS&+VSP+YO5[R[Q$=$:/	$=%A/RLPT ERRORSV^.?,DHKEBASV^.?,*,T01U1V1TBJBMB0G?<:HRC?>(R.0B[T0D[V=A[U; JG[S"<H*4	>	=C<> *-$=$:0?$:1GKS$<$:1JKT$<$:1MKU$<$:1PKV$<$=	>$78 ?H*=%A*=	>$7
 ?H.GK;
S	>/S	>.GDHKMAC  FAILED   PC:  AC:  MQ:  FL:????????:2TK:[$K9XHK8XIK9XJK9XK2AHH8 >(/W>QLH<QLI2I\K=Q2A\J+$ANGE CORE 9?=?2A<B((,TD	?ID?H*S	>%LOOP ON ADDRESS SET IN SR	=$EZ]N]8 ^]N]8 ^]*TID?H/<	>%PROGRAM IN SELECTED FIELD/<:2TK;Z<K:XHK9XI2ILH2A\IHH8 > *:HPC8
7XP.1EXISTBAD MONITORINPUT ERROR READING INDIRECT FILECOMMAND LINE OVERFLOWBAD NUMBERILLG?9?=?2ABE8=T 83	?ID?H*\	>%LOOP ONLY THE 2 ADDRESSES INPUT FROM THE SR"%	=OW8 
WOX8 
X*^ID?H*;	>%SET SR TO FIRST ADDRESS & CONT%C$E[WID?H+S	>%SET SR TO SECOND ADDRESS & CONT%C$E[X.%OS/8 VERSION  3  (CCL VERSION G)EDITBOOTFORTF4BITMAPSRCCOMBC8=T 83	?ID?H*\	>%LOOP FROM FIRST ADDRESS THRU SECOND ADDRESS	=O<Z4O;Z5	:J4Z3N38 ^3N38 ^3J38!J5>(*"R
*$%*7M7O7R7U7Y7^7"7	JANU	?ID?H+^	>%LOOP DATA IN THE SR THRU THE ADDRESS SELECTION	=O<[3O;[4	:K3[5$E
5O5
5K58!K4>(+$S5+&%+SATURSU8=5X5W4%T 83"3ID?H**	?%LOOP DATA IN THE SR ON THE INPUT ADDRESS	?%SET SR TO ADDRESS & CONT%C$EZ2"=$E^2N2*.:2LZ<2TI>Z:2A.3J<I>[A2A.==
<K=
;K=
:K=
9K=
8K=
7K6C5K4
3K2C5K4
1K0C5K4
/K.C5K4
-K,C5K4
+K*C5K)
(O(
	O(
&O(
%O(
$O(
O(
"O(
!O(
 .0B:2TK
[E: JT O?Z	>:HR?*<K=
<K=
;K=
:K=
9K=
8K=
7K6C5K4
3K2C5K4
1K0C5K4
/K.C5K4
-K,C5K4
+K*C5K)
(O(
	O(
&O(
%O(
$O(
O(
"O(
!O(
 .0B:2TK
[E: J=2A2:/^BJ1Z3J2Z4R4*&R3*$2TK;Z-2A2:	:.\?98JM?5P2A
RXAV4MOMFL=L$L[LR$FP4QRIWI[CJCUB6CAB&*A?B1JQBFCHB4B$BD8<;<0B	?HR8F8D=/>ZM	=K<ZI.:JM?*U$7.NHQ?H*ZHP<H>D.N:HR?*50BJ1Z3J2Z4R4*&R3*$2TK;Z-2A2:	:.\?98JM?H	98.\:HQC88JC8<(+QZ3HR?HJ3K7>(8 J3Z3HPC6J3XP.;:"NC5Z3J3C4Z4J3C3Z3HR?+*J3K2> +$K1Z3J4K7> +*K0Z4HPC6J3J4XP.;
0?H8G???9
.!52A821:ABZ

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