File DIALPS.SV (save files (Executable program)

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

?=2CH)AHPEH
EDITSV0P?7INDEXSVZ:?(FORTSV\I?	MAGSPYSVVZ?%LOADERSVA?5SABRSV,9?)LIB8RL0P?LIB12RL(9?	COPYSVYR?6MARK12SV*1?9ABSLDRSV+8?;PAL8SV 1?2NAMESRL!!?>INFILERL!!?>INSYSRL!!?>IOFILERL!)?=IOSYSRL!)?>PLOT6SB&A?4PLOT7SB&A?5XPLAIN7ESNS*M7FKO6 SO7HKE6 CS3E	C+ACL7DSA3AF 7CW
3I	S3T?I3N" 3ASR7WKA+EB.7WSI7HR 7HSA2 ;ED6 2J;I2 	V+ECW3TWH2 ;I3I	T+ACL7ION3T3A7LSA3I;O6 OI6 CS3E	C3FWI3DF +NCD3TWH2 ;I3I	TA7L2J?C+SCT+ICS3HGE+V;Y2.J.+UCT+WCE7ECX7ESC2 	R+CCH7R
E3ASRS6."J*M+WCE3AWR6 WR3N	N+NCG$GPH^ <B,F>>G2IC)JG2J%LI,)X)2LIJYC2C-EB2I2B,
D02I2B,$D=P%2I,%P)2I,)2I2B,1DL2I2B,6DA2I2B,;D[GE!6AB$BJBM>E?AC^C
BB44H!
T;5B8
U2A2J:A&ZBCU?	>HK^2I
V/WLIB12RLGPUF-LAKLB0 B>">&F;"?M/G	<%E[DDGD)=?<!I?3TWH6 	S3SWT7MR 3O* 7USS7I	F2 T3EN 7OSS2MVJ3V;E2 [I2 WR3A?S3NKA+LCE7ASL3E;R3A	T7VOE6 KA3EF 3V	A3LKA+L;E2M"J3A	V+NCG3G;O7ER 7HOI2 GF3RV,3X7A3IGN3T?I3N6 +ACY3S?H7WR 7HSA2 T3E> 3R
I3IGNL6 6JCS7EOC2 [O2 T7EB 3R+O7ESC6 KA3E: +OCT3A^ 3OSO2 	F7TR 7OR +HCE7SOYOIOERXGHG8F8F8DBJUZRJJ0\J5>(0Y8 [N.VSTP&R*RLP-P1P6RAR=SVSVSVSVSVSVSV0Q*FHG0V:  U0Y*F;Z*F0I*F0N*+==K->(*=S-+ K)*+6:*F69+EK-8 [.*F6Y*?6Z9HK,2I	([.K-8!9HK*ZR2IK.<X+Z8F8F8F<HNR^R: K-[-
EK-K.9HK*2I	(K+*+U	BMAB SZ8-=Q*TTU&T]D C7
=]$&,\HBYS-S>OC?2ANW>(+V2B2I&X+VB  U2ANY>(+V2BHGB2I&Z+V*JARFFAQF)K?0&660Z0V0L [[2A^W^Y  A61/>HGR<*6K=9A8A<P*89DK?66K<>(8 Z<*J??JI0\XG0ZHGK;> MHGK:> +K;&MHG*JHG0!+O0&:/MM*J [AP2IPAQRSTUVWXYZC G]BPO3456789:=LE?^
M*]V-./012ADJI[<F!"$%&	();N\HK>=3=6565NPFBJTA???? ERROR AT LOC G>JKZP8NLZXRL:0NLXHRL8[!LH8D<XS!9HZALHZBLHZPLHZXJ["2IO"8J8J8JPO"PS"*(JP8J8JJK?["JX8F8DZXJXJS"*8K>XG	=;&	=K!>(+]  P8DBJJTP/JC<<(*2K;=HK:K9 [U/P [)2C.M0!+  )["O"<X+/8J8J8JC22I/	?A-K>I]Y\H5Y]B A?
?SMBM?<ZAJFZK8NGRGZRNGRGZ)8N)"W  MZ)K?ZC9DZJA9DZA<XJ)JRC*[.WXX$IVZ=*/RB8!ZAJ)Z28N*R*Z9N*R*ZF8NF<(.&=+ARB8!9DRC=+A9HZDJD8!ZFJC8 ZCJCZEZJAJFRC<H+"9P=H9ZAJ8DZJA9D<P+QJD+R:JB8H:ZBJ<X8!  Y:S-S-REJA=HJD<H9HRE+6  Z$SQ++;+)?4JZD8NARAZKNARAZQ8NQ=H8!  *>DRRRR  + [A
2IV	;(  YZQ2I
?
>
=JQ  [VAZ0J0=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.3VW0V0Q+6:/4??ARQP$GPH^ <B,F>>G2AC)JG2J%LI,)X)2LIJYC2C-EB2A2B,
D02A2B,$D=P%2A,%P)2I,)2A2B,1DL2A2B,6DA2A2B,;D[GE2J%LI,)X)2LIJYC2C-EB(NP
T;5B8
U2A2J:A&ZBCU?	>HK^2I
V/WLIB12RLGPUF-LAKLB0 B>">&F;"?M/G	<%E[DDGD)=?<!N2A2I2A2A2A2A2A2A2A2I2A2A2A2I2I2A2I2A2A2A2A2I2A2A2A2I2I2I2A2A2A2A2A2A2A2A2A2A2A2A2A2I2I2IH)R[]""4.KZ5
)^&X X2 [Y]XPVFU[V3TKWCX?\]^MPC^X L"+V)W,X
:F8U<%4N8<6:;4E<S9A9 51=^U!XXQ?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 -OM9S =BLOCKH IN LENGT=LOCK ING BSTART8 [A [B [BC2AI>2AH9 [AD2I+Q(	WHEN * APPEARS, TYPE NAME OF NEW PS/8 FILE	) [DE2AHD2AH2AHD2AHJ>(*.+
 [BC2AI>2AI* [AD2I+7(	NOW SELECT DIAL FILE:	) [AF2AH&+?<(+	A8 [AF2AH [AF2AH  [AF2AH] [AG2AK>
= [AF2AHZ [AF2AHW [AF2AHT [AF2AHQ [AG2AK>
< [BH2AH2AHI
;O<8!O:?H*3+N [BC2AK92AJ> [AD2I+M(	FILE WILL NOT FIT ON SYS:	)/8 [BI2AK72AHUT 7UTLG8!K68!>(/5+^2A
42AW4O48!O<?H/3+?HUSHVSHWSHX>(/	H;]L\HJL!SVDH,AHIHHHGHFH8 [EJ2AM>2AHF2AM>2IJ2AM= [CK2AM<2AHH2IJ8AO;
;8A2AO:
:/9 [AL2AHG/8 [EJ2AM>2AHF2AM>2IF2AM=2IO7>(*2+Q [BC2AM>2AL= [AD2I+P(	NO STARTING ADDRESS FOR .SV FILE	)/6K<8!2IO7>(/5 [BC2AM>2AM" [AD2I/4(	.SV FILE MUST START IN 8-MODE	)+?NNFNFH,K HFHHBDA8 )<H
>2I
=*L8A2IO<
>O;
=K:2I
9O88!
72A
62AW6O68!K5?H*2
42AW4O48!K3?H*1K3 [CI2AHJ2AHK2IBDUT 7UT\G*\*T8A2A
2
62AW6O68!K1?H/0 [BI2AHJ2II0UT 7UTLG>(//K3 [CI2AHL2AO.2IBDUT8A8!O6 [AM2AO- 7UT\GK3 [CI2AHL2AO32IBDUTK, 7UT\G+?BHDAPDPFOHLBHKA>HJBI
BCHFCFABBBA88A2AO>
>8/= [BI2AQ<2II0UT 7UTLG>(*6K; [CI2AHL2AQ:2IBDUTK9 [AM2AQ8 7UT\GK; [CI2AHL2AQ;2IBDUTK7 7UT\G8A2AO>
>8A8!2AO>
6
52AW5O58!K8?H/4 [BI2AHJ2II UT 7UTLG>(/3K; [CI2AHL2AQ:2IBDUT8A8!O5 [AM2AQ9 7UT\GK; [CI2AHL2AQ;2IBDUTK2 7UT\G+?BRDRFHJHMAHODABPN6HL88A2AO>
>8/= [BI2AS<2II UT 7UTLG>(*6K; [CI2AHL2AS:2IBDUTK9 [AM2AS8 7UT\GK; [CI2AHL2AS;2IBDUTK7 7UT\G8A2AO>
>8A8!2AO>8!O68!
58A8!O>8!2IO48!>(+" [BC2AS:2ASR [AD2I+!(	BAD .SV FILE HEADER BLOCK	)/3 [CK2AS;2AHH2IBO6<(/2?H/2+?< ZZT&H,I
HNHMAODABPP<HL8 %<H
?2AW?O?8!O>?H*&O=O<O?
;O?O:
9 [EJ2AU82AHO2AU82IJ2AU7 [CK2AU62AHP2IJ*C2AO=<(/5?H/52A
?2AW?O?8!O=?H+QO?O<
;O>O:O?
9 [EJ2AU82AHO2AU82IJ2AU7 [CK2AU62AHP2IJ*./5 [N,A]6B,B]11B ,B]14B]0CINTIN,C\IBLK1BF,B]17BZ,B]22BW,B]2L\BDAHPHHHOHFHNHMHJ?X=? ? <BODZ
SDODXGSD2A.E;&JOZ^N^R^ZF;VJF[%N^[D"E"^.O<BLGPG2A.^[YKYBBJD< JC[ZKYB9D< 8HKZ.$"O=H*=Z<2J&F [AP2AWAFILE"O"$^A;&ZEJAZO"^"$RO^ORE+L"EJA[Y2J:A&B+	<H[YJ
["KZ8!<B\GKY<B/D: +]HF,B\306GW,B\307G",A^GH$\ICDIFBA$\IADDRBB,B8?>G 
W	V=WZW]V$VOV^VEW%X^V
&JZ[JNZZ:A2J&AD8.M&J&I^N;&[XJN[Y&K&ISY
YSX*)&LJNZ6:A2J&AC.EJ7^GJ6.H&J9=H81BD<XJC9F8F8F[X&L&K[Z&LNOBKX[XHG[Y2B&B.F.M&JBD+G\IWD0I ,B\500LD,B\460KO,B\600L6,B\520LR,C\IFLD0BN,B\700M",B?>E>VBM?^O?<?VZ:ZK 7Z5LGZ^R6N6ZNR62A.R<B^NRN2A.]2IRONOBJC>(*/NOBEJI>( %<H.PNO"].:J6ZL2J&H2J&	E*JD0&0!+D2I: NFZMJBZ
NOBG<(+SJMZRNRZJJAZNNNBG<(+]JMZRNR2A^Q2J&	IJLZ6"RJJ"]"]JHZM"R"RM++"RJK"]"]JHZMJAZO"R"RM+7  EBZ3?-^>G;&J[OSZJOWWZJNJRJZTNJ[-"S.O-S-2A.S\% -BJ"["JYZJ]*F=**ZS8A*88!ZSJZ [TK"=*78!["J[ [T:Z8AJS?H*?;$ZSZT8 -: JTZTJJ< +AJT[K"ZJ:JJ-S+L< +ZJ> +Z9AJT>0+^KX [TRRT+H 
S;UJ\ [UJ\ [U  BXGZJHG<HRJ9P<(/-JS=+2<P+2XGJS8!HG/-\\SB A2A?JC? ?P=S=P<ABEJH=HJDJB [U  T&8!<(*$ZMJB [URM*
  V&=(:AZX[): [*SJYJJ> *6[*SJYJL<(+YJC<(+$JG<(*5JF<(*5JI=H+Y8!JX?(+YK) [AM2A^XJKJY[)*5;Z [UZY/S [B [AF2A
 *,REPEAT:K)S*8!  G&ZYJY8J8J8J6JY6&A+,BE<(+= [T/6  F*Z 7 [LGZHR\N\R\<BZHNH.:JLZ[JMZ\;G*^ [AP2A YTAPE:[U"ZJC?> *UJ8HC>K=[SJ8F8DC<KUK;[U"=H8![V"=(+$8!ZL 7 [LGR\8F8F8FC:KS[SN\R\[P"=(*UZM1!QH0HPBSHPHPAGH??B:KN1!AB:SVJMKP[PRL+K  J&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z*Z&Z
Z&Z*Z&Z*Z8GHPC?82AW?RLRL<HR!:J!>(;XK>Z2JLK=Z3 [AP2A"2*-"8N5R52A.JJ+Z4J,Z5*7:AZ2Z)ZLJ4Z$"["XG8: LG9J8J8HZ!J"2A
<"[]"[V:AZ3
;KU
:  C%OJ3R39HKVXG8LG<X+$8J8J8JC92A/W P%&Z*Z&Z*Z&Z*Z&Z?.*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! [AY2A"*K8	: [ZK8	:*:	?	>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	:/SB2J$RE+2J$QE	1!F8HHA	5 1%-O./E%%0-*OE?;-P,. %<HO?8 [J[G [[8 [H8 2A
>:SJ<H*7	=	<( ?R(2? (M?U(M?S(K?;(6"O[I [A\2A/ [A]2A,KI [^ [A
2A,SG*MSH.
[G*M: [ISH*<I=<HKG8 	;W>;X2IO:
:SI+Y/98 2AW>+X[G+U [A\2A/SG+Q+Y	; [A 2AA>/88ZLWD.9	HG:
9	8ZHP R99HRK2?(	C:%96<^8D8Z<^8;& 2EP1Z.**8-O%%	?2AO>>(*HK="O*"8:*	?	<"O*KK;=HK:K92AO8 [U.O"
I?>(	7.Y2AO>> *-:J2> **"8*$Z22A.
K6"OK5"O.
R2K=C42A.8:J2> *4;Z2AO8 [UC3K2<(*3K19K:<P*9*4V+)HP;Z+-HP;(+; HP
?PV V;THPB+);A?(8ZH,XHPAL D%;.HBL UD.8Z*V:]>-?3A???J?M."!B A? W "20W	?/> [A!2AA>[O[P2IO=<(+M=*RK<SO
=:2IO=K;?*^ [A\2A/SP*RQ [A]2A,K:2I
=2AO9K8>(KP8!I==8 	7 [A
2A,Q2IO=8D?H+IO=9H
=O68H
6O58H
5O=C4O=K3
=*52IO=C2
=2A.2IO=K;?H %<H/Q;$	7: KP[P+R2J	3N/;F A*	42J	3,^2A2J	<I/*
7O6GH?<RQ1Z?:")PD/4 P(0 [[R)*HRL  DI?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/*IC*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+! [A"2A/SY+]2A/Z:2AO58 [Y+-K4	8SY++	:*C[I2,N *%%? *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> [AY2A"*XS [Z*2A\U8 HUXUR=HS< *5I=2A
7I=8 J=K6	5PU2ALU=H*$K4	3+OXTHS9FHS8DHTXS2A/W7O+MCN"2602J	\/WGD2,N 3O7M/NJ "0*M3\*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
;: [,;VJN[*ZE8.O??8LH/-K1ZNK2ZO;([,*P/KRQ7EP=(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+*64.JJ1"2*M?8GC?RQPJZD8NARAZNNAXGJZUJAZV8LGPGZ<: LG*
JUZY8NVRVZ<: NVXH2IO?";2I
?O>";2I
>O=";2I
=RV;VJUZ90\C<K;>(0Y*9 [N8.V8\H.;&IX 2IO?	:XP2IO>XQHWK9=+0K;XT	8PT+PHV8DHQ<X8!XV2I
?
>
=HV  %K [(K![) [A!2IK [A;VK![B+C [AP2A8?;(+XOJW=N=46\?=A?RQP65=N<67F:FJE2A
?JFZM8NGRGXG: NGRGXH&C*\HVHXXVHWHYK>XWHPXXHQXYHRXZXPK=Z8&AHX8HXXHY8HXYHZ8HXZ<X&R8*	&D  \$IVZJ;Z?8N<R<XG: N<R<XH&C+0HVHXXVHY8!HWK<XWXZK;Z8;XSHP?H+Z&B&HZ8DXZHY8DXYHX8DXX	:R8+THXXPHYXQHZXR	9  " [AP2A:9;(2I
8+.P7F6*?A??%=?=(K?ZQ;&ZR2ANQ8 <X9A^Q:0JQZQRR*E.JSZW8NTRTZ"NTRTXGJSZ%JTZ&8LG*	9=H81XQXPXR8HXVK>XW2A
=	<  ^J6Z:8N7R7[B: N7R7XH8LHXG: LHXHJ62A
;J7
:/9HP9HXPHQ8HXQHR8HXR:D2A
=/N/VFL2IO8< K72I
8  (:2AO([^S(O([
 [AP2A=\;(+$?4 P4[4O4N7F7EBOU3SOE3OSN2.& 7F^ 7EB 7RCE3ROO7EOS2 ?F7RN 7YSS3O	L3CF +NCD2MRJ7IOA3T3O+ICC3V3A7UOE2 ?F3RF 2 WH7ASR2 GR+TCE+OCF*6B03BGE+TCS7PKE2 	M7NSU+EB,3C7O7PSU+ECR2M&J7NWP3TR 7RCO7SR /OF *2B07PKE2 	M7NSU3E& 7NSS3ESA2 [O. B960B +ECR3M;I3UWT".
M3A: +ECW3B;E3E	F7TJ 7EWS7LOT

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