File STL.PA (PAL assembler source file)

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

*M>J* B * B 2 * +GB . J .1&...F7*M>J* B * B 3S[A7EKR* :1"5*M*/B 3ION3LSU3I
N2 	B7TB 7AST3E;R2 WR3C
O7NSI3I;O"M6J2JGL/DGD2=7J3S& . J1"1*M2MZJ3I3E/DF "M6J6JB*7ASR"2*M2M&J3S[A+E3R"I602JNIA7M6JJID7F2JNI+DCF"1606JRI+ACD3C	F7NSS"M&J3DGC2 ;I7TET*M2IGT3D& 3NWTX7T2JRI+CCA3E	XT*M2I7J3P& 2 
P"37P"J*M6MBJ+G212I7J3S& 2 OL3I	NT*M7LCC+C3M. B *MBJ* B * B 2 7J3S& 2 	L7NSI*MBJ* B * B 2 	S3ZGE2M2J3DOP+MB," 60*JB * B * B 7JOM* CI3L;II7T*JB * B * B 7S+IE7B*JB * B * B "0*M* B * B 2 * +MCS3I2 7IOPP*M7LOP+PB,. B "M6J*JB * B * B 7JOM* CI7LKI7ESS*MBJ* B * 
 6 SS3AWTS*M3LWR7SSE.,B "M6J"J*M* B * B 2 * +MCS3I2 3IWRS7T*JB * B * B 3SGT7TKE*MBJ* B * B " 60"J*M7ISN7ESX2,"IL7T*JB * B * B 7JOM* CI3IGS7FKE"M6J"J*M3S[A7EKR.,B "M&J3C[D. B1*MBJ* B * B 2 7J3S& . SD.0B0+P>I3L7I+ICTX*M* B * B 2 R +CCAX*M*MBJ* B * B 2 GT7DV
+AB * B * B 6 &/6:"=2-GU*MBJ* B * B 2 7J3S& . SD.0B0P*M* B * B 2 N I7A*JB * B * B 3DGC. R4*MBJ* B * B 2 GL/DGD*MBJ* B * B " 7X*JB * B * B 7NCO*MBJ* B * B 2 GT/DR "4*M* B * B 2 R +CCAY*M*MBJ* B * B 2 GT7D& * B * B * B 2 J/7IOT3TWRA7M*JB * B * B 7JOM* CI7LC
C7M2JGM+I3N2IOD3AJ I7T"J*M* B * B 6 R +ACD7BSI*MBJ* B * B 2 7J3S& 2 SL3P7C*MBJ* B * B 2 	S3ZGE"M6J"J6 *JB * B * B 7JOM* CI7L+YZ*M* B * B 6 V A*M* B * B 6 & Y7A*JB * B * B Z7A"J*M3EGS+F3A2 * +MCS3IV 3S[A*1B 6/OE+ACF2(GZ6,	Y7AV,A6)*JB * B * B Z7A*JB * B * B
3YGY*MBJ* B * B 2 GU*MBJ* B * B " 7N*JB * B * B D*M* B * B 6 * 3AGBS7E*JB * B * B /ZCA*MBJ* B * B . CA7ASPR*M* B * B 2 > 3F?LW7A"J*M*MBJ* B * B 2 GT3DJ I7T2J*I+MCS3IN 3H?CD7P*JB * B * B 7JOM* CI3LWR7SSE*MBJ* B * B 6 SS3AWTS*M* B * B 2 * +MCS3I2 3S?D"M6J*J
 * B * B 6MNJ7RSE*,B 2 GT3DJ I7T*JB * B * B 7JOM* CI7LOPP*M2IOD3AN 3H	BT*M"M&J3TSA2 C7BSI*MBJ* B * B 2 7J3S& 2 SL3P7C*MBJ* B * B 2 	S3ZKE*MBJ* B * B 2 OD3AN 3H;AG7Y"J*M* B * B 6 R +ACD3CGH7N	G*MBJ* B * B 2 7J3S& 6 	LZ7Z*JB * B * B U7B*JB * B * B 3YKY*MBJ*
B * B 2 KZ"M6J6JOE3AKF*,B 7JOM* CI3EGS+FB1* > 3EGS+F" +Z3B3YKY2,KU")*M* B * B 6 * B*M* B * B 6 & Y7B*JB * B * B U7B*JB * B * B N*M* B * B 2 R *MBJ* B * B 2 KZ7BOAE*M* B * B 6 * B60*JB * B * B 3AJ07PKT*MBJ* B * B 2 [O7L
OB*M*MBJ* B * B 2 GT3DN 3H	BT*M2I7J3S& 2 C3CSOP*M* B * B 2 * +MCS3I2 7ROEE7T*JB * B * B 3SGT7TKE*MBJ* B * B 2 7J3S& 6 KLD7O"J*M6MJJ7RSE6,RI+ACD3I> 7UCTT7P6JE+I3T2I3HT*M* B * B 2 * +MCP7IN 3AWFR7R"J*M2M:J/U7M7PKA+T.2.2B02M:J/UGM.=R12M:J/UKM.=Z1"M6J"J*M7OSU
PCT6,*IB*M3COH7OCD2,NI3H?CD*M/DB460B02,RI/OB4"0602J
P*33P2I
P"3*M3C	F7NSS2,NI+ICF3C[D2M2J3IWR+S3T6 KI3EWST*M3LSS+OB,2 R 7OKTS*M3LSR+OB,2 R 7OKTR*M+NB,* B . R 2M2J7Y+Z*,B 6 +YZ*M2M2J3C;I+I3T2 	C7NSI2M2J3I	N+TB,2 ;II7T2J	L7PCS*,B 7IOPP*M2MVJ3S[A*1B,. F2"4612JGZ*0B,* B "0*M/ZCB*,B . B "M6J6JB*7ASR.2J+*0603N7U"1*M2MJJ
I3T* B * B0* B * B * B 2 2/7OOC2 ?T2 WB2 3C7EKAE7D2JC7BSI.,BI6M"J*,B * B " 60*J3Y* B * B "0*M3YGY*,B . B 6M&J+Y3B* B " 602JGU*,B * B "0*M+U3B* B . B 6M*J+AB,* B " 602JKZ*,B * B "0*M3CGH7N	G.,B "M6J"J*M*M*J7PKA+T.2.2B0.+B6"M6J"J*M3O3F3OGW.,B 2M>J3F?L+W3B" 
0*J3D* B * B "0*M* B * B . B 6MNJ3IWZ+AB," 60*JB * B * B "0*M7S+I+E3B. B *MBJ* B * B " 606JSS3AWT+SB,"0*M* B * B . B 6MNJ7TSA+E3R" 60*JB * B * B "0*M3R?C7USN.,B 6MNJ7CWO+N3T" 60"J*M6MRJ+B3A* B " 60*JB * B * B "0*M* B * B . B *MBJ* B * B " 60*JB * B * B "0
M* B * B . B *MBJ* B * B " 60*JB * B * B "0*M* B * B . B "M&J"0*M* B * B . B *MBJ* B * B " 60*JB * B * B "0*M* B * B . B *MBJ* B * B " 60*JB * B * B "0*M7TOB*,B . N "0*M* B * B . B "M6J2JC3CSO.,BI"M&J3ASN. GM"M&J3DGC2 ?CD7E2JFI+NCDM622JNIL7L6JNI+ZCA3CGL"M
J3C3M"M6J6JRI+ACD3CSOE*M6I+SL*M2I7CA*M2I;A3D6 "3*M2IOD3A6 3OODO7D"J*M2I3C7AJ T7L6JRI+ACD3MSO3CSO"M&J7JCM* CI3COHO7D"J*M3CSOE&,"0*M3MSO3CSO.,BI2M6J"1&,"3*M+M22"I62.JOM.,FI"M2J*M*J7PKA+T.2.4B0"M6J2J
P"3&,3SKWA*M2IGCM*M* B * B 6 R +ACD3M3N7OOC*MBJ* B * B 2 OD3A& 3NOTN7T*JB * B * B 3TSA6 SS3OWR*MBJ* B * B 2 OD3A& 3NGTD*M7NE+TB,2 R +CCA3I& 3NGTD*M* B * B 2 & +SCZ7ISNA7D*JB * B * B 7I+S2 ;I3T;CT*M* B * B 2 * +MCP7NET*M* B * B 6 R +ACD3ZKA3AWS*MBJ* B * B 
 OD7A* A60*JB * B * B 3TSA2 KZ7BOAE*M* B * B 2 R +CCA/ZCB"M&J7JCM2 
P"1*M"M6J2J?D.4B0*0B,"0*M* B * B 6 R +ACD/NB4"060*JB * B * B 3SGN*MBJ* B * B 2 GIC*M* B * B 6 R +ACD/NB4"060*JB * B * B 7JCM* CI/DSO.0B0"M6J.JSN.0B0*,B .4B0"0*M"M6J2J;I3TSA.,BI2M&J3NOT+N3T"I606JSS3OWR2,JII7T2J;M3LOOS&,6-WN+M613N7U.2Z-"0*M3ZKA3AWS2,: U7M2J
Z7BOA+EB,3N7U.+B12MFJ60CA+T3R6 WN/MJ+"0*M3AJ07PKT2,: +U/M"460"J*M7Y+Z*,B . B * B * B * B 2 N/7OCM6 	Y2 ;A7D* 2 V 3NWT7R^ 3IT2 WD3CSO6 WO3T& 3NF C*M* B * B 2 R +CCA3T7E*1B0* > 7S[A3ER 3E?CU7T*JB * B * B 3TSA* CI7Y+Z* B 2/WG7TV A*M* B * B 2 & +SCZ7Y+Z*MBJ* 
 * B 2 OD7AR /EGM*1B 6 V/3A& 7NR /EGM"1*M* B * B 6 R +ACD7I& Z7Z*JB * B * B 7I+S6 +YZ*M* B * B 2 R +CCA3T7E*1B2* B * > +YCY+ICN3T7E"162"J*M* B * B 6 R +ACD7IR /EGM*1B 2/WG+T" +U	A*MBJ* B * B 6 OAR*M* B * B . J * B * B * B * B 2/3A3PGH*MBJ* B * B 2 SL*M* B
* B . B *MBJ* B * B 2 	CA*M* B * B 2 R +CCA"464*JB * B * B 3LSAD61*JB * B * B 3T7E"160*JB * B * B 7NCO*MBJ* B * B 2 GT/DR *4B * > /Y7Y3DOE7OSU2+3A3PGH2*GU*MBJ* B * B 2 OD3A& 2 WT/MJ1"M6J*JB * B * B 3TSA* CI7Y+Z*MBJ* B * B 6 OI7Z& Z7Z*JB * B * B 3DGC2 WT/M
1* B * B */CZ+ICN3T7E"162"J*M* B * B 6 R +ACD3T7E"160*JB * B * B 3DGC. R4* B * B 2/WD7CWO3T& /NR "4*M* B * B 2 2 3ASD*1B * B 6/	Y2 ;I. R46MRJ/EGM*1B," 60*JB * B * B 7NCO*MBJ* B * B 2 GT/DR "4*M* B * B 2 R +CCA7IR /EGM*2B * B 2/GZ6*V=3AR+3E?CU7T*JB * B * B
7JCM* CI7Y+Z"M6J2JWT/MB1*,B "0*M3T7E*122. B "M6J"J*M"M6J"J6L.JCA+T3R* B "0*M* B * B 2 N L7A*JB * B * B 3TSA* CI7AR0+RB/* B 2 WG3T: 3UKM+ECR+OCF7TCAS*M* B * B 2 R +CCA3T7E"5*M* B * B 6 R +ACD7IR /EWM*MBJ* B * B 2 3C7LJ A7L*JB * B * B 3CGI*/B * B * B * B 2 
(2)6 7USL6 	B* B23ASN2 T+ECN3N
E3A	TV*M* B * B 2 R +CCA3T7E"5*M* B * B 2 & +SCZ7AR0R*M* B * B 6 R +ACD3IF 60KT*MBJ* B * B 2 OD7AR /E[M*MBJ* B * B 2 GT3D& 2 WTM66*JB * B * B 3DGC2 WTM66*JB * B * B 7I+S. CAT7R*JB * B * B 3TSA* CI7AR0R*M* B * B 2 R +CCA3T7E"7*M* B * B 6 R +ACD7IR /E
M*MBJ* B * B 2 OD7AR /E
M*MBJ* B * B 6 OI3ZF 60KT2MFJ3G	A+NB,2 GT3D& 2 WTM66*JB * B * B 3DGC* CI3T7E"7*M* B * B 2 & +SCZ3T7E"6*M* B * B 2 & +SCZ3T7E"7*M* B * B 2 & +SCZ3T7E"5*M* B * B 2 * +MCP3AGGI7N*JB * B * B 7JCM* CI7AR0R*M"M6J2JWT+M25* B "0*M3T7E*6B,. B 6MRJ/E
M*,B " 60"J*M"M6J*JB/* B *1:3.8^.*1B 2 
J*M>J7BSI2 GP3TWT+RCN+ICN+DCP3S	H+FCT3R
E7ISS+ECR3C7O7PKA+ECD7WSI3H6 3A/S"M6J6JB*7ASR.2F+.0B0"M6J6JKI3EWS+TB,"0*M* B * B 2 N L7A*JB * B * B 3TSA* CI3IWR7SSE*/B 2 ;I+ICT3SGTT7E*JB * B * B 7I+S6 KI3EWST*M* B * B 2 R +CCA7LSS/AGT*MBJ* B * B 2 OD3A& 6 OL7TSA"1*M* B * B 2 & +SCZ7LSS/AGT*MBJ* B * B 2
OD3A& 6 OL7TSA"1*M*MBJ* B * B 2 GT3D6 3A/S+L?O2 & 7NSI2 GMS7K*JB * B * B 3ASN2 7N3S3K+OB/2 WD7TKE3M;I3E2 3E
N+TCH+OCF7PSA7TKEN*M* B * B 2 N M7A*JB * B * B 3DGC2 ;I3V3MO*M*MBJ* B * B 2 GT3D6 3A/SH7I*JB * B * B 3ASN2 7N3SKI*M* B * B 2 N M7A*JB * B * B 3DGC2 ;I3VMI*M*MBJ* B * B 2 7J3S& 6 KI3EWST*M"M6J"J*M7ROE+E3T. B *MBJ* B * B 2 OD7AN 3AKVI7T"J*M* B * B 6 R +ACD7
J 3EWS+TB/2 ^ +ECT3SGT+TCE3ASD7ROE+SB 212=O7W*JB * B * B 7I+S2 WR7SSE*MBJ* B * B 2 OD3A2 3SGTT61*JB * B * B 3TSA6 OL7TSA"1*M* B * B 2 & A7C*JB * B * B 3DGC6 OL7TSA"2*M*MBJ* B * B 2 GT3D& 6 OL7TSA*1B/6 N 3H[I7TJ +ECG7L
O2 ;ED*M* B * B 2 6 Q7L*JB * B * B 3TSA* CI7LSS/AKT*MBJ* B * B 2 SL*M* B * B . F *MBJ* B * B 2 OD3A& 6 OL7TSA"2*M* B * B 2 6 Q7A*JB * B * B 3TSA2 GS3V	B+TB/* B 3USP3AWT*MBJ* B * B 2 OD3A& 6 OL7TSA"1*M*MBJ* B * B 2 GT3D& 6 OL7TSA*1B/2 N 7OCM3AWR2 ?L3WV N7D
JB * B * B 3ASN2 7N3S3K+OB/* B 7DSE3E7R3IWN2 WL7NSG3H> 7FB 7AST3E;R*MBJ* B * B 2 GT3D& 3N7VL7O2J&IA7C*JB * B * B 3SGZ2 3CA*M* B * B 2 * +MCP7NSO3FSN"M6J*JB * B * B 3TSA* CI7LSS/AKT*MBJ* B * B 2 ;A3D: 3M/SH7I*JB * B * B 3TSA2 ;I3VMI*M2IGIC*M* B * B 6 N +ZC
3CGL2M:J3O[T+N3D6 OI7ZJ 3EWS+T>I3S	K+PCS+ICF7PSA7TKE3N: +OCT7FWON7D*JB * B * B 7JCM* CI7ROEE7T"J*M"M6J2J?D*,B * B 3IOA*MBJ* B * B 2 OD3AZ 3L
A*MBJ* B * B 2 GT7DN 3AKVI7T*JB * B * B 7JCM* CI7ROEE7T"J*M"M6J2JGM3S3K+OB,.0J4"1*M7MOA3K	H.,B .4F22M:J3M/S+L3O. ^7"7672J7N3SK+IB,"0*M7LSS/AGT.,B 2M2J3SGT+T22" 602J;I3V3M+OB,"0*M7I[N3M	H.,B 6MNJ3AKV+I3T" 602J3F+A3G* B "0*M"L*M"M6J"J*M*M>J7ROE7EST3I
N2 [O2 ?C3EF +NCD3CSO2 WD7CN 7TSAE7S"J*M*M>J*2:0.9^."1*M"M6J"J*M"M6J2J?D7TOR*,B "0*M*MBJ* B * B 6 OI3Z& 2 OS7NCTT*M* B * B 2 : O7P"J*M* B * B 2 * +MCS3I2 7AR0R*M* B * B 2 : "160*JB * B * B 3TGB7PKT*MBJ* B * B . CA7ASPR*M"M&J7JOM* CI/LCAT7R2J:I"4*M2IKT7ASP
*M2IGZ7BOAE*M*MBJ* B * B 2 7J3S& 2 GL60KT*MBJ* B * B 6 ON*MBJ* B * B 2 KT7SSPR*M* B * B 2 2 7S+IE7C"J*M* B * B 2 * +MCS3I2 7AR0R*M* B * B 2 : S*M* B * B 6 R 7BCST7R*JB * B * B 3L	S3ZGE"M6J*JB * B * B 7JCM* CI7DSOR7S"J*M"M6J2J?D7TKR*,B "0*M*MBJ* B * B 6 OI
Z& 2 OR7NCTT*M* B * B 2 : O7P"J*M* B * B 2 * +MCS3I2 7AR0R*M* B * B 2 : "160*JB * B * B 3TGB7PKT*MBJ* B * B . CA7BSPR*M"M&J7JOM* CI/LCAT7R2J:I"4*M2IKT7ASPR*M2IKZ7BOAE*M*MBJ* B * B 2 7J3S& 2 GL60KT*MBJ* B * B 6 ON*MBJ* B * B 2 KT7SSPR*M* B * B 2 2 7S+IE7B"
*M* B * B 2 * +MCP3IR 7OKTR*M"M6J"J*M* B * B 2 N +LCL3C3M2 3C7AJ T7R*JB * B * B 3TSA* CIL7X*JB * B * B 3DGC* CIL7X*JB * B * B 7JCM* CI7DSOR*M7DSOR&,"0&I2/WR7TKU3NF 7DKD2 ?F3RR +UCM7RWO3T;IE*M"M6J"J*M+L3X* B 6 " 6MNJ7CSN+P3T2 OS3O;UT*M3R;C7TSP6,J 7CWON7T2J
L60KT*,B 7AR0R*M3TGB7PKT6,R B7A2JKT7SSP+RB,7TOB2M:J+SB,* B " 61.JSN.,RI2M:J*120.IB12M2J7S+I+E3A2 	S3ZGE2M2J7S+I+E3B2 	S3ZKE2M2J7S+I+E3C2 	S3ZOE"M6J"J*M*$R$*$R$*$R$*$R$*$R$*$R$*$R$"$*MBLBZ

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