File TK21D.PA (PAL assembler source file)

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

6(R(7HOI6 OI* CA3C;O3T;I7USA3I;O2 [O2 T3E: +OCV*121. &1*7B37TCA+EB,3F?O3T
A/EN *760.5N32MFJ+NCD+ICS3TWH2 WS3C;O7DB 7OSR3I;O2 [O2 T7ER 3R;A7SKC7ISP3I;O")*M3TGE+CCH7M?M6MJJ3AC* "(3M/A+ECS7SWO7NOD2 [O2 GS7TOI3FOA+TB.3TWH7YJ	3EF +LCL7ESA3I
N")*M3TGE+CCH7MKO+EB?6(J(3AC6 WP+TCS3OWV3R" +ECR7CCU")*M3TGE+CCH7OCO+S" 2(GK+RCL3S	P7LOL2 	H3S* 3UOIE6)2JGK+RCL3U>-+H" 2(?L7OOK6 SA6 CS3I3L+ECD3J	U+C	E6MRJ3EOA+H" 2(?T2 3A/LN 2 C3ISL3R;E6)^ 7HSA2 	D7D& +OCU+DCO7YOE7TKE7D	A2?F 3NKY7O	D2 ?G2 ;A3YW3EWR"?*M7K
A7L& 3EA6MRJ3EOA7H^ 7HKE3ER +ICD7YWO2 ?G2M.J3A3R2 T3EWR6MRJ3EOA3H: +OB,7NSO2 WY3SWT3RGD+YB.7YOE7TKE7D	A2 T3EWR2 GW+S
N3TF +NCY3SOH3O3O2M.J3A3R2 ?H3WN 3OWM* "(3T	H+NCK3TGH3T& 7S^ 7HSA2 WH2 GS+Y	S6MRJ3EOA7H& 7ESS3ESR/A?Y* CI3W;E7TR 3O6 3Y> 3TWH3R* O7B2JGK+RCL3H;UH6-2JWT3AC* CI7H[A3EF 2 	D3FWF3R;E3T* +O;B* 
D7YWO2 WR3M7E7BKE2 W+ACT7YWO2 	D7D& 7ESS3ESR+A;Y*M"J2(?T2 3A+LB)+ICT7WOA2 	K+NCD+OCF3L;O7GR 3I7E2 
AO*M7JOO3H6 3OWR2 ?C3O	K+E" .+F 2 WR7PSE*)B!6(R(7OR 3EOA7H^ +HCO+ICS+ACT3S;I+KB)+WB	3W;AT6 2J?M+RCE3C?O3KWI"!*M3TGE+CCH7JOO+HB,3I6	2 3C3E;A3I
N6 CU2,> +KB?+ICT3RGE7L	L2 ?D3E;S*	CT3M/A3E6 3EZ 3E3E2 	LK7E2J	G3V;I7G& +OCU3AN 3O/O+ICE+ICF7YWO2 OS3RGE3MF 3T6 +EB.6(R(3EOA3H" +ACS3BOA7KR 7OR 3A3BE6)2J?D2 ?Y3U. 7N
O2 W+A;T* CI3O3N3Y" 3AWV2 ;O3E6 3OWR2 ?C3O	K+E" 2(3C3E;A3S> +FCF3TKA+L	E2MZJ+OCR3NOI+KCI6(R(3O* 3OS2)J +UCT3IN +ACN7G[I7E& +OCU7AB 7RSE3Z3E".*M7JOO7HV +HB,7N
O* "(7JOO7HJ 3EOA7HOE2 ?F3RN 3O/O+I	E6MRJ3EOA3H: +OB,3T	H3S& 3S: 3I/C7IN	2 ;A7DR 7HSA*	CS3M;I+EB.7BSU* 
I3M^ 3O;N3A^ 3IWV2 ?Y3UF 6MBJ7RSE3Z3E2M*J3OS2 E2,& 2 GW+N7T2-& 2 GW+NCT3TGH3TZ 7IOR+T" 2(WR3AC+ECS7FKO2 ?C3O	K+EB,2M>J+NCE3UGN3S	S3GWN3DN 3O/O+ICE+ICS3L[E3T& 3NJ +A	G6MRJ3EOA3H: +OB,7BSU* CI3D;O*	CT7H[A3E> +NCE7FKO6 [E7E	R3BSOY*M7JOO7H^ +HCY7NSO2M.J3A3R2 
H+VCE+TCO7B	U2 ?S+MCE7MKOE*M3TGE+CCH3YGE+HB,3I" 3AWV2 ?T2 WG7TN 3OWM2 ?MR7E2JGK+RCL3YGEH*M3TGE+CCH7IR 7HWO+GCH+W
E3D^ +ECT7RSA7EON6 ^(7RSI3I
N2 ;U3CWL+A	R2 WR3M7E7BKE2 WW2 WW+RCE3G;ON7A6JKT7YR 3O^ +ECT3R	A3S;IS*M7KKA7L& 3EA6MJJ3AC2 ?M+RCE3J	U+CCE3PWL3AWS* "(3TGE3DC2 WR7TKU+NCS+TCO3TKA+LCE7WSI7HB 7RSE3Z3ES6)2JWT3AC2 ;A7DR 3H;E2 ;O3ER +ACY7IR 3H;I3K6 3AKY7E^ 3E2	3L" 3AWV2 GB3N;AA7S2JGK+RCL3D3O+E
 *?B)3B;A3AGN+S" 22J 3AGN7NOA*?B)* "(3UON3LGER6)2JWT3AC2 ?Y3UR +O
N3T2 3IWK2 GB3N;AA7S2JGK+RCL7YOE* CI7H[A3E> N7E2JWT3AC2 O2 ?GO7D2JGK+RCL3YGE+HB,7IZ	+EJ +DKO2 GB3N;A+ACS.(>2")*M7JOO+H" 3UON3LGE+RB)7LSE2 WM2 GH+VCE*3B.6(R(3EOA3H& 3SR 7ISS3RKI3U	T+NCG3PWR3TWZ+L3S2 ?JS7H2J?H7LOD6 CU2 	H3S" 3ASN+SB,3L?O+KCS3A?R3USN6 SA6 SO
HKE2 	K+DCS3W?H2 GH+VCE"36)2JGK+RCL3U7H6MJJ3AC2 U+MB,7LSE2 WM2 GH+VCE3S7O+E" 2(GH7P	P2 GE3T;I7GB 7RSE3Z3E2,6 3I	M7COK2 GM3YWB2 GK+R3L6MRJ3H;E6 WT7RON2 ?T2 WT3AC")*M3TGE+CCH3WGHT*M3ROA7HB 7OKU2 WM6 WO7TN 3OWM6 WJ3IWC* .(* B13UON3LGE7RN 7ESN3EONE6)2JWT3AC2 
O6,^ 7HSA*	CS7AB 7RSE3Z3E2 GT3SWT2 	L+KCE2(^(3EWN3R3A2 ?C3NWV3RGS3T?IN6)2JGR+CCH3SGA7AKA6MRJ3EOA7HN 7ASL6.J 3IG+TB.3WGH3TR 3ON 3O/O7IOE2 GT3SWT2 	L/K?E2 >(+NCE3UON3LGE7R^ 3OSR2)F +RCE2MNJ3O/O7IOE2 GS7L	T"?*M3ROA7H& E7S2JWT3AC* CI3D;O*	CT3T	H+NCK+D;O* CI3T
H+NCK3TWH7YR 7ASS3ER 3I[F3EWR+N;T2 T+ECY7TOA+TCE3SWW+E;T6MJJ3AC2 WYS*M7KKA7LR 3H;A7K& O7U2JWT3AC2 ?Y7UJ	7E^ 3EOL3OWM6MJJ3AC2 T3A/N2 ?YU*M3TGE+CCH7YWO2	WR2 WW3L?C+MCE6(R(7OJ 3AC+E	L6MJJ3AC* CI3TGH+NCK7YWO* "(7T	R3I
N2 ?T2 3P+ACY3G7AE6)2J?J+SCH3TGH+NCK7YWO6MRJ3EOA7H& +O
U+RCE3W3E3C7O+EB 6(R(3O* 3OS")*M3ROA7H& +O
U+RCE3W3E3C7O+E" 2(?C3PWI7SR 3EOAH6)2JWT3AC2 T3A/N2 ?YU*M3ROA7H& +O
U+RCE3W3E3C7OE*M3TGE+CCH7A	N3BSO3YJ 3E;E2 ?T2 T7E* /O?O6MJJ3AC* 7I* 7I* CI3BWE7NR 7HSA6MRJ3EOA3HR +ICD7YWO2 WS7ER +HCE3BKA3Y^ 3O	R3LGL"?*M3ROA7HV 3H"-+U" +N	O6MRJ3EOA+H" 3UON3LGE+RB)2.R.+ICD+Y3O2 ?J+S;H2 	D7D& +OCU3SWE2 GP7T	T2 GC/K?E2M*J3OS2 ?N6MRJ3EOA7H
 7HKE7EN	* CA3BKA3Y^ 3O	R3LGL2 ;A7DR 7HKE7EN	* CA3BKA3YJ 7E[AE7R2JGK+RCL2(&(7NWA3DKI+LCE3A?B+UCT3Z?O2 ;A3D^ 3R;A3DWU+RB)O7H2JWT3AC2 ?Y3U^ 7O^ 3IT2 ?Y+UCR3GGR3N7D7AR 7OR +HCE3Z?O"?*M7KKA7L& 3EA6MRJ3EOA7H^ 3HOI7H* +OCO+ICS7YWO7R* /O?O6MRJ+HCE3OWN2 ;I2 WC7NK
+ACL7PKA3K> 7RR +HCE3OWN2 ;I2 T3EJ 3R;OX6?2JGK+RCL7I^ +ACS+ICN2(;U3CWL+A	R*.:.2 ;A3D& 3N6 3Y" 7OOU3EF +NCD3G;R3A7DA*M7JOO+H" 3UON3LGE+RB)2.F.2 3B3O/C2 ?Z+O" 2(;I7TKE7RCU+TCS7KKAL6)2JWT3AC* CA3B?L+CCK3Z?O2?& 7N& 7OKU2 ?H3UWS2M*J3OS2 ?N* CA3B?R+NCX3Z?O* "(3
GE+CCH3NSO3SF +NCD3USN7EOR3T;A+D	S6MRJ3EOA7HR +HCE3B?R+NCX3Z?O2.& 2 	L+KCE3TWH6 KB7ON2 ?Z7OR +O;O6 SI*	CS+SCO3MOU3HJ 3I
G+E;R*M"J2(WT3AC6 WS3GWG7SOT2 T+ECY3SGT+RCT+ACT3B?L+CCK6(KW3I	T+NCG3UON3LGER6)"J*M2(V(+NCD+OCF3T	H7SR 3R;A7SKC7ISP3I;O2MRJ3AWT2 [O6 CE3I?S+DCE7N[O. F1.,F .9N72,Z 7OSO3AWG. ^3.0V-"3632J	T+MCE+OCF3ESN2 [O6 	T3P?I+NCG+ICS.1R:*5" *6B53M;I3UWTS6)&J*L

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