File DELETE.PA (PAL assembler source file)

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

*L*/**B*3D3E3EWT6 KP7OKG+ACM****6 	B2 ?J+HCN7YWO+NCG****\*M6/SS7ASR/E+D*I63*168"766"J6/*J*L.0B0"0*M2I3C7AN +TCL7RKA"M&J3KKS"M&J3USN"M&J3TSA2IWR7SKTT*M6IKSA*M2IGT7D^I3HKOL7K6J^IH7O2J*I+MCP+I:I"+612J&I7NSI"M6J6JWA+X20"I602JWR7SKTT&,..F+"M&J3SGT"M&J3C?LS*M6I
CL7F2J"IL7T"J*M.*B0"2606JWP7TWNM&=7JOM" 	I".*M6IWN7MWOT*M7GSE3N7A2=*I+MCS+I:I"M&J7GSE"0*M3P	R/N7T2I7J+S:I6MBJ3R;I+T20"I602JRIC	A7AU"0*M2IGT3D& 6IWAX602JFIN	D/P^1"7*M2I;SA*M2I7J3P& 6IKP7ISN"0*M2I3TS*M2I3CA*M2I7J7PBI3R;I+T.0"2*M2MNJ3R[L2=*IM	S".*M3C3R+F20"I
02JNIL7A6JRIA	D/PV1"M&J7TOL"M&J3TSA.ION"M&J7TOL"M&J3CGL"M&J7JCM" 	I3C3RF60"J*M/P^7.,^I"7*M/P^1"7&,.1^72M:J.2B4*,6I""6 .JGP"5&,"165.JON*,6I"3*M/P^3.,NI"7*M/PZ7*020.IZ7"0602JWS3G;CT&,"0*M3D3E7FOL.,BI2M:J.2V1*,6I.2V12M:J.2B7*,6I*"67"1*M3E	X3T
F.,BI6MBJ3R;O+U3M"I606JKN3BGRK&,.-:"2MNJ7HKA.,BI2M:J.2B6*,6I""60.J
P.,^I2M:J*120.IF-"0*M3FGLG&,"0*M3BSA3C;O6,NI7YSNA7X2JON3O7MA&,*-2"6MJJ3BGR+C3K6I6"2M:J3BGR+C3K*IJ-"<*M7NKC*,JI.<J-"1652J?C7USN.,BI2MJJ3U[F2,VIN7D6JE7ICTT&,3E	XT*M6MJJ3EKD+L3K*I.."1*M"I60*J6I"1*M2MZJ3IKN+L3K2M>J3PKN+L3K*I.."1*M"I60.JBI"M&J"0*M"I60.JBI6MBJ3
SO+A3T"I602JWS3GGDT&,"0*M6M^J3HKO+L3K*I.."1*M"I60.JBI"M&J"0*M"M2J.*J0"0602J;I+I3T6ISSA*M2I3CO7S6JRIA	D3E	X3T
F"M&J3SGZ2 3CA*M2I7J3P& 6IE7ICTT*M2IWG3TGNM*M6ICO3N3B/KJ+"M&J7JCM6IKP/OCT"M&J3TSA6ICO3N3BK*M6ICOE7N6JNI+ZCA3CGL"M&J7JCM" 	I3N[O7IKE"M&J3TSA2I	F3N3BK*M2I	FN7F6JRIA	D3RSE3B/L"M&J3RSE"M&J3SGZ2 3CA*M2I7J3P& 6IKP3OWTR*M2IGT7DNI3ESGA7T6JRIA	D3S
E7CSN"M&J3DGC2IWS3G;CT*M6IOI3ZRI3E[LL7S6JRIA	D3B[UF*M6IKP7ISN"M&J3C3RF*M2I7J3P&I7NSI"M6J6JKP/OCT2,RIC	A3P?R3N7U"M&J3K[S"M&J7JCM" 	I3S;Y7EKR"M&J3KKR"M&J3DGC2ICA7R6JRIA	D3CGHR*M2IGT3D:I.2B6"M&J3SGP"M&J7JCM" 	I3S;Y7EKR"M&J3ASN.I
P"M&J3DGC6IWAX606JRIA	D3CGHR*M2IGT3D:I7RKBA7K6JNI+NCA3CGL"M&J7JCM6IKP/OGT"M&J3TSA2ICA7R6JRIA	D/N^2"0*M2I7S3AN L7A2J*I+MCP7INI3YWNR7R6JRIA	D3P?R3N7U"M&J3C3L2 GRL*M2I3C7LJ A7L2JNI+LCL3R3A"M&J3TSA6IWAX602J*IM	P3P?RT60"J*M3P?R+T216IOKF*M2I7J3P& 6I	S7NKER*M6IK
B*M2IOD3ANI7HKA"M&J3TSA2ICA7R6JRIA	D3N?C3MGM"M&J3SGN2 3CA*M2I7J7PBI7RSO"2*M2IGT3DNI7HKA"M&J3TSA.IKN"1656JNI+NCA3CGL"M&J7JCM6IKP/OKT"-612J*IM	P3P?RT61"J*M6IOI3ZVI7XSIF7G6JKP/OKT6,RIA	D3O;P3B/L"M&J3OWPN*M6I+S3AN L7A2J*I+MCP3I:I3O	FE7R6JRIA	D3F;I3B/L"M&J3F;I
*M2IGT7DBI3RSOA7T2JFIN	D/PZ7"0602JRIC	A3P?R7DSA"M&J3TSA6IKP7OWNM*M2I;A7DBI"3676JRIA	D3P?R7DSA"M&J3P?RT*M2IGT3DJI3U[F"M&J3P	RN7T6JRIA	D3R7ES7G6JBI3R;IT*M2IGT7DBI3R;OU7M2JFIN	D/P^3"M&J7PSU3N7U"M&J"2*M2IGT3D:I7RKBA7K2JNII7A6JRIL7S2JNI3R[L"M&J7JCM2I;II7T"J*M3
[O7IKE2,:I3O	FL7E6JKP3OWTR&,3P?R3T	V6MNJ3YWN+R3R6I	S3NGTX*M3R7E+S3G6IOM+G67"1*M"M2J.*R0"0606J	S3NGTX&,3CGL"M&J3K[S"M&J7JCM6I	S7NET*M6IKKB*M2IOD3ANI7HKA"M&J3TSA2ICA7R6JRIA	D/NF2"5*M2I;S3AN L7A2J*IM	P3S;Y7ESX"M&J3TSA2ICA7R6JRIA	D3N?C3MGM"M&J3SGZ2 3CA*M2I7J7
NI7YSN+A/X"1*M2I/SP*M3S;Y7ESX2,&IS	Z3E	X3T
F"M&J3TSA6I	S3NWMS*M6IKP7ISN"M&J3C3RF*M2I7J3P& 2I;I7ICTT*M3I	N7TSP2,&I7NSI"M6J6JKP7O[TI&,3TSA6IKP7OOMG*M2I/SP*M3N[O3IWL6,RIA	D3N7OS7G6JKPI&,3DGC2ICA7R6JRIA	D3B[UF*M6IKP7ISN"M&J3TSA2ICA7R6JBI3R;IT*M2IGT7D^I3HKO+L/K"1*M6ISRR*M6ISRR*M6ISRR*M2I;A7DBI"7676JBI3
;TU7M6JNI" 626JRIA	D3N?C3MGM"M&J3CGI"M&J7TOL"M&J3CGL"M&J3TSA2IW3O3B/KF+"M&J3ASN.I
P"7*M6IWP7TWNM*M*ICS"2*M2IGT7DJI3BGRC7K6JRIL7S2JNI3R[L"M&J7JCM" 	I3I	N7TSP"M6J6JE+I3T2I3C3AN L7L6JRIA	D3D3E7FOL"M&J3SGN2 3CA*M2I7J3PVI7XSI"1*M2IGT3DRI3E7LS616JBI3R;IT&I2/R"3EWL3TSE" 6"6JRIA	D3S
E7CSN"M&J7PSU3N7U"M&J3SR " 636JRIA	D3D3E/MKS"M&J3P	RN	T*IJ/2 3B3O/C3S& +NJ "M&J3TSA2IWD3L3FS*M6IWP7TWNM*M*ICS/DN "M&J3TSA2IWD7LOM"3*M6IKP7ISN*I>I2"Z 3IWLS6"6JE/IGT2,NI3R[L"M&J7JCM2IWR7SKT/TF+"M6J2JWD7LOM"1&,3M
S.1F-2MRJ3E7L+S226IOM+G62"1*M3D3E/MOS2,6I/SOG"-616J	S3NWMS&,3M
S.4F-6MBJ3R7O+S3G6IOM+G65"1*M3N7O+S3G6IOM+G66"1*M"M2J.*Z0"0602JWG+T20"I602JNIL7A2J.IS7F2J*I+MCP3IVI7XSIP7T6JRIA	D/NB12I&/3F" 3E& 7NWP+TCS28N 7HKA+SB,+I
T3SF 2 GB3DF R7G2JRIC	A7CWON7T6JRIA	D3B[UF*M2IOD/AFI*0>I7SSE6 CU6 WB3FWF7RB 3O;I7TKE"M&J3DGC2I3FA7G"J*M7GSE"1&,7I+S2I?C7USN"M&J7SCK"M&J7JCM" 	I3BSA3C;O"M&J3KKR"M&J3DGC2ICA7R6JRIA	D3CGHR*M2IGT3D:I3BGRC7K6JNIN7A2J*IM	P7GSE*2>I+ICF+I
T3SF . 2"*"B,7SSE2 T3EZ 3L
A2,F +NCD+GCO3DOE3OWD"M&J3TSA2IONR*M2I;S3AN L7A2J*IM	P7GSE.2J-2I&/3F& 7TN	* CA6<KC*>B,+GCO3DOE3OWD"M&J3TSA2ION3O7MA*M2IGT3DNI7HKA"M&J3SGN2 3CA*M2I7J3P^I/EKT"-616JRIA	D3CGHR*M2IOD3A& .IB1"M&J7JCM2IWGT61"J*M6IOI3ZVI7XSIF7G2J&IS	Z3FGL+G>I7PSU* CA*"J12 ;I2 3F
7G2JWG+T222IOD3A& .IB16IB/+UCT7ZKE+OCS+ICN3TWH2 WR+SCT+OCF3TWH6 WB3FWFR*M6IOI3ZNI3O;UT*M2I7J3P^I/EKT"M&J3TSA6IWBF7F2JRIC	A"1&02/WS7TV 7PR +HCE3B[U7FKE2 ?P7ISN+E3R2 
A3A;I"M&J3TSA" 	I7GSE*0>I7GSE6 WO3TR 7ESS3IGN3T?I+N6 "1*M6IOI3Z^I/ECT2I&/7NKC3EWM+NCT7POA3T& T*M2IOD/AFI*1>I7S[A3E& T*M2I7C3AN +LCL3R3T2IF/+CB="-632JRIC	A7CWON7T"J*M7GSE"3&,3TSA" 	I"1&02/WG3TF 2 CA7R6JNIZ	A2IR/+O
N7TR 3AWK. R220Z 3R7O" 606JRIA	D/NR2"0*M2I;A7DBI"7&72/S3AWV2 [O3FV 3XWCS7S2JNI+LCL3R3T"M&J3R3T"M&J3R3T*I>I7PSU2 ;I2 WL+FCT7BSY+E" 3CGH/RF 6 OI2 ?N7WB 3A/C+E	D"M&J3DGC2ICA	R2/GS+VCE2(WT+M	P"M&J3TSA" 	I"1&02/WG3T: 7ESX2 CA7R6JNIZ7A6JRIA	D/NR2*0>I3D;O*	CT3T/
/EJ *4B03F?R/MB "M&J3ASN.I
P*7>I7S[A3E> +FCF7GKA3B
AE*M2IGT3DNI7HKA2I^/+ECT3CGHR612JRI+CCA/IFI*1>I3S?T+RCE62B 3A/C+ECD3CGHR7S2J&IS	Z7CWON	T2/?D6 SI* B33T7IE7S2J*IM	P7GSE"3*M2IGT3DZI3L
A2I^/+ECT3FGLG*M2IGT3D^I/ECT2IF/+DCD+TCO7RSE3U;R2 SA3DWRS7S2JRIC	A7GSE*0>I7S[A3E& T*M2I7J3P& 2IWGT&02/?G6 
A+A;Y*.:."M6J*J*L.1B0"0*M2/?C3M	B7NSA3I;O2 OO3T3A2-WD3C7I+ACL7OSU7PSU2 ?R3U	TN7E2JV/3NWTR&:3TSA2IGV3LWU*M>J2I7J3S:I3U?MU7T"J&/3SR " 63"J&/7RSE3U;R*M>J*M>J*M>J3S6I3E;A7SR 7ON 7UCP7ROE3S2 3ESA3I
N2 WZ7ROO*M>J3D6I3E;A7SR 3O> 7UCT+UCT+ICN3DOE3IGML*M"/&33D
I7IOT2 ?T6 WO7TWP+TB,61R /OR 2 	D7GSIS*M"/*M"/*M6MNJ.=RI.0B02MRJ.=JI.0B0"M6J6JWN7MWOT&,"0*M2IOD3A:IU7M6JRI+ACD3I:I3U?MU7T2JNI+LCL3R3A*I>I7OSC+ACL+OCR3DOE3IGM3L> 7UCT/U?T"M&J3SGP2 3CA*M2IGT3DRI3E?CC	T2/WD3C7IA7L6JRIA	D7OSC7PSN2I>/3CGTL*M2IOD7ANI7TCKN	T6/WP
T& 3T& 7NN 3TOA7KB 3O;I7TKE"M&J3TSA6IWN/MZ2"0*M2IOD3ARI3AGT"+616JRIA	D3N7U.2B6"M&J3DGC2IGD+T/A"2*M2IGT3D:I/UKM"6602JRIC	A7DSA/AN+"M6J6JRIA	D7DSA7PSN"M&J3DGC2IGDT	A2/WS3TR 3AGT2 ?P7ISNE7R2JNI+MCA3C3L6 SRL*M2IOD3ANI3O;U+T>I7SSE6 CU6 OI3Z2 7OCO"M&J3TSA6IWN+M
I7GSE3ET6 WO3T: 3UKME7R6JWN3M?LP&,3C3L"M&J3TSA" 	I3S/T7PSN6IR/3AWK6 
A+ACY3V3AU7E6JNIN7L2J*IM	P..N+2I&/3F: +E3G2 C3A
N7ER 7OB 3OWW/RF-"M&J7I+S" 	I7DSA+A>I3T/A+ECN3AGW7YZ +A3L2 ;I3CWR2 GV3LWU"M&J7JCM6IWN3M?L+P>I3T/A3EF 7W	A2 ?MR7E2JRIC	A3N7U6I^/7ER 3O/O2 ?T3O6 3UC"M&J3TSA" 	I3S/T7PSN2IF/+DCD3TGH7TZ 7AWL3EJ 3A/C"M&J3CGI"M&J3TSA6IWNM*M6IOI3ZRI3AGT2I&/7NKC3ER 3AGT2 ?T2 WN+X
T3CGHR*M6IOI7ZNI7TCKN	T2/;I3CWR6 SS3K;P7TR 3O: 7ESX2 GV3LWU"M&J7I+S2I?C7USN2IF/+RCE+WCE3D;OE6?2J*IM	P3N7U7LCO2I:/3OWP2,^ 3OGW3NJ 3A/C"!*M2IGT7DBI.4Z2*0>I3T	H3S& 3SF 2 WZ+R3O6 WB3T& 3T& S*M2IOD3ARI3AGT"+&42/WN7GSA3IWV2,& 3N	D7CSA+ECS3ESN2 [O6 SS3A/C"M6J6JR
+ACD3I:I3U?MU	T6/KA7E^ 7ER 7ON 7UCP7ROES*M2I7S3AN L	A2I2/3ESA3I
N2 WZ7ROO"?*M2I7J3P:I7UCMU	T2/?N2,^ 3O> 7UCTU7T6JRIA	D7DSA7PSN"M&J3DGC2IGDT7A2JNI+MCA3C3L6 SRL*M2IOD3ANI3O;UT*M3N7U7SCU6,RIA	D3N7U.2B6"M&J3CGI"M&J3TSA" 	I7DSA+A>I+ICF3T	H3S& 3SF 2 WZR7O6JNI+ZCA3CGL*I>I7PSU* CA3SGP+CCE7HKEE*M2I7J3P:I7UCMU	T2/[I2 ?N+TB,3D;O
	CT7SCU3PWR+SCS7A	N7MKOE*M2IGT3D:I/UKM"4602JRI+CCA3IRI3AGT"M&J7I+S2IGDT7A2J&IS	Z7CWON	T2/[I2 T+ICS+ICS3A3L2 WZ+RCO3N7U7BKE"M&J7JCM6IWN7MWS+P>I3D;O*	CT7SCU3PWR+SCS3TWH2 GL+SCT3OWN"M6J6JWN7MWPT&,3TSA" 	I3N7U7OSU2IZ/7IWG+RCE3N7U7BKE"M&J3ASN6IWNM&72/[O2 C7AOR
 ?T6 WO7TWPT*M2I	CA*M2IGT3D>I7UCTN7T2JRIC	A"1676JRI+ACD/IFI"7*M2I3TS*M2I7S3AN L7A2J*IM	P..N-"M&J7I+S6IWN7MWOT*M2I7J3P& 6IWN7MWOT*M*M>J7HKE3E& 3SF +LCL3TWH2 GD+TCA3NWE3DSE2 ?F7RR +HCE7RWO3T;IE*M2M:J/UKM*620.IB"2M:J/UKM*420*IB"6MBJ.4Z2"0&,.4Z2"0*M3N7U"7&,"7
M3S/T7PSN.,BI2M:J+U3M"I602JWD3COOT&,3DOE3S/T2-OO7TSSK*M7OSC7PSN2,>I7COTT7K2JWD3C7IA*M3DOE3S/T*,6I.1B0*0>I.-B1*0B03DOE3IGML*M.IF-"0&0./F-*0B03DOE3IGML*M.IF-*0>I.-B12 WD3C7IA7L2JOO3T3A2M>J7COT+T3K.IF-.0B0*I6/.1B020> 3CGTL*M.IF-"0&0./F-*0B07OSCA7L*J6I"1&0./F
20> 3CGTL*M2MRJ7ACT+N3T*I.."2*M7DSAA&,..F+"M&J*0>I3T?H3UGS7NOD"M&J*0>I3H;U3DWRD7S.JBI6IR/7EON"M&J*0>I3OWN/SR+.0B02M>J7UCT+N3T*I6."1*M"M2J"M6J6JOM+G212IR"2;V"2;2"2;V"6;R"2;V"2;R"*;B"";60"J*M3M
S"2&,.". ."/B."/L."/O."/C."/K."/S.". ."/I."/N.". "0*M2M6J/SOG*,JI* J;+FJ;+IJ;+LJ;+EJ;/SB;"M6J6JOM+G24.I>"6;N"6;&"2;:"6;R"2;F"6;""*;B"2;V"6;J"6;J"2;>"6;J"";60"J*M3M
S"5&,.". ."/I."/S.". ."/P."/R."/O."/T."/E."/C."/T."/E."/D.". ."/O."/N.". ."/D."/S."/K.".:."/["0*M2M6J/S[G*,JI* J;+NJ;+OJ;+TJ;* J;+FJ;+OJ;+UJ;+NJ;+DJ;* J;+OJ;+NJ;* J;+DJ;+SJ;+KJ;*:J;/[B;"M6J6JOM+G27*IB"6;J"2;V"6;B"6;J"2;>"6;R"2;V"2;N"6;R"2;V"2;R"*;B"6;R"2;
"*;B".;2"";60"J*M2MVJ/N7D"I&.2/	F3L;E3AWM6 WB3FWFR*M*MRJ"$6$"JBLBBZ

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