Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-01 - 43,50165/iftyp.mac
There are no other files named iftyp.mac in the archive.
DNE	
Z	:TXT
Z	:XDN

)61(,61	ARJ	
0	IEVOM	:TIX

)61(,61	ARJ	
1-	IEVOM	:LIAF

.TIXE LUFSSECCUS;	)61(,61	ARJ	
XDN	EVOM	:SCCS

EMIT TXEN KCUL RETTEB .ON;	POOL,61	AJOA	
!SEY;	SCCS	TSRJ	
?HCTAM;	TXT	NMAC	
GRA TEG .SEY;	)61(@	EVOM	
ON;	LIAF	TSRJ	
?TNEMUGRA;	]PMUJ[	EMAC	
	]0,000777 DWX[	DNA	
RTP TEG;	)61(	EVOM	
XDN	SOA	:POOL
RETNUOC LAITINI RAELC;	XDN	MZTES	

.NIF	
TXT,0	.ATAD	
YTT,0	.NI	
.DAER NARTROF EUSSI .SEY;	].)5A(. IICSA[	IEVOM	
0 NRUTER .ON;	TIX	TSRJ	
?YDAER ENIL A SI;	0,LNIPKS	LLACTT	
Z	:PYTFI

.IHPLA	 NRETXE	
5 =YTT	
41 =LNIPKS	
PYTFI	 YRTNE	

.NRUTER EGAIRRAC TIH DNA MUN RO ,EROC ,EMIT	;
 DEPYT SAH RESU EHT FI 3 RO ,2 ,1 SI PYTFI FO EULAV EHT	;

)'MUN' ,'EROC' ,'EMIT'( PYTFI )3,2,1( OTOG		;

--EGASU ELPMAS	;


.0 SNRUTER PYTFI ,ENIL A DEPYT TON SAH EH FI  )3	;

.1- SNRUTER PYTFI ,SDROW CIGAM EHT FO ENO		;
TON SI TAHT ENIL A DEPYT SAH RESU EHT FI  )2	;

.TI OT XEDNI NA SNRUTER PYTFI		;
 ,SDROW EHT FO ENO DEPYT SAH RESU EHT FI  )1	;

).SRETCARAHC IICSA	;
 REWEF RO 5 SI "DROW" A(  .RC TIH NEHT DNA LLAC	;
 EHT NI NEVIG SDROW LAREVES FO ENO YNA DEPYT	;
SAH YTT A TA RESU A REHTEHW SENIMRETED PYTFI	;

.MARGORP NARTROF GNINNUR	;
 A HTIW NOITCARETNI ROF NOITCNUF A	;
--PYTFI	;*U*?: