File HOPE1.PA (PAL assembler source file)

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

* " 2(WB3G;I3N;I7GB 3AWG. V22 [O2 GT+PCE*1B,7OSC..^ +T;H*,^ *7242 ?H+P;E7TKA7GSE2 WK* B=3K	E3SGH",*M*MBJ6 ^ 3IT2 7K* B=3K7I6,R /A6 2 GT3IS+AB,+OCR2=> 3R?R+NB,+ACN2=F 3NT7O	N2,C* B=7CKH7ISS3OP+E3R"M6J*JB 2 GL* B=+LCA3SGH+W3N2 ;L* B=3L;Y7EST+EB,+MCC2=6 3IC3
3L+EB,3ASN2 KG* B=+G;B3TWH3YF R7E"J*M* B 6 B 7L	A3I
N2 ;I2 T3ER 3O3L2 ?C3RWN+RB.+KCE+ICS7SSI3T;I3GF 7TR +HCE3TKA+L3E2 7K2 ;O2 WHR*M*MBJ* B 2 	R7GSH6.R 7H	E6 KA3EZ 3ESE3I
N2 ?D7LOL2,. 3EF 3L?S2 GH3SF 2 ?P3CWK3T?B+O3K2 ;I+TCO3W	H+CCH"M6J*JB * B 3SWH6 OI6 WP3T	T+NCG3T	H7NOG".6)"J*M* B 2 . +EB 7HKE+EB,3T/A3E> +UCT+YCA2(?Y+U	R2 ?P3CWK3T?B+O;K"M6J*JB * B +KCM2 	D7NSE+TCE6(	L7NSE+TCE+OCR3D;E3IWS*)B,3M/A7EN 3UWR2,6 3AWK6 WS+RCE+Y
A6 &(+O	U2 	GT*M*MBJ* B * B * B 2(WG+TB)3A3L* CA6 SS3U[F2,> 7K	A"?*M*MBJ* B . >?2 " /U?H"M6J*JB * B *?B?2 W+ACT7YWO2 ?D+ICN2(?D3I
N")6?"J*M* B 2 . +EB +ACH*(	I2 ;K+O;W"M6J*JB * B +KCM2 T+A
T3SF 2 GB+B
Y+S6 "-6-"J*M* B 2 . +EB +ACH*(	I2 ;K+OCW+ACH*(	I2 ?G3T6 +A" +M	Y2 WK+Y;S2 A2 WL+FCT+MCA6(	M2). 7EOY2 ?H+M;E"M6J*JB * B +KCM2 U2 ?L+O3K2 ?L+OCK+ICN+YCA2(?Y+U	R2 &(7NWA+D:)"M6J*JB * B *?B?2 WK3IS+AB,3K	E3SGH".*M*MBJ* B 2 WK2 " 3M7M".*M*MBJ* B 2 KG2 & *	CM3
3A3K;I7GR 3O6 3YWS+L;F"M6J*JB * B +KCE2 GW3NGN2 WF+ECD3TWH2 GB+B3Y2 C7ROI*?B 2(.(3EZ 3ESE3S" +ECR3D3O3LF +NCD3PWR3T;E+DCS+TCOB7E"J*M* B * B * B 2 GE3T;I+G:)2 WH+RCE+GCO7HKE6 KO3A
N3E* 3UOIE6."J*M* B 2 . +MB 3IR +OCN2(?D7NR	2): 3ESE6 WJ3IWC".*M*MBJ* B 2 WK6 N +H3E2 S7E^ 7ASN6 SI6.V 3H" 3EWR".*M*MBJ* B 2 7K2 & 2 WN+ECD3AJ 7A	B2 ?B3T3TE6."J*M* B 2 . +EB 3T	H3S6 3IWN6,J 3IG+TB?7PSU6 SI2 ;I2 T3EWR2!" /U?H6 	L7NSE+TCE7GSO6 SI".*M*MBJ* B
2 7K2 " 7EN	6 WH7NKG+YB.3TWH2 GB+B
Y3S" 3U
N+R;Y"M6J*JB * B +KCE6 WA2 F(+L	L2 	R7GSH6!R +HCA2(T+A	T2 	A+N" 3A;I+TB)+MCA6(	M2)J 7A	B".*M*MBJ* B 2 7K6 R +HCE3BKA7YN	6 WH7NKGY6!"J*M* B 2 . +EB 3TGH6 R(7HSA2)F +ICN2(	A+N	T2 GM2 6(+YB)3BKAY6."J*M* B 2 . +MB 7YWO2 ?G7T& 7OKUS6."J*M* B 2 . +EB +ACH*(	I2 
K+OCW*-6-2 T7AN	6 R(7HSA*		S* 6-6-R +H
A+S" 3TGH7TN	2)6 +A" +M	Y2 GB+Y6 "-6-"J*M* B * B * B 2 GM2 6(+YB)3BKA7Y^ 7HSI+E6 *-:-* "(3FWE3D;I3G" +ECR3D3O+L:)2 	H2,6 +ACY3IN 3A3L2 GY"M6J*JB * B * B * " 7YWO*)6 *-B-3I6	2 WF3E	D+NCG3AJ 7A	B6,& +OCU3D	R3V;I3GF 2 GC+RB?2(F(3NR 7R[I+ECS+B	Y".*M*MBJ* B 2 
T* " 3IGN+U	D".*M*MBJ* B . > *?B 3L?O3KF 7TR 7HOI".*M*MBJ* B 2 WK2 2 3O/O+ICT3MA2 	W3TN 7H
E2 6(7AST+ECR7WSI7H& +O	U6.& +OCU3W;A7T& 7OKU2 ?C3FWFE6?"J*M* B 2 ^ +BB 7PKA3D;O"?*M*MBJ* B 2 WK6 & +OCU3W;A7T& 7OKU2 ?C3FWFE6?"J*M* B 2 ^ +BB +DCO7I^ 7ASN6 	M2 ?C3FWF+EB?3YGEH6."J*M* B 2 . +EB +WCE3M/A3E& T6."J*M* B 2 ^ +BB 7YWO2 ?G3NGN2 ^(3O;I7GR +OB)3M
A3E& +TB?3OGK+YB,3I2 3IWK6 SI2 3B3A/C".*M*MBJ* B 6 KO2 R 7O& +OCU3M/A3EN 3HOO3OGL+TCE3PSU3D;IG6?"J*M* B 2 ^ +BB +DCO3I6 3AWK2 C3O?C7LSA7EB 3USD3I
N2?: +OB.7IZ	3E: 3EWV3R6 3AWD* CA3C?H3C3O3AWT" *M*MBJ* B * B * B 3PSU3D;IG6."J*M* B 2 . +EB +WCE3M/A7E& +OCU3OWN".6 "J*M* B 2 ^ +BB +O3H2 ?W3NWD7RWF+LB,3W;O7DKE3F3U".*M*MBJ* B 2 WK6 WB3T& 2 WN+ECD*-6-2 
E+G3S2 ;A+D" 3TWH3N& 2 WN/E?D2)Z 3R;E+CCH3F	R+E;S*." 2(C2 	P7COK6 CU"M6J*JB * B * B * B 3AJ 7A	B2 ?B3T3T3EF +NCD+KCE3T	H7NOK6 SI*	CS7HKE+S:)2 	G3MWM*!6 *-B-3G7I+MCE2(	G+VCE+M	E"M6J*JB * B * B 2 6 3YJ 7A	B2,J 7A	B2 ?B3T3T+EB!7HKE7E^ 7HSA*	CS3TGH3TJ 7OST+L;
* CI7G[A7E& 7OKU2 ?B3T3TE*M*MBJ* B * B * B 3BOA+KB.2(R(3IOS3OWV+RCS7HKE2 ?B3T3T3E& 7NB 3O/C3EKT3O/O2.Z 3ESE3I
N2 ?D+LCL7WSI7HN 3P?O+N:)"M6J*JB * B +CCH2 &(7NWA+D:)"M6J*JB * B +KCM2 S+UCT+UGP"M6J*JB * B +ACN2 ?H7N	E2!" 3OWN+YB!3H;O+EGY2 ?H7N	E6!^ 7HSA*	CS+ICN3EWR2 "(3EWR*)B?3WGH7TN(2 	D+S" 3T	H/S>)"M6J*JB * B * B * " 2(;A2 	P7COK6 CU2 WK*	CS3B
A2 ;A3D> 3P;E3S& +T:)"M6J*JB * B +KCE6 SI*	CS+MCY3BKA3YJ 7OST+L;E"M6J*JB * B +ACN2 ?L3O	K+T" 3L?O3KF +TB)+MCA6(	M2)" +A;T"M6J*JB * B +GCB2 WY+SB,+I
T3SF 2 WV+RCY3G?O3D" +A;T"M6J*JB * B +ACN* CI3CGH3NWG7DR 7HOI2 GH+T6 *-B-3W	A+TB!3I6	2 ?G3NGN2 ^(3O;I7GR +OB)7PSU2 ;O2 GM2 6(+YB)"M6J*JB * B * B * B 7FKA7MKE2 GHT6."J*M* B 2 . +EB 3TGH7TN	2 GM2 6(+YB)3POO7KSE3B?OK6."J*M* B 2 . +MB 3I: 3ESE* CA3M;O+ECY2(;I
ASU")6."J*M* B 2 . +EB +UGH2 T3E6 3OWN7YN	2 ;I2 ?Y7UOR*." 2(WK2 WR3S7U+ECS3FWE3D;I3G" +ECR3D3O+L:)"M6J*JB * B * B * B 7YWO2 GE3T;I2 V(3A	T+N	G*?B 6(R(3A/L3I
N2 ?T2 T3ER 3O3L")6."J*M* B 2 . +MB 3K	E3SGH2,& 3TF 7ISN2 ;I2 	M+N;E"M6J*JB * B +KCE6 SI2 	A+NCT+ICN3M;IE6."J*M* B 2 . +MB 3W3E3L& 3T6 7USS2 WB2.2 3O/O6 SA6 SI".*M*MBJ* B 2 WK6 V 7HV +HB.3IF 7ISN2 ?G+TB,+ACH*(	I2 ;O+LCY7GSO2 GM2 6(+YB)7PKE3F7UE6."J*M* B 2
2 +AB 3SWH2 GW+NCT3S7O3EN 7LSO7HOE".*M*MBJ* B 2 ;L2 > 7K	A2,& 2	3L2 WG3T" +ECR3S7OE6."J*M* B 2 . +EB +NCO+WCI2(	W+T	H2 	M+N;E2 ?D7NR	2 ?L+OCK+ICN+MCA6(	M6)B 3O/C3EKT3O/O"!*M*MBJ* B 2 7K2 & 2 ?W7NR	".*M*MBJ* B 2 WK2 F 7ISN2 ?N3T	H+N" 7NSO3H;I+GB)+ICN3TWH+R
E"M6J*JB * B +KCM2 W3EWR*	CS3TWH2 ?D3LGL+RB,3K	E3SGH"?*M*MBJ* B 2 ;D6 & +OCU3W;A7TN 3OWM2 ?F/O?D"M6J*JB * B *?B?2 WYS6."J*M* B 2 . +EB +ACH*(	I2,F +H" +IB)3SWP+NCT+ICT+OCN3A& 3COE3RGEM6."J*M* B 2 . +MB 3OGK+YB.* "(+KCM3M/A+ECS3A^ 3RKA2 ?F7RR +HCE3POO7KSE3
?O+K&.".*M*MBJ* B 2 WK2 ^ 3I7M+E" 7G[I3E6 +EF)"M6J*JB * B +KCM2 	J+SCT6(WJ+S	T2 ?M7MKA2 6(3OWM+N	T* 6-"-*M*MBJ* B 2 WK2 R +O
N3T2 3O/O2 ;I2 GM2 6(+YB)3POO7KSE3B?O+KB.3I^ +OCT3P;E3NWI3SF +ICR2(T3EWR")6."J*M* B 2 . +MB 3HU"?*M*MBJ* B 2 WK2 & 2 ?G7TB 3E;N7IOE2 ;I2 WN+RCE2(T3EWR*)6 *-B-7FKO2 T+E6 "-6-"J*M* B 2 . +MB 2(;I3ASU*)B 3K	E3SGH*," 3IGN+U	D".*M*MBJ* B * B * "(+DCN+ICS7SKE3V
I3GZ 3OSO6 KF+OCM7AB +O	T".*M*MBJ* B 2 ;L6 ^ 7HSA2 ?Y3U: 3ESE"?*M*MBJ* B 2 ;A2 & *	CM3G;O+NCA2(?G3I
N2 ?T6)B +UCT+MCA6(	M*)B,3I6	2 ?G3NGN2 ^(3O;I7GR +OB)7PSU2 GM2 6(+Y2)"M6J*JB * B * B 2 & *	CM3G;O+NCA2(?G3I
N2 ?T6)B +UCT+MCA6(	M*)6 *-B-+U3M2 GM2 6(+Y2)2 GM2 6(Y6)"J*M* B * B * B 2 F 3N7I7AOL2 ;I* CA3SGT3BWL".*M*MBJ* B 2 WK6 ^ 7HOA7SSA6 ^(7HSA*	CS3TGH/T>)"M6J*JB * B +MCC2 WK3IS+AB,3C;A* CI3C7O7EB 7L	A2 	W+T" 7WSI+HB)7YWO"?*M*MBJ* B 2 WK* " 2(?T2 7K2): 3EA*!B 3
;O*	CT3L?O3K& 3N6 7YB 3O/C+ECT3B?OK6."J*M* B 2 . +MB 3PWL3AWS".*M*MBJ* B 2 WK6 N 7TCO"!*M*MBJ* B 2 7K2 : +OB,3T	H3S& 3S6 3IWN".*M*MBJ* B 2 WK6 & +OCU3D;O*	CT3W;A3TF +NCY3T?H3UG".*M*MBJ* B 2 OM2 N +ACN3I" 3AWV2 ;O+EB,3K	E3SGH2," /U?H"M6J*JB * B +KCE2 ?Y7U^
7ASN2 WH+RB?7HKEE6."J*M* B 2 2 +NB 3T	H3S& 3SZ +OCR3K7I".*M*MBJ* B 2 WK6 N +OB!3I6	2 WG3T	T+N" 7GSE3T;I+GB)3N;OE6?"J*M* B 2 6 +CB 2(;I3ASU")6."J*M* B 2 . +EB 3A3L2 	R7GSH2.^ 3OF +NCD7GSE6 	M2 WP7RWF+M3E2 ?TO6."J*M* B 2 6 +CB 3HU"?*M*MBJ* B 2 WK2 6 +A" +M	
2 WP7RWF+M;E"M6J*JB * B +KCM2 WH+RCE3TWH2 ?D7L	L*	;S"M6J*JB * B +KCE2 T3A/N2 ?YU6."J*M* B 2 . +MB 3K	E3SGH2!F 7TN	6 R(7HSA*		S2 T3ER 3O3L7YN	".*M*MBJ* B 2 WK2 F +HB,7YWO2 ?G3T& +M" 3TWH/M>)2 T3A/N2 ?Y+UB.* B*7DOI6 R(7HOI2)F 6 CA3PWL2 GS3UWC2 ?NW6."J*M* B 
 B * B * " 2(?T2 T3ER 3O3L2)& 2 ;K+OCW7YWO2 	A+NCT3G;O+NCA2(?G3I
N2 ?T6)N 3P3I3L& +T6 *-B-7ESA"M6J*JB * B * B * B +I3T2 ?C+MCE+O;N"M6J*JB * B +DCN* 
I3M^ 3I	V+NCG3S7O7EJ 3IWC".*M*MBJ* B 2 ;L2 F +NCD3D;O*	CT3T/A3E& 3TF +L;L"M6J*JB * B +KCM2 ^ 3IWV2 WM2 ?S+MCE3FWR3NC6 KF7IOE2.Z 3R;E+CCH3F	R+ECS3ASN2 ?P7TSA7OOE".*M*MBJ* B . >?2 F +N" 3ASN2)6 3I/L".*M*MBJ* B 2 7K2 6 7ER +O;O"M6J*JB * B +LCA2 WL3T6 7EN 7E[
7ER 7HOI2 ?NW6."J*M* B 2 . +MB +N;O2 WK3IS3A2 3IWK3S& +TB.3K	E3SGH"?*M*MBJ* B 2 WK2 T3A/N2 ?Y+UB.6(R(3O6 +CB,3W?H6 WJ3ST3ASN+ECD+KCE7AR +OCY3H	A3RR 3RWYR6."J*M* B * B +ACN2 ?H7N	E6,& +OCU7GSE2 &(7NWA+D:)2 ?N3W& 3MGM2 &(*	CM3G	O+NCG+T	O2 ?G2 WG3T6 +A" +M	Y
M6J*JB * B * B 6 ^ 3O/R2 T3I
N3S> +N" 3IGN+U	D".*M*MBJ* B 2 ;D2 : 3O6 3OWR2 	R+CCE3YF	+L;L2 WW2 ?G3NGN2 ^(3O;I7GR +OB)3C?O7KN 3OWM2 ?M+RCE3ROI+EB,3OGKY6?"J6L*JB * B 2 WK6 & +O
U+RCE2(;I3ASU6)& +O
U+RCE+ICN7AJ 7ESS7AKU7ASN"?*M*MBJ* B * "(3C;O3T;I3USE2 ;O2 ?H/PKE")6.&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