File QUOLST.PA (PAL assembler source file)

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

*M>J****6 OT/S"/6 WQ7OOL+T* **B*7VKE3S?I/NF * **"*7\2JJ/3Y* 3O;H2 ?Y3U
N2 :(7HOH")*M"/*MBL((.0B0"0*M6IKCL7F6JRIA	D7ROE7TSR"M&J3SGR*I>I7ROE7TKA7TR 3O" 7ASL"M&J3USN"M&J7JCM" 	I..F+"M&J3I	NT*M*M*J.0F0"0*M7AU"1&,"0*M7ROE7TSR*,:I"+612JNIL7A6JRIA	D7DSCR	C6/:"C6"6JBI3U7TE7S6JE+I3T6IKCL7F2JNIM7A2JNI7LOO*I>I3D;O*	CT7FKO7GSE2 ?T2 3C3O
S6 CU2 S+OGP"M&J3C3RF*M2I3HT*M6MBJ3U7T/E7S7JOM* CI*.>I3P3A2-WT+XCT7OSU7PSU"M&J3P	R/NCT6MBJ3U;T/U7M7JOM* CI*.>I3N7U7BKE6 WO7TWPT*M6IWN7MWOT*M3C3R3F*=+MCS".*M3C3R+F20"I602JNIL7A6JRIA	D/PV1"M&J7TOL"M&J3TSA.ION"M&J7TOL"M&J3CGL2 3CL*M2I7J3P& 6IKC/LCF"M6J6JCS3A
C2=7J3S& " 6.6JNI3POAE60"J*M7EKR+O3R2I3C3AN L7L6JRIA	D3M
S"1626JBI3U7TE7S2JNI3R[L"M&J7JCM2IWR7SKT/TF+"M6J6JOM+G212I
M.1F-2M6J/SKG2,6I+G62"1*M3M
S"3&,/MOG"-616JOM+G242I
M.4F-2M6J/SWG2,6I+G65"1*M3M
S"6&,/M[G"-616JOM+G272I
M.7F-2M6J/SG2,6I+G68"1*M3M
S"9&,/M	G"-616JOM/GB12,6I/GB1"-616JOM/GF12,6I/GF1"-616JOM/GJ12,6I/GJ1"-612JOD3TOR2,NI3TOR"-61"J*M3RSFT&,..F+"M&J"0*M"I60*J6I"3*M2I[U3D;C/TF-"M&J"4*M"I60"J*M3W?H3B/L6,VI3FKD+L/K"3*M3USF3B/L*,:I"+61.JBI2IZ/3IWL" 60.JFI6I./.0F,]*M"I&02/OA7CWO+NCT2> 7FV F7D.J
I"M&J"0*M6MFJ3UKO+L3K*I.."1*M"I&12/	F+LCE"1*M"I&4./C[6,64"M&J.6Z1*5>IQ7U.JVI.7R62I>/T*M.IF4"0&0"/7A"J*M3DGT"0&,"0*M3DGT"1&,"0*M3DGT"2&,"0*M3S
E7CSN.,BI6MVJ3FOD+N3T"I602J;O3L;IE&,"0*M3O3F3IWN.,BI6MBJ3O;IT&,"0*M7CWO+N3T"I602JOA3O;UT&,"0*M3O/F7ECE.,BI"M6J.JKP.0B0.,JI.0B02M:J.2B0"0&,.-B2"060.J
P.7B0.,^I.7B06MBJ*125.IV16MBJ*420.IB46MBJ*727.I^76MBJ.1B0.,FI"060.JON*,6I"3*M"M2J,B*.2B02M&J7NSI6,NI7EOG"M&J3DGC2IWS3G;CT*M2IGT7DNI3EOGN7T6JBI3U;TU	M6IB/+UCT7OSU* B+OCF3FWR7EN 7EOG"M&J3SR " 636JRIA	D3M
S*1>I3T3E3L" +ICM3TGH7TN	2 WA7T6JBI3U7TE	S2I&/3T& S*M6IKCL7F6JRIA	D3W?H3B/L2I6/3AWK6 WS+RCE+WCE7GSE2 T7EJ 3IG3TF 3C?C7USN* F"M&J3W?H"M&J3TSA2I[U3D3B/KN+"M&J3DGC2IOA3O;U+T>I3M/A7EN 3UWR2 ?T2 GS+VCE3AOC+TN "M&J3TSA2I[U3D3BK*M6ICOE	N2I>/3P;E6 SI"M&J3SGZ2 3CA
I6/KE7RKO"?*M2I7J3PVI3R?R+R>I3B7U7MKE"M&J3TSA2I[RD	T2/WR+ACD+ICTI7N6JJI3F3IE*M2IGT7DJI7FSD"+&62/?E3F& 3S> 7N	L2 WL3G3A6 KE7RKO"M&J3C3L6 SRR*M6I+S3AN L7A2J*IM	P7EKRO7R"J*M3O;P3Q?U6,RIA	D3Q?U3B/L2I>/3P;E6 WQ3OGT2.GD/TC[6,62"M&J3OWPN*M6I+S3AN L	A2I"/3OWP2 ?N
 KE7RKO"M&J7JCM2I?N7NSD+A>I+ICF3Q?U+TCA3I;S*	CT7FWO+N3D2 ;U3L7I3IWT3DR +TCA3Q?U7TOA"M&J3IOA"M&J3DGC2I[R+D/T*2>I7FKO2 	F+LCE"*M6ISS7LJ T7R2JRIC	A3RSF/TN+6IJ/3ESA" 622JNI+MCA3C3L2 GRR*M2IOD7AJI7FSD"+&42/SA7DKE.-61.3^7"7*M2IOD7AJI7FSD"+&56/SS7ASR2 	D+SCK3ASD
RB "M&J3TSA2I[RD7T6JJI3F3IE&I2/?D6 SI*!F!*!F!*!F!*!6!*-6-"M&J3TSA2I[R+D/T"6*M2I3C7LJ T7R6JNI+ZCA3CGL"M&J7JCM6IKE7RKO"M6J6JNI+TCL7RKA*I>I7SSE6 WB+FCF3P	O+NCT+TCO.4B0"0*M2IOD7ABI3O;IT*M2IGT7DVI3FKD+L/K"3*M6ICSA&I6/KG7OCU* ^3SF +RCE.>^3*7276 KP3IGV+T3E. R<.0
0"M&J3ASN.I
P.7B06I^/7EJ	3E> 7N	L2 ?L3O	K+NCG7FKO"M&J3DGC2I[U3D3B/KN+6IB/3R+O7ESC* ^S*M2I/SP*M3DGT7LCO2,&IS	Z3P	ON	T2/;I3CWR2 ?P7ISN"M&J3TSA" 	I3P	ON	T2/WG7TB 3R+O" 66JNIN	A2I&/7F* 3E?R2,N 3O;U3T& T*M2I7J3P>I3N[O+F>I+ICF7ZKE7OR 7HOI6 WG3Y" +ACS"M&J3CGI*I>I+NCO3DGT6 W
3OGT"	7S6JRIA	D3USF3B/L"+636JNI+ZCA3CGL"M&J7JCM6ISD3A?LP*M2I7J3S&I7NCCN7T2JRIC	A3DGT"0*M2I7J3S&I7NCCN7T2JRIC	A3DGT"1*M2I7J3S&I7NCCN7T2JRIC	A3DGT"2*M2I7J3P>I3N[OF*M2M&J7NCC+N3T"I606JRIA	D3P	ON7T6JRIA	D/PB1"0*M2IOD7ABI3O;IT*M2IGT3D& 2I?P7ISN"M&J3TSA.IKP.0B0
M&J3SGM"M&J3TSA.IKN.0B0"M&J7JCM" 	I3ION7PSN"M6J2J?N7NSDA&,3S3T2 GR+R>I7HOI6 KP3OWJ+CCT2: +OCT7FWON7D2JRIC	A3DGT*0>I3T	H3S6 3E;A3S" 3E" +ACS3N;OE6!6JNI+TCL7RKA"M&J3DGC6ISDA616JNI+TCL7RKA"M&J3DGC6ISDA622J*IM	P3O?NF7F"J*M3O?N+F3F2IGT3D>I3N	LN	E2/[I2 ;O3L;I3E
 3R> 3F3F3IWN"M&J3SGP*I>I3Q?U7TOA6 KA+E6 6N	2 TE7N6JNI+TCA3C3L2 GR+R>I3TWH3YF +RCE3T/A+ECN+ACS3U3N3I	M3TSE"M&J3DGC2I;O3L;IE*M2IGT3D>I3F	LN7E2JRIC	A3O/F7ECE"M&J3TSA2I[O3L;IE*M2I7SA*M2I7J7PJI7ACLH*M2I3CA*M2IGT3D>I3N	LN7E2JGR3LP2,RIC	A3O3F3IWN"M&J7JCM" 	I..F
"M&J3SGTR7T"J*MBL((.0B4"0*M3SGT+R3T2I3C3AN L	L2/	F7GKU3E> +UCT7H
O6 WM+CCH3O3N3IWN"M&J3TSA2I[U3D;C+T>I3Q?U+TCA3L[ET*M2I	CA&I2/[I*:6 *-6-"M&J3TSA2I;O3L;I+E>I3FWR3ER 3I/S2<;O3L;I7EV-3FODN7T2JNII	A2/T+ECN3P	R+NCT7ASM2 [O2 	D+SCK7ION3TGED*M2IGT7DNI3EOGN7T6JNI+MCA3CGL"M&J7JCM2I;O3F
I"M&J3TSA2IWS3G;CT*M7PSU+O3N6IWP7TWNM*M*ICS/DN "M&J3TSA6IOMG626JBI3U7TE7S2JNI3R[L"M&J7JCM2I[O3F
I2M>J3N	FG&,3TSA2I[U3D;CT*M2I	CA*M2IGT3D>I3N	LN7E2J*IM	P7PSUO7N"J*M3O[F+I3G2IGT7DVI3FODN7T2JNII7A6JRIA	D3O3F3IWN"M&J3SGP"M&J7JCM6IE3CWED*M2I	CA*M2IGT7DNI3EOGN7T6JNI+MCA3CGL"M&J7JCM2I[O3FWSG*M2IGT7DNI3EOGN7T6JWP3T[OF&,7PSU3N7U"M&J3SR " 636JRIA	D3M
S"3*M6IWP3TWMS*M2I7J3PFI3M+TO7B"J*M3O[F3S
E6,RIA	D3USF7CSN"M&J3CGI"M&J3TSA2I[O3L;IE*M2I7J7PBI3U?TF7F"J*M3EOX3ESE2,NI+LCA3C3L"M&J3TSA6IOMG646JBI3U7TE7S6JRIA	D3O3F3IWN"M&J3CGI"M&J3TSA2I[U3D;CT*M6IWP7TWNM*M*ICS/DN "M&J3TSA6IOMG656JBI3U7TE7S"J*M7ASM3JKO2,NI3R[L"M&J3C3RF*M.IZ6"1652J&IA7C6JBI3U;TU7M6JN
* CD"2*M2IGT3D6I/S[G"M&J7PSU7MOE"M&J3TSA2IOA3O;UT*M6ISRR*M6ISRR*M6ISRR*M2I;A7DBI"7676JBI3U;TU7M6JNI" 626JRIA	D3M
S"7*M6IWP3TWMS*M2IGT3DFI7CWON7T2JFIN	D/P^7"M&J7PSU3N7U"M&J/SJ "M&J3TSA6IOMG686JBI3U7TE7S2JNI3R[L"M&J3TSA2I[O3KWEP*M2IOD3A>I3F	LN7E"J*M6IKCL7F6JRIA	D3M
S"9*M6IWP3TWMS*M6IKCL7F6JRIA	D3M
S"1606JBI3U7TE7S2JNI3R[L"M&J3C3RF*M6ICS3AWC"M&J"1*M2IGT3D>I3N	LN7E6JNIP7A2J*IM	S3N;OE*M6IWP7TWNM*M*ICS/DR "M&J3SGPC7E.JRI"M&J3TSA2I[O3L;IE*M6ICSA*M2I7J3S:I3OWN"M&J7PSU3N7U"M&J3SR " 646JNI3POAE*M"I626JRIA	D3DGT"0*M6ICSA*M2I7J3S:I3OWN"M&J7PSU3N7U"M&J3SR " 6
6JNI3POAE*M"I616JRIA	D3DGT"1*M6ICSA*M2I7J3S:I3OWN"M&J7PSU3N7U"M&J3SR " 646JNI3POAE*M"I616JRIA	D3DGT"2*M6ICSA*M2I7J3S:I3OWN"M&J7PSU3N7U"M&J3SR " 642J*IM	P3E	XT*M2M:J3OWN.,BI"M&J3CGL"M&J3TSA6IOM/GF1"M&J7PSU7MOE"M&J3IOA2 GRL*M2IGT3D:I3OWN"M&J3DGC2I?NN7E2J*I+
CP3I:I3OWN"M6JBJBL.*Z0"0602JN/3OKM3IGN3T?I3N> 3CGT3LR-3E	C3M3A6 WO7TWP7TJ 7OSU3IWN*M>J7ESN/E+R2IGT7DZI7AWLE*M2/*IM	S3N7U7OSU*M>J*ICS/DN *M>J2IWR7TKUN*M"/*M"/*M"/	S3MGE+NCS+TCO7SCU3PWR+SCS3LGE3D;I7G* 3E?RS*M"/	D3MGE+NCS+TCO7OSU7PSU2 ;I2 WD3C7IA7L.JN/2I	D7G
I7SR 3O> 7UCT+U3T* B1+TCO24R 3I	GT7S"J6/"J6/"J*M/SR=.0B02MRJ.=B2"060"J*M3N7U7OSU.,BI"M&J3DGC6IWNM*M2IGT3D& 6IWN7MWOT*M2I3C7LJ A	L2I>/3CGT3L> 3RR 3E	C3M3A6 WO7TWPT6?6JNI+PCA3CGL"M&J3TSA2IWD3COO+T>I3DOE3IGML*M2IGT3D>I7CCTN	T2/OO3T3A"M&J3DGC6ISS3K;P+T>I7PSU6
SI2 ;I6 SS3A/C2 ?P7ISNE7R6JRIA	D/PZ2"0*M2IOD3ARI3AGT"+616JRIA	D/PZ2"0*M2IOD3ARI3AGT"+626JRIA	D/PZ2"0*M2IOD3ARI3AGT"+63"J*M2IGT3DRI7ACTN7T2JRIC	A7DSA+A>I7SSE2 GD+TCA3P	O3NWTR*M2IGT3D:I"3*M2IOD3ANI3O;U+T>I7SSE6 CU6 OI3Z2 7OCO"M&J3TSA6IWN+M>I7GSE3ET6 WO3T: 3
KME7R6JWN3M?LP&,3C3L"M&J3TSA" 	I3S/T7PSN6IR/3AWK6 
A+ACY3V3AU7E6JNIN7L2J*IM	P..N+2I&/3F: +E3G2 C3A
N7ER 7OB 3OWW/RF-"M&J7I+S" 	I7DSA+A>I3T/A+ECN3AGW7YZ +A3L2 ;I3CWR2 GV3LWU"M&J7JCM6IWN3M?L+P>I3T/A3EF 7W	A2 ?MR7E2JRIC	A3N7U6I^/7ER 3O/O2 ?T3O6 3UC"M&J3TSA" 	I3S/T7PSN2IF/+DCD3TGH7TZ 7AWL3EJ 3A/C"M&J3CGI"M&J3TSA6IWNM*M6IOI3ZRI3AGT2I&/7NKC3ER 3AGT2 ?T2 WN+X
T3CGHR*M6IOI7ZNI7TCKN	T2/;I3CWR6 SS3K;P7TR 3O: 7ESX2 GV3LWU"M&J7I+S2I?C7USN2IF/+RCE+WCE3D;OE6?2J*IM	P3N7U7LCO2I:/3OWP2,^ 3OGW3NJ 3A/C"!*M2IGT7DBI.4Z2*0>I3T	H3S& 3SF 2 WZ+R3O6 WB3T& 3T& S*M2IOD3ARI3AGT"+&42/WN7GSA3IWV2,& 3N	D7CSA+ECS3ESN2 [O6 SS3A/C"M6J6JR
+ACD3I:I3U?MU	T6/KA7E^ 7ER 7ON 7UCP7ROES*M2I7S3AN L	A2I2/3ESA3I
N2 WZ7ROO"?*M2I7J7PNI3U;TU	M2/?N2,^ 3O> 7UCTU7T6JRIA	D7DSA7PSN"M&J3DGC2IGDT7A6JRIA	DN632JRIC	A7CWON7T6JWS3P?LP&,3TSA.IKP"6602JNII7A6JRI+ACD3IRI3AGT2I&/7FR 7HOI6 OI* CA7ZKEO*M6I+S3AN L	A6IB/+UCT7AN 3POA7ER 7HKEE*M2I7J7PNI3U;TU	M2/[I2 ?N+TB,3D;O*	CT7SCU3PWR
SCS7A	N7MKOE*M2IGT7DBI.2B4"M&J3DGC" 	I7DSAA*M6IOI3ZRI3AGT"M&J7I+S2I?C7USN2I&/7FR 7HOI6 OI2 3A7L* 3E?R6 WN3MWBR*M2I7J7PNI3U3PO	P2/?D7NR	6 WS7PKP7EOS2 T3E2 7ASS2 ;OE*M6MNJ3U;T+U3M2IGT3D& 6IWN7MWO+T>I3F
I3UWR6 WN3MWBR*M2I;A7DBI*7>I+OCF3CGH+RCS+TCO7OSU7PSU"M&J3CGI"M&J3TSA6IWO3T;PT*M2IOD3AFIU7X6JRI+ACD3IFIU7X6JRIL7S6JNI+MCA3CGL"M&J7JCM*I6."3*M6IOI3Z:I3U?MU7T2J*I+MCP3I:I3U?MU7T"J*M2/WH+RCE+ICS3A3L2 T3ER 3AGT2 WN3EWD3DZ +OCR3TWH2 ?R3U	TN7E"J*M/PZ2"0&,""60.JK
*420*IB"6MBJ.4Z2"0&,.4Z2"0*M+P27"I676JSS3K;PT&,"0*M3N7U.,BI2MRJ3E?C+C3T2IWD7CSS3K>-7COTT7K2JOO3T;PT&,7OSC3S/T"M6J2JWD3C7IA7L2JWD7CSSK&,.-B1"0&0./F-.0B02 WD3C7IA7L*J6I.1B0*I6/.1B02 WD3C7IA7L*J6I"1&0./F-20R 3E	C3M3A2M>J3CGTL*M2M>J7COT+T3K.IF-.0B0*I6/.1B020>
3CGTL*M.IF-"0&0./F-*0B07OSCA7L*J6I"1&0./F-20> 3CGTL*M2MRJ7ACT+N3T*I.."2*M7DSAA&,..F+"M&J*0>I3T?H3UGS7NOD"M&J*0>I3H;U3DWRD7S.JBI6IR/7EON"M&J*0>I3OWN/SR+.0B02M>J7UCT+N3T*I6."1*M7AU.=B0"160"J*MBL43R;I+T20"I602JRIC	A7AU"1*M2IGT3D& 6IWAX612JRIC	A7TCM"1*M2IGT7D
I/MGP"M&J7RKT"M&J7RKT"M&J7RKT"M&J7JOM6IKP7IWOT*M2IGT7DRI/MGP"M&J7JOM6IKP7IWOT*M2I7J7PBI3R;I+T.0"2*M6MBJ3R?I+U3T"I602JFIN	D/P^7"M&J3DGC2I7TP626JRIA	D7TCM"2*M2I;SA*M2I7J3P& 6IKP7ISN"0*M2I;A7DBI"4606JNI+NCA3CGL"M&J3TSA.IGP"0606JRIA	D7TCM"2*M2I3TS*M2I3C3AN L7
2J*I+MCP7IBI3R?IU7T"J*M3SGP/CCE.,BI"M&J3CGL"M&J3TSA" 	I3SGP/CCE"M&J7I+S6ICS3AWC"0*M2I	CA*M2IOD7ARI/MGP"M&J3TSA.ISP"0*M2I3TS*M6IOI7ZRI/MGP"M&J7JCM*I6."2*M2I3C3AN L7L2J*I+MCP7INI3POAE60"J*M7TCM"1&,"0*M7TCM"2&,"0*MBL((.1B0"0*M2M6J+G212IWTX	T2*Z 3RWE2 	D+SCK3

E3M;E+T+S2M6J+G222IWTX	T6*V 3SKA+LCE3S
E3M;E+TCS3O3N3IWN"**M/MOG6,RI7ESX*IB*3UGS3BWL2 WS3GWM7NOT2 [O3F	L+N+E2M6J+G242IWTX	T2*[O3F	L+NCE3Q?U+TCA3EOX3ESE+ECD+BCY"**M/MWG6,RI7ESX*IB*3S
E3M;E+T+S2M6J+G262IWTX	T6*V 7SKE3S> 7NB 2,;P* +[2M6J+G272IWTX	T***,2M6J+G282IWTX	T**+]2M6J+G292IWTX	T6*WQ3OGT+S*:2M6J/GB16,RI7ESX2I>*3N	L+NCE3O[F3L;I3ER /TCA6 SD+AB13DGT"26*2J
M*1212IWTX	T2*?N+N+E2M6J/GJ16,RI7ESX.I>*7EKR+O+R2MNJ3TOR6,RI7ESX6I:*C6*"J*M*$R$"M2J 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"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"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"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

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