File TSTRX2.PA (PAL assembler source file)

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

6/JI3X?C+PCY2 WR+A7D3W	R+TCE3SKU7RWO3T;IE*M"/*M.IZ*.4B2*M>J*M>J6 J 3ESA6-KW3IWT6 WS3B?R3U	T+NCE+TCO3H;A3DWL2 3F7OCP3YR 3I/S2 ;I* 687BSI2 ?MD7E*JB/2 ?R3U	T+NCE7L[I+ECS+ICN3FWI+LCD60R 3OJ 3EN 3A3L+ECD3F?R3MZ 3I3E/DF "0*M"/*M*/B 3C3A3L;I7GN 7EWQ3EONE*M"/*M2/
I+ICF"0&I6/OA3S7U+ECD3C[D. B12,N 3A3L+ECD3F?R3MZ 3I3E/DF "0*M6/RIA	D3TGRC	K6/KT3A/C* B7ISN3OF C*M2/*I+MCS+I"IR7W"J&/7BSIS&I./B4*0B0+ICF3FWI+LCD*1B03B[U7FKE.,J 2 [I2 WR+A3D. B22 [I2 ;U+ICT"1*M2/>I7KJ 7EWTR	N2/SC3FF +NCD3C[I2 ?T. B1*M>J6IKE7RKO*I>I3SOE7TKO*
B+ICNA7C"J6/*JB/2 WR7AOD6 KO6 KW3IWT3SF 6 KT3A/C6 SA* CA3T7I+EB.3T?W6 WB3FWF+RCS7L[I3E& /NJ .0Z-.4^1*M>J2 V 3AC2 [O2 	F3ESL* B03ASN. B1*M>J*M>J6 OU+ECS7ASU3O&-7NKC3EWM+NCT3R
E7ISS+ECR*1B0+OCF3FWI+LCD"0*M/XB1.=B1*M>J*M>J2 F 3NF 3LWT3RGN+TCE7ESN+RCY+OCF3C;O3T;I2 *(+MCP7NSO2 7J+SB)7CWA7SOE2 TE*M*/B 3SKU7RWO3T;I7ER 3ON 7OSN7IWN7E^ 3O/R3I
N2 ;O2 T7EN 3AWM6 KT3A/C2 ;O2 W3IC2 TE*M*/B 7EKR+OCR3OOC7UKR+E;D*M>J*M>J6 R 3HWR7EJ 7EKT7IOE6 KA3ER 3OWN2 ;O* CA3SOE7TKO2 WB7FKO3EF 3NV 3R?R3R& 3SR 3E3C3AWRD6."J6/2JSS/NZ=.7V52M2J/C7D.6V7"1*M7SKT.=^6"5632JSX/RZ=.7J56MNJ/E7R.6V7"4*M3F	L7NSI.=^6"567"J6/"J6/
JB/6 OU7EB 7ASR2 [O2 GP+GCE+ACT.6B460R 7ON 3PWR+ACD7OSU6 KW3IWT2 ?LO7P*JB/2 ?F3RF 2 	L3T3T3EV 7XKT7AN 3AWF+TCY+OCN3M/A3I
N2 ;I7TKE3LGE+VCE3T7I3I
N*M>J6M^J7RSI"1&,3TSA*I6("1&0*/B83T7I+ECS7TKH/UF 26J 3YWT* B>.1"2"M&J3DGC6IKW3T;CT*M/SST6,RI+ACD7I"I"1&02/WF3TC* CA7BSYE*M6ISSR&I2//S+ICP+ICF3RGE+DCY+TCO3TGR3N[SE7R2J*IM	P..F-2I:/+O" 3S?H3USL7NR	2 	H7TR 7HOI2 ;O6 SV*7&8"M&J7XKD*I>I7M[O3EJ 3YWT2 ?T2 	SL7O2
NIL	A2IN/3LGE7RR +HCE3M7U3BWL2 OA"M&J3TSA" 	I/XB1"M&J7SKT"M&J7JCM*I6."1*M2ISXR*M2I3CA*M2IGT3D& .IGX"0*M6ISSR*M2I7J+P:I"-616J"ID7R2JNIL7A6JRI+ACD7I"I"1606JNIT7R2J*IM	P..F-"M&J7XKD"M&J3CGL"M&J3TSA" 	I/XB1"M&J7SKT"M&J7JCM*I6."1*M2ISXR*M2I3CA*M2IGT3D& .IGX"0*
6ISSR*M2I7J+P:I"-616J"ID7R2JNIL7A6JRI+ACD7I"I"1606JNIT7R2J*IM	P..F-"M&J7XKD"M&J3CGL"M&J3TSA" 	I/XB1"M&J7SKT"M&J7JCM*I6."1*M2ISXR*M2I3CA*M2IGT3D& .IGX"0*M6ISSR*M2I7J+P:I"-616J"ID7R2JNIL7A6JRI+ACD7I"I"1606JNIT7R2J*IM	P..F-"M&J7XKD"M&J3CGL"M&J3TSA" 	I/XB1"M&
7SKT"M&J7JCM*I6."1*M2ISXR*M2I3CA*M2IGT3D& .IGX"0*M6ISSR*M2I7J+P:I"-616J"ID7R2JNIL7A6JRI+ACD7I"I"1606JNIT7R2J*IM	P..F-"M&J7XKD"M&J3CGL"M&J3TSA" 	I/XB1"M&J7SKT"M&J7JCM*I6."1*M2ISXR*M2I3CA*M2IGT3D& .IGX"0*M6ISSR*M2I7J+P:I"-616J"ID7R2JNIL7A6JRI+ACD7I"I"1606JN
T7R2J*IM	P..F-"M&J7XKD"M&J3CGL"M&J7I+S6IKW3T;C+T>I7TKH7U^ 3IT2 	S/L?O"M&J7JCM6ISS*4>IN7O2J*IM	P3W	RT&22/WR+SCT+OCF3L?O3P> 3N> 3TWH7RB 3AWG*M>J6M^J3ROT+N3T"I&02IN/7OSN3R3O2 ?C7USN2 ?F3RZ 3I3L2 	S+LCO3L?OP*M"/*M2IGPG7E"J6/*J>L*M>J6 J 3ESA6-KW3IWT2 ;E7T	R2 ?
7ISN*M>J*M>J6MJJW&,"0*M2IOD7ARI3R/CN	O6/KA7R[I+ECS7WSI7HR 3ROA+KN 2 ;I2 OA"M&J3TSA" 	IR	W2/GD+TCA3FWI+LCD*1202 WF3TC2 ?C7NKT+OCL7BSIS*M2IGT3D2I.7B1*0>I3F?L7P	P2 ?C7NKT3O3L+ECR3I;G3OWR7SR +OCP24J 7IOT.;F "060"J&/*I>I7BSI6 OI* B87BSI2 ?M/D/E2 ?C7NKT+OCL7FKO
 ;U+I3T* ?R+WB,+ICN3PGLC7E2JRIC	AF	N6/WB3FWF3RJ +ICT2(?C3M3P3EWM3NWT+DB)7AOL7ON 7TKO+ECD+ICNF7N6JRIA	D.(^16IN/+ECT+UCP7ASU3O&-7NKC2 WRG6.2JRIC	A/XB1"M&J3TSA*I6("3&2./Z22 WD3C7I+ACL3SOE7TKO7SB +ECR3TGRC7K2JRIC	A3SOE7TKO"M&J7I+S6I
R6IB/3O;I7TR 3O> 3KV 7XSI"M&J3TSA2I;F2I&/3FZ 3I3E7D* 3E?R6 WB3FWF+RB,3NWE7DR 3ON D7F6JNIP	A6IN/7KCI2 ;O2 	F3ESL. B16 WB3FWF+RB,7AKL3ESA7YN +EGT"M&J3C[D" 606JJIT	R6IJ/3ESA6/KW3IWT2 	B7TR 3O2 3I/N"M&J3S3Z2 3CA&I2//S+ICP+ICF3W	RT7E2J*IM	P3RGE7DCL2I^/7OR 7OJ 
ESA*M>J*M>J6 ^ 7RSI3E2 7OCO*M>J6M^J7RSI+L3P2I3C3LN +LCA3CGM6 SR+L>I7LSI3EGR+L6 23Z +OCR7RSE+RCY7CWON7T2JRIC	A7RSER7Y6JKW7T	R6,RIA	DF	N2/WR7T	R6 KE7RKO2 WH+RCE7TKH+ECE3T7IE7S2J*IM	S3LODM7D2J*IM	P3W	RT&16/SO7HKE2 GP+GCE+TCO7M[O3ER 3AGT2 ?T2 	SL7O6JKW/IKT2,*
M	S3D	O+O>I7RSE3U;R6 KF+OCM3OT+ECR3P
A7ER 3OF 3CWC+SCS3I>/"M&J7I+S2IWS3C?TR*M2I7J7P^I7RSIL7P6JSX"1&,3C[D2 	C/FF "0*M2I7J3P& 6I
R*M>J*M>J6 J 3ESA2 ?LO7P"J6/2JWR3A3DP&,3C3L2 3C3AN +MCA3R3T2I2/3IWT3R3A. N-2 ?F7RJ 7EKT3YN 3O;UT*M2IOD7AJI7EKTY*M7RSD+R3Y2I7J3SRI3O?I2IN/3OWM2 WH+RCE+TCO7RSE+RCY3I>/"M&J3TSA2I;F"M&J7JOM2ISL3CSM"M&J3TSA*I6("4&0./J32 GP3SWS7SR 7HWR* B47BSY+ECS7M[OE7D2JRIC	A
FWLA*M/SWT6,NIT7R2J*IM	P..F-"M&J7XKD"M&J3DGC" 	I/XB1"M&J7SKT"M&J7JCM*I6."1*M2ISXR*M2IOD3A& .IGX"0*M6ISSR*M2I7J+P:I"-616J"ID7R2JRI+CCA7I"I"1606JNIT7R2J*IM	P..F-"M&J7XKD"M&J3DGC" 	I/XB1"M&J7I+S2I3FE7A2J*IM	P/SWT"M&J7I+S2IWS3C?TR*M2I7J7PJI3ESAL7P2J*IM	P/XGT*
>J*M>J2 R 7OJ 3ESA6 KO6 KW3IWT* ?I3OZ 3UON3T?IN*M"/*M3D	OO&,"0*M2IGT3DZI+N>I3S3I3OZ 3UON3T?I+NB,3C;O7VKE3TSE2 ?T2 WR+A7D3W	RT7E6JRIA	D/LB7"0&46/	B2 	L7TKE+ACL*4" 7TCO2 ?F+UCR7BSI3S& 3RWRL6)2J*IM	S3LODM7D2J*IM	S7GSE3SOE2IZ/3EOT7HN 7ESC+OCR+TCOA7C6JNIT7R2J*
M	P..F-"M&J7XKD"M&J3CGL"M&J3TSA6IKT3C;KO*M6ISSR*M2I7J+P:I"-616J"ID7R2JNIL7A6JRIA	D/LV7"3&02/;U+ICT*1B,28J-+ICT+N7O+OCP2(?T/PR 2 	B+TCS3I;G3OWRD6)2J*IM	S3LODM7D2J*I+MCP3IRI3O?I*M>J*M>J2 2 3OSA2 ?C3MGM+NCD3R
E7ISSE7R"J6/2J3F/E7A".*M3LOD+M3D"I606JNID	N6IN/7KCI2 ;O2 ?DN7E2J*IM	P..F-"M&J3LSC*I>I3LGO3DN 3O7M3ASN"M&J7SKE*I>I3S	K3P> 3NV 3R?RR*M2I7J3P& 2ISL3CSM"M&J7I+S2IWR7T	R6IR/3RWI7DR 3HWR7ER 3IWM7S& E7T2J*IM	P3KWE3P;O2I:/+OB,3KWE3P> 7NR 3R	YN7G2J*IM	S7GSE3SOE6IJ
7EWT+RCN3SOE7TKO2 ;I2 OA"M&J7I+S6I
R2I>/3NV 3R?R+RB,7RSE3U;R2 ;O3EZ 7USR7HKE2 ?DW7N2J*IM	P/XGT2IV/7XSI2 ?T2 GC3LWL7R^ 3IT2 WS3C?T+RN 2 ;I2 OA*M>J*M>J2 V 7NKT7YR 3ON 7OSN7IWN3EF 3FWT3RV 3R?RR*M"/*M3C;O3T;I6,NIT	A2IJ/3A/C6 CU6 E+ICT+TCO3G?O3DV 7XSI"M&J3TSA6I
R"M&J3DGC6I
R"M&J3TSA2I;F6IN/+ECT7DSA3AZ 3I3E7DR /OB 2 [I2 WN7COE7SKAY*M6ICS3AN L	A2IF/3LWR7A	D2 SC7FR /OF *0B,3S	K3P& 3F> K*M2ISC/FB *I>I+N3O2 ?S2 WS7TR /OB "M&J7JCM" 	I3LODM	D6/KP3EWT+NCD3OWP7RSA3I;O2 /O6,N 7OJ 7EWT+RCN7TKH3U2 3D7CD6!"J6/2JWK3E?PN&,3F	L7NSI*I>I+DCO
AJ 3EGC7LR 7ON 3H/A3E& 7TV P*M2IGT3DZI+N>I7RSE3R	Y+NCG3RGE3D> 7R^ 7RSIE*M6ISRR&I*/?R3WJ +ICT+TCO3L;IK*M6I+S3LN L	A6IN/7KCI2 ;O6 KW3IWT"M&J7JCM2ISR7T	R6IJ/7EKT3YF 2 WRA7D6JRIA	D.(J-"0&02/GB+CCK+UCP7ASU3O& 7NKC2 ?T2 WR3F3I7LN 3I?L2 ?F7R^ 7RSIE*M2IGT7D"I"1&0
/	S3NWC2 T3EZ 3L;I+ICT3CWL3AWR7DN 3I?L"M&J3DGC.IGX"0*M2I7J7P^I7RKT+Y>I+SCO+GCO7RSE+RCY3W	RT7E"J6/*JB/2 ?C3NWV+RCT7CWO+NCT+TCO3SOE7TKO*M>J2M^J7EOT+E3C"I606JRIA	D3SOE7TKO2IN/7O[N7ESR. N-62R +O6 61R 3O& 3NWT3RWL3AWV7DN 7ESCO7R6JRIA	D.(V12M2J.7B1"0&,3C3L*I>I.
B02 	B7TN 7EOT* 687BSI2 ?M+D3E6 OA2 	L7TKEA7L.J
L.5B36,NI+PCA3S3Z*I>I3S3Z6 WJ+SCT+TCO3M/A3EN 7OKR7ESC2 	L7TKE+A3L2 ?N6-CO2 GWI7T6JRIA	D.(V12M2J.7B0"4&,3R3A*I>I3C;O7VKE+TCS3S3I3O> 7PKE3A	T+OCN+TCO3RGE7D^-7RSI+EB,+ACS7LSI3EGRL*M2I7J3P& 2IWG3TWSC*M"/*M"/*M"/*M3TOR3K?N.,BI*I>I3TGR+CCK3N7U7BKE2,& 3NGV3RGI+N
T7TKH3UN 3A3L6MNJ7ESC+O3R"I&02IN/3O;U+TCS.-J36 CU2 ?T. .0. Z22 WD3C7I+ACL3SOE7TKO7SB +ECR3TGRC7K2J;F.,BI*I>I3F;U3C	T+OCN7BSI+SB:7A
L7AOY. B120Z +OCR28	B3T6 3OWD*M>J"I&I./B22 [I2 ;U+ICT"1*M"/&I.IJ/2 [I2 WR+ACD3OWP7RSA3I;O. J(6 OI2 	S+LCO7FSE/C/H* B03S3I3OZ 3I3L")*M"/&I2I6/7IWN7S^ 3OSR2 [I6 WB3FWF3R& 3NZ 3I3E/DB 6,B 7LOU2 [I2 	F3ESL. B1*M>J"I&I2/?C7NKT3O3L+ECR3I;G3OWR7SR +OCP24J 7IOT2 
O2 ?WR7D2JWR7T	R.,BI*I>I7RSE+RCY7CWO3NWT+R6 63R /OB *MRJ"ZB"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