File LTA.PA (PAL assembler source file)

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

*/B37ROT*-B83L;I3CGT+PCE3H;A3DWLR*M2IWV/R7S"1*M2I3X7ISS" 61"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/2JN/7O	P3R
I+HCT2 N(*)B .1^925J 3YR 3I	G3T3A6 GE7UCI3M;E3TN 7OCR3OGR3T?IN*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M2/T3E& 3N?F3RGM3T?I3N& 7NR 7HOI2 ?D3C7U7ESN6 OI6 WS3BWJ+CCT+TCO3CGH3NWG2 	W3T?H+UCT7NSO3IWC*M>J3ASN2 S3O3U3D: +OCT+BCE3C;O7SKT3USE6 OA* CA3C7O7MSI3M;E3
J 3YR 3I	G3T3A6 GE7UCI3M;ET*M2/?C3R?P7RSA3I;O*.B 3D
I3IGT3LV 3Q	U3PWM+NCT7CKO7PKO3A	T+OCN7AOS3UWM3S: 7OJ 7ECS7OON3I	B7LSIY*M2/?F3RF +NCY7EKR7OOR2 T+ACT7M	A6 CA3PGE3R& 7NR 7HOI2 ?D3C7U7ESN".*M"/*M2/T7EN 7OSF7WKA3ER 3EOS3RKI+ECD+ICN3T	H3SR 7OWC3M;E3T& 3SZ 3U;R3IS+ECD+TCO3TWH6 WP3RC3AWSR*M2/;U7DKE* CA3LOI7EON
EZ +OCR3UWS2 ;O* CA3S;I3GWL2 ?C7MWP7TKE6 	S3SWT3MF +NCD3C;A2 WB2 ?C3PWID*M6/^(3IT2 ;I7CWL3S?I3N> 3FR 3I	G3T3A*	CS7CCO3Y	R7GSH2 ?N3TOI+EB)3O3N3YZ +OCR3UWS2 ;I6 WSC7H6JN/7YSS+E3M6 E7CCE3TF 3S6 +ACY3OT7E
R3IWS2 WB6 KP3O	V3DSE2 ;I6 KW3I	T+NCG+BCY3D
I3IGTL6."J6/2JR/3I	G3T3A6 GE7UCI3M;E3TN 7OCR3OGR3T?I3NF 7SWS7MOE2 ?N2 WR3S?P3N	S3B3I7I	T2 ?F7RR +HCE3UWS*M>J+OCR3R3E3IKA3I	L+TCY+OCF7IOT2 ?S7F
T3AWR2 ;O6 GE7UCI3M;E7TR 7HSA6 OI2 ?N7TN 7UCP3LWI3DJ Y*M2/	D7GSI+A;L*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J"M&J3X	L+SCT"0&I2/?C7PKY3IG3T" +ACS7AKL3ESA3YJ 3E;E6 KP7ISNE7D"J&/7FI+ECD3B
U2 ;O. "16-WJ/N^-65J 7EV 3S;I3GR 3OKU+LCE3B?L7COK2 ;I6 OO*/B83MSOE*M2IGT/S7K3LGT"M&J3I	N/W7T"0*M6IWC/RF="0*M"M&J3LOO.=B5"0&02/?L+ACD3ASD7ROES*M*M>J6IKS"M6J"J&/7MOE3S
A3EZ 3O7R/A+T"M6J2J2/3TWM+S3G3Z3B3O/C" &36/SR/S"-6 [O3ER3ESA*M>J2I?M+D/E3U	NT*M6/JI7WB+3AWG3SZ+3I3ED*M2/JI3UGFD7D"J&/3B?L3K?N*M>J6ISS7AWTS*M*M>J3MSOE&=202I3ION7TCA3EN 7OSN3A;I/SJ *0B0+OCR.2F02 ?W7ROD2 WP3RJ 3LOOK*M./RI.0B02I	L7NSC3AWP2 ?C3NGT7ION. B460^ 3
SR7SB +ECR3B?LC7K"J*M2/;U/I7T6IVI7NSI6 WN3MWB+R" .0^-")*M*M>J/R7W"I&03RGED*M./RI.0B06IKW3IWT"M6J6JB/3AWGS&=6IWN3MWB3R> 7FB 3AWG7SR 7OR 3R;A3SWF+R" 7BSI/SF *-&5* B03MGE+NCS"460"J&/6IWM+SCT+BCE3EWV3N& /FR *0B07WKO7DB +ECR3B?L+CCK3MSOE*M*M>J3FWI/L7D2IZI3I3E3
> 3FJ 3U[F+ECR2(	B+TCS.6"-")*M*M>J3B[U3ASD2=FI7DKD7EOS2 [O6 WB3FWFR*M"/&I7WKO3DF 3FWT3RV +NCD+OCF3B[U7FKE6 OI2 ?V7LSA3IWL"M6J2JJ/3L/O/N7O2I	L7NSC3AWP2 3B3O/C6 WN3MWB3R& /FR *0B07WKO7DB +ECR3B?L+CCK3MSOE*M"/&I+O?S282 3O	G3C3A2 3B3O/C6 WN3MWB3R& /FJ *0B17WK
7DB +ECR3B?L+CCK3MSOE*M"/&I2(;O3E> /S"/2 3B3O/C* B=222 3ION7TCA3EJ 3LOO+KCS+ICN3T	H3SN 3AWS")*M*M>J3SGT7TOU2I>I7NOE2 ?C3M3P3EWM+NCT+OCF7TCA3EN 3HOE7KWS3M2 7ESF2 WHR7E"J&/*IB03MGE+NCS+NCO7EKR7OOR"M6J*J*/****************************"*6/"J&/*I>I2I;I. B261^ 3
SR2 WP3RJ 3LOO3K6 3OWD*M>J2IGW3R	N+NGG* 6 "-&>6/^I3OSR2 [A7TKE2 ;E3D> 3FJ 3U[F+ECR7GSES*M"/&I"I&/3T7E7PKO3A	R+LCY7DOE3T?R3YSE6 	B2 T+ICS7TOAK6.*J*/****************************"*6/"J*M2I	L/N7C.6R1*1>I7ESN+ECR3L;I3C6 3OWD"M&J3A?X"=&12IF/7CR 3OV 3XWT3NWD7DR 
AWP6 CO3EGR3T?I+NCS3B[U7FKE"M&J7PCD"=&22IV/3NWT7RB +D7P28&/2 ?MD7E6JRI/A7C"3&I2/GT+PCE3AOC7UWM7LSA+OCR3B[U7FKE2 ?T2 OA"M&J3TGM.=N2*I>I+ACC+TCO7TCA3E6 3E?M+RCY3ASD7ROE7SN 7EWT7PJ 3E	G3SWTR*M2I7L/RZ=.1F52I2/3OSA2 	L7NSC3AWP2 GM7ISN3EGN3NWC2 WR7GOI7TKE"M2J2I
F3ESL6 WC/RF%"0*M"M&J2*?LC*M"M&J3I;F3D[E2 SP/PJ12 :</OGT62>,7EKR7O?R">*M2MJJ7PKT",&I6IB/3O;I+TCS+TCO3B[U7FKE6MNJ7TKAT&,3C3A*I>I7ION7ESR2 ;I7TKE7RCU7TN 7KCI2 ;I2 /S+ICP3CGHI7N2J;U+I3T2I/S3P;IS&I2/;U+ICT7WKO+D" 7BSI. 60216 3E;A7SN 3POE3I3A. B460^ 3OSR2 WP3R
 3LOO3K6 3OWD")*M7F
N3OSR2,&I7NKTP	T2IJ/7IOT* 6125N 7OSN3A;I* B+OCF3P
A+ECS3L[E7TR 7O" 7FKE2M2J7OCO2,NIA7L6JJI3EWC3IWV*I>I7GSE* CA7MOE3S
AE*M3MSA+D3R"I&02IF/7DKD7EOS2 [O2 WM3SGS+GCE3L[E3T" 3EWR"M&J3DGC6 OM3G3F+D>I3C[D2 ?T2 	F3ESL2 [O6 OM3G2 7ESF2 ;I2 OA"M&J3SGT"M&J3TSA2 GM7DKD"M&J3DGC2 GM7DKD2IJ/7UCM2 GB+CCK3MSAD7R2J*I+MCS7GSE*I>I7GSE2 ;U+ICT3ASN6 CS3E	C+ACL3F;U3C	T7OON2 	BT*M2IOD7AV 7NSI"
&J7JOM2 WGT&I2/WG3TZ 3UON3T?I7N^ 3OSR"M&J3DGC2 ;F7WKOD*M2I7J3S^ E	T2I^/+ECT3B[U7FKE2 SA3DWRS7S2JRI+CCA7BSPR*M2IGT7DV 7NSI"M&J3R3A"M&J3CGL"M&J7JOM2 WGT&I2/WG3TJ 3LOO3K: 3UKME7R6JNIN7L2JNI+LCL3R3A"M&J3DGC2 3B3O/C"M&J3C[D6 WCR*M2I7J3S& 6 B(3AWG*2>I7SWT+FCF+O
N22SN2 GPG7E6JRI+ACD7F
N3OSR"M&J3R3T"M&J3ASN. OL*I>I3I?S7LSA3E2 +OCW3OSR+ECR3U	N3TF +NCD7R^/2 	BT*M2I3C7LJ T	L6IV/7NSI2 ?T2 	B/T" 2 >(3FN 7OKU+S	E"M&J3TSA. ^("0&2./B762J=3ESA2 ;O3EJ 3LOO+KB;. B766^=7RSI3E> +NCE3B?LC7K2JRI+CCA3L	T7NSS6IN/3AWV2 WN7W	L2 ?F3RWM3D2 3ION7TCA3E& 7NSS3
OU3T?IN*M3G?L+O3P2IOA.7^7"5&I2/GC7NR	6 WH+RCT+TCO7RSE+RCY63R 3IWMS*M2IOD7AR 3ROYN7T2JWR7T	R6,RI+ACD7BSP+R>I7KWL3DWG*:B 7S[A/EJ 60N17T^ 3OSR"M&J3TSA. J("0&02/GC3U	T+OCN3UWS3RF 7BWO7TR 7HOI"M&J3DGC2 WTM	P2/T+ICS+ICS7AJ 3E3A2 	T+MCE7SOY3T7E"M&J7JOM6 WBF7C6JR
+ACD7IR 7ECM6IN/3AWV2 ?V7LSA3IWL2 ?L7CSA3I;O"M&J3C[D6 WCR&I2/GB+CCK+TCO7OKU2 	F3ESL"M&J3DGC2 ?L3CGSV*M2IGT3DJ 7PKT"M&J3I[O*I>I3A?N3TWH7RV 7N[A3OSI3A3B3EV 7XWC3R	S+OCN7ISN7OR +HCE3RGE7LOM2 [O"M&J3L;IC&I2/	L+NCC3MSOE6!6JRIM	A6IB/3E[R3O7R2 WR+ACD+OCR3W	R+TCE
OCF3OWN2 3B3O/C2M2J3T;I+S3T"I&02I2/3ION7TCA3E& 7NSS3ROU3T?I+N" .7J02=WR+A3D. B766^=7RSIE6)2J3B3O/C.,BI*I>I3B?L+CCK3N7U7BKE"M&J7PCD*I>I3BOA7KR 3ON 3I	V7LOI3A	TO7N2J&I+SCZ3D3FA	G2/?N+TCE3TGH3T2 3ION7TCA3E& 3S: +OCW7BOUY*M2I?IN&I*/CA7TCY3E> 3FN 7HKA3GSE6 SAO
M2JNIA7L6J^I7ASIE&I2/GW+ICT7FKO2 ?D+NCE3FGL7GR 3ON 3OWM6 CU"M&J3D3FA7G2J&IO	F6IN/7T[A3E> +FCF7POO3SKI+LCE7CSA7ASS7RCOH7E2J2I3ION*I>I3W?H2 ;K7OOW2 W3EWR6 [E+ICL7LKU/K?S2M2J"3&,3TOA*I>I7GSE2 GT+PCE3CWH+CCK.(^7*7B7+ICS3G?OD6)6JBID	P2I^/3OSO7NOES*M2I?IN&I2/WP
R	M3T& 3NWT7RWR+T3S2 WW2	WR2 GS+FCE7N
O"M&J3CGM*I>I3UWS* ^13SN 7OCM3L7E7ESN2 	S3NWC* B03MGE+NCS3G?O7DR 7OJ +T7S"8*M2IOD7AN 7TSAU	S2/GS+VCE7ROE7USL3I
N6 SS7AWT7S^ 3OSR"M&J3TSA2 ;UI7T6JNI+PCA3CGL"M&J7JCM2 ?N7ROE+T>I7NSO3H;I7GR 7OJ 7ESS3OWR2 ;I. B460^ 3OSR2/3B+CCK3MSOE*M2IGT3D2 7OOCA7V2J*I+MCS3B[UC*M2IOD3A& 2 WTM	P2/WR3S?T+RCE.2F0+SCT7WKOD*M2ISC3FN U7R2J?N7ROET&,3TSA6 SL7IONT*M2I;A+D" "4*M6I+S3AN L	A6IJ/
ESA6 KO6 KW3IWT"?*M2IOD7AN 7TSAU	S6/KW3IWT3SN +A
N3TZ 3A3I"M&J3TSA6 SS7AWTS*M2I;S3AN L7A2J*I+MCPO	K2I:/7OJ 7EKT7IOE2 [I6 KW3IWT2 GW3SJ A7D2J&I+SCZ7T	R7CSN6IJ/3ESA6 KE7RKO"M&J7JCM2 WR7T	R2I^/7OR +RCY3AGGI7N6JE+I3T2I7J3S^ E	T2IF/3C6 3IG3TJ 3E: +O7N7ZKEO*M2I3CA&I2/GD+TCA3FWI+LCD+ICS7N
O2 	R7GSH"M&J3TSA6 SS7AWTS*M2IOD3A& 2 GM7DKD"M&J3TSA6 OM3G3FD*M2IOD3AV 3FSCF*M2IGT3D6 3ASDR*M2IGT+D" "-672JNIA7L6JBI7OSS6MNJ7TSA+U3S"I&I2/;O+ECS3C7O3PWL3M;E3T> 7FR 3AWP2 C3E/C2MVJ3FSCF&,7HSL"M&J7JCM2 ?LO	P2/WG3TF 7NSO7HKE2 WM3SGSG7E"J*M3B[UC&,"0*M3B[U3C[D
,"IL7T2J*I+MCP3IJ 3UOF"M2J+O3K2IGT7DV 7NSI"M&J3R3A"M&J3CGL"M&J3TSA2 ;F7WKOD*M2I;A+D" .3B7"0*M2I;SA*M2IGT+D" .4B0*0>I3D;O*	CT7UOP+ECT3L;I3KJ +UCT206 3E;A/SR "0*M6I+SL*M2IGT+D" .-B1*0>I3RGE/DJ 2 GP7GOE2 ;I6 CS3E	C+ACL3MSOE*M2IGT+D" .-B1*0>I3RGE3D> +NCE3P
A3E& 7NJ 7EWG7LKA2 ?MD7E6JNI+PCA3SGN*I>I7A	N2 ?M+RCE3P
A+ECS+TCO3RGED6?2J*I+MCP3E	X+T>I+NCO2(
I7NKO3E2 7ASS2 SO7DB-3AWG2 [I2 ;I. B460^ +RCD3MSOE6)2JRI+CCA7F
N3OSR6I&/+E3S6 WP+TN 2 GB+CCK+ICN2	;F7WKOD6	6JRI+ACD3U	NT*M6ICS3AN L7A6JRI+ACD.(B2*0>I7A[D3AON3EJ 3U[F+ECR7PKT. B420& /FR *0B0+WCD3MSOE*M2IGT+D" .2B02I>//RJ *0B0+ICF.2B0./B261^ 3D6 3OWD"M&J3TSA6 CBT7R2JRI+CCA7BSPR*M6IOI3ZJ 3LOO+K>I3P	O+NCT+TCO7NE3TJ 3LOOK
M2I7J3P^ 3L?OP*M6MRJ7ECM",&I6IN/7HKO3TZ +OCR3T7E7PKO7A	R2M^J+E3T"I&02IR/+O
N7TR 3OOU3H2 3I/N"M6J6JOM3G3FD&,7HSL"M&J7I+S2 GM7DKD"M&J3TSA* CI3MSAD7R2J*I+MCP3I^ E7T"J*M3LOO7S[A.,BI6MRJ3ROY+N3T.IN-2MRJ3FGLG&,"0&I2/GT+PCE3D;O3EZ 3L
A. B(2=?D+N3E. 617BOUY6)6JBI3AWG"M2J7ISN7RSP6,*I3B?L+CCK*2>I7ROT*-B83OWV3RWHA7D6JRI+ACD.(B1*0>I3S	K3P& 7FR 3AWP2 ?D+NCE3FGL/GF="M&J7LKM"M&J7SCK2 3CA&I2/?N3TR 3OWN2,N 3LGE3RF 3CF +NCD3BGR3NC6 WB3T: +OCT3J7UP*M2I/S3PN L	A2IR/3OWN"M&J7JCM* CI7ISN7RSP2I:/+OCT
D;O+EB,+GCO+OCN+TCO7NE7TN 7KCI"M&J3C[D6 WCR*M2IGT+D" .2B02IN/3LGE7RR 3AWP2 ?D+NCE3FGLG*M2I7LR*M2I3CA&I2/3P+ACY3S[AE*M2IGT+D" 3D3FA7G2JNI+ICF"0&I2/?P+SCT3D;O3EZ 3L
A"M&J7POO7TOD*I>I7DOI7MOI3S& 3NWT7RWRP7T"J*M3P
A+E22"I606JRI+ACD+I" 7F
N3OSR"M&J3ASN. ^("0*M2IGT+D" 3C[D"M&J3DGC* CI6(WB3FSCF*M2IGT3D& 2 Z(3N?WR7D2JFI+NCD.(B7*I>I3I?S7LSA3EZ 3I3E3D> 3FJ 3U[FE7R2JNI+LCL3R3T"M&J3R3T"M&J3R3T*I>I3FWI+LCD+TCO7BSI/SB "-622JRI+CCA3T7E"M&J3TSA* CI2(;UI7T2JFI+NCD"(&72I&/3S3O3AWT2 ;U+ICT3N7U7BKE6 KF+O
M3U	N7T^ 3OSR"M&J3C3L2 GRR&I2/	H+G7H3OSR+ECR3U	N3TJ 7IOT2 ?T2 OA. B1.,F1"M&J3TSA2 WTM&I2/?C3M	B+NCE3ASN2 3A+SCO7PSU2 ?L3W>-3RWD7RV 7NSI* B+ICN3L;IK*M2IGT+D" .1B32IV/3NKA+LCE7ISN7EKR7USP+SB,7ESX3ESN+ECD3MSO+EB,+NCO7PWAS7E2J&IO	F2IR/3IGS3SWT3R& 3F^ +ECT7ISN
EKR7USP2 W3IWL2 ;I6 KD3ESAE7D2J2I3ION*I>I3L;I3C6 3OWD"!*M6IAO&I2/WS+NCD3F;U3C	T+OCN+TCO3C;O3T?R3LWLR*M2ISPP&I2/GB+CCK+TCO3S[A7EB +D7P286 3OWD"M&J3I;O*I>I3TGH7T^ 3A;S*	CT3T?O2 GB3D: +OCW7WOA6 SI"?*M2I3CA*M2I7J3P& 2 GP/GKE"M6J2JWTM&,"0*M"$*M"LBZ"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