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

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

2/;U7TKE3P?R3GGR+MCM3Z7U2 3P7OST+ECN3V;O2 WZ3IC3E/N7ESTE7N2JF/7UKF/U+F*M>J3C3A3LF 3LP+A" 7X&,2,GF+C3T3SSA+D3R3TWH+T	A*M>J7XN-7TKA3T3P7A+T2 ;I2 ;I3KWR3M;E3T;E*M>J7YN-7TKA3T3P7A+T2 ;I2 ;I3KWR3M;E3T;E*M>J3FOA3TJ-3UC3SGT3B;E3G?R7EOS3E[N7ASKO7R6JN/3ASD7RN-7TKA
TSA7ROE+SCE7DKE2 WZ3IC3E/N7ESTE*M2/T3EGT2-WN7IWG7NOG3W;I3K3E"M6J2JVI7NKT3YF 3LPA*M"M&J3D7U+MCYX*M6IWD7M	M" 7Y2JRI3U7M3YZ 7ASC"M&J3D7U+MCY3SSA/DGR"M&J3D7U+MCY3TWHT7A2JRI3U7M7YN 3ASDR*M6M"J2,JI3LOO/KJ 6M&J2,JI3LOO/KJ 2MZJ7ASC2,JI3LOO/KJ 6MNJ3ASD+R212I3B3O/C
 622JT3EGT2,JI3LOO/KJ 6MNJ3ASDR&,3B?L+CCK"2*M6M"J7PSN6,"I6MBJ7NKT.,BI2MNJ7NKT"1&,"0*M2MFJ3LPA&,3B?L+CCK"2*M"M&J3TSA6 CXN7T2JRI+CCA7PSNR*M2IGT+D" .-J1"M&J3DGC2 ;C/TGR2MFJ"1&,3TSA* CI7ACLH7A2J&I+NCC7ACL+HOA"M&J3DGC* CI7PSNR*M2I;I7CB 7NKT"M&J7I+S2 ;C/TGR"M&J
JCM. GA"M6J6JRI+ACD7IN 3ASDR612JRI+CCA3SSA+DOR"M&J3TSA" 7X2JRI+CCA3SSAD7R"J*M* B * B 6 R +ACD7I" *MBJ* B * B 2 OD3AJ X*M* B * B 6 R +ACD7I& *MBJ* B * B 2 OD3AJ Y*M* B * B 2 N +LCA3C3L6MNJ/UGB*,B 2 GT3D& 2 GS7DKD*MBJ* B * B 6 SRR*M* B * B 6 J T7R6JJIT7R*JB
* B * B 3ASN. ^("7*M* B * B 2 * +MCS3A3DT7R*JB * B * B 3TSA* CI3SSAD7R*JB * B * B 7I+S2 GS7DKD"*M* B * B 2 F +NCD.(^7*MBJ* B * B 2 ;SA*M* B * B 2 * +MCP3SKU"3*M* B * B 2 * +MCP3SKU"2*M3SKU*3B,6 J 7EKT3NF 3LPA*M6LWS+B22* B 7JOM2 SA7LKT*MBJ* B * B 2 7J7PN /
GB"M6J2J7J7PSL*4B,7JCM6 SL"4*M2MFJ7DSL+RB," 60*JB * B * B 3SGZ"M&J7JCM6 	S"4*M2I7J3P& 2 SA7LKT6MNJ+Y242IOD7AR M7P*JB * B * B 3TSA2 7J3S7A*MBJ* B * B 2 OD3A2 C61*JB * B * B 3TSA2 7J7PSL"4*M* B * B 2 R +CCA/LKC*MBJ* B * B 2 GT3DN 3CGM*MBJ* B * B 2 OD3A2 C63
JB * B * B 3TSA2 7TP*M/LCT*,B 2 * +MCS3FSN7AKD*MBJ* B * B 2 OD3A2 3TSAR*M/LOC*,B 2 N M7A*JB * B * B 3DGC6 SL7SSW"1*M/LGT*,B 2 N +LCA3CGM*MBJ* B * B 2 OD3A2 7T
ST62*JB * B * B 3TSA* CI3LGTD7R*JB * B * B 3ASN. ^("7*M* B * B 2 R +CCA7M[OE62*JB * B * B 3TSA* CI3LGTD7R*JB * B * B 7RKT*MBJ* B * B 6 SRR*M* B * B 6 J T7R6JSL*2B,* B 3ASN. ^("7*M* B * B 6 R +ACD.(^-"7*M* B * B 6 N N7A2JOL*2B,* B 7JCM6 SL"4*M* B * B 6 R +
CD"(67*JB * B * B 3SGZ*MBJ* B * B 2 7J7PN Y612JOC+M3A* B 3CGM*MBJ* B * B 2 OD3A2 7T
ST61*JB * B * B 7JCM6 SL"3*M/SGY*,B 6 R +ACD.(B7*MBJ* B * B 2 OD3A2 3T3HD*M* B * B 6 R +ACD3LTL7D*JB * B * B 3ASN. ^(*MBJ* B * B 2 7J3SF 7DWML7T*JB * B * B 3DGC6 	I*MBJ* B * B 2 GT3D2 3T3HD*M* B * B 6 J T7R*JB * B * B 7RKA*MBJ* B * B 2 ;A+D" "7*M* B * B 2
* +MCS3A7D7USL*MBJ* B * B 2 OD3A& X*M* B * B 2 & +SCZ7LOT/WGT*MBJ* B * B 2 7CA*M* B * B 2 & A7C2JOL*1B,* B 7JOM2 SA3I?MV7E6JSL*3B,* B 7I+S6 SL7SSW"2*M* B * B 2 * +MCP/SKY*MBJ* B * B 2 GT3D6 3OWV"2*M* B * B 2 * +MCP/LKT6MNJ+Y22* B 6 OI3Z2 3TSAR*M* B * B 2 
 +MCP/LGT2M2J+T24* B 2 GT+D" "5*M* B * B 2 * +MCS3A7D7USL*MBJ* B * B 2 OD3A& X*M* B * B 2 R +CCAI7Y*JB * B * B 3IOA*MBJ* B * B 2 7J3SF 3D7I3OWV*MBJ* B * B 2 7J3SF 3DWNW7B2JOL*4B,* B 7JCM* CI3A3DT7R2JJL+XB,* B " 606J	B*,B * B "0*M3T7E+PB,. B 2M*J3MGS+MB,2 
J3SF 3D7I3OWV2M6J3OWV*2B," 606JSL3HSL*,B "0*M7LOT/WGT.,B 2M2J7T
S+T22" 606JSL7AKD*,B "0*M2MZJ3NGD+D3R" 60*JB * B * B 3ASN. ^("7*M* B * B 6 R +ACD.(R-"0*M* B * B 6 N M7A*JB * B * B 3TSA* 6("5*M* B * B 6 R +ACD.(B4*MBJ* B * B 2 	CA*M* B * B 2 R +CCA7CSNR*M* B * B 6 R +ACD7ASDB7L*JB * B * B 3DGC2 GT7DKD2MJJ7UCM*,B 6 OI3Z
 7NKT*MBJ* B * B 2 7J3PN 3Y3C*MBJ* B * B 2 GT7DR 3ASDR*M* B * B 2 * +MCP3IZ 3NGDD7R6J	C+C3L* B 3TSA* CI3TSAD7R*JB * B * B 3ASN. ^("7*M* B * B 6 R +ACD.(^-"7*M* B * B 2 & +SCZ3TSAD7R*JB * B * B 3SGN2 3CA*M* B * B 2 * +MCP3B7UP*M* B * B 2 * +MCP3COYL*M6MRJ3
SD+RB," 602J;C+T3R* B "0*M7ASD+B3L6 R 3A3BE*M2MFJ7DWM+L3T" 60*JB * B * B 3DGC2 3DT7A*JB * B * B 3TSA* CI3FOAT*M* B * B 2 N I7A*JB * B * B 3DGC2 ;CT*M/AGM*,B 6 R +ACD7DSLA*M* B * B 2 & +SCZ7CSN*MBJ* B * B 2 7J3PF M612J*I+MCP3IF 7DWML7T"J*M7DSL+AB,. B 2MNJ+
3T* B " 60"J*M3A	D7M[O+EB,* B * B " 60*JB * B * B 3SGZ*MBJ* B * B 2 7J3PF /DKI*MBJ* B * B 2 OD3A" A7Z2JSA+I21* B 7JOM2 SA3RGTT*M* B * B 6 R +ACDI7X*JB * B * B 3TSA6 B*MBJ* B * B 2 OD3AF X*M* B * B 6 R +ACDA7X*JB * B * B 3DGC2 GHX*M* B * B 6 R +ACDI7Y*JB *
B * B 3TSA6 	B*MBJ* B * B 2 OD3AF Y*M* B * B 6 R +ACDA7Y*JB * B * B 3DGC2 GHY*M* B * B 2 N 3A3L* 233P?LT7X*JB * B * B 3A
R2 GHX*M* B * B 2 F +RCG7H	A*MBJ* B * B 6 KA3G" A7Z*JB * B * B 7JCM* CI3A	D7M[OE*M2M"J+A3X* B " 602JGH+YB,* B "0*M7H+A*,B . B 2M&J+XB,* B " 606J	I*,B * B "0*M+A3X* B . B 2MFJ+YB,* B " 60"J*M3A	D*2B,2 R +CCA7H+A*MBJ* B * B 2 7J3PF /DGI"M2J3A;D3EKW.,B *MBJ*
B * B 2 3CA*M* B * B 6 R +ACDA7X*JB * B * B 3DGC6 B*MBJ* B * B 2 GT3DF Y*M* B * B 2 R +CCAB7Y*JB * B * B 7JCM* CI3A;D3EKW"M6J2JSA3RGT+TB,"0*M* B * B 2 N L7A*JB * B * B 3TSA* CI3TWHT7A*JB * B * B 3SGN*MBJ* B * B 2 7J3P& 2 SA3RGTT*M* B * B 6 R +ACD.(F-*MBJ*
B * B 6 +SA*M* B * B 2 * +MCP/R"1"0*M/RB9*,B 6 R +ACDI7X*JB * B * B 3DGC2 7TP*M* B * B 6 R +ACDI7Y*JB * B * B 3CGI*MBJ* B * B 2 OD3A& X*M* B * B 6 R +ACD7TCM*MBJ* B * B 2 OD3A& Y*M* B * B 2 * +MCP3IF 7DSRA7T.JGR*820* B 3TSA* 6("1*M* B * B 6 N Z7A*JB * B *
B 7JCM. KR"760*JB * B * B 3TSA6 I*MBJ* B * B 2 	CA*M* B * B 2 R +CCAI7X*JB * B * B 3TSA6 	I*MBJ* B * B 2 	CA*M* B * B 2 R +CCAI7Y*JB * B * B 7JCM* CI7AKD7TSA6MJJ.2B7*,B 2 GT+D" "-61*JB * B * B 3SGZ2 3CA*M2I7J3P& 2 SA3RGTT*M* B * B 6 R +ACDI7X*JB * B * B 3
GI*MBJ* B * B 2 OD7AR M7P*JB * B * B 3TSA6 	I*MBJ* B * B 2 OD3A& X*M* B * B 6 R +ACD7TCM*MBJ* B * B 2 OD3A& Y*M* B * B 2 * +MCP3IF 7DSRA7T*JB * B * B 6MRJ+M3P* B " 60*JBL* B * B 2 GLP*M* B * B 2 N 3P
A/EJ "0602JGT3BWL*,B .0B0"5*M* B * B . F .6Z3*MBJ* B * B . V4"463*JB * B * B .0R3"3*M* B * B . R .0^76MNJ+BB,* B . B0"066*JB * B * B .3R6"5*M* B * B . R .4N3*MBJ* B * B . N0"363*JB * B * B .4R2"1*M* B * B . N .0B0*MBJ* B * B . ^7"7672JOS*,B * B .4N1"0*M* 
 * B . F .0F0*MBJ* B * B . V0"166*JB * B * B .3R6"5*M* B * B . ^ .7^76MNJ+DB,* B . B0"066*JB * B * B .3R6"5*M* B * B . R .1B3*MBJ* B * B . B0"7672JWS*,B * B .4B6"6*M* B * B . B .3N3*MBJ* B * B . N0"060*JB * B * B .4^0"7*M+S3F* B . R .6Z0*MBJ* B * B . N0"3
3*JB * B * B .0B3"0*M* B * B . ^ .7^76MNJ+GB,* B . N2"463*JB * B * B .4N1"0*M* B * B . F .0F0*MBJ* B * B . V0"166*JB * B * B .3R6"5*M* B * B . ^ .7^76MNJ+HB,* B . Z0"060*JB * B * B .0R3"3*M* B * B . R .0Z4*MBJ* B * B . ^7"7672J	S*,B * B .1N6"6*M* B * B . 
 .6B2*MBJ* B * B . B3"160*JB * B * B .7^7"7*M+S3J* B . N .6Z4*MBJ* B * B . F4"360*JB * B * B .1B0"1*M* B * B . B .2^76MNJ+KB,* B . B4"264*JB * B * B .4B6"2*M* B * B . B .0Z0*MBJ* B * B . ^7"7672J3S*,B * B .0B6"0*M* B * B . R .0^76MNJ+MB,* B . B0"066*JB * 
 * B .2R3"6*M* B * B . R .0^76MNJ+NB,* B . B0"066*JB * B * B .4R0"6*M* B * B . ^ .7^76MNJ+OB,* B . F0"160*JB * B * B .3R0"1*M* B * B . R .5Z3*MBJ* B * B . Z1"065*JB * B * B .0^1"7*M+S3P* B . B .0Z0*MBJ* B * B . Z3"465*JB * B * B .4N4"3*M* B * B . B .3^76M
J+QB,* B . J2"460*JB * B * B .4N5"6*M* B * B . F .6V0*MBJ* B * B . F0"160*JB * B * B .3R0"1*M* B * B . ^ .7^76MNJ+RB,* B . B0"066*JB * B * B .3R6"5*M* B * B . R .4N3*MBJ* B * B . N0"363*JB * B * B .4R2"0*M* B * B . ^ .7^76MNJ+SB,* B . F0"160*JB * B * B .3
0"1*M* B * B . R .2N3*MBJ* B * B . N1"064*JB * B * B .0F5"6*M* B * B . N .6V4*MBJ* B * B . ^7"7676JSS*,B * B .0R6"6*M* B * B . J .6B2*MBJ* B * B . ^7"7676JWS*,B * B .0B6"1*M* B * B . F .0B3*MBJ* B * B . F4"466*JB * B * B .7^7"7*M+S3V* B . B .6B2*MBJ* B * 
 . Z4"7676J
S*,B * B .0B6"0*M* B * B . J .3B4*MBJ* B * B . Z4"7676JS*,B * B .0R6"0*M* B * B . J .3B0*MBJ* B * B . Z4"7676J	S*,B * B .0J6"3*M* B * B . J .0N2*MBJ* B * B . Z4"7676J+S*,B * B .0R6"6*M* B * B . J .3N3*MBJ* B * B . N1"263*JB * B * B .0R0"0*M* B * B . ^ .7^
6MNJ3SOP*,B . B4"7672JOS+B3X* B .2J3"5*M* B * B . B .5F0*MBJ* B * B . F4"465*JB * B * B .2J5"3*M* B * B . ^ .7^76MNJ3COO*,B . N2"265*JB * B * B .1B5"4*M* B * B . B .2F1*MBJ* B * B . F3"462*JB * B * B .4N4"5*M* B * B . J .5N2*MBJ* B * B . ^7"7672JOS+T3R* B
.2J3"5*M* B * B . B .2J4*MBJ* B * B . V2"263*JB * B * B .7^7"7*M7SCC+LB,. J .3V2*MBJ* B * B 6 CC3AWG. B2"0*M* B * B . J .3N0*MBJ* B * B . N4"263*JB * B * B .2J1"3*M* B * B . ^ .7^76MNJ7CE*,B . N2"065*JB * B * B .4J1"3*M* B * B . R .5F0*MBJ* B * B . N2"767
JOS+D3M* B .2J3"5*M* B * B . B .3F2*MBJ* B * B . N4"265*JB * B * B .2^3"7*M7SCA+SB,. N .6R1*MBJ* B * B . ^7"7676JKS+P3R* B .3J6"6*M* B * B . F .5F1*MBJ* B * B . B2"360*JB * B * B .7^7"7*M7SCL+RB,. F .6Z2*MBJ* B * B . V3"361*JB * B * B .2F0"0*M* B * B . ^ 
7^7*MBJ* B * B . ^7"7676JCS+L3S* B .2J5"1*M* B * B . ^ .0N0*MBJ* B * B . N4"7672JOS+O3M* B .2F1"1*M* B * B . F .2J2*MBJ* B * B . F2"160*JB * B * B .7^7"7*M3SD+SB,. B .3N4*MBJ* B * B . ^7"7676JCS+R3D* B .2F1"1*M* B * B . F .2J2*MBJ* B * B . F2"767*JB * B *
B .7^7"7*M+S20* B . J .4Z4*MBJ* B * B . F4"360*JB * B * B .1B0"1*M* B * B . B .5Z1*MBJ* B * B . Z3"465*JB * B * B .7^7"7*M+S21* B . F .5Z2*MBJ* B * B . B2"360*JB * B * B .1^0"7*M+S22* B . B .5Z1*MBJ* B * B . Z3"465*JB * B * B .4B4"1*M* B * B . B .0B4*MBJ*
B * B . ^7"767.JOS*,B * B .0F1"0*M* B * B . N .0F4*MBJ* B * B . J4"363*JB * B * B .1N3"3*M* B * B . R .4V4*MBJ* B * B . Z3"166*JB * B * B .0^5"7*M+S24.IB3"366*JB * B * B .0R3"3*M* B * B . ^ .7^76MNJ*5B,* B . F0"160*JB * B * B .3R0"1*M* B * B . R .2N3*MBJ*
B * B . N1"064*JB * B * B .0R6"6*M* B * B . ^ .7^76MNJ*6B,* B . J0"163*JB * B * B .3R3"2*M* B * B . R .1B3*MBJ* B * B . B1"061*JB * B * B .0F5"6*M* B * B . N .6V4*MBJ* B * B . ^7"767.J
S*,B * B .0B5"6*M* B * B . R .6V4*MBJ* B * B . F2"260*JB * B * B .7^7"7*M+S28* B . F .3N3*MBJ* B * B . J4"461*JB * B * B .3F0"0*M* B * B . B .1J0*MBJ* B * B . N1"064*JB * B * B .0F5"6*M* B * B . N .6V4*MBJ* B * B . R4"363*JB * B * B .7^7"7*M+S29* B . B .1
1*MBJ* B * B . B3"461*JB * B * B .4N5"6*M* B * B . F .6V0*MBJ* B * B . R0"163*JB * B * B .3R3"4*M* B * B . ^ .7^76MNJ3C3O*,B . R2"265*JB * B * B .1F5"4*M* B * B . J .4B7*MBJ* B * B . F2"262.JFI.2F1*MBJ* B * B . F2"7676JOS+C3L* B .2J4"5*M* B * B . F .5R1*M
J* B * B . R2"760*JB * B * B .2J1"2*M* B * B . F .2F1*MBJ* B * B . F2"160*JB * B * B .7^7"7*M7SOL+TB,. R .5N0*MBJ* B * B . F4"7672JWS+Q3U* B .0R4"4*M* B * B . ^ .0J0*MBJ* B * B . J4"7672J
S+R3T* B .0R5"3*M.IF0"767"J*M* B * B 2 V N7D"JFL&G+G

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