File F1109.PA (PAL assembler source file)

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

2/OT*0B83D	R7VKE2 ?F7RJ +T7S"8*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M2/?C7PKY3IG+TB *(	C. F .9R76 	B2 	D7GSI+ACL7EWQ3I7P7ESN2 ?C3R?P7RSA3I;O*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J3TWH2 ;I7FKO7MSA3I;O2 ;I2 T+ICS3DOO3UWM+NCT+ICS3SKU3JOE7TR 3ON 3H;A+GCE7
SI7HWO3T: 3O	TC7E2JF/+NCD3S?H3USL2 ?N3TJ 3EN 7OON7TWR+ECD+ACS3AN 3O7M3I7T7ESN6 	B2 	D7GSI+ACL7EWQ3I7P7ESN*M>J7CKO7PKO3A	T+O;N2 R 3I	G3T3A6 GE7UCI3M;E3TN 7OCR3OGR3T?I3NF 7SWS7MOE2 ?N2 WR3S?P3N	S3B3I7I	T*M>J7FKO2 ;A3YV 3R?R+RCS3TGH3T6 +ACY7ACP7EKA2 ;I2 T+IC
3DOO3UWM+N;T*M>J*M>J3TWH2 ?S7F
T3AWR2 WD7SKC3IWB3D& 7NR 7HOI2 ?D3C7U7ESN6 OI6 WF3R	N3SWH7DR 7OR +HCE7PKU3CGH7SKE*M>J3USN+ECR3A2 3IWC3NWS2 ?F7RV +SCE+OCN7AN 3I
N+LCE3C7O7PSU+ECR7SOY3T7E2 ;A3DN +ACN+BCE7CCO3ISE*M>J2(	W+TCH3ION7LOU3I;O2 [O2 	D7GSI+A
L3SN 7O	P3R
I+HCT7NSO3IWC2)> 7N	L2 ?F7RV +SCE+ICN3SOUH*M6/	S3SWT+MB,3EOX7ESP6 OA2 GM3Y> 3TWH3R	W+SCE+BCE3P?R3VSI+ECD+ICN3W	R3T;I3GJ 3YR 3I	G3T3A".*M"/*M2/	D7GSI+ACL7EWQ3I7P7ESN2 ?C3R?P7RSA3I;O6 OA3S7U+ECS+NCO7ROE3P;O3SKI3I	L+TCY7FKO2 T7EV S7E2J>/7RJ 3E	L3A	B7LSI3Y> 3
& +TCS3S[O3TGW+RCE+OCN7EWQ3I7P7ESN2 T+ACT+ICS7NSO6 WS3P3P3ISE6 	B*M>J3D
I3IGTL6."J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/2JF/3CWC7POT6 SS3ASN3ASR2 GM+SCS3S?T3R
A7ER 3A/S2 WM3SGS+GCE7FKO7MSA"M6J2JGT/S7K6ISDA*M3I	N/W7T"I606JWCR&="160"J*M3DOTA&=.6Z7"2*M7DTA&=.6Z7"4*M3D3TB&=.6^7"4*M7DOTF&=.6^7"1*M7DKTA&=.6Z7"1*M7DKTB&=.6^7"2*M3DGT/C7A.I^7"5656JSD3AOW.=^I.7R5"M6J2JZI3I3E3DNI+UWR"160*J*I.5B0"0*M7TCM",*M3SGT+R3T2IGCL*M
D;O3E
F6,N 3K	PN7S2J&I7NKTP7T2J6/3A;I2 GH3N3D+ECR3L?OP*M2M2J7OCO2,NIA7L6JJI3EWCI	V2I^/+ECT3A6 7EOS3AWG2MFJ7DKD.,BI"M&J3DGC2I3FD*M7DKT3E?D2,F /C^7"7652JRI+CCA+I"I7T	RC	T6/KT/YN 2 	T7MOE"M&J7I+S2I?D3N[E+G>I3I	N3TGI7L+I3EV 3V;E3TZ 3L
A"M&J3SGT"M&J3TSA2ISAD7R2JRIC	A3ASDR*M2I7J3S^IE7T2JFIN	D"(672JNI+DCF7CKU"M&J3DGC" 	I2(;UI7T2J*IM	S7GSE"M&J3C[D6 WCR*M2IOD3A& 2IR(3F;U"M&J3SGT"M&J7JOM2IWGT*M2ISC3FN U7R2JRI+CCA+I"I3D?L+C>I7GSE6 OO*/B87S	T+LCE3A
RS*M2I7J3S^IE7T2JNI+LCL3R3A"M&J3C[D6 WCR*M2IOD3A& 2IR(3B?L+CCK2/?D3U3B3EJ 3LOO3K: 3UKME7R6JRIA	D6(OF3T;IT*M2IOD3A&I7DOI+P>I3I	N3TGI7L+I3E& 3NWT7RWR+PCT7DOI7PSAC7H2J&IO7F2J*I+MCS+I"I7SSE+U>I3I	N3TGI7L+I7ER +HCE3OWP7RSA3I;O"M&J3TSA2IR(3T[S"M&J3DGC2I;I3T/S+P
I3EGN3BWL2 ;I7TKE7RCU7TR 7ESS"M&J3I;O"M&J7NCO*I>I+BCE3NOI7ER 3O> 3TWH7RB 7ECOL7E2JNIA	L*I"/3ASN2 T+E
Y+LCL3KOI7K& +OCU+ICN3TWH2 GT+S	K"M&J3W	AT7E2JSP3O[N+GB,3D;O3E
F*I>I3W	A3TZ +OCR3C7O3PWL3T?IN*M2IGT3DRI3OWNF7G6JNI+NCA3CGL* >I+ICF3EWV+NCT3FGL3GR +ICD7NSO2 ?C+MCE+U3P"M&J7JCM2I?N3PGF+L>I7BSU2 WW2 GC+MCE7OSU2 [O2 [E+WCT7A	N7W	A",*M2IOA.7^7"5&I*/CA7P
O+ECR3F	A7LKU3E6 7USS2 GH+VCE3OOC7UKR+E;D"M&J3TSA2ISAD7R2JRIC	A3ASDR*M2I7J3PRI3TWRD	O2/GT+KCE+ICT3F?R7MR +HCE7TCO2M:J3O[P+A3L2 7J3S^IE	T2/T+ICS7JOU7TN 7EOT2 T3ER 3FF +NCD3ASDR*M/PZ7*020.IZ7"0606JRIA	D3SGT7TOU"M&J3DGC2 & 2ISAD7R6JRIA	D3FSL"M&J3DGC2I[PL7D6J
IA	D3ASDR*M2IGT+D"I"-&72/WG7TB 3O;I7TKE2 ?T2 WM3SGS+GCE3EWV+NCT3FGLG*M2IGCL*M2I?PS7T6JSS7AWTS6,2J[P+L3D2I3HT*M2I7J3P2I7OCO2I^/+ECT3A?N3TWH3R6 7EOS3AWG"M6J2JWGT&,"0*M3FSL2,"IL7T2J&IS	Z3ASDR*M2IGT3D& 2ISAD7R2J*I+MCP3I^IE7T2J&/3NWT7RWR+PCT7RWO3T;I3EJ 3E?F+RC
7DOI7PSA3C	HN7G"J*M7ISN7RSP.,B ";&02IN/3H	A3N& 3N?T2 /S+ICP3CGHI7N2J;I3T/S+PB,3CGL*I>I+OCR7DOTF*M2I7J3P& 2I;I7TCRT*M2ISC3FN +ICF7CKU"M&J7DKTB*M2I7J3P& 2ISI7ICS2IR/7ICS3AOT3H& 3NWT7RWRP7T"J*M7DSS+O3P2IOD7ANI7TSAU7S2JRI3TGR"M&J3ASN.IJ("0606JRIA	D"(&62/	D3SK
+LCE7ISN7EKR7USP7S^ 3H;E2 GT+PCE7TKH3O
UH*M6ISDX	A6IN/7TCO2 GT+P3E2 3C7EKA6 KE7RKO3S& 3NN 7OSN3R3O"M&J3TSA.I
P.6B0"M&J3DGC2I;I3T/SP*M2IGT7DBI3D;OF7G2J*IM	P3I	D+S/P"1*M2M&J7DOIP&,7HSL"M&J3C[I" 606JBI7OSSD7S6JBI3AWG*M>J3SGE3RC2 ;A7DR 3R;A3SWF3R2 3O	GC*M2MRJ3T?G6,RIA	D.(B2"0*M+D3C6I+SL*M2IGT+D"I.4B0"M&J7DTA&I6/SS7ASR2 GT+PCE+ICN7N
E2 >(+L	D2 	D3ROE3T?IN*M7RSS+R3T2I7J3S& 2I&(7DOIP*M7FSS7ISN6,N +MCA3CGL"M&J7JCM2I/C3B;L+O>I+NCO7EKR+OCR2-N 3HOE3KZ +OCR7CKO3ROE3TJ 3LOOK*M6ISDR7B6JJIT7L6JJIA7L6JNI+MCA3CGL* >I3NGE7TR 7ESS* B-3O3N7YN 3EWL+CCT7EKR+OCR3BSA2 ;O2 WS3AOR+HB,7BSU"M&J7JCM6ISDG	O2
	S3NWC2 ;E3D?Z+NCE3FGL3G& 3S& 3N2 3I/N2 WW2 	W+LCL7R[E7EOR3E> 3NV Z*M3DWT+R3R6IOI7ZRI3ROYT*M2I7J7PRI3RGYG	N6/KT7YR 3HWR7ER 3IWM3S> 3NV 3R?RR7S2JRI3TKR"M&J7JCM" 	I6(OD7TCO2I>/3TWH3R	W+SCE7RSE3U;R2 	W+TCH7EKR+OCR3FGL+GCS+ICN3SGT7TOU6MRJ3RGY+G3N2 7J7SNI7EWT6
R/+RCY3AGG+ICN6-J 3E;I3I	T3A	L+ZCE3OWP7RSA3I;O2 ;O2 ;UI7T2J*IM	P7RSSR	T2/?G2 GB+CCK7ISN7ON 7EKA+CCH3W	AT*M6MNJ7EWT.,BI*I>I7RWO3T;I7ER 3O& 7NSI3I3A3IWZ6 SD6 CO"M&J3C[D6 WCR*M2IGT7DVI7NSI2I^/+ECT3U	N3T: 3UKME7R6JRIA	D2(3B3KGTB*M2IOD7AVI+B>I7GSE2 ?P7ISN+ECR7
SN3ON 7UKR7ESN2 3B3O/C2 GT3BWL"M&J3TSA" 	IU	B2/WG7TB 3O	S3T?I3N> 7FR 3AWP"M&J3TSA.IF("2*M2I7C7AN +TCL2I&/3FR 3E	S3RSE2 3B3O/C6 OI2 ?M+RCE3TGH/NF 20R 3E	C3M3A2 3B3O/CS*M2IGT3DRI3B?LC	K2/;I6 KF7OSN2 [O2 W3EWR2 WW6 KA+EB,+WCE3W;AT*M2I3CA&I2/?T6 SS7ASR2 ?F3RG
+R;D"M&J3TSA2I;UI7T6JJIT7R6JJIT7R6JRIA	D.(F2*4>I+ICN7ESI7HKE2 GC+SCE+WCE3W;A7TR 7ON 7EKA+CCH7WSIH*M6ISD+CCA7DT+A>I7ISN7EKR7USP3SV 3NKA3LSE"M&J3TSA2IN(U7R2JRI3TKL*I>I+ACS3A: 7ESA2 GH+CCK+WCE3T3E7LR +HCE3C;O3T?RL*M2ISC/FB *I>I+TCO3PGL+CCE7TCA3EJ 3LOO3K: 3UK
7EOR2 	D3ROE7T	L"M&J3TSA2IKU2I&/3N?T6 WO3RN 7UKR7ESN2 3B3O/C6 WN3MWB7RR 3A3B3EF 3S& T*M2IOD3A& 2IR(3TOA+A>I3F;I+DCS3TWH+MB,7S[A3I
N6 OU2 ?S+MCE7WKOK*M2I7J3P& 2IWST7U"J*M+U3B"I602J3B3KGT+BB,3Z3B3O/C.IB12IF/+LCL7TCA+ECS3SGT+RCT7R
E3O;UD*M6MRJ3ROYT&,"0*M7DWFN&,"0*M3D?LC&,"0*M3D3B3O/C.,B 6MVJ7NSI.,BI2MNJ3K3B+N3O6 SDR7A6JJIT7L2JNI+MCA3R3T* >I7DKI7ESC3I;O2 ;I2 	LN7K6JNI+NCL3CGL"M&J3C3M6 SRL& 2/WS3AOR7HJ 3EWV3RWS2 ?T2 3B3O/C"-626JRI+ACD7IVI+B>I7GSE2 3B3O/C6 WN3MWB3RZ 3R7O2 ?C7NKT+OCL3B
U7FKE"M&J3CGI"M&J3TSA2IKD3LOOK*M2I;S3AN L7A6JNI+ZCL3CGL"M&J7JCM2IOD2IF/2 WF3W2 3OGC3T?I+N3S* CA3H	A+RCY3A
L3O	R3T7H"M&J3TSA2I3DO7C2JNI+DCF"0*M2IOD3A& 2IR(3TOAA*M2ISC3FN U7R6JRIA	D7DWF+N>I7SSE2 SA3DWR+SCS3ASN2 	F3ESL2 ?F7RR 3R;A3SWFR*M6ISDL7B6JRIA	D7DWFN*M2I3C7LJ A7L2JFIN	D.(Z7"0602JRIC	A3D3BC7T6JJIA7L2J&IA7C6JNI+TCL3R3T"M&J3R3T2MRJL&,7DTA&I6/SS7ASR6 KT7AON7FK
"M&J3C[D" 606JRIA	D.(Z7"0602JRI+CCA+I"I3DGTW	C2/WS7T^ 3OSR2 ?C7USN2 ?T. J168^ 3OSRS*M2I7J3S& 2I&(7DOI+P>I7G[I7EN 3OWM3OWN2 3E+SCE3AN 3H;AC7E2J&I+SCZ7IVI+B>I3B7U3PN 7UKR7ESN2 GT+PCE3B?L+CCK3N7U7BKE"M&J3SGP2 3CA& 2/3A3LV 3R?R+RCS7DKU3I
N2 GD+TCA3TGR3N[S+ECR3AWR2 GBD*M2I7J3PRI7TKER*M2IGT3DRI3BOLT*M2IGT+D"I.7B6"0*M2I;SA*M2I7J3P& 2IR(3S?TP*M2IOD3ARI3BOLT*M2I7J3PRIL*M2MRJ3BOLT&,"0*M2IGPG7E*JRI"$*MBZ

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