File PASS2.SV (save files (Executable program)

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

D=D$*<CL?0O$<U?$%DG<;L=4O8<!H: >*<"L9 
D:< L7(OH
P6LS8/DO<?H=:
<7L5P
HOP3LV$1L$DY> ?H*P1HQH*$<XL5HOH$PULW4*DO<?L=DOH
P8LQ8/DW\:L0(OLG8<H(</L/H.HAP;
<-H,,
LO +HA(
LO *HA$
DO<(H	XO
<6L*<
HOT?DJ8HOT?LI4
LO =L!XOH><(H%P/E[0$X\ADL9X3AD-H,,AAD&HTUVDCD	T8D-L:4AA(H^HDLA\ H<$A4D$<XH]A\D:< L?8OH
P=LS0/DO<;H::
<?L94
O<8D7T$$<XL8XOH$PUW <H*PYDXD$H*PFLX OHOP5DU\$H*P"DXD$*<FL8\O$<UL;(
DO<8L4LOL$DVD9$$L1<>LHH*H$(QL",O
<4D3X$H1P9LY81H?(D=D$*<2D;T$HOT;IX8H>,XDFD$*<=L;\O$<U;$%L88FDP+H$(QH=:
<?L>4
DO<;L2HO%\IL1(
D8<AL0(O8<!H0 >H+PSX*O<;D7T$HOT;LIDG
<:H:D8HO<0H/=]^L^PD]L:4A-H.PLA ,DU<DA,+HQA7P<"A^H>((DDL$/<?D>T$O<>D=T$LO <LA0
HOT>LI,G
<:H:D8LO8<D(\*H$<SD9 $DO<>H::
<8L7X
O<>D5T$L$0WHHX*H$(QLW8OL:8O
<4D3X$H1P9LY81H?(HH3X*DO<2L4LOL$DVD9$$L1<>L4*H$(QD2 $O<1D>T$H$,WDF $H$(QL>8OL
(0L  
DO</L68O	.L^8O%\IL;(
LO :L!0OH>,(DZL$D+<FL:HO	.L
HO%\IL;(

<<H: >H+P(DS(+D:< H84/I
-D(,7<H]4AD,L:4AD.D T8DD0"DF<4H^PDA4+A DO<?L>4OH
P<LX,OHOP:DU\$H*PMXT*O<;D9T$L$0WDHP*H$(QLL O$<U=$%H?(HD\D$*<TL=\
D8<AL6 OHOP5LU4O%\IL40
LO <L!XOH>((H2:
<3L28
H$<SH1:
<3L?8
DO<=L<4OL%<IL8*H$(QL8 OHOP5HU:
<3L28
HOT=LIPG
<<H<D8LO86D(+H$(SL> O$<UL5 OD$<UL64O%\IL40
8<!H6 >H+P LSD/O<;D5T$DO<0L6<OL
(>L L
X/D//"DA<LLF07D"H4P^H]4A-H.0AD
H+AX8HUL<O%JL^8O
<=D>T$HOP<LU8OD%<IL;,OH?(HDQD$*<E;X8H>(XDWD$*<EL>(O$<U>$%
<;; ?H*P"QT*LO ;DF>H*P(QT*O\;L94
D8<AL84O8<!H8 >*<6L>\
H$(QLE8O
<=D>T$O<<D:T$HOT>LI,
LO<;T+H$(QL8,OL88FX,+H$(QL8,ODG<9L= 
DO<6H5:
<4H= >+<ZL>\
H$(SL8$O
<8>(%<^?(%L(^L  
DO<>H7:
<4L6T
DO<8L;8O$<UL>(OH$<UL3M$PH"A7<D]84D$0A-H
,AXAP,L<O%\ID>\
<8LO =L!0OH>((DML$+<FD?T$O<?D;T$HOT?LI8GD
\=<8LO =L!0OH>((D
L$+<FD:T$O<:D;T$HOT?LI8GL
(=L 0O
<<H=D8LO8<L(H*H$,SLF0OLO<9LH /LW07HL+O$?LA<
O$6LAX
O$:LA(
H/\5L4L/+<J?(%H<\2D2D;<$L1O
<??D8
<6/D8
<<H?8
HOT6DJ8D:< L-XOD%<IL=4O8<!H< >+<(H,,
H$,SHW(/I%X*HA7P<D"4D-$ AD\,$HDDC[DQL,$A*H74A$D^<D4+A&D:< L?8O
<=D<T$HO\<H; >D*<MD:L$*<BL<$
$<XL8\OH$PUDW *H$PXQH*O<8D6T$L$0WHH*H$(QDB $O<<D7T$H$(WD) $H$(QLB0OHOP6DU\$H<(HD1D$H*PBLX0OHOP5LU0OL% IDF >H*P<LQH*HOP<LU0OHOP5LU0OHOP7DU\$H<,HDID$H*P<LX0O$<UL<TO$<UL<XOH$PUDW\+H$PXQ$+HOP<LU$
O<<D5T$HW,9LZ0OD%<IL4POH?,HL)LOH
P9DQ\+X/\22(D]HWP-H.0A
D^H,AD+D T8XD "L<ODG<>H=:LO8=(<*D:< L<,OL
 :LA$
H$<SH8:
<<L7(
O<6D5T$L$0WDH4*DO<4D=D$H/P8LXXOHOP3DU\$*<(L44
H$PXLQ /DW\2L2XWW<6H2D8LO81L /D:< H<<O
<22D8L
(6D (XD:  L[LODO<>L9XO%JL^XOD%<IL=4O8<!H9 >+<PL2P
DO<;D:L$*<<D2T$
<9H28OD$ UD\0P8<2$%DG<>L=4O8<!H9 >+<W9D88<!H=4/I)(-HPHAT$HRXAA+D-4D.D,T8	WH^A7P<D"<D4WA*H>( H,(ZLG<WHX<\D>4H8 !\?* ZH^D8LH<\DH(*LP [L<WX<\H?LHH>< L>X*LP0[DHL*DO<=L<<O
<;L:<
DH<\H::
<9L8\
H$<TL6X/DO<5L7<OD8<AL?4OH
P;LSX/L*(6L <
HO\4D38HOP=LU<
DO<=D;0X
<<L=HO$<U=$%LG 1L!<OH>,(LE<WDX\\<8+LP \L4O%\IL1(
LO :L!<OH>,(LN<OL8 AL!(OH>,(L	<OD8<AD?L$H*<6H0DH8 !\?/ /H"8/H,0KP,4D$(,LA\,L<D(LA, H9HD
D]0HA$+DW8M, D!0HH?(HLK<	L/8>HD4AH>( L&D)DO<=D<0HH
P;LR(//:L$
HOP8LV$1L$DYD>H.D<7$2LNHZHA(YDM<*D6(RHOP5DV(.L0HGHA$I
$4DHL%H%TUDV\%HHT*D[T%H%TVDW %H%TYDZDAH>( L>LOH
P2HPX*D:< 1DIH%TRDUX%%$WDGT$H1P9LY81
<;L0H

<<H; >H+PSLR8*HIPADUIH%TRDUX%H%TWDX$%D%<Z;D8L
(<L ,OH>,(D&H$+$SDAT$HITPDST%H%TVHW</I-8/HP4DD"D  5LA<HL2T?L?<6L.D?*6D
8HAT+HJDCI.TDX$%D%<ZL?8
LO8?((*H$<RH= IX 1D.P%H%TUDV\%HIPGLU$1L$DYL><
DH<1L><O8<!H> >H*P R(*HHT.D[T%H%TVW\IL$DUD9$$D1<>L?DH
<>H?D8LO8>L(P*H$(RL TH
 <L6,
D:< L:$O$<VD8X$HHT2DTT%H%TVDW $HIP\LU\OH
P6W0+H$(PL4$O$<VD8X$HHT2D[T%H%TVDW $HIP\DU\$H+P\P0+D:< :$2DO 5O<LLXH9I<LD2<AL?PO
<6D?L%H%TULVD+HP,9LL/H$,Q0L>H
H[AD><QDU$
DD<"DX0
-&D^<M0HLI<OX0OLO(X20IOD2
<>D><YHIT]D[T%H%(VLS(PH*(EDUD$L*HELI4OX0OLO,X20IOD2
<>H>LYHIT!D[T%H%(VL(,PH*(ZD*D$L*(ZL 0

<;L:$

<>L;DXHHT.D[T%H%TVW\IL$DUD9$$D1<>L>8O8<!H; >H+PDLR*HW(;L0,
HIPALU,O
<8D7X$HITPDST%H%TVDW %H%TYLZ8
LO ;L!8OH>,(D]H$D+\I;$+DO<69DIH$\UH5\+H$,P!P>LA8Q D8X$&DML%H%TUDV\%HI<NL4Q12\DMP7N8,H/A4$H^HD3GL
02I2PLU<	* SH&>H*PHLP8/HKT=DST%H%TVW8IH$\UD? *H$(PHHXHH>((DX$H/\>L<,/L)H1H[D?APEI0MH,D)DHXH  D0HXAAD(L0 AF\HDPPXH  0L8HL<\?QDRPDUC,AADYDT$L3<GD>,S:LKL:E:DI$,H	XYL30AHHL+HQ,&HS\Q+<SL9 
L$0PHH<H,3K,[L/LKLF\XLH<7LHH+H3,A(X3X 88?/ KL88X+ 4L78X\/L774LA8 /H,L&D!1\,MA4LH >D =L* OD =L* SD ?*<WL?8
H$<P=H<:<L<8
L*(ZL,OH
(>Z:DO<:D>$H/<=9: L8 CY CL7 CL9 FFX8HI8C]X <<(8L8 JLJ CLKL7N$3L*L2J:HL<883H3(I9(3H:8)X <<(8L8 JLJ CLKL7N$3L+LGJ:HL<L8\KL3LNI<+L3(JL8.LHI XDL H= LD%R= <L+L!DA$+L+HDAP/L:HLAXOH
P>P <+,XD5PKH[<TLTU5L?4>QALL?.T>L=49D.<3LA4 ]A6<L?8
L$0PHH<I()Z.L\HLA80 (R.JL HLA80D R.P$2X0HLH4XHLTHLS4PH<(HD3H*([%D2L.(VD2DO<=D>$H<(HDZ8IDJ(VDVX.<L<8
L$0PHH<I(+L0ZL.(0H XX	$;DHT$
$:L.$
DO<:L8\O$<VD6X$W<:H:D8LI8/ H+2$IB X20IHD2L
H8I LL20AH(+
<9D7X$HOP6DVD+D	;H&0+>DDHQ >+$QDMT$HIPNDUD+HIPKLUT	HO\4L3T	<LBJP?CDSH00NND/D38LMPBDPD=LAT EA88DPDABHPDD PDHDPP  QDAHBHTADDD DD8PB TDDHDPDHPQ(DDPRH DQT\^HE8AFHEUTHH4QHE8MG8EUTPDPTQE8UDFXE^TFWX.DETXD]4EQT  \.DET!H%TEQT((XNDE8)HF(E.TFH+4UDED-L0E>TGL1TUDED5L8
ETT9HDH<1DH? 1B TDHHM4H/ 0DNTDHPDUTHO 0LV
HH<WD1 HT ]H]PHH< H0DHT (H(4PH<-H08H
 0L/D/DHP0L5THP 8L8?DHP9L=4HQ$LHODI<A2HI/$1CTUDIDEH I/$0I4UDIDMDPIO$2LQH
LI<RD1LIU$UDU QHI<XD0$IU$]H]QI HTDIDPNHP8AHPDTEE PHP8HA$PDTMDMPDP8PDDPD>DRTTDPUDX PDNY.DPPZD]4PDP  $^HP8!HIHPDT%H% PP(HT$PH HNH 8ABH HTEE P 8HD$ H.DJ4TD MDP H^BQP^L 8RDBL HTUDU PL 8XDC$ HT]DZPH [DX4 HNH^ ^L 8
HI HUD!PH "!DH>ABL>L 8 HE >GB$>LH<1HD4\"B"B"B"B"BBBZ"B"B"B"B"BBABCHABLFH$TDUXWDX$ZD[0]D^< H!HH$T&H	 )H*,,H-8/L0D2L3P5L6\8L9(;L<4>?AADABLAADDEXAADGH$AADJK0AADMN<AADPDQHAADSDTTAADVDW AADYDZ,AAD\D]8AAD
H DAAD"HPAAD%H&\AAD(H)(AAD+H,4AAD.L/AAD1L2LAAD4L5XAAD7L8$AAD:L;0AAD=L><ADPAHPDPCDTPDPFG PDPIJ,PDPLM8PDPODPDPDPRDSPPDPUDV\PDPXDY(PDP[D\4PDP^H
PDP!H"LPDP$H%XPDP	H($PDP*H+0PDP-H.<PDP0L1HPDP3L4TPDP6L7 PDP9L:,PDP<L=8PDPD?DQDQDBCPQDQDEF\QDQDHI(QDQDKL4QDQDNDOQDQDQDRLQDQDTDUXQDQDWDX$QDQDZD[0QDQD]D^<QDQD H!HQDQDH$TQDQD&H	 QDQD)H*,QDQD,H-8QDQD/L0DQDQD2L3PQDQD5L6\QDQD8L9(QDQD;L<4QDQD>?RDRHABLRDRHDEXRDRHG
$RDRHJK0RDRHMN<RDRHPDQHRDRHSDTTRDRHVDW RDRHYDZ,RDRH\D]8RDRH
H DRDRH"HPRDRH%H&\RDRH(H)(RDRH+H,4RDRH.L/RDRH1L2LRDRH4L5XRDRH7L8$RDRH:L;0RDRH=L><RDSLAHSDSLCDTSDSLFG SDSLIJ,SDSLLLM=?CAH0EHA 	IH 8C<??<L0 ?L?<8?ABD:  L&<KDX FL(8/:,?XXLX(),X %L%4CH>( L0KD LCO XH3(AYH3D/;DHT*HK:C<S 8CH+XHH>< H9 0L*9L) CLX$L*\KX<"H6LXH0$H"H
H>( H5HLHX0"H"HPDPH4*D5 HH$LX0+HMLHX "L"TKH?,LKPK 4CHJHHD LCOLIL8(DHPHD8 DH$LHH>, DU(;* ;H$40HL%H=>L/3YX*0L\H2PX0,XH1HXHO(0D,8MML^H) !?D:T$AADMHE8L<1H,H?AX?D$AL$<L!4>X
LOAS	0XDD3	AD:  LU<CH><(D>THKL=H< <D/ >DU\*K,;L;,KHK(:DW 9D9 XH$,0 M$L OBDUTHC,?H9>HP<UD8THLK<9H(*HK7CHODUHU*0L+L6TKH
04HG$0LC8:L L/ PCL7<X/,8D2TXDK 1L!KDX0 DUTPDK0:DUTPHP( H?DPD*0;UL LH .DATXL,(GD XHHYLC NA,H/>L/,.H$4/ 0CHM0KH<,(%?/ >L)<CX *L)0CH,*H0,KHX(UH
-EL8KH048L8,(LX?D?8L\FDQ XL<GEXLPT?DDLAHPF<AF H&>L*,PZL HSOHC,NHK?C<SHK>C<SD:  &L HT<D=(;X L%0CH><(H=,0D MH"HHDH HHHD XCH<\*L<,HHZHH*,4;L M JL S$OC?K,:9L M JL HS<OH=XHH>< =L HN+HCLNLC8<((+D:  H!X 4CH,PD+D!4+X,!8L+HK7LC,*DH N L DM,D H+L/<6:0AADOW0AADIM8CCH
 XCCLIE0CCHDL DBLF<CCLRMDCCHT TCCLRR<CCR0=PDALADHYHBFH  AEH TXPLH CAX\DL CDCPHD, CTXLLX(C XHX FDT8D,4CDQHIH?(DXHQHQ0QDGHIH?(D"HILK<?H:DI$QHQ:DI$RDRDML,G6 <L*	H6(*H001GL LH	L40L*15\,H0(YD580X $$\,X,WH>XHH]HC\HLH$(D:LL0WD(D+H<,PLM4KH ,C, <D02HWPL+DD5<H,GHC 
, GLU0KH>,(D0THC,;<?+ 6LU(CL9$DLF$KLX )D THDC ;H*(H9 FH*$HL80ALH K  CL	\KL025\,CD
8AA0LOT?LB<DAJ,L?8KHX$C4LDH $H$,0C,=H<HXHH"HC<JH/(; D8X "%(H><(L;(K 4CHJPH 4CHJHHD LCLO$/X "$<H>< H;HHL*PL) CH>< 7L DD  L?X/HX)HCLNC,5H4D8LH<)H\,H,)3?D,PGHF$HLK<2T+T,FH1$,,G0L+HK/C(MHH	C<SHI<CL.,?D-H[<A]L-,?D-H[A]L-$?-H()H-4L<-H;4-H+L D<CCLNE+LQ0OLO>PD0LL
0<DLP>DFHSFHHG?PML H!8X0HH$XL H2L DL+IT*HX02HG00X )L)<CD9 JH+,HD9 HH*(HL9$JHH(HDH +H+$HLC$>HH(XLH$*HJ(HDH +H+$HC =H+,XHH0+DG XD8 HDY,HLC <D!4HH>( D:,HC,;D:(XDH0XDZ,PLH$YD\,LH8&L $/0L+L8\KH 0CDM(+D <CL
X/Y,C5HYLI CLB,CLKL4N$3L+(RLIHQ,BO:H,GLC\DHK<3L2,?ADCDOTAADNLTDBBH4  CCLUN\CL,VL HS<OL1EMD*L=HZ ]LA<>0=X\?XBQY??LO0<EN L.<KX,1H><XLX$0H8HLL01P8*DX.0X*: L04K 0CL+DPHP(/E\,X,,D<,HX [L,,C 8CD,HDK :[\,HK9C(MH: C<SHI0CHG\XHK?C<SD< HL	 K 4CHJ\HD LCO\,DL FL3LLHT
C8OD, GL3LLD,$GVXLX033XT <CN\,X$3LVL\D, GL3LLX 3L3\CD9 HL4PHD9 JL5TH9 HL5PHX 4L3XCX 3L3TKH?0 LGLHH,44XTD, GL6LK 4CLJXHD LCO\,AO3RP?6LOATLY,LO<?LA?<PAPISOC(MD;$$HB4XL30AHHH+HP,-LT<KDX -]L H .-L HH<;D>X;L3LEF=L+(*L4KD+DZLBH+C$<CLYHQ,AY\,L9 FFX8DC$;DC <D8$ D
L+?L?GB4F$ATD: L]<KX [DMXXDH [D\4HLX([H XHL]H>>K,=<L DL+D 4*DK ;L (K 0CH+PH*(WDL0HX,[D98XP0VDV<XH
HO >/ 8H[ C8 !H]<LK8>L(P*H,[D7,X+ R
L N WL%XCH>,(LJTK 4CDJ<HHMC<SDI CD7<HLC$4LD\H?,HL3HXHL
H4 >K,21L DLH^D*HL[H( KH?< H0<OX 

<H><(H08K 0CD<H 8CDW4HC,(-?H/<,+VLV$2L+DQ X]<KHFPDA YTLZ<GH5?B!(ADAAVHH
LC0V*,(?PYDH [L\8KX [*4H ,CL14KX,[<L L,D;,XH+ML +,1D:,XLH +DX8C,9H8$XHL)CLDH \[PI*,27L M J
4D LCOLI?,HL?HXLH %DF?

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