Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-04 - 43,50355/pilunv.unv
There is 1 other file named pilunv.unv in the archive. Click here to see a list.
x;@PCl  +[
	JRST	[M+0OVEI	T1,A
	JRST	PUNT]A
	JRSTEV0@EV6GNc@ (G+-\  G6Mc@ $G7-M &G:
	C	*,TAG3p,EATAG
	C	T,TYPE4,TYPE2
	C	TY,TYP4PEY,TYPYN2
	C	Y,T4pYPEY,TYPYN2
	C	T5N,TYPEN,TYPYN2
	50C	N,TYPEN,TYPYN2
	C	J,JMP,JMP2
	5pC	JY,JY,JYN2
	C	6JN,JN,JYN2
	C	U,60GOSUB,GOSUB2
	C	6PUY,GOSBY,GOYN2
	6pC	UN,GOSBN,GOYN2
	C	L,LINK,WASTE270
	C	LY,LINKY,LYN7P2
	C	LN,LINKN,LY7pN2
	C	S,ENTRYP,W8ASTE
	C	D,DIMENS80,WASTE
	C	A,ACCE8PPT,ACEPT2
	C	AL,8pALINE,ALINE2
	C	9M,MATCH,MATCH2
	90C	ME,ME,MATCH2
	9PC	MG,MG,MATCH2
	9pC	ML,ML,MATCH2
	:C	C,COMPUT,COMP2
	C	CY,CY,CYN2
	:PC	CN,CN,CYN2
	C	:pE,EX,EXIT2
	C	EY;,EY,EYN2
	C	EN,E;0N,EYN2
	C	EC,EC,;PEC2
	C	EL,EL,EXI;pT2
	C	EQ,EQ,EXIT<2
	C	OI,OPENIN,O<0PEN2
	C	OO,OPENO<PT,OPEN2
	C	G,GET<pIT,GET2
	C	GY,GY=,GYN2
	C	GN,GN,G=0YN2
	C	GC,GC,GET=P2
	C	GR,GR,GET2
	C	GD,GD,GET2
	>C	GT,GT,GET2
	C	>0GL,GL,GET2
	C	P,>PPUTIT,GET2
	C	PY>p,PY,GYN2
	C	PN,P?N,GYN2
	C	CS,STR?0,GET2
	C	BS,UNST?PR,GET2
	C	I,TRAP?pIT,TRAP2
	C	IY,T@RAPY,TRPYN2
	C	I@0N,TRAPN,TRPYN2
	@PC	NUM,NUMX,WASTE
	C	R,WASTE,WASTEC	R,WASTE,WASTEG>e{@P G>mX P G>n@  GBf\g "GC.: @GHP I>eH9P KbNC@ L@ L8qcBP L9H3P L:{8P L:%yP L:LKP L:t;yP L:vH3P L;87P L;QP L;{P L;-iP M$ .
	FX	2TAG.0,MULTIPLY DEFINED.P TAG
	FX	DISS,FI.pLE DISSAPPEARED!
	FX	NTAG,NO TAG /0FOUND
	FX	SYOV,S/PYMBOL TABLE OVERF/pLOW -- COMPILER E0RROR
	FX	UNDF,UN00DEFINED TAG
	FX	0PSYNC,MEMORY OUT O0pF SYNC -- COMPILE1R ERROR
	FX	NCOR10,NOT ENOUGH CORE 1PFOR PROGRAM
	FX	1pIDLM,NO COMMA IN 2STRING
	FX	COMP,20ILLEGAL COMPUTE S2PYNTAX
	FX	...$,$2p IN TAG
	FX	SCAN,BAD OPCODE
ANMP M0t8vP MHt+vP MHt[RP  MHt[sP @MHt{P MHuP MHuyP MHuLzP MHuX8P MHukP MHv@P MHv=8P MHvH6P @0MHvH:P @MHvKP MHvMP  MHvMP M` 30
	F.A==ZZ
	ZZ==ZZ+1==ZO!` O$3@ 
O$C@ O%C@ O&#@ 

O&C@ O2|,` &U
GLOB <LI&0NE,LOC,IBUF,LOOKI&PT,PROGRM,SYMTAB,T&pAGSIZ>
GLOB <LST'BUF,PASS1B,EDLINE'0,LINCNT,PAGE,SUBP'PAGE,PAGSIZ>
GLOB'p <START,FSTLOC,LI(TLOC,ENDLOC,ERROR(0S,SYMAX>
GLOB <R(P50NAM,RDX51,STRTI(pM,OBUF,RELNAM,REL)EXT,COMND>
GLOB )0<FILNAM,FILEXT,DE)PVICE,LSTNAM,LSTEX)pT,LSTDEV,LASTOP>
GLOB <PPN,TBUF,T*0MPPTR,PDL,SVJBFF,*PLODREL,CHKCPU,ENDLOW,.HELPR>,ENDR@ S8P S8p  S:$^ @U3@ Y

@ YP Y>9` YO P [$: @[$s@ f[%C@ b['@ `[>uX1 -0m
	XALL
	-PIRP A,<ASCII /-A-/ >
	SALL/-] 8hF
	IFNDEF	A,<A==B>
F	]6C@ `]6Ig h]6K d_W P _W!` @`@ `D@ `H@ `L@ `P@ a>:=P ad[@Q `a&dYP Aa&eZ7P a&fi9P a&fzP a+= +aW!` `cVNC@ gB

9 P gR~)  +pa
	PUSHJ	P,,[MOVE	T1,[A]
	JRST	STOREX]
	gSc@ g\ ,Pg
	XALL
	,pXWD	"A",B
	SALL	"A",B
	SALgflP dhD@ hH@ hL@ hP@ iP i>:=P i70P iJ@ k;LG mKc@ p1BYTE (3)AWHO (9)AVER (6)AMIN (18)AEDTmPP n@ o?0P 
uhP Bfi9Q A;&K "-

TITLE "0A - PILOT B(C)"P * BRUCE TANNER -"p CERRITOS COLLEGE#

	SEARCH JOBDA#0T,MACTEN

	IFID#PN <A> <PILOT INI#pTIALIZATION>,<
	$LOC .JBVER
	EXP $0%PLVER
	.REQUEST$P REL:HELPER
>
I$pF2, <PRINTX A ON% PASS 2
>

	TW%0OSEG
	RELOC 4000%P00

	GLOBS
	SALL
	GLOBS
	SAS@Q RNK {
..TTL (8A,\PILVER,\PILEDT)
LVER,\PILEDTVu@ pu
UNIVERSAL PILUNV -  PILOT0 UNIVERSAL PARAMEPTER FILE - PILOT A(B) 

LOT >}{woP