File MACOPN.MA (MACREL macro assembler source file)

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

"/&63OWV3RGL+YN *3B32 Z(/ICN6 E3T;E3S?IN&)7POO7TZ "07A*J:I3ION3LSU3E6 3G?L3B6.A*M2IF.3SOE3T6 3A?C+P3N7L[E/E7L22>,7VKE7L	A.=J1*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J*M>J7CCO3Y	R7GSH* " +CB). &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"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M*L:I7ESX3E;R+ACL3AWS
M[L2,GB7CWK3PJ,3R;A+C3H3CWR3FN,3R[L6,CD3R;I3TV,3NWT3RV,+O3S7EKR+O3R7ECXR*M2IV.3XWT3RGN3LZ 3SC+E3K7GSE7CKH2,WG3TGK3R^,7EOT+Y3M7LSE7TKE2,	L3SWT3R2,3O/O+U3P3O	R3G>,+U3T7PKA3S7Y"M&J6.E7TKE3N3A2 GP/SOS2,?P7PB,3US6,WP3N	B7TB,3UKT+I3T7PSU3S7Y6,WP3X	B7NJ,3ESA+L3N
RSO+L263SGCN*M2IV.3XWT3RGN3L> 3UST+E3V3C;L3AWM6,WO3T?L3C2,3O?C+F3F7OSU3ROE6,T3T3B3K",7OOL+I3Z7OSU7LSS6,OL3TWRT*M2IV.3XWT3RGN3L> 7PKT21>,3U/T+N3T7OSU7CSN6,WO3T	S3Z>,3UT+N3D7OSU3B[U6,WO3TGHN*M2I	F3ESL" 64*J:I3G?L3B3A2 V /RF226V,/RF2"7*M2I^.3LKO+ACL3OWP3N>,3
;ET7C"J*M.IJ*.0B0"M6J.JNI"3*M*M>J2I7J3S> 3P;E*M>J6ISP7RR 3O> 7UCT+UCT3G?RU7P"J&/3D[E3A3U3TV 3XWT3N	SO7N"J&/3SGT+RCT+OCF7OSU7PSU6 WB3FWFR*M2/:I3EGG7T[I3E> 3F2 3E
N+TCH+OCF7OSU7PSU6 WB3FWFR*M"/&I+ICN7WKO+DCS2(?F3RJ 3IGN+R	Y*M>J2I&I3NR 3OKU+L7E7WKO+DCS2(?F3RF 3S	CI6)"J&/2<?N6 WO7TWP3TR-3E	V+CCE7RSE3U;R*>B 2(OA*=&0*M>J2I:<3O7R+ACL7RSE3U;R">*M3OWPN&,"0*M2IGT3D& 6 COE7N2J&I7NKC6 COE7N2JRI+CCA7OSPR*M2IGT3D& 6 COE7N2J&I7
KC6 COE7N2JRI+CCA7OSU7ESX2I^/+ECT3D[E3A3U3T> 7UCT+UCT7ESX7EON3I;O"M&J3TSA* CI3OWPN*M2I;I+CCR3OWPN*M2IOD3A> 3UKT2I^/+ECT7OSU7PSU6 WB3FWF7RN 7TKAT*M2IGT3D& 6 COE7N2J&I7NKC6 COE7N2JRI+CCA7OSU+L>I7GSE6 WB3FWF3R2 3E
NT7H2JNI+DCF"1606JRI+ACD3I> 7PKT2I^/+ECT7D[E3IWC6 WN3MWBR*M2I;SA&I2/GW7SR 7HKE3E> /N?E"M&J7JCM2 ?N7OSU2I:/+OB.6 OU+ECR3W;A+TCS+NCO7OSU7PSU"M&J3ASN. F("7&I2/WY+SB.6 OI3OGL+TCE7ISN3E;R+ACL7D[E3IWC" 62JRI+CCA+I" 7OSU7D[E6IN/3AWV6 WO7TWP3TR 3E	VC7E6JRI+ACD3I>
7PKT2I^/+ECT7ESN+RCY3AGGI7N2JFI+NCD.(^7"6&02/T+ICS3T7I3E& 3S3O3AWT2 WL7NSGH*M2IOD3A> 3U3TE	N2/GSV7E2JNI+DCF"0*M2I7J3S& 2 >(7FSEC7H6JRI+ACD7OSPR*M2IOD7A" R&16IN/7EWT3PZ +OCR7ESNE7R2JNI+DCF"1606JRI+ACD7I" R&12/?M+VCE3N7A3ER 3O;W"M&J3DGC2 GN/MGE"M&J3TSA* CI/
GR"M&J3DGC2 GN/MKE"M&J3TSA* CI/XGR"M&J3DGC2 GN/MOE"M&J7I+S6 COT7R6JRI+ACD2(GN/MGE"M&J3DGC2 3BK*M2IGT3D> 7PKT"M&J3C[D. B1"M&J3DGC* CI2(3C3N7AE*M2IGT3D& 6 COT	R2/?L+OCK+ACT7FKI+SCT7WKO3D> 3F: 3AWM"M&J3SGN2 3CA&I2/GW3SF 2 GN+MCE3SWP3C[I3ISE"?*M2I7J3P: 3OGNM	
2/?N6,B 7ROE3UWM2 WD3VOI3E& 3S: +O7N3F3IE*M"I&I6/SS3ROU7TKUE7D6JRI+ACD7OSPR*M2IGT3D2 "3*M2IOD3A> 7PKT6IB/3O;I7TR 3OV 3XWT3N	SO7N6JRI+ACD3I> 7PKT"M&J3SGN*I>I7WOA2 T3EWR2 ;A6 E3T;E3S?IN6?6JRI+ACD7OSU7ESX2I:/+OB,7FKO+CCE3OWN"M&J3DGC* CI7OSP+R>I7YOE2,. 7ECE6 
I"M&J3TSA* CI7OSPR*M2IOD3A: 3AWM"4*M2IGT3D& 2 >(3USTE7V2JNI+DCF"0*M2IGT3D> 3U3TE	N2/WYS*M"I&I2/WG3TR 3E	V+CCE2F +NCD3L;E3GT2 ;I2 OA"M&J3C[I. B1"M&J7JOM* CI6(OU+R>I3C3A7LV 7SKE2 WS3R	V+CCE7RWO3T;IE*M+L23"I&36IR/3OR 3OF 3NV 3NWTR*M3B/L.,BI*I>I7RCE3LOA+ECD+B
Y3SGT3R	T+NCG3B?L+CCK+OCF3F3IE*M3L;E.,BI*I>I7RCE3LOA+ECD+BCY3N
E3A	T+VCE+OCF7ASC3U3A"M&J*I>I3L;E3GT"M&J7JCM2 ;E7TKE+X>I7EKR+OCR3W	H+LCE7T	R3I
N2 ?T2 WP3R?F+RCM+ACN7ESNE7R*J3L2IGT3DJ L7K2JNI+DCF"1602JRI+CCA+I" 7OSU3LOO6IN/3AWV2 	F7RSS2 3B3O/C2 [O6 WO7TWP3TZ 3IWL"M&J3TSA* CI6(WO3T?LC*M2IGT3D& 2 2(3O?CF	F2/SA3D& 3N> 3P	T3OGN3L> 7FOF+ECT7[OU+ECD+BCY3B;I7A	R2 GP7S7S"M&J3DGC* CI6(WO3TWRC*M2IGT3D& 2 >
7UKTE7C2JRI+CCA+I" 7TSX3B/L6IJ/3EWM3MWB7R^ 7HKE7ER 7ESX6 SS7ASRS*M2IGT3D2 E7N2JRI+CCA+I" 3H3O7S+I"M&J3TSA2 >(3U3TS7T2JRI+CCA+I" 7LSS7RSE"M&J3TSA6 WOT7B2JRI+CCA+I" 7OSPR612J&I7NKC6 WOT7B6JRI+ACD7OSUL*M2IOD3A& 2 >(3U/TN7T6JRI+ACD7OSUL*M2IOD3A& 2 >(3UOTN7T6J
I+ACD+I" 3LOO3O[F2IJ/3IGN+RCY+ICS3I	N3TGI7L	L* CA7G[I+ECN3L;E3GT"M&J*I>I****6 WB+GB:3CWH+CCK+TCO3SWE2 [I2 ?H+LCE7WOA2 	BG*M"I&I2/;E3O
U7HR 3OF 3C?C3MSO3AWT6 OL+D" 3LOO3O[F")*M2IOD3A& 2 >(7UOTI7Z6JRI+ACD7OSUB*M2IOD3A& 2 Z(3L3GO7C2JNI+LCA3IOA"M&J3DGC* CI7OSUB*M2IOD3A& 2 2(3O?CF	F2/[O3FWS7TV 3SSE6 WB3T> 3NWC"M&J3ION3R> 3P;E6IR/3AWK2 ?N3RGM7LJ 7EWTR7N2J?N7OSU2,NI+DCF"0*M2I7J3P& 6 COE7N2JVL3
WT+R3X2MVJ/RF2"66,2J?I"7&,7JOM* CI3QWQ3R?R+R>I7ESN+ECR7EKRO7R2J*I+MCP+I" .7B6*5>I3ION3LSU+ECS7OSU7PSU3T;I7GR 3OZ 3IWL6 SS3ROU7TKU+ECD7D[E3IWC"M&J*I>I7BSU6 CS3E	C3F	Y+NCG+NCO3N7AE*M2M:J3OGN+M3E2IOD3AJ L	K2IR//FF="0*M2IOD3A2 E7N6JRI+ACD+I" 7OSU7D[E"M&J3TSA.
^(.7^56IB/3O;I7TR 3OR C7W2JRI+CCA3T7E+P>I7GSE2 WD3VOI3EN 7OSN3R3O2 ?WR7D6JRI+ACD7IR 7ECM"M&J3C[D" 606JNI+PCA3CGL*I>I+ICS7D[E3IWC2 	F+L7E7SKT7USC3UWRD6?2J"IL	T6I&/E7S2J*I+MCPL&I2/?N"M6J6JCO+T3R"I606JWO7TET&,"0*M7OSUB&,"0*M7OSUL&,"0*M7OSU3L;E.,BI"M&J3P
AE*M6LCO7ESNC&,"0&I6/CO+ECN3TKA+LCE+OCF3C;O3T;ET7S2JNI+DCF"1606JRI+ACD2(>-7UCTR7S2JRI+CCA+I" 7OSU7KSN2I2/3E
NT7H6JRI+ACD2(>-7UCTR7S2JRI+CCA+I" 7OSU7CSN"M&J3CGL2 GIC*M2IOD3A& 2 >(3USTE	V2/WD3VOI7EN /Y+S"M&J3TSA. ^(.6^0"M&J3DGC* CI6(WO3T;H7DKL2I"/3ASN7LKE2 ?L7CSA3I;O"M&J3TSA6 R(3OKCL7K2JRI+CCA+I" 7OSU3ROE"M&J3DGC* CI6(WO3T	SZ*M2IGT+D" 7OSU7LSS"M&J3DGC* CI6(OL3TWR
*M2IGT+D" 7OSU3B[U"M&J3DGC* CI6(CO/TGR"M&J3TSA6 SM3O3CE7N2JRI+CCA+I" 3H3O7S+I"M&J3C[D" 60"J&/3TSA* 6(3TOO3L;E*M>J2IOD3A& 2 2(E7N2J*I+MCP3I> 3P;ET7C2J>L7FSE+C3H"I&06IR/7HKE3E& 3SF 7NSO7HKE2 ?C+PCY+OCF3T	H3S& 3N6 3A	CO*M2ISC/FF "0*M2IGT3D& 2 >(3USTE7V6JRI+A
D.(Z7"4662JRI+CCA3OWTM&22/?P7ISN2 ;I+TCO7DKHT*M2IGT3D& 6 SO/EKM2I^/+ECT7ESN+RCY3P	ON7T6JNIZ7A2J*I+MCP7OSU*2>I7OSU2-WD3VOI3E" 3ASN7LKE6 OI2 WR3SSI7ESN"M&J3TSA2 >(3UT+A/N"1*M2IOD3A> 3UWTN	T2/WS7TCU2 ?F3RZ 3EOT3H> 3FR 3E	V+CCE3H;A3DWLR*M2IGT3D& 2 >(3USTE	V2/
R3T	R3EWV6 WO7TWP3TR 3E	V+CCE3F3I3E: 3UKME7R2JNI+DCF"0*M2I	C/FF "0*M2I7J3S& 6 V(S7R.JFI*I>I7FSE+CCH7D[E3IWC2 GH3N3DE7R6JWO3T;ET&,7OSU3H;A"+&12/?L7CSA3I;O2 [O* 623P
A3EF 3RGE2 ?F3R" 3ASN7LKE"M&J*I>I7RCE3LOA+ECD+BCY3H;A3DWL3RV 7NKT7YB 3O;IT*M2I7J3PV 3R3RO	D6/KE7RKO2 ?L3A	D+NCG3H;A3DWLR*M2ISC/FF "0*M2IGT3D> 3UWTN7T6JWO+T222IOD3A& 2 >(3UT3N3DR*M2ISC/FB "M&J7JCM* CI3OWF3TC"M6J6JKE3R?LD6,6JKE.2^1",*M/IGO"0&,7JOM* CI3QWQ3R
R+R>I7EKR+OCR3LGO3D;I3G" 3ASN7LKE"M&J7JCM* CI.(Z7"0656JSO/EKM.,BI2M6J3TOO3L;E6,R-3O3CE7N6JBI3AWG&M*J"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"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