File HOPQ2.PA (PAL assembler source file)

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

* B * " 2(?C3N	T3N	U+NCG7HCO+Q212 GT3RWG+TCS+TCD3ASN2 ;D")6."J*M* B * B * B 6 R(7HOI*)B.3A2 3O/O+AB 2(?L+OCK+A	T2 T+I;S2 A2 GH2 GH*.* 2 W+ACT3AWR2 ?Y3UR 3O;I7GR 7HKEE6?"J*M* B * B * B * "(+TCD7TKU+NCS+TCO+GCB3W?H6 OI2 	S3T	T+NCG3BE3ISN2 	H3MF 2 WF3WZ 7ESE
)B.3WGH3TF +RCE7YWO"M6J*JB * B * B 2 R 3O;I7GR 7HKEE6?"J*M* B 2 ^ +BB 2 &(7NWA+D:)"M6J*JB * B +TCD2 O2.F 2 GM+NB?6*& +OCU3S	A7DR 7HSA6 
T3ON 3O?L+R;S"M6J*JB * B 3TOE+HB12 T+A
T3SF 2 3B+UCE+ICN3TWH+RCE3L?O+KB,3WGH7TN 7OSR2 [O2 ?C7LKO6 OI2 T/A?T"M6J*JB * B * B 6 & +O
U+VCE7GSO* CA3BGE3U	T3F3U2 ?C7LKO6 KG3E;E*." 2(?T2 ;D*)B.7YWO2 GMD7E"J*M* B * B * B * CA7MOI3T/A+E6 "-6-"J*M* B 6 R +DB +E3H2 ?L3OGK2 2(3O/O6 SA6)R 7HSA6.R 7HSA*	CS3AJ 2 2(7EST+ECR+B:)6(R(7DR 3A/L7SR 3OF +A:)".*M*MBJ* B 2 ;D6 R 7HSA*	CS3A^ 3RWEN6."J*M* B 
 R +DB +DCA3DGA2!2 3O/O+A" 3L?O3KF +TB)3T	H+S* 2 ?O+HB!7IN +ACW7AN 3PSI+E;R* B*7Z+Z+Z;Z"M6J*JB * B * B 2 " +ECY3L?O+KCA2(?L+OCK+A	T2 T+I;S6 * 7Z+Z7Z+Z".*M*MBJ* B 2 ;D* " 3IGN+U	D* 
I7MN 7OKR3Y6 7A	R2,N 7AOU+E" 3BOE7AOU+EB)3I6 3AWD* CA7MOES6."J*M* B 6 R 3EC*1B 7LOI3T;E2,F +H" +IB)3DSI7NR	2 WT+LCL7YWO2 ?T2 GP7ISN2 T+ACT7W	A2 A2 &(2)F 3SWK7D& O7U"J*M* B * B * B 2 ?T2,R +O
N7TB +UCT7YWO3RJ 7ROU+HB,7YWO6 SS3I3L2 ;I7SOI3T> +NB,7W	H2 ?D7NR	2 ?Y3U* 7USS* 6-"-*M*MBJ* B * B * B *-6-* : * "(2 WT/CGH2 	S+TCS+ACT3TKA+LCE7BSE3WWE3NR 3NF +NCD+M3C2 S+OCW3TWH3MF 3G	AN6 "J*M* B * B * B 2 ?H7WR 3OR +ICP3W?O3L& 7NB 3A;I3TF +NCD3DGR3W& 3TF 
C?R+SCS3TWH2 GP7PKE")6."J*M* B 2 * +EB 3TWH6 CS3IWD3RN 3AWM2 GB+C;K"M6J*JB * B +TCD2 A2 GH2 GH6!^ 3O?O3I
N2!F +H" +IB)7S
A* CA3S	P7DKE".*M*MBJ* B * B * " 6(R 3EC21N 3OWM3S> 7VKE2 ?T2 T3EV 3AWS+LCS3ASN2 	K7LOL* CA3SGM+LCL3S	P7DKE2 T+ACT7HOA" *M*MBJ* B * B * B 2 WB+ECN7TKE7RKO3I	Z+NCG3TWH2 C3ISL3R;E")6."J*M* B 6 R 3EC*1B 3ER2!R +ICD+HCE3F3A+LB?2(;I3ASU2)" 3ER 3ESA2 W3EWR7VKE2
WH6 OI2.& 2 	K3LWLD*M*MBJ* B * B * B 3H7I2 T+ACT3T7I+EB.6*R 7HSA*	CS3SOU3HF 2 	B3GJ 7ROU+HB.3D;O*	CT7YWO2 GW+NCT7AN 3M3AL6 "J*M* B * B * B 6 KB3US"?*M*MBJ* B 2 GM* " 3IGN+U	D".*M*MBJ* B 2 ;D6 N 7O^ 7EB 3A;I3T;I6 B(3A;I3T;I+G:)2 ;A2 F(+N	D2 ?Y3U^ +OCT3P	A+
CT3TWH2 &(7NWA+D:)"M6J*JB * B +MCA2 &(7NWA+D:)"M6J*JB * B +TCD2 WH+YB,3L?O+KCA2(?L+OCK+A	T2 T+I3S2 WH3Y2 3O/O2," +ECY3L?O+K6 *-B-6(R(3D" 3OSL3SF 2 	P3EWC"M6J*JB * B * B 2 > 3FZ 7ESL2 WB3TWW+ECN3S	C7ZKO+SB,3PWR3T;E3D;I3G& 7TN	* CA3PGL+N;E")*M*MBJ* B 2 ;D2 
 +H" +IB)+DCO+S;O2 A2 &(2). +ICN2(GC+NB)3M/A3EF 2 ?B+A3T* CA7HWO+S3E2 ;A3DF 2 &(7NWA+DB)"M6J*JB * B * B 2 > 3N& +TB.7N
O2 ?Y7U^ 3AOT+HB,7YWO2 GW3TC".*M*MBJ* B 2 WT/CGH2 & 3T2 3O/O2 	F7NOI3HSE2 ?T2 WM6.^ 3O3U7D& +OCU3L/I3EF 7NSO7HKE2 	P3EWC2 [O2 GP7PKE"M6J*JB * B * B 6 B 7LOE7HSE+T3E2 GC3UWS2 J(3EGC3UWS6)& +OCU3S	T+LCL2(;I3ASU*)B?+NCA2(?N+WB)7LOI3T;E",*M*MBJ* B * B * B +IC
7I^ 7ASN+ECD3YF	+LCL+TCO3P	A+NCT7WSI3H& +TB,7I^ 3O3U7DZ	3E^ 3IWV7N& +OCU3AJ 7ROU+HB."M6J*JB * B * B 2 F +H" +I2)2 A2 &(6)^ 3O3U7DZ	3E^ 3IWV7N& +OCU3AJ +I" *?2)* CI3W;A3TSE2 ?Y7UR 7OV +SCEI7T"J*M* B * B * B 2 WJ+SCT6(WJ+S	T2 	L+KCE+A" 3IGN+U	D2 	R7GSH2,F +
" 3ASN2)F +H" +IB)3A/S+ECD3WGHT*M*MBJ* B * B * B 2(;I3ASU2): +OCW7LOI3T;E2,N 7AOU+E" 3BOE7AOU+EB)7YWO2 ?D7NR	2 	L3SWT3NJ 3E?F+R3E6 [E7E	R" *M*MBJ* B * B * B 3T7I3EF +H" +IB)3T3E7L& +OCU+T3O2 [I2 A2 &(2)" +ACD3W;A3TSE2 ?Y7UR 7OB 3A;IT6,"J*M* B * B * B * 
I3D" 3AWV2 	G3V;E2 ?Y7UN 3OWM6 KB3US+E3S2 /O/A?Y2 T+ICS7WOA2 ?N3T	H+N" 7NSO3H;IG6)"J*M* B * B * B 2 ?T2 ?D2 	W+TCH7BWR3SWH+SB.3TWH+R
E3SF 2 	D3FWF3R;E+CCE7BSE3WWE7NR 7HOI2 GW3YF +N" 3ASN"M6J*JB * B * B * " 3ASN2)F 6 KB3US2,J +UCT+ICF3I" +ACD3W;A3TSE2 ?Y7UR 7OB 3A;I3T> 3N: 3EWR6 R(7HKE+E2)"M6J*JB * B * B 2 & 2 ?W3USL2	WV2 	G3V;E2 ?Y3UF 6 KB3US2.& 2 ?D7NR	2 GW+NCT7YWO2 ?T2 GT+KCE+I3T* CI
W;AT*M*MBJ* B * B * B 7YWO2 ?T6 OU3EV 3XWP3R7I7ESN2,F +N" 3ASN6)& +OCU3KWE7PR 3R	Y+N" 7T	R3I
N2)F 2 6 3AWK"M6J*JB * B * B 2 F 6 KB3US6 WO3T> 3F& 7T& +OCU3KWE+PB,7YWO2 WK+ECP3D;O*	CT7LOI3T;E2.F +H" +IB)7JOE2 *(7USS")*M*MBJ* B * B * B 3W;A7T& +OCU+TCO3UWS2 ?Y+UCR3H;A2 "(3ASN*)B,3UWS2 ?Y+UCR3SGM+L3L2 &(7NWA+DB)3RGEL*M*MBJ* B * B * B 3SGM+L3L2 WJ+SCT
(WJ+S	T2 GC7R	R6 SI2 T7E^ 3E
I+HCT+OCF7YWO3R" 3ASN2." 3OSL6 SI2 	LK7E"J*M* B * B * B 2 ?Y7UJ	3E" 3OSL+ICN2(?H3L	D+N	G* CA3P;E3C3I2 	F+N3E2 T+A
T7SR +HCE3RGE3S;O6 SI2 GWN7T"J*M* B * B * B 2 GC3UWS2 J(3EGC3UWS2)& 2 ?D7NR	2 GW+NCT3A" 3ASR2 &(7NWA+D2)2 T+A
T+SB,+ICT3M
I+HCT+BCE"M6J*JB * B * B 2 . 3ISN7AN 3M3A+LB,7BSU2 T+A
T7S^ 7HSA* CI3W;AT6."J*M* B 2 ^ +BB 3T3E7LR 3H7E6 WJ+SCT+TCO3UWS2 T7E^ 3E
I+HCT+OCF3TWH6 SS3R;I+GB.3UWS2 T7E^ 3E
I+HCT+OCF3TWH" *M*MBJ* B * B * B 7SKT3I
N2 ?T2 GM+KCE3TWH2 GM7ROK2 ;O2 T7EB 3AWP+RB.3TGH7TN	2 	R7GSH".*M*MBJ* B 2 ;D2 J +UCT7YWO2 GH+VCE+TCO3POI3K& 3TF +LCL3OWVR6."J*M* B 6 R 3EC*1B 3DSI2 ?Y3UN +UCT/I?T* " 6(R 3EC61N 7H
O3S6 3A" +OCW+TCO3UWS2 T7EN 7C+I7OOR")6."J*M* B 6 R +DB 7H	E2,2 3O/O+A" 3L?O3KF +TB)7DSA6 R(7HSA*)B!2(;I3ASU2)& 2 ?D2 ?M+R3E* CI+DCO7MKOE6,"J*M* B * B * B 2 ?L+OGK2 F 3H" 3A" 3A" +AB.6(R(7DB 3O;I+TCS+TCO+A
A7SB 3A;I3T;I+GB)7DSA*	CS2(T+A
T+SB)A*M*MBJ* B * B * B 2(;I3ASU*)B.7DSA*	CS2(T+A
T+SB)7YWO/R?S2 	D+S" 3T	H+SB)7YWO/R?S"M6J*JB * B +PCL2 WY+A;H"M6J*JB * B * B * "(3TOE+HB23C7O+ECS3OWV3RF +NCD3P	O7NOT2 ?T2 GA*	CS3P	A3N	T+N	G".*M*MBJ* B 2 ST2 F 3H2 3O/O+A" 3L?O3KF +TB)7DOI*.* 2 WH+YB,3L?O+KB,7DOI6 R(7HOI2)F 2 GC+RB.3I6	"M6J*JB * B * B 2 
 3A	K+N" 3M/A3I
N2)F 2 GC3R> 3UGT2 T+I;S* B*7H	E2 ?L+OGK6 * 7Z+ZZ6.*JB * B * B " 6 *JB * B * B 2 R +A
T+S" 3TGH7TN	2)F 2 GP3SWT2 ;A2 F(+N	D2 	D+S" 3T	H+SB)+ICS7GWL+EB.3T	H3S& S*M*MBJ* B * B * B 7GWL+EB.6(R(3D" 3OSL7SV 3PF 2 	P3EWC2 [O2 WF+L;T2 WH6 KT7IOE2 ?T2 WG7TN 3OWM2 3G+UCE3O[F"M6J*JB * B * B 2 " +ICS3F;I7GKE+S:)* B*7H	E2 ?L+OGK"M6J*JB * B 3TOE+HB12 W
3T6 7EN +ECE+ICF7YWO2 GC3NN +UCT7WSI7HR 7HOE7EN 7C+I7OOR*." 2(GM2 GH3S: +OCT"M6J*JB * B * B 2 6 3OWV3DZ +OCR3TWH2 GL+SCT*1B53M;I3UWT+S:)6 E7COU3E6 3E6 7A	R2,2 7EOT2 WS3E& F6 "J*M* B * B * B 2 ?Y3UN +ACN3UWS2 T3EWS2 OS3I?Z+R;S"M6J*JB * B * B * * * B*"**M*M
J* B 2 WT/CGH2 ^ 3OSO6,Z 7E	R2 ?G+O;D* B*2(;I3ASU*)" 2(?T2 ;D*)B.7YWO2 GW+NCT3A?N3TWH7RB 3IOE3E> F6 "J*M* B * B * B 2 GP7PKE"?*M*MBJ* B 2 ;D6 & 3EA".*M*MBJ* B 2 WT/CGH6 & +OCU3K;I2 N(+A	N2 GH+VCE3A?N3TWH7RB 3IOE+EB.2	?C7UOR7E& +OCU7JOU7TB +UCD6(WP+TB)+ICT
OCN"M6J*JB * B * B 6 R +OCP+OCF3EOA3H> 3TWH+RB,+ICT7NSO2 ?G3NGN2 ^(3O;I7GR +OB)3M/A3E: 3OR 3I[F3EWR3NWC".*M*MBJ* B * B * B * B**** "M6J*JB * B +TCD2 ?O3OO2!R +ACT2(T+A	T2 ?G+NCE7TKU3NJ 3LWU*.* 2 WH3Y2 3O/O2.R +ICS2(T+I	S2 	A+NCT7NKEE*M*MBJ* B * B * B 2(T3
WR*)B.+N3O6 SI2 ?N3T& 3N: 3EWR6 R(7HKE+E:)2 ?N2,: +OCT+ICN7NKE+E" 3TWH+R	E2.& N6 "J*M* B * B * B 2 WH+R3E2 ;I2 WH+R;E"M6J*JB * B * B * B**** "M6J*JB * B +RCT2 7I+M3A2 &(*	CM3G	O+NCG+T	O2 7I+MCA*(
I3M^ 3O;I7GR +O2)2 	D+S" 3T	H+SB)3AJ +ICG3OWN".*M*MBJ* B * B * B 6(R(3EC21^ 7OOE2 ?T2 T3E> 3TWH7RN 3IWD2 [O2 T7EJ 3O7O2 ?T2 GT+LCK+TCO3A?N3TWH7RR 3EC")6."J*M* B 2 6 +CB 3YGE+H" 3IGN+U	D2 ?S"?*M*MBJ* B 2 ;D2 R +ICS2(T+I	S6 OI2 GC+LCL+A" 3C3O/O?R*)B,7DOI6 R
7HOI2)& 3SN 3A3L* CA2(?C7LKO*?2)"M6J*JB * B * B * B 7DOI6 R(7HOI2)& 3SN 3A3L* CA2(?C7LKO*?:)"M6J*JB * B +MCA2 	D+S" 3T	H+SB)3GWR+E3N2 	D+S" 3T	H+SB)3RSE2,R +A
T+S" 3TGH7TN	2)J 3LWU2,R +A
TS*M*MBJ* B * B * B 2(T+A
T+SB)3W	H+T;E"M6J*JB * B +DCN2 A* CA7BWLE6."J*M* B 2 6 +AB 7DOI6 R(7HOI2)J 3LWU2,R +ICS2(T+I	S6 KO+ACN6(KO3A
N+E2)2 3B+U3E2 3B+U;E"M6J*JB * B +DCN2 T+ACT3A;I+TB,3TGH*	CS2(T+A
T+SB)3AR 3I[F3EWR+NCT3K;I+DCA3C3O+O;R"M6J*JB * B +MCA2 ?D2 	D2 ?D2." 3E^ +OCT6(KB3OWK3N: 3OWS*?:)"M6J*JB * B +DCN2 T+A
T+SB,7BWL7ER 7HSA*	CS3GWR+E;N"M6J*JB * B +MCA2 T3EWR2 3B+U3E2 T3EWR6 KG3E;E".*M*MBJ* B 2 ;D6 V 7HV +HB,3L?O3KF 7TR 7HSA6 KG3E;E2,2 3O/O6 SA2 T+ACT3GWR+E3N2 ?L+OCK+A;T2 WY+A3H2 T+A
T3SF 2 3B*MBJ* B 2(N(7OSN7IWN+ECD+OCN7HCO+Q&3".*M*LB * B 2(N(7OSN7IWN+ECD+OCN7HCO+Q&3".*M*LB * B * " 2(?C3N	T3NWU3D> 3N" 7OGP*3:)"M2JBZ

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