File LHP.SV (save files (Executable program)

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

?>2CL"FH
]?5EDITSV]?6LIB0RL]?LIB12RL
;?3INHALT44FT?>CFSORTFTF,?9FSORT1FTF,?
FSORT2FTF,?]RASCIFTF,?4WASCIFTF,?3NUMMERFTF,?0CTRLFTF,?3D4095FTF,?6FSORT1RLF,?6FSORT2RLF,?6RASCIRLF,?>WASCIRLF,?=NUMMERRLF,?<CTRLRLF,?=D4095RLF,?=FSORT****************"**MC*MC*M7CBI3R
O3R7A3MV 3R	M3TWT+LCT7AOU2 	E3N7E6 N.3VZ-3IWL2 ?F3LWG3NWD2 GD3T;E":*MC&I3SGT+R7T7AKD7EOS7EV +NCD2-WFL7D"J	C2I;A3ZA3LR +ECR7CKO7EN 3E7G7ESNE*MC&I3A[N3A
N3SSA7ROE3S;E2 WD3RN 3OWR2 WS3GWM3NWT2 ;U+D6 3F3E7DKE2MNJ2IFI3NGG$GPH^ <B,F>>G2I<<?4JF2J%LI,)X)2LIJYC2C-EB2I2B,
D02I2B,$D=P%2I,%P)2I,)2I2B,1DL2I2B,6DA2I2B,;D[GE>G!6AB$BJBM>E?AC^C
BB44B(?1= H?YIKKS?UJ=F?4ZK	?0DD?:F ?<=VGPUF-LAKLB0 B>">&F;"?M/G	<%E[DDGD)=?<!I?OIOERXGHG8F8F8DBJUZRJJ0\J5>(0Y8 [J.VETB&D*DLB-B1B6DAD=EVEVEVEVEVEVEV0Q*FHG0V:  T0Y*F;Z*F0I*F0N*+==K->(*=S-+ K)*+6:*F69+EK-8 [.*F6Y*?6Z9HK,2I	([.K-8!9HK*ZR2IK.<X+Z8F8F8F<HNR^R: 
-[-+EK-K.9HK*2I	(K+*+G	BMAB EZ8-=Q*TTU&T]D C7
=]$&,\HBYS-S>OC?2ANW>(+V2B2I&X+VB  T2ANY>(+V2BHGB2I&Z+V*JARFFAQF);0&660Z0V0L [N2A^W^Y  A61/?HGR<*6K>9A8A<P*89DK=66K<>(8 Z<*J??JI0\XG0ZHGK;> MHGK:> +K;&MHG*JHG0!+O0&:/MM*J [AK2IBAQRSTUVWXYZC G]BPO3456789:=LE?^
M*]V-./012ADJI[<F!"$%&	();N\HK>=3=656BJ5NBFFA???? ERROR AT LOC G>JKZP8NLZXRL:0NLXHRL8[!LH8D<XS!9HZALHZBLHZPLHZXJ["2IO"8J8J8JPO"PS"*(JP8J8JJK?["JX8F8DZXJXJS"*8K>XG	=;&	=K!>(+]  K8DBJJTP/JC<<(*2K;=HK:K9 [T/P []2C.M0!+  ]["O"<X+/8J8J8JC22I/	?A-K>I]Y\H5Y]B A?
?EMBM?<ZAJFZK8NGRGZRNGRGZ)8N)"W  GZ)K?ZC9DZJA9DZA<XJ)JRC*[.WJX$IVZ=*/RB8!ZAJ)Z28N*R*Z9N*R*ZF8NF<(.&=+ARB8!9DRC=+A9HZDJD8!ZFJC8 ZCJCZEZJAJFRC<H+"9P=H9ZAJ8DZJA9D<P+QJD+R:JB8H:ZBJ<X8!  I:S-S-REJA=HJD<H9HRE+6  M$SQ++;+)?4JZD8NARAZKNARAZQ8NQ=H8!  ^>DRRRR  
 [AK2IH	;(  IZQ2I
?
>
=JQ  NHAZ0J0=H8 ^1;$J3XHJ2Z>8LHC<>(+HLH[[LHZ*8 Z/LH[
LHZ)LHZ+LHZ,J2[LHZ-HH8AZ3R/+
: 8N*< 	38N)K;Z.8J+^-R-J0?HJ.9DJ.J,^-;VJ2[18.3HW0V0Q+6:/4??ARQP$GPH^ <B,F>>G2A<<?4JF2J%LI,)X)2LIJYC2C-EB2A2B,
D02A2B,$D=P%2A,%P)2I,)2A2B,1DL2A2B,6DA2A2B,;D[GE2J%LI,)X)2LIJYC2C-EB\KVB(?1= H?YIKKS?UJ=F?4ZK	?0DD?:F ?<=VGPUF-LAKLB0 B>">&F;"?M/G	<%E[DDGD)=?<!N2A2I2A2A2A2A2A2I2I2I2I2I2A2I2I2A2A2A2A2A2I2A2A2A2A2A2A2A2A2I2I2IL"D["4.K 5^	
 HFJ2H)G[FK"+I,J
:F8X<%4N8BC<6:;4E<S8<9[51=^G!JJQ?X)N-X7L7XGLG

2LH]Z**)X)N.X7L7XG2LH\ZV2ILG8

2L2I*IX)N/X7L7X-L-Z(2LH]Z*P-L-

8P78H),72-7X)2LH\X-OIKH-\7P7H[8A\7*HX)OJKL7K9Z*P7L7X7**A?[ X[L[BKNZ(J(KGZ*2CN([[N*<(+]X7/K2J	HGAX%K!!E2J	HH2J	NA+<[:K,,%\OK&/[HY>(2J	NBP)K-YRK:ZN: YOK YP+7JF!EQO*X%RBJ?<H)CRN: JMYNJ[YOIP=H*&:QNMNC<9DIP8F8FYPMN+U]N9P*!ZFJ)!ER;QT*;%Q"J)CR3WS3S&*-)C*;+S+PJF8
8FZFJFC<MM]MJF8F8FC<MS]SJ/Z;QS+UISYMQSJF]SP))CK
YTJ2YSJ/Z;/W9?HH>2J&LCP)K%Z3W[%O.+5E-2J&LDP)YQ[32J&LK)<X -OM92AOSKTZ(: J(>(*SJ(")";: J(*H:A")	Q!W/U	Q"AD(/U")KV
WKZ
YK(
X2K.AH 9F8DK[XHHHX\HHX!HHX	HHX.HHX3HHX8.)HPK\XIHIXJK]XKHH[F2ALI2Q\JPK+D2A.;LIB8RL3(>G;(CGC!0A?&?%?$2K2AZ?^2I
&S&S	+
2A/%B%>?Y^*DPT+AIQ+IYPT+3IQ$6XTHU$6/.K\MI?XNLN<(+	$6+;R&*M",J	?H*OJ)X<K?
>J*C2K.J(X<J+*LR	* ",J&?H*"J)X=K=
>J*C2K.SJ(X=J+*
????HRS?M?2IO<C;>(.,K:Z(K9Z)K8Z*K7Z+K6
52AK4
?K4
=2I.,
3O38!
22A/C$S/EOL<(,?SSL+M??XPHP8J8J8J]HP]/S><(/]H==HIHH<6/]HUSHVSHWSHX>(/	H;535%L=/PO?W?TAHAP>F2=VFM8 [A8AZL [BB2ALL2AN [AC2I/>+?B"B"BBZOO8(/	LADE-HILFSPROGRAMM (NUR FUER .SV-FILES)	/	FORMAT : (CORE, FELD, NEG. BL.-ANZ., BAND-BL.-NR.)	/	BAND-BL.-NR. IST UM 2 B
OECKE (CORE CTRL. BLOCK) ERHOEHT	)2A
>
=
<
; [DD2ALF2ALH2ALD2AH [CE2ALD2AH2ALR
:O:?H++/9 [BB2ALL2APK8 +?BI??N/N/N>RGP LQLPLOLNLM8 [BC2ID2AH [AC2I*
(6(	*	)1X,3A2,	.	A2	 NICHT VORHANDEN	)/> [CF2AQ=2ALQ2AHDK= [AG2ALQ
< [BH2AQ;2AHDZ0 7Z0LG8!2A
: [BB2ALL2AQJ [AC2ALT [AC2I+-(/	ANZAHL DER CORE SEGMENTE =	,I2/	NACHF. AUSDRUCK IST IN OCTAL !	/)K92A
8K= [AG2ALTK7+?DLUELTALSBOT8 %<H
>2A
=
<K;2AO<
<O<8!O>?H*9 [BB2ALL2ARZ [AC2I*\()2A
:2AW:O:8!K;?H*78AO=
= [BH2ALW2AHDZ0 7Z0LG2A
9	88*^8*F [BB2ALL2ASD [AC2I+X(//26X,	EINGABE FUER BETRIEBS-SYSTEM	)2A
72AW7O78!O6?H/5 [BH2ALU2AHDZ0 7Z0LG2A
48AO3
3+?ZZSZLUL\WILTL[Y%LZLYBLXLWLV8 [BH2ALU2AHDZ0 7Z0LG2A
>O>8J8HC=9
< [BH2ALU2AHDZ0 7Z0LG2A
>O>8J8J8JC;9
>8AO> [AI2AU: [AG2AU:O9
9O>8!
8K:O7
6 [BB2ALL2AUB [AC2AL
+G(	/	,I0)2AO5
>	4O<
>	4O8
>	4O6
>	4 [BB2ALL2AU
 [AC2AL
+(6X,I0)K:2A
>	4O5>(+++/K32A
>/22AO5+?VCBY%L\L^LSL]LPB?LOGLZ8 %<H
>	=K< [AG2ALO
>	=O;O:>(*P*U8A8!2A
>*X2AO9
>	=O:>(*]*"8A2AO8
>*%2AO8
>	= [BB2ALL2AUB [AC2AL
 [BB2ALL2AV; [AC2I*=(/)K7 [AG2ALQO6
58AO4
48/3 [BH2AW22AHDZ0 7Z0LG2A
1 [BH2AW72AHDZ0 7Z0LG2A
>O>8J8HC09
/+?QI,C\ICOREF\0BLNGL CSZLULSLPBL^L]L\LOHY%LZ8 [BB2ALL2AXK [AC2AL
*V(/	START-ADR. = 	,I0)2AO>
=% [BB2ALL2AX% [AC2AL
*-(9X,	0/1/	,I0)2AO>
=%K< [AG2ALNO;
=% [BB2ALL2AYD [AC2I+H(	//	) [BB2ALL2AYW [AC2ALN [AC2I+$(/	START-FLD. = 	,I4///)/:82A
92AW9O98!K8?H/7O=C68J8J8J8J+?8ZZDL!OOLNHLZL 88HC?2A
> [BB2ALL2AZO [AC2ALM*R(I1):2AO=8D8F
=8/<9 [BB2ALL2AZ& [AC2AL
*+(	/	,I0) 2Y%,G [J*9K$[	S$K&B
$K(9H.B> /)Z9K<"BK%K;> +O:8H9T
:2J	9H:A2J&7DREV+\2J&7FAQ	8(2J	7;&G:
:	8(2J	77C^4BZ%>A>2IK1
6K5^7K)^.2C/(B?+.AA?8A-*??&LY(LZLMGB8?\
^
?<<BN(ZQR(N(XGR(2A.F<BLGPG2A.PZG;VJG[Y"F2L? *!"P.V [AK2A^%FILE:J	"V[B"P[C"FJE[DJCZV"P^VRVSD*4"F2J&AHJB[D2J	4A+[JC[L2JKC	4B+[2J	4IJQ[VKM8!<B\GKL<B.(: [L+O:K!Z(K "V=HJ]=H8!9F8F8F[B"F"P[<"FJQBKB[:HG[;	D*!+YSN?>E>VBM?^O?<?V : K 7 5LGZ^R6N6ZNR62A.R<B^NRN2A.]2I
ONOBJC>(*/NOBEJI>( %<H.PNO"].:J6ZL2J&H2J&	E*JD0&0!+D2I: NFZMJBZONOBG<(+SJMZRNRZJJAZNNNBG<(+]JMZRNR2A^Q2J&	IJLZ6"RJJ"]"]JHZM"R"RM++"RJK"]"]JHZMJAZO"R"RM+7  D" 612J	\2AW?RLRL<HR!:J!>(;XK>Z2JLK=Z3 [AK2A"2*-"8N5R52A.JJ+Z4J,Z5*7:AZ2Z)ZLJ4Z$"["XG8: LG9J8J8HZ!J"
A
<"[]"[V:AZ3
;KU
:  B%OJ3R39HKVXG8LG<X+$8J8J8JC92A/W P%3O/C" 612J	\3B?.*2%AT1FM2=XS	?	>$+?Q$ ?R%&?T$]?W%B?X$-?Y$? $A$T2A
=	<8 Z
O=C;K:>(	9*	9	8*	9	?K7<(*K6	5*$	4*ASA: K+[+2AO3
ASA	<8!
A;VK+?H*O3[)OA[**	9WA+^;$KA[AS+*	2K)
3K*8!XS: 2AO3>(+\SA:A
ASA: 
A8 [+*-: KA[%2AO%
3*	<[%*&Z*Z&Z*Z&Z*Z*Y"33W*O	?Y*
0?8?/0]").*W	?	>O=
?
=: Z[K<*	K;	:O??H;$K9	:O?=H8! [AI2A"*K8	: [MK8	:*:	?	>Z[O==: 2AO78!I=SO==+O8!	6K5	:O==(+H8 Z\I=8 
>*>K8	:R\<H+D2AW>*<2AO=8!<H:I== 	6R[* *I:K8	:*12AO4=/3Z\>H	:K2R\+Z:O4>(/SK9	:/SJI/T/R6ISRR&;7RKA6MNJ2I;A 1%-O./E%%0-*OE?;-P,. %<HO?8 [J[G [N8 [H8 2A
>:SJ<H*7	=	<( ?R(2? (M?U(M?S(K?;(6"O[I [AO2A/ [AP2A,KI [Q [AR2A,SG*MSH.
[G*M: [ISH*<I=<HKG8 	;W>;X2IO:
:SI+Y/98 2AW>+X[G+U [AO2A/SG+Q+Y	; [AS2AA>/87<K-B9DZC8D8A9V8F74J<^E7;+*9P?+2RG*-+9JCJ<<(+8ZC+	& 2EP1Z.**8-O%%	?2AO>>(*HK="O*"8:*	?	<"O*KK;=HK:K92AO8 [T.O"
I?>(	7.Y2AO>> *-:J2> **"8*$Z22A.
K6"OK5"O.
R2K=C42A.8:J2> *4;Z2AO8 [TC3K2<(*3K19K:<P*9*4>-?3A???J?M."!B A? W "20W	?/> [AU2AA>[O[P2IO=<(+M=*RK<SO
=:2IO=K;?*^ [AO2A/SP*RQ [AP2A,K:2I
=2AO9K8>(KP8!I==8 	7 [AR2A,Q2IO=8D?H+IO=9H
=O68H
6O58H
5O=C4O=K3
=*52IO=C2
=2A.2IO=K;?H %<H/Q;$	7: KP[P+R2J	3NG:J A*	42J	3,^2A2J	<I/*S0GH?<RQ1Z?:")PD/4 P(0 [NR)*HRL  CI?J(*X> *[: Z)JKZS8NLY>RLNLY?2A.RL;X 7.KDG9F8TZ(;(DG8!RL*P[DKDK?9K><X*>R*:2AN*R*<(*?KD>(*>R**3[D2AN*Z*KD.*8![D*2IO=XUO<XTO;C:XSHS
;**2IO=HU
=8DO<HT
<8DO;HS
;O;9H8JC:K9	8SD+H/E2IO=9D
=O<8D
<O;8D
;2A/*M	*O0OPQRJ?FHSY=2AO?<(.	>"R?(*?72&?8*K?:&"?;&A??0-"R2AW=.W
?.HS<(:A2A.]"WI?>(	<O;> R.	:I=8![Y"*>OLG<X*98J8J8JC9	8SY*2*,	7[ZOKZ<X+I8A8F8F8F<HLGK6\GSY*>*,I>[WI=KY9HI?XG8/O[Y+! [AV2A/SY+]2A/Z:2AO58 [Y+-K4	8SY++	:*C+9JCJ<*%%? *8*O?."2*Y$
.*")I=8 2A
?8 Z=8 2A
>XS2AW?<H*[	=	<2Y? 2J?U2J?S2G"MW*JHSR=/;2AW>8! 7A>\G:	:	9*J<XUK8Z=
> 7A>LG=*58!2AW> [AI2A"*XS [M*2A\U8 HUXUR=HS< *5I=2A
7I=8 J=K6	5PU2ALU=H*$K4	3+OXTHS9FHS8DHTXS2A/WB 7OSC*M>J" *M"/6 2JGC+LCL20V,7XSI6M*O0	SD%%?<0.)K.**8-O)J65=N67F<JEZNJFZO;X*P4NZEJNZS8NOROXG: NOROXHJM2A
?2IO>>(+W&B+UHXJEXXHW<(*;8!HY=*;ZEHS9HXSHT8HXTHU8HXURE*/+C8 ZEHYXW+A&ARE+HV?+H;&&DHX?H&D&HP?+R;&&D;XXV2A
=&C+	HG[.-JEC,2I
>-2I
<-2I
;: [,ZE;VJN[*8.O??8LH/-K1ZNK2ZO;([,*P3ORQ7EP=(HGZC8LH"\XSHW< RXYHVXXLHXTLHXU2IO?"\XP[E2IO>XQO=XR.Z)J)8H8JC<XW;XB)XVJ)C;.\HR9DXRHQ8DXQHP8DXP.*9HRHUXR:DHQHTXQ:DHPHSXP.5=N=)HPK:?H+N	CPW+GKE>(+XPR+XPQ+XPP[E+GHW=(+1XW;&HP? +"*: +XHW9D8F=H/DHPHV2I
?HQ
>HR
=/F:XRXQ+*612J	\3B;A?8GC?RQPJZD8NARAZNNAXGJZXJAZY8LGPGZ: LGXHJZ7*JXZ\8NYRYZ7: NYXH2IO?"62I
?O>"62I
>O="62I
=RY;VJXZ48.Y8\H.6&IX 2IO?	<XP2IO>XQHWK;=++K:XT	9PT+KHV8DHQ<X8!XV2I
?
>
=HV  YK[[K\[$ [AU2IK[Z<;VK\Z=*> [AK2A8:;(+S*Z&Z*Z&Z*Z&Z*Z&Z=N?==46\RQP65=N<67F:FJE2A
?JFZM8NGRGXG: NGRGXH&C*\HVHXXVHWHYK>XWHPXXHQXYHRXZXPK=Z8&AHX8HXXHY8HXYHZ8HXZ<X&R8*	&D  O$IVZJ;Z?8N<R<XG: N<R<XH&C+0HVHXXVHY8!HWK<XWXZK;Z8;XSHP?H+Z&B&HZ8DXZHY8DXYHX8DXX	:R8+THXXPHYXQHZXR	9  V [AK2A:9;(2I
8+.P7F6*?A??%=?=(K?ZQ;&ZR2ANQ8 <X9A^Q:0JQZQRR*E.JSZW8NTRTZ"NTRTXGJSZ%JTZ&8LG*	9=H81XQXPXR8HXVK>XW2A
=	<  QJ6Z:8N7R7[B: N7R7XH8LHXG: LHXHJ62A
;J7
:/9HP9HXPHQ8HXQHR8HXR:D2A
=/N/VFL2IO8< K72I
8  \:2AO([^S(O([
 [AK2A=\;(+$?& P4[4O4N7F7EBOU7CNI7TKA3T3B3O/C6-KN6.V +NCD2-GL3E
N3ER +ECS7ICN+U7T3F3I+ECS3E7R7IST3E;L2MNJ.I6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6="=6="J7C2J&I3B2=3F3I+E" 3IWD3V&,3N7A3E&,3L;AG6)2J&I+F" +I	B. B4.,B6.,B6*MBJ. R 60^I7RSI+E" +I3G*5&0*MBJ. V 20ZI

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