File RAMCOR.MA (MACREL macro assembler source file)

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

"M6J2JNL3LGE3R*=+MCS/IR "3*M7SSE2=7J3S& . R46MJJ7EKF/S7H7JOM* CI"465"J*M/R7F"2*M/C7L"4602J
T.=B1"0*M/R7W"2606JKT.=B1"0606JWM/XR=6M^J/EF="0*M/F7Q.2B02MNJ/SR="0602J	D"=612JWF.=B2"060"J*M.*B46MJJ3A3M+I3C"I602JGR3BOI.,BI6MJJ3A[M+E3P"I606JKS7CKL6MNJ3RWST*M3S[R3RS"M6J"J*M.*B1"060"J*M6MJJ7AOM+T3R2I	LN7E6JRID	C2I>/+LCD+OCR7N
E*(CO+OCRN6).JRI.3^1"M&J.4F3"4*M.IN4"064.JRI.2B4"M&J.4F3"7*M.IN4"262.JRI.2B4"M&J.4F3"6*M.IN4"065.JNI"2672J2I3IWN"M6J6JJI3TCA7R2JNI3HOEK*M.IF3"7*M2I7J7PJ 3AGML7T"J*M2I?M3S
TO*M"M6J"J*M"M6J2JV/3I3N3EWS7NZ +OCN7SSE3BOA3K6 2 ;U3D: 6 *(3E3I+ECN+UB.3SGP3LWTN6)2JV/3I3N3EWS7NZ +OCN3D3E+ACY2(?L3WF 2." 3IG")*M2/	E3NWL3S;E2 ?V3MJ 3I7T7USS+ECR3USN6 WA7SKD3U/C"M6J2JGR3MWNU&,3TSA2 GR7MKTN*M2I	CA*M2IGIC*M2IOD7AJ 7ASMR7N6JRI+ACD3R7A3T7R"M
J3CGI"M&J3IOA"M&J3DGC2 GR7MKTM*M6MJJ3AKM+I3T2I	LN	E2IJ/3I7T7USS/E+R"M&J3TOD"M&J.4B3"2*M.IN4"161.JRI.3R2"M&J.4F3"5*M.IN4"265.JRI.3N2"M&J.4J3"4*M.IN4"065.JNI"2622J2I3IWN"M6J2JGR3M;I2,NIL	A2IV/3I3N3EWS3NR +ECS7BSI7MOU7TKES*M2IGT7DJ 3A	BP*M2IOD7AJ 3A	BC*M2IGT
DJ 3A7MN642JRI+CCA3R7A3C;T"M&J3TSA2 GR3M;M"4*M2IOD7AJ 3AOMT7M"J*M3R7A3RSE6,JI3CGHR*M2IGT7DJ /MKN"6602JRI+CCA7IJ 3A	BC*M2IGT3D& 2 GR3BOI"M&J3TSA2 ;R.2B6"M&J3TCA7R2J&I+SCZ3RKAI7C2J&I+SCZ3R7A3C;T"M&J7JCM2 GR3MWRD*M"M&J3L;IE*M2IGT7DJ 3A7MN642JRI+CCA3R7A3C;T"M
J7I+S2 GR7MSCM*M2I7J7PJ 7AKME7D"J*M2I	LN7E2J2I3IWN"M6J"J*M"M6J"J*M*M>J3I	N3T3A3I	S7EWR+NCG3USN2 WU7BKE3SC3R[IT*M6MJJ3AGM+L3T2I3TS*M2I3C3A& A7C2JRI+CCA3R7A3F
L"M&J3TSA2 GR7BCI"M&J3DGC2 GR3BOI"M&J3TSA2 GR/MGN"6*M2IOD7AJ 3AOMT7R6JRI+ACD3R7A7LCI"M&J3DGC2 GR3M	LC*M2IOD3A& 2 GR3M	LC*M6IOI7ZJ 3A3MI7C2J&I+SCZ3R7A7CKT"M&J7JCM* 6."3*M"M&J3TSA2 GR3MWFL*M2IOD7AJ 3A[ME7P6JRI+ACD3R7A/NZ1"M&J3DGC6 CL7CSN"M&J3DGC2 GR3MWFC*M2
OD7AJ 7AOMT7A"J*M"M&J3L;IE&I2/WU7BKE3SC3R[IT*M2ISTC*M.IN4"262.JRI.3F0"M&J.4F3"5*M.IJ4"460.JRI.3Z1"M&J.4J3"2*M.IJ4"762.JJI"460"J*M6ISR3CGHR&I6/KW3IWT2 ?C3MWMN7T2JNI3HOEK*M.IF2"2&I2/;E3D> 3FN 3O7M7ESN"M&J7SCK"M&J7JCM* 6."4*M"M&J3L;IE*M2I7J7SN 3UWR"M6J6JJI3C
HR*M2IC3E/C"M&J.3F3"M&J7JCM2 GR3M	AN*M2I7J7PJ 7AOMT7R"J*M6MJJ/MKN*620.IJ-"6602J;R.2B6.,JI"6602JGR/MGN"6&,.-B26MJJ3AOM+T3R"I60"J*M"L*M6MBJ3AWG"M6J"J*M"M6J2J&/7NSI3A	L3SWI3R;U3GR +ECR3SWT7UKE3S
I3N3AE*M6MJJ3AGM+I3N2I3CA*M2IGT7DJ 3A7MN642JRI+CCA3R7A3C;T"M&J3TSA2 GR3M;M"4*M2IOD7AJ 3AOMT7M6JRI+ACD3R7A7LCI"M&J3DGC2 GR3M	LC*M2IGT7DJ 3A;M"1662JRI+CCA3LOPN7T6JRI+ACD3RKAI7P2JRI+CCA3RKAI7C"J*M"M6J2J&/7NSI3I3A3I	S7EWR+NCG7DOE2 3C3O/C2 ;E3A3B7EJ 3E	G3SWTR7
"J*M2I3C3AN M7A2JNI3LWZ"I*M2I3CA*M2IGT3DJ 3U[FE7R2JNII7A2JNI3LKA"M&J3CGL"M&J3TSA2 ;E3A3BE&I2/;E3A3B7EJ 3E3A2 	T+MCE3C?LC7K2JNI3LWO"M6J6JNIE	T"M&J+CCS+FCQ+CCL+RCW+WCE7MU2 [R" *M2I3C7EKA"M&J+CCL+TCG+FCQ+FCET7R6JNIE7T2JNIL*M"M&J7JOM2 GR3M?CR&I2/SA7ROE3S;E2 W
3ROE3HWNN*M3R7A3SGT.,BI"M6J"J*M"M6J"J*M*M>J3Z	W3SC7EON3P	E3CWH3RV 7ION7CKH3EKIE7N"J*M3R7A7ZCS2,NI3LGER*M6IKT"M&J3CGL"M&J3TSA* CI3R7A3LOI*I>I7AKD7EOS+ECN3E;I3SC3R	E3B;E"M&J.6F5"6*M2I7CA*M.IV6"1652JNIL7A"J*M2I?NP*M"M&J3CWLA7R2JRII*M2IGT3D& 2 GR3BOI"M&J.6B5"
*M6IOI7ZJ 3A3MI7C2J&I+SCZ3RKAI7C"J*M2I?NP*M"M&J3CWLA7R2JNIS*M2I3C7EKA"M&JW7E6JNIE7T2JNIS*M2IWST*M2IWW"M&J7SSE"M&JT7R2J&I+SCZ3LOPN7T2J*I+MCP3R7A7ZCS"M6J"J*M"M6J"J*M*M>J7HKA3DGW+RCE7TOET*M"M&J.6B5"4*M2I7SA&I6I*/7WOI3CWH7NCS3EOI+ECR3V3OL*M2I?M3S
TO*M2I3CA*M"M&J7NCO"M6J"J*M"M6J"J*M"M6J"J*M"M6J"J*M"M6J2JV/7ION7CKH3EKI+ECN+ICN7DOA2 .43R7A"M6J2JNI3LGER6I2JNI7LJ 3W6 U7X2JNI3LGER*M6IOC"M&J7SSE"M&JC7L6JNIE7T6JRIG*M"M&J7NCO"M6J.JZI.5R0"M&J3SGM"I&I./Z12 	B3T& +NCS64KK+ACM3E;I3G3E3EWSN6?2J*I+MCP..J-"M6J2J:
O7P"J*M"M6J"J*M*M>J7AOU7LOE+ECN7AOU2 WD/MR 3KGRM*M"M&J3CWLA7R6JRI3GN L*M2IWST*M6I
R2 3C"M&J7SSE"M&JF7Q2JNI3LGER*M6IGF"M&J7SSE"M&JF7E2J*I+MCP+I: "+612J:I7ESXP7A"J*M3LOP+N3T"I602J;E3A3BE&,.5B6"0*M3B[U7FKE.,NI.7B2"M6J"J*M3P
AE*M"M6J"J*M"M6J"J*M2/WF3HWL7RKE3K;E3N;U+GB:7VKE3GWL3IC6 
Z3IOS3H;E2 	E3NWG7LOE3EWN7MV N7D2JF/3U
S3EWL3S;E+ECM7BSI7MOU7TKE"M6J"J*M7NE3TGP6,NIE7T6JRIG*M6MJJ3A[M+I3N.IV6"0&4*I>I3FV 3I3N3EWSN*M2I;A3D6 .2B0"0*M2I;S3AN L7A2J*I+MCP3R7A7O	K*I>I3K	E3NZ 3E3HE7R"J*M2I?NP*M"M&J.6F5"4*M2I7CA*M2IOD3A& 2 GR3MWFP*M6IOI7ZJ 3A[ME7P"J*M2I?NP*M"M&J.6J5"4*M2I7CA*M2IOD3A
 2 GR3MWFP*M6IOI7ZJ 3A[ME7P"J*M6IOI7ZJ 3A[ME7C6JRI+ACD3R7A3FOE"M&J3DGC2 WF3LGZL*M2IGT3DZ 7E+LA7L6JRI+ACD/MKN"060"J*M2I?NP*M"M&J3SGN2 3CA*M2I7J7PJ 3ASME7F"J*M.IV6"0646JNI+PCA3CGL"M&J7JCM6 OT3T;ED*M"M&J7SSE"M&JF7Q2JNI3LGER*M6IGF"M&J7JCM2 GR3M	FN*M6MJJ3A?M+K
Y2I?NP*M"M&J.6B5"4*M2I7S3AN L7A2J*I+MCP3R7A3F;I"M6J"J*M"M6J"J*M2/.43R7A2 WG7TOE7TSE"M6J6JOT3T;ED&,7SSE"M&JF7Q"J*M2I3C7EKA"M&JF7Q"J*M2I3C7EKA"M&JF7E"J*M2I3CA*M2IGT7DJ 7AOMT7A2J&IA7C"J*M2I?NP*M"M&J3SGZ2 3CA*M2I7J7PJ 3AGMI7N2J*I+MCP+I: "+612JZI3E3HI7S"J*M3P
AE*M"M6J"J*M*M>J7AOU7DWR+CCK7DKE2 WF3HWL7RV +NCD3FE7LKE3H[A3T;E2 SA7ROE3S;E"M6J"J*M3FE7LOI2,2I3IWN"M6J6JRID	C2IZ/3E3H3EGR3NGZH7L.JRI.3Z0"M&J.4B3"5*M.IN4"160.JRI.3R1"M&J.4B3"5*M.IN4"262.JRI.3F0"M&J.4F3"6*M.IN4"362.JRI.3F0"M&J.4F3"0*M.IN4"164.JJI"4602JNI+IC
"2602J*I+MCS7D+E7OSU*I>I7AOU7DWR+CCK7D+E3IGM3LZ 3E3H3EGR3NGZH7L6JJI3A[ME7C6JNI3T3EE642J2I3IWN"M6J6JRI+ACD3R7A3FOE"M&J3SGN"M&J7JCM2 GR7MSSR*M"M6J6JRID	C2IF/3USS3ROU/K>?"?*M.IN4"061.JRI.3V2"M&J.4J3"3*M.IN4"064.JRI.3J2"M&J.4J3"5*M.IN4"063.JRI.3N1"M&J.4^2"7*M
IJ4"767.JJI"767"J*M2I3CA*M6ISR3CGHR*M2IC3E/C"M&J.3F3*I>I7YOE"M&J7SCK"M&J7JCM2 GR7MSSR*M"M6J2J2I3IWN"M&J3CGL"M&J3TSA2 GR3MWFC*M2I	CA*M2IOD7AJ 3A[ME7C6JRI+ACD3R7A3F3E"M&J3DGC2 GR3MWFP*M"M&J3TOD"M&J.4J3"3*M.IN4"260.JRI.3F0"M&J.4F3"4*M.IN4"264.JRI.3V0"M&J.4R2
0*M.IJ4"460.JRI.3J3"M&J.4B3"5*M.IN4"161.JRI.3R1"M&J.4B3"5*M.IJ4"460.JRI.3J2"M&J.4B3"1*M.IF3"5*M"M&J3L;IE*M2MZJ3E3LP&,3TSA* CI3R7A7FCE"M6J2J*I+MCS7GSEZ7S6JNI3P3AT7E6J*I3E3IE*M"M&J3C[I. B2"M6J2J*I+MCS7D+E7OSU2IF/3USS3ROU3KR 3E	Z3M3A6 CS7ASLE*M6ICS7ASLE*M6IS
3EWL"1*M"M&J3C[I. B2"M6J2J*I+MCS7D+E7OSU2IF/3USS3ROU3KR 3E	Z3M3A2 WZ3IWL"M&J3Z	EL7E6JNI3T3EE62"J*M7NCR+R3T6IOI7ZJ 3A[ME7P"J*M2I3CA*M2IGT3D6 /NJ1"M&J3DGC2 GR/MGC"2*M2IOD7AJ 3A;MR*M3R7A7OSU6,RI+ACD7IJ 3A[ME7P6JJIA7L2JRI+CCA7IJ 3A[ME7P2J&I+SCZ3R7AN7R6JNIN7L2
*I+MCP3R7A7NSO"M6J2JNI+ICF"2602J*I+MCS7D+E7OSU2IF/3USS3ROU3KR 3E	Z3M3A2 GR3M: R*M2IGR7MKN"M&J3SWT/LOE"M6J"J*M3R7A7NSO2,&I+SCZ3R7A/CJ1"M&J7JCM2 GR7MWOT*M"M&J3L;IE*M6IOI7ZJ 3A[ME7P2J&I+SCZ3R7A3FOE"M&J7JCM2 WF7LCL"M6J2J*I+MCP3R7A7SKT"M6J"J*M"M6J"J*M2M6J/NB2"
&,.-B2"0*M/MB2*020.IB2"0602JGR3MWFC&,.0B;6MNJ3T3E+E21"I&76IN/3T3E3L;E7A+N3A3H2 WZ3IWL6MNJ3T3E+E22.IB1*I>I3SWT3LWL3N;A3ZA7LN 3P3AT7E6JSS3EWL"3&,"5&I6/SS3E3L3EGN3NGZ+HCL3R7A6 KN6MNJ3T3E+E24"I&76IN/3T3E3L;E7A+N3A3H2 WF3HWL3R;A3ZAL*M3R7A+N3R.I.0"0*M3R7A/CJ1.,
I2M6J/NJ1*,6I"1646JCS7ASLE&,.0B;6M*J3E3IE&,.0B;"M6J"J*M3P
AE*M"M6J6JJ/+ACM3D[E7ESK"M6J2JGR3MWDF&,3L;IE*M2ISTC&I2/WM+HCR7AOL. ^127Z 3E3HE7R.JRI.3J2"M&J.4B3"1*M.IN4"165.JRI.2B4"M&J.4B3"4*M.IN4"065.JNI"0662J2I3IWN"M&J3CGL"M&J3TSA2 GR3MWFL*M2IOD7AJ 3A[ME7P2JNIM7A2JRI+CCA3R7A3FOE"M&J7JCM6 KN7PSR"M6J"J*M"M6J"J6L"J*M3P
AE*M"M6J"J*M"I&I6/WS3B?R3U	T+NCE7ZKU2 WB3ROE7HWN+NCG7DKE2 SA7ROE3S;E"M&J*I>I21F./R+G6 SS3ASN2 WD3R2 7E+T3T;E2 WB3ROE3HWN3T;E2 SA7ROES7E"J*M"M6J"J*M3R7A7CKO.,BI"I*M2IGCM*M2IGT3D& 2 GR3M?CR*M2IOD7AJ 3A?ML7D6JRI+ACD3R7A3F
L"M&J3SGZ2 3CA&I2/GF/LGL6:^ 3E;N2 OA.=B/2;GD+NCN21R.3UOR3HGGN7G2J*I+MCP3R7A3IOA"M6J2J:IO7P"J*M2IGT7DJ 3A?ML7D2JFI+NCD/R
M"7*M2IGT7DJ 3A;M"7&72/GF/LKL2:WW+NCN/A7C20R;3A;N. N62 WZ3IWLN*M2I;S3AN L7A2J*I+MCP3R7A7N
E"M6J2J:IO7P"J*M2IGT7DJ 3A?ML7D2JJIS7W6JRI+ACD3R7A/MON2IF/3LWT3S6 *-B43B	E3BE7ASLE7N2JJIS7W6JRI+ACD3R7A3T;R6IZ/7EOR3C	H7EWB+NCG3V;O" 7N2J*I+MCP3R7A3IOA"M6J2JGR3MWNW&,7NCO"M6J6JRI+ACD3R7A3OSL"M&J7B
S"M&J3TSA2 GR7MKT+M>I7VKE3SC3IKE3U
N2 ?V3N6 "M&J7B
S"M&J3ASN2 7R.7B7*0>I/NB="M6J2JGR3MGIC&,7NCO"M6J2J6IQ7L6JRI+ACD3R7A7LCI"M&J3DGC2 GR3M	LC*M3R7A3H;G2,6IQ7A"J*M3R7A+H3G2I?NP*M"M&J3DGC* CI3R7A3LOI"M&J3TSA* CI3R7A3LOI"M&J3IOA"M&J7I+S2 GR3M	LC*M6IOI7ZJ 3AOMT7N2J*I+MCP3R7AH7G"J*M2I?NP*M"M&J3CGL"M&J3TSA2 GR3M;
"4*M2IOD7AJ 3AOMT7N2JRI+CCA3R7A3F
L"M&J3MGQ"M&J7B
S"M&J3IOA"M&J7B
S"M&J3M3Q"M&J7I+S2 GR7MSCM*M2I7J7PJ 3AMG7N"J*M2I?NP*M"M&J3CGL"M&J3TSA2 GR3M;M"4*M2IOD7AJ 3AOMT7M2JNIM7A6JRI+ACD3R7A3LOI"M&J3DGC2 GR3M	LC*M"M&J7NCO"M6J6JRI+ACD7IJ 3A3MI7C2JRI+CCA7IJ 3AOMO7R2J&I+SCZ3R7A7CKO"M6J6JRI+ACD3R7A7LCI"M&J3DGC2 GR3M	LC*M2I7J3P& 2 GR
M?CR*M3R7A3OSL.,BI6MJJ3A[M+L3G"I602J7R*727.I^76MJJ3A;M*727.I^-"7*M3R7A/MON*,6I"3*M3R7A/MSN*,6I"4*M3R7A3T;R.,BI6MJJ7ASM+R3M"I602J7R.7B7"0&,.7B7"0*M3R7A7LCI6,JI3A3MI7S2JGR3M	LS&,3Z3B3O/C. B26MJJ3AOM+T3N"I602JGR7MSCM&,"0*M3RKA+I3P2IGR3B3II*M3RKA3I	L6,*I3B?L+
CK"2602JWF3LGZL&,"0*M6MBJ3AWG"M6J"J*M"M6J"J*M"M&J"I&I6/WS3B?R3U	T+NCE3R[E7ROEH*M3S[R3RS.,BI"M&J3DGC2 GS3VGEC*M6IGMA*M2IOD7AN 3AWVM7Q2JNI3LGS"M&J3CGL"M&J3TSA. SZ"0*M2IOD7AJ 7ESCR*M2I7CA*M2I;A3D: "2*M.IV6"0662J&I+SCZ3ROET7R2J*I+MCP..F-"M&J.6B5"5*M2I3CA*M2IG
7DN 3AWVM7Q2J6IQ7L6JRI+ACD7S[A3EOA"M&J7JCM* CI3S[R3RS"M6J"J&I*I>I3SKU7RWO3T;I3E2 7OOE3CWH3NR 2.N 7OSN3R3O3S
I3N3AS*M6MNJ3R3CR&,"0*M2I3CA*M2IGT3D& 6 KS7CKL"M&J.6B5"6*M6IOI7ZN 3R3CR*M2I3CA*M"M&J7NCO"M6J2J*I+MCP7IN 3R3CR*M"M6J"J*M"M&J"I&I6/WS3B?R3U	T+NCE7SSE3Z;E* ;D2 ?C7NKT7OOL3I;G7AOL"M6J6JKS7SSE.,BI"M&J3CGL"M&J3TSA* CI7SORE7T.JZI.5V0"M&J7I+S6 KS7SSE"M&J3CGL"M6J2
:IO7P"J*M2I7J3P& 6 KS7SSE"M6J6JWS+R3E"I&02IF/+RCE7YWO6 WSR7E6JRID7C.JRI.3F0"M&J.4J3"2*M.IN4"065.JRI.2B4"M&J.4N3"1*M.IN4"167.JRI.3V2"M&J.4R2"0*M.IN4"263.JRI.3V2"M&J.4J3"2*M.IB3"5*M2I7J3P& 6 WSR7E"J*M*M>J7GSE6 WN3MWB3R& 3NF C*M2/7J3S^ 7E+TS*M2/WZ3IWL3NSA7RO
S*M6/CS7ASL3EGN3DWRS7S"J*M7GSE+Z3S"I602JRI+CCA7GSE3T7E"M&J3TSA* CI7GSEZ7S2JRI+CCA7GSEP612J&I+SCZ7GSEZ7S"J*M2IGT3D& 2 WG7TOZ"M&J3DGC2 WG/TKP"M&J7I+S2 WG7TOZ"M6J6JNI3WKA"M&J3TSA2 WG3TWTM*M6IOLR*M"I662JRI+CCA3I^ 7ECT"1*M2IOAL*M6IOBW*M2IOD3A& 2 WG/TKP"M&J7JCM
 CI7GSEZ7S"J*M7GSE3T7E.,BI2M^J7ECT"1&,"0*M7GSE+P22"I60"J*M"M6J2JGS3VGEC&,"0*M7S[A7EGM.,BI6M*J*420.IF-"5*M3ROE+T3R"I60.JKN.,JI"M6J"J*M3P
AE*M6MJJ3A[M+E3L2IGR3MWFA*M3R7A3FGE6,*I3B?L+CCK.3Z7"M2J"M6J"J*M"M6J"J*M"M6J2J	F3ESL" 62.JF*.0B0"M6J2J;E/T7F7JOM* CI"7*M*M>J3C[I. B2*M>J7JOM2 WD7ZWOT*M2/SA+RB.7DKE2 ?D3PWP3LWG7NWA+ECN3ZA3L& 3NZ 3ESL" 602JF/3NGZ+HCL3A3L+ECR3SWT3LWLN*M"M6J2JWD7ZWOT&,"0*M6I
SA7B2JNIL7A"J*M2ISRF*M2IGT3DN 3H	FE7D2JRI+CCA3E	XT61"J*M2IGIC*M2IOD/AV "6*M2IOD/AV "5*M2IGT3D& 2 WD7ZWOT*M2IOD3AR 7ECZ"1*M6IOI3ZR 3E?ZU7T"J*M2IGT3D& 2 WD7ZWOT*M2IOD3AR 7ESZE7M6JRI+ACD3IR 7ESZE7M2JRI+CCA"5672J&I+SCZ7D+E7OSU"M&J3DGC. B6"M6J2JNI+ACM3DSA2MRJ7
CZ"1&,"0*M2ISC/FJ "0*M6I
SP*M6IODT*M.IV4"M&J3CGL"M&J3TSA. J("7*M2IOD/AR "4*M"M&J7ESNF*M2I;FO7R2JZI7OSU"M&J7FET*M2MVJ7XSI"1&,"0*M2I7J3P& 2 WD7ZWOT*M"M6J2JWD3ZWTM&,"0*M3C[H3ISE2,NI+DCF3C[I" 60BJBZ

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