File LSN.PA (PAL assembler source file)

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

2/WD3CWN/T"/. GV3A2 +SCN7TOAK*M"/*M"/*M"/*M"/*M"/*M"/*M2/?C7PKY3IG+TB *(	C. F .9Z7.,&1*7B7+BCY3D
I3IGT3LV 3Q	U3PWM+NCT7CKO7PKO3A	TO7N"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/6JR/+HCE3I[N3O7R3A	T+OCN+ICN3T	H3SR 7OWC3M;E3T& 7SN 3U+B7ESC2 ?T2 C3A
N7E^ 3IT7OSU2 ?N3TOIE*M2/;A7DN 7HWO+LCD7NSO2 WB2 ?C7NSS3RWU3DF 3SF 2 ?C3M	M3TWM+NCT+BCY3D
I3IGT3LV 3Q	U3PWMN7T2JN/7OCR3OGR3T?I+NB.2 	D7GSI+ACL7EWQ3I7P7ESN2 ?C3R?P7RSA3I;O6 OA3S7U+ECS+NCO7ROE3P;O3SKI3I	LT7Y2JZ/+OCR7A	N6 KE7RKO7SR 7HSA2 GM3YF 3PWP+ACR+ICN3T	H3SR 7OWC3M;ET6."J6/6JR/+HCE3S[O3TGW+RCE7DOE3C	R3BSE2 ;I2 T+ICS3DOO3UWM+NCT+ICS7FKU7NOI3H
E2 ?T2 T7EB 3UOR7HOAE7R6JV/3NWD3RF 2 	L3C;E+SCE7FKO6 OU3E> 3NF 2 	S3N3G3EN 7OCM3UWT7RN 7YSS+ECM3ASN2 GC3NJ 3EN 3O	PE7D*J"/7WSI3H& 3N3C3U	S+OCN+OCF3D
I3IGT7LN	2 ?C7PKY3IG3T: 3O	T+C	E2 ;O+LCY7FKO6 OU3E& 7NN 3UC*M>J7SOY3T7E2,V 3XWC+PCT+ACS7M	A6 SO7HKE7WOI3EJ 7EB 7R[O3IWD3D& 7N^ 7RSI3I
N6 	B2 	D7GSI+A;L*M>J*M>J3D
I3IGT3LV 3Q	U3PWM+NCT7CKO7PKO3A	T+OCN7AOS3UWM3S: 7OJ 7ECS7OON3I	B7LSI3YZ +OCR3TWH6 OUE*M6/KO2 WR3LGI3B3I7I	T2 [O6 SI7SN 7OSF7WKA3E> 3NV 3Q	U3PWM+NCT3TGH3T& 3S: +OCT7SCU3P	L+ECDB7Y2JR/3I	G3T3A".*M"/*M"/*M2/FI3D	M3R3A2 ?C3MGP3N?I7NR 3OR 3E;C+E?T68R L7K"J*M6
NI*.;R* B-7M	A. &1"7662J*//RFI21*-+A7N"7&73ASD+ECD7NCS6 	C3CWL22N 7OCM3A	T3B	L7L	T*M>J*M>J2 WD3CWN/T"/2 WR3LGE+SCE7VKE3S?I/NF *M>J2 WD3CWN/T"/2 GP3TC2 WL3V3E" 7A*JB/7AKP+ICL.8F,.9^7*M>J"M&J7VKE3S?I/NF="M&J7PSA/C7H""7A"J6/"J&/3TWH+RCE7M	A2 WB6 WM3L	T3PWL6 
L7NR 7AOK2 ;O* CA7SOY3T7E*M>J2I[I2 ?S2,> +NCE7WWO+LCD3UWS* CA3T/L2 ?C7NKT+OCL3B?L+CCK2(OTB6)"J*M2I[I3NWD3F2 3S[N+LCD6<OL3N3F/DN="06>2J&I3FSN+ECF3L;S3LOO2 2<3S3N/O7C.4B0"06>2J&I3FSN+ECF3L;S3C;H2 2<3SON/H7N"26>"J*M6IWC3R2=3S[NL7D2JNI3H;A/N7L3L;S3C;H"M&J3I	N
W7T"0*M6IN7TKE/RJ=*2>I3N;O6-E7ISS7ESN2 WT3R	M3N3A"M&J7RWB3F;L.=FI"6&02/	S+ZCE+FCF3ROE7E[I3EJ 3U[FE7R"J*M2I[I3NWD3F2 3S;N+UCM6<OL7NWN/MF=">*M"M&J3I;F3D[E6 OL+NB16<OL/N613L;S">*M"M&J7I+F3E?R6 OL7NWN/MF-6 R<3A/S6=OL/N:1"M&J7I+F3E?R6 OL7NWN/MJ-6 R<3A/S6=OL/N:
"M&J7I+F3E?R6 OL7NWN/MN-6 R<3A/S6=OL/N:3"M&J7I+F3E?R6 OL7NWN/MR-6 R<3A/S6=OL/N:4"M&J7I+F3E?R6 OL7NWN/MV-6 R<3A/S6=OL/N:5"M&J7I+F3E?R6 OL7NWN/MZ-6 R<3A/S6=OL/N:6"M&J7I+F3E?R6 OL7NWN/M^-6 R<3A/S6=OL/N:7*M>J*M>J2I[I6 SI6 OI2 WD7SKI+ECD+TCO+BCE3A3B7ER 3O2 7IS
E7N"J&/+OCN7MKO7ER 3H;A* B73TKA7LOE6,R +HCE3TKA+LCE3A?BV7E"J&/3C;A2 WB2 GE3S3I3YV 3XGP3NWDD6."J*M2I	F3ESL6 WC/RF%"0*M*L*I3L;S3LOO"M&J7VKE3S?IN&I2/WV3R	SO7N6JBI3AOTH&I2/;A7DB 3AOT3H& 3NN 3OWR6MNJ7TKAT&,/ASC.0B0"M&J3DGC6 ST7YOTK*M2IGCL*M2I3B7KKAG*M6IOM7GSW*
>I7SSI2 ;A7D^ 7ASI2 ?F7RN 3OWM3T	H+NCG+TCO7HCA3P;E"M&J3TSA6 ST7YOTK*M6ICS3AN L7A2J*I+MCP3SGTR	T2/
I7NKO3EV 7VKE3YT3I
N2 [I6 R	7TSY+S
K6 OI6 SS3I3L2 WN7GSA3IWV"M&J3TSA* 6(7RWB3F;L"+&12/3A7L
O2 WG3T	T+NCG3B[U7S+I*-B13CGH+RCS+OCF7MOE3S
AE*M2IOD7AJ 3L;E"M&J3C3A*I>I3ROE7E[I3ER 3AGT6 KF+OCM3R7E3OWT2 3TK*M2IWS7N
D"M&J7NCS"M&J7ROMG&I2/WR3C	EV7E6JRI+ACD7RSS+A>I3L?O3KF 7TR +HCE3SGT7TOU"M&J3SGZ2 3CA*M2I7J3PR 3IOS2IR/3IOS3O;N7ESC2 ;O2 3S3IG7TOE3TV 3R?RR*M2IGT7DJ 3L;E2I2/3O/O6 SA2 WL7NSG7HJ 3EWC3IWVD*M2I	CA&I2/GM+KCE7POO3I	TV7E6JRI+ACD2(KRU	F2/WG7TB +TCR+TCO7FKI+SCT7BS
3EF 3FWT3RV +NCD+OCF3B[U7FKE"M&J3DGC6 CRT7R2JRI+CCA7IJ 7PKT6IB/+UCT20F 3TV +NCD+OCF3B[U7FKE"M&J7JOM" 	I6(WP7TKP+E>I3P	R+NCT3PWR3L7I3IGN+RCY3I[N3O7R3A	TO7N2JNIA7L6JNI3ESNW&I2/WS+NCD7MOE3S
A7ER 3ON 7OKR7ESC2 WT3R	M3N3A6MRJ7TSY+S3K.IB4"0&06IR/+TCY3N7U7BKE2 WW2	WR2 WS3N	D+NCGT7O6JRI7TOMG*M2I7J7PN 7TKA+T>I3R	E7TKE3AWT2MRJ3IOS2,NIA7L6JNI3ESNW*M6IONP*M2I7DS7G2J*IM	P3SGTR	T2/?L+OCP7FKO2 ?MR7E"J*M7DOMG&,3Z3B3O/C" 63"J&I"0*M2I	D3S?CN*M2IC3A;NL*M"I6
"J*M3T7T+S3G2IKZ3LOO/KN "M&J7NCO3A/C2+;ID*M"I606JJI3B[U*I>I3S;E3DR 3AGT6 KF+OCM3ROE7E[I3EJ 3U[FE7R"J*M7ROMG&,3Z3B3O/C" 636JOR+T3A"I606JJI3C7VS7G2JNI3H;AN7L2JNI+DCF7CKU"M&J7RWBF*M3RWLN&,2-KR3U3F/NF+"M2J3R+E6,*I3B?L+CCK"3*M"I602JNI7OKNE7J2JNI3H;AN7L2J>I/PKT
I>I3R+E7ESC2 	W+TCH3BSA6 ST3Y6 7EOS3AWG2 ;I6 CO3TR 3AGT"M6J6JCR+T3R"I60"J*M3C[N6,*I3B?L+CCK"3*M3C[N3SGT.,BI"M&J3C;O3C[N"M&J3CGH3N3N"M&J"0&I2/?N6 CO3T?I3N3A2 GDT7A6JRL7TSY+A3B.IBI6;RIT7Y"J&I"1&;7T	T"M&J.I.26ISTY*M3ISF+ECF7LSP" &<"3&;7LSP">*M3ISF+ECF7T	T.22
.I.46IST/Y:2"M&J.IB4"0606JRL3SORH&,"0*M2IGT+D" 7T	T3TKA"-612JRI+CCA7TSP+R>I3SGE3RC6 ST7YR 3A3B3EZ +OCR3T	H3S: 3UKME7R2J3T+U3P6IOI7ZR 7PKT"M&J3TSA* CI7TSPR*M6ICSA*M2I7J3P& 6 OT3RC2IF/2 WN7GSA3IWV6 WN3MWB3RV 7NOD2 GT3BWL"M&J7I+S6 CTT	R2/?P7ISN2 ?T6 OA3SOO7I
A+ECD7TOAK*M2I	CA*M2IGT3D& 6 R(7TWNM*M6I+S3AN L	A2I"/3AWV2 WW2 ?F3USN6 SI"?*M2I7J7PR 7LCU2I:/+OB,3KWE3P2 3O/O3I
N"M&J3TSA* CI7TSP+R>I7YOE2,^ +ECT7AOS3O	C3AWT7DR 3A/S"M&J3SGN"M&J7JCM* CI7TKSC	H2/GT+SCK3N;O6-E7ISS7ESN"M&J3DGC* CI6(ST7YOT+K>I3S?T+RCE3AGWY*M6IOI7ZR 3SORH*M2I7J3P& 6 OT3RC"M6J6JCT+T3R"I606JBI3AWG"M2J7RWBF&,3Z3B3O/C2 KR3U3FN*M6IR/+HCE3CKC2 ?F3L?L+WCS3TWH6
WB3FWF3R& 3MWM3DGI7T	L"M2J2IOC+B:="M6J*J*I3CKC.+J1"M6J.JBI"M&J7TE+T>I3T/L"/*M2IKZ3LOO/KRI"M6J.JFI";62"J*M2IN*+C/B.1B3"M6J6JOU7ROAT&,3TSA2 OC7BOR+N>I7W	H2 WW+RCE+WCE3TGR3PWPD6?6JRI+ACD2(N-7OKNS7N6JNI+NCA3CGL"M&J7JCM2 ?CN&I*/CA3C;O3NOE7TJ 7EWQ7ESS2MJJ+A3D2I
CL*M2IWS7N
D"M&J7NCS"M&J7DOMG&I2/	D3S?C3NWN+CCT7JOU3T& 3NN 3AWS*M>J2IGT+D" 3SGTR7T"J&/3DGC2 OC3BOP2I*/7RR 3AWK6 WO7TJ 7ESS7ASR2 ?T6 KP3EWV+NCT7DOI7CKA3D> 3F6 7EOS3AWGS*M2I7J3PN 7CKBT	N2/?G2 GB+CCK+TCO6	SS7ASR2	F 3T6 3A;I2 WL3V3E"M6J2J?CN&,3DGC6 ST3N7U"M&J3TSA* CI6(S
7YOTK*M2I7S3AN L7A2J*IM	P7NSO3FSN6IN/7HWO+LCD7N[E+ECR7HCA3P;E"M&J3TSA* CI2(OC7BCO+L>I7H
O6 WM+CCH7OSP3I;O+ACL7DSA3AR +ICD+WCE7GSE"?*M2I;S3AN L7A2J*I+MCP7NSO3FSN2I:/3O> 3P	T3OGN3LR 3AGT"M&J3TSA2 OC7BCOT*M2IOD7AR 7TWN+M>I7GSE2 WT3R	M3N3A6 WN3MWBR*M2IGT3DN 3C?B+P/T"2*M2IOD7AN 7RSCT	Y2/WG7TN 7OKU+CCE7TKE3M;I+ACL3N7U7BKE"M&J7JOM* CI6(OT3RC"M&J7JC
2 ?N3T;FD*M2IGCL*M2IWS7N
D"M&J7NCS"M&J3C[N*I>I3AOC7ESP2 T3EN 3O;N7ESC3I;O"M&J3TSA* CI2(;C7FSSA*M2I;S3AN L7A2J*I+MCP3CKC3R;T"M&J7JCM2 GBD*M2M:J3O[T+N3D2I3CA*M2IGT7DR 7TWNM*M2IOD3A> /PKT"+&12/WS+NCD3BOA3KJ +ACD7T	T6 WN3MWBR*M2IGCL*M2IWS7N
D"M&J7NCS"M&J3R+E*I>I3R+E7ESC2 T3EN 3O;N7ESC3I;O"M&J7JCM2 OC7BSRN*M2M>J/PKT2,:I3XWT/R/R*06;"1*M6MRJ7TWNM&,"0*M3SOR7T	T.,BI"M&J3P
AE*M*L>I3P	R+NCT3PWR3L7I3IGN+RCY3I[N3O7R3A	T+OCN+OCF3TWH2 ?FR7M"J*M*IB/3T/L2>?N3DGN7MS
/T+N"M6J6JWP7TKPE&,"0*M2IGT+D"I3PWR3B[U6IN/+ECT3B[U7FKE2 ?P7ISNE7R2JRIC	A3B[U7PKT"M&J7JOM6IWP3TGN+M>I+GCO7PSU2 ;I2 ?N+DCE3N7AE*M2IOC3BSN"1*M2IGT+D"I""	
6/KP7ISN2 GB3CGK3R?RW*M2I7J7SBIC7H6JRIA	D6(R"6IB/3R;I7TR T7N2J*IM	S3PC"M&J3TSA*IJ(T*M2I7J7SBIC7H6JRI+ACD+I"I3SOR7T	T"M&J3ASN.I^("M&J3TSA*IJ("0*M2I7J7SBIC7H6JRIA	D.(*"6IB/3R;I3TN 3O?LN*M2I7J7SBIC7H2JRI+CCA3IJI7UCFT	R2/GM+RCK3ESN2 [O2 WTX7T6JRI+ACD+I"I7T	T3
/S2IN/7O	P6 ST7YR 3A/S6 WN3MWB3R& 3N	LN7E2JRIC	A7T	T/TKS"M&J3C3A"M&J3S;ED*M7T	T/TKS.,RI.0B0"M&J3PWR3M
S"M&J7JCM" 	I7PSU3PWR2IR/3OWN6MBJ3R7E+S3G2IKZ3LOO/KNI6IN/3POA3EZ +OCR+ECF3ASN2 	L3NGKG7E2J:I3OGP+C/K3NOO3R[L2IZ/3O7R+ACT3C;O3T?RL*M"I&02I:/3O& 7NWPT*M6IR"2;2"2;.".;:"6MBJ3RKE+U3F2IKZ3LOO/KJI*0>I3TWH6 WB3FWFR*M6MBJ+C3H"I602JRI+CCA3IJI7UCFT7R2J&IS	Z3B[U7PKT
M&J7JCM" 	I3PC"M6J6JWP3TGNM&,"0*M2IGT3D& 6IWP3TGNM*M6IOI7ZBI3U;TA7M2JRIC	A3N7A7PKT"M&J3TSA*I6("3*M2IODA& 3N7A7CSN2M:J3A3MP&,3TSA" 	I3N7A7PKT"M&J7RKT"M&J7RKT"M&J7RKT"M&J7JOM.I[PC	H6/KP7ISN2 WL+FCT26J 7IOT"M&J3TSA" 	I3N7A7PKT"M&J7JOM.I[PC	H6/KP7ISN2 	R7GSN*
B67BSIS*M6IOI3Z:I7ACMT7R2J&IS	Z3N7A7CSN"M&J7JCM2IGN7MCL2I2/7OCO2 [I2 ?MR7E2J*I+MCP7IBI3U;TA	M2/?F3RWC6 EI7T.J[P+C3H"I602JFIN	D.(^7"M&J3SGN"M&J7JCM" 	I7PSU3N7A6IJ/7EWT+RCN+OCF3EON3O;U7TKE6 WN7LOL"M&J3TSA.IJ("4&06/E3P;A7DR /O^ 7BSI"M&J3ASN.I^("7*M2IGT+D"I.2
4"M&J7JOM2IOP+H>I3S;E3D& T*M2I7J3P& .I[PC7H2JGN7MSPR&,"0*M3N7A7CSN.,BI2MJJ7UCF+T3R"I60"J*M2IGPG7E"JBZ"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