File POWERS.SB (8k SABR macro assembler source file)

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

"/*M2/?P7WKE7SZ."064.J"/3KZ 7OSR3R;A2 	L3BGRR7Y2JN/7O	P3R
I+HCT.1Z9"9*M2/	D7GSI+ACL7EWQ3I7P7ESN2 ?C+P;R2,6 3A;Y3ASR2,6 7AOS".*M"/*M2I;E7T	R2I[I7P
O*IB/* B 2 ;I3T
E+ECR+TCO3F?L3A	T+NCG7P
OE7R2JVI7NKT3YZI3F?P+W>I* B 2 Z 3LGO3T;I7GR 3OZ 3LGO3T;I7GB 3OWWR*M2I;E7T	R6IE+P>I* B 2 V 2 ?T* CA7P
OE7R2JVI7NKT3YFI3L
O*IB/* B 2 GN7TKU+ACL3L
O3A	R3T7H*M>J*M>J"M&J3D7UM	Y7LCX"M&J3OSPE	F7JOMK	P.4B0"0*M"/*M2/&I3NWT3RGN7LN 7UKB7OSU3IWN2 ?PL*M"/*M2/NI7OCM3UWT3S: 2 WT7ROM2 [O2 ?P3L;Y3O	M+ACL2(?N2 ?C7NSS7ASN2 WT+R	M*M>J*ICN+ICN+ACC*.:.* CX+ICN3F?L3A	T+NCGA7C"J&/3CWO3F	F3CWI7NOT6 SS7ASR2 ;I2 ?L7CSA3I;
2 W3OWS2 SA3DWR+SCS3F3O7L
O3S* +MCS+TCO3P3O*M>J6MBJ/OKL2,JI3LOO/KFI6MBJ+O3L2I3B3O/C"I612JNII7A2JRIC	A3P3O"2*M2IGCL	L61N,T7O2JFIR	GX*M2IGT3D& 2I?PL*M2I;I7CBIO7L"J&/3DGC6IKA+GN16IR/7HOI2 ?C+DCE3P?R3BKA+LCY7ESX3R;A7EWOS*M6/NIK7P6JKA+G222IOD3AFI/RGG"*M2IGCL	L21Z,A7D6JKA+G216IKA3GVIX	S
/B * B 3ASD7ROE7SN 7TKO+ECD7HKEE*M2IGCL	L21Z,M7P2JFIR	GX*M6IOI7ZBI/OKL"M&J7JCM2I?PL612J*I+MCP7IBIO7L2J?P+L212IGT3DFI/RGG"*M2IGT+D"I"3*M2I7J3PFI/RKG"M6J2JNI3P
A/EFI*7>I* B 2 N 7ASN6 KB3E/A6 CU2 T+ICS3TKAL7E6JES&,.1Z4"4&I*/:7.9B6.8R9*27E29NI7OON3T;A+TCS7FKO6 EP*M.IF2"462.JFI.4F2"M&J.1R5"5&I*/:6.3^5.8"2*77E"7*M.IV2"265.JJI.5V2"M&J.1J6"5&I*/:4.0&6.0B1*37E"5*M.IV2"265.JJI.5V2"M&J.1B7"4&I*/:1.9N5.1V2*07E"3*M.IB0"060
JBI.0B0"M&J.1V7"4&I*/:622V5"-62.JBI.0B0"M&J.0B0"0*M6ICC3AWG"I632J;OE&,.2F0"4*M.IB0"060.JBI.0B0"M&J3CGPG	E"3602J?CF&,.5F7"6&I./Z-..V4.3R524V2"-&33C;O3SGT7NOT2 ?F3R2 7OOG"M&J.4^6"4*M.IB1"066.JFI.7R4*I>I.3Z..0"8.4R9/EJ-"M&J.4V7"0*M.IB6"763.JVI.7Z5*I>I*-:9.5J
.9&3*07E"2*M.IZ0"366.JBI.1J6"M&J.1Z7"5&I*/:1.6Z7.5B4*77E"1*M.I^2"266.JZI.0N2"M&J.5Z7"7&I./J-..B4.7N328V0"-61.JVI.5F0"M&J.3R5"3*M.I^1"7&5.IN/..F3.7&920V2"-61.JJI.3B6"M&J.6^1"6*M.I^5"7&7*I6/.4&..9^8.4J1/EF-"M&J.7Z7"7*M.IB6"061.JJI.0^0*I>I.9&..9&9.6N4/EF-"M&
.7^7"7*M.IB7"4612JNI3P
A/ENI2MVJ/RZ1.,JI.0R1*I>I.1B..6R4.9R4"M&J.2R0"0*M.IN5"2662JNI3P
A/ENI2M2J+N22.I^1"5&5.I"/..Z6.4N329V7"-62.JRI.2F7"M&J.0B3"0*M6M"J2,JI3LOO/KNI6M&J2,JI3LOO/KNI"M2J*M>J*M>J2I3A+OCG2-: 7AWT3R3A2 ?L7GKA3ITM*M"/*M2/FI3L
O*(	X*=+N3A?L/GJ(2)F+3L
O*(	M2 W3EWR* >122> 3RV 3QGU7LR 3O6 *M>J2I3A+OG/M6)7ASL3E;R3A	T+NCG7SKE7IOE2 .(2*&*2)&/2 W3EWR. 7K*27M21F +NCD3MF 3SF 7B[OE*M"/*M6ICC3AWG"I642J
L+E3R.IF0"1&4*IB/* B 2 F"3L
O2"V 3R?R3RF 3T2 +OCC7XXX7X.J^I"0672J3A+O3G2I3B3O/C"I&2*/B * B 7ESN+RCY3P	ON7T6JRIA	D3A?LG*M2IOD7ARIE7M6JRIA	D3A?LG62JRIC	A3T7E"*M2IGCL	L21&,3FSA6MRJ+E3M6IKA/GBI"M&J3ION2I3A+OOG"M&J3ION2I3A+OOG"M&J3TSA2IOA+H>I* B 2 ^ +ECT7ECX3OWNN7T6JNI+PCA3SGN"M&J7JCM2I
L7EKR2I2/+OCG+OCF/X6<*06 6 KE7RKO"M&J3ASN.IN(.7B7"M&J3TSA.IV(.7B7*IB/* B . J-.0B0"M&J3DGC2IWT+M>I* B 2 : 2 ;I+TCO3T7E"M&J3TSA2IOA+H>I2IWG3T6 2 	W3T?H+UCT3S
IN*M2I;A+D"I"7*M2IGT+D"I.2F0*0>I* B . J M*M2IOD3AFIC7H2JNI3A3L*I213FKS*IB/* B 2 62"-612JFIR	G3OWN"M&J3TSA2IR(*8>I* B . " 2 WT7ROM2 [O2 WS3RWIS*M2I7J7SBIO7L2JNIO7F2JNI3A3L*I213S?T*IB/* B 2 3A+OG+MB)7ISN7O& "M&J3A
R"I7Y6JRIA	D3T7E*IB/* B 2 WG3T: "M&J3C3A/LBI2,3FO	T*/B * B 3F?L+ACTI7T2JNI3A3L*I217FCM*IB/* B * CN2*3A+OG"26)2JFIR	G/LKN"M&J3C3A/LFI2,GF+D>I* B 2 : 2 F*3L
O*(&22 3A+OG+M")3A?L7G"(")*M6IKA7G&I"M&J7RSER	N3A?L+G>I* B 2 V 7XSI2M2J7GKER&,3C3A/LFI6,KE7RKO"M&J3A
R2I
LE7R"J6L"J6/"J&/7ECX* B-7ER 3OF 2 ?P7WKE*M>J*M>J*I+E.*7X7SKE7IOE6 "(2*&**)"/+I&!*M>J2I[I. 7B+E***(>1*1&62 ;A7D" 6 OI2 WB3TWW+ECN*-B13ASN* B13TWHN*M2/JI6*"**=B13S7U3A&(*)"*+X**+IB)7FKO* CI3F?R3M& *=B1+TCO/IV=*M>J2IW3EWR* A+I")*1"/*(GI.)F**6***2&)*M>J"M&J3C
PG	E"4*M7ECX+E3R.IV4"360.JJI.0B42MVJ+X3P2I3B3O/C"I&2*/B * B 7ESN+RCY3P	ON7T6JRIA	D7ECX"M&J3DGC6ISX"M&J3TSA6IEP62JRIC	A+XOT"M&J3ION6IEP62J&IN	C7ECX"*M2IGCL	L21&,3FSA6M"JT&,3A
R"I602JNI+LCA3C3L2 7C7AJ A7R2JFIN	D3AC"M&J3TSA*I6(.2^0"5*M2I7S3AN L7A6JRIA	D3A7C"M&J3C3L"M&J3TSA*I6(.4^2"1&I2/WT+SCT7FKO2 3F+T;G2 OA. "<.8J."M&J3S3Z2 3CA*M2I7J3PVI3XWPR7R6JRIA	D3AC"M&J3SGZ"M&J3TSA.IR(*0>I* B 6 " .*Z1"M&J3DGC2IOAH*M2IGCL	L61N,T	O*/B * B /Y
="67X2JFIR	GY*M2IGCL	L21Z,A	D*/B * B 7ECX7ROE7S& 6 OA2 ;I3T
E+ECR3NF +NCD3FGR3C	T+OCNF*M6IKA7G&I"M&J3C3A/LBI2,	F+X>I* B 2 ^ +ECTN*M2I7SA*M2IGIC*M2IOD3AFI3L
O*IB/* B 2 3A/O7GN*M2IGT3DFI3L
O*IB/* B 2 WG3TZ "M&J3CGI"M&J3C3A/LBI2,3FO7T2JNI3A3L*I213FSA"M&J3A
R"I7Y6JRIA	D"(&5*/B * B 65R 3E7R3S> 7FN 3E	RE7S2J*IM	S3P3O"M&J7EOX"M&J3C3A/LFI2,GF+D>I* B 6 B 7LOU" 612JFIR	G3OWN"M&J3C3A/LFI6,SS+O>I* B 2 ^ 3IWV3SJ 2*Z*"M&J3A
R"I7Y2JNI3A3L*I213FSA*IB/* B 2 WG3TJ "M&J3A
R6IKE"1662JNI3A3L*I217FCIO7W2JFIR	G3A?LG*M2IGCL	L21Z,M	P*/B * B +B***(/N/F6)*(+B.*Z1+X")+E**X6)2JFIR	GY*M2IWR3T;R6IE+P>I* B 2 V 7XSI2MVJ3XWP+R3R2IGCL	L21V,3R?RR*M6IKA3GVI3XWPR*M2IGT3DFIC7H6JNI+MCA3CGL"M&J3C3L2 7C7AJ A7R2JRIC	A3AC"M&J3DGC2IOAM*M2IOD3AFIC7L
JJI7EKT3NVIX7P"J6L"J6/"J&/7ICF+OCW2-& 3NWT7GKE2 ?T2 3F7OSA3I
N2 ?P7WKE*M>J*M>J6IWJ+SCT3F?L+ACT7BOA3EF +NCD+GCO+TCO7FCFO7W"J6/2J[I7P
O2,JI3LOO/KJI*IB/* B 2 ;E7T	R2 ?P7ISN"M&J3C3A/LBI2,3FO7T6JRIA	D7ICFO	W*/B * B 3F?R3MJ 3A/N"M&J3DGC2I[F7P
O*IB/* B 2 ?T6 KP3OWP3R2 3OGC3T?IN*M2IGT3D&I3F?PW&*/B/* B 6 KF+OCM3ASD7ROES*M2IOD3AZI3F?PW&* B * > +TCO3P?R7PKE2 ?LC*M2I7J3P6I+L>I* B 6 N 3NGE3K& 3N?T2 ?R3U	TN7E"J*M"/*M2/ZI3F?P+WB-3F?L3A	T+NCG+TCO3F?L3A	T+NCG7P
OE7R"J6/"J&/3IWD3N	T+TCY3UWS+D: *.B.+X**3YV=+XP3YF*3L
O*(	X")*M"/*M6ICC3AWG"I642J[F7PKE.,RI.6R1"M&J.2J0"7*M7FCF+O3W2I3B3O/C"I&2*/B * B 7ESN+RCY3P	ON7T2J3M6,RI+ACD3IZI3F?P+W>I* B 2 ^ +ECT3C[D2 ?T6 E3P;O7ESN"M&J3DGC6ILP*M2I;I3CZI3F?PW&*/B * B 3ION3R7E7ESN2 ?T6 E3P;O7ESN2 SA3DWRS7S6JRI+ACD3IZI3F?P+W>I* B 2 ^ +E
T7ECX3OWN+NCT3ASD7ROES*M2IOD3A2I+XOP"M&J3ION2I[F7P
O*>I* B 2 & 7NKC3EWM+NCT7FKO6 EI7T6JRI+ACD3I2IX	P*/B * B 3H
I3H> 3RWD7R^ 3OSR2 [O6 E3P;O7ESN"M&J3SGN2 3CA& */B * B +ICS+ICT7ZKEO*M2I7J3PZI/FWP*IB/* B 2 WY+S: *.B.7ROE7USL"=616JRIA	D3AC*IB/* B 2 GB+SCE+ICS+ICN3F?L3A	T+NCG3P	O+NCTA7C6JNIP7A2J*IM	P7FCF7EKR"M&J3SGZ2 3CA& */B * B +ICF7BOA3EV 3QGU+LCS7ZKE+O: *.B.7ROE7US
6 GE3U3A7S* 3E?R"M&J7JCM2I[FP616JJI7EKT3NZI3F?P+W>I* B 6 * 3E?R2 WR3S3U3TV 7XSI2MZJ/FGP2,NI3A3L*I213S?T*IB/* B 2 GS+VCE7BOAE*M7FCF"2&,3A
R"I7X2JNI3A3L*I213A?LG*M6IKA7G"I"M&J3C3A/LFI2,7F+P>I* B 6 & 2*?L7G"(")*M7LCX2,FIR	G*0>I* B 2 F 7DKD7EOS6 SS3OWR3D" 3EWR"M&J3C3A/LFI6,SSO*M6IKA7G"I"M&J3C3A/LFI6,EP*M6IKA7G"I2MZJ/F[P6,JI7EKT3NZI3F?PW*M7FCF"5&,3C3A/LBI2,3C7EKA*IB/* B 2 ;A3YT3I
N2 ?T2 WZ+RCO7P
O+ECR+ICS"1*M2IGT+D"I.2F0"4*M2IOD3AFIC7H2J*IM	P7FCF"6*M7FCF7EKR6,RIA	D.(B4"0602JRIC	A3AC"M&J3C3A/LFI6,KE7RKO"M&J3A
R2I[F7PKE"M&J7JCM2I[FP612JVIN7D&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