.TITLE	WILDIR
AC0=%0
AC1=%1
AC2=%2
AC3=%3
	.IDENT	/X1.0  /
	.PSECT	
	.PSECT	      ,CON,RW,REL,LCL,I	;MAX LEN = 000000
.$    =.
	.PSECT	WILDIR,CON,RO,REL,LCL,I	;MAX LEN = 001302
.$LDIR=.
	.BLKB	001302
.=.$LDIR
FFILE ==.+000000
FNFILE==.+000256
	.PSECT	WILDAT,CON,RW,REL,LCL,D	;MAX LEN = 002106
.$LDAT=.
	.BLKB	002106
.=.$LDAT
;TRANSFER ADDRESS IN PSECT ". ABS." OFFSET = 000001
				; 
	.PSECT	WILDIR
.=.$LDIR+0
	MOV	R1,.$LDAT+0				; w          BYO   
	JSR	PC,.$LDIR+760				; w h        AW1 LH
	MOV	#.$LDAT+32,R5				; E          CSM  Z
	JSR	PC,.$LDIR+554				; w \        AW1 H.
	MOV	#3014,R0				; @          CSH 8.
	EMT	374					; |           U6.
	MOV	#.$LDAT+10,R0				; @          CSH  H
	MOV	#414,(R0)				; H          CSP F.
	MOV	#.$LDAT+22,2(R0)			; p         CTP  R  B
	EMT	375					; }           U6 
	BCC	.$LDIR+52				;             UQY
	EMT	350					; h           U6H
	MOV	#1,R3					; C          CSK  A
	ASL	R3					; C           BA$
	ADD	#4,R3					; Ce         PKK  D
	MOV	#.$LDAT+10,R0				; @          CSH  H
	MOV	#4014,(R0)				; H          CSPAKT
	MOV	R3,2(R0)				; p          B.P  B
	MOV	#.$LDAT+106,4(R0)			; p F       CTP A0  D
	MOV	#1000,6(R0)				; p         CTP L2  F
	CLR	10(R0)					; 0          AYH  H
	EMT	375					; }           U6 
	MOV	#.$LDAT+106,R5				; E F        CSM A0
	MOV	2(R5),.$LDAT+2				; w         D.W  B  B
	ADD	#12,R5					; Ee         PKM  J
	MOV	R5,.$LDAT+4				; w          B11  D
	BIT	#4000,@.$LDAT+4				;  5        HYWAKH  D
	BEQ	.$LDIR+174				;              SP
	MOV	.$LDAT+2,R3				; C          D0S  B
	BNE	.$LDIR+56				; ^            RN
	MOV	#3014,R0				; @          CSH 8.
	EMT	374					; |           U6.
	SEC						; 1            DQ
	RTS	PC					;              CO
	BIT	#2000,@.$LDAT+4				;  5        HYW YX  D
	BEQ	.$LDIR+240				;              SV
	MOV	.$LDAT+4,R5				; E          D0U  D
	TST	(R5)+					; U           A5 
	MOV	R5,.$LDAT+6				; w          B11  F
	MOV	R5,.$LDAT+46				; w &        B11  8
	MOV	#.$LDAT+42,R5				; E "        CSM  4
	JSR	PC,.$LDIR+406				; w l        AW1 B.
	JSR	PC,.$LDIR+1240				; w          AW1 L4
	BCC	.$LDIR+264				;             UQ4
	MOV	.$LDAT+4,R5				; E          D0U  D
	ADD	#16,R5					; Ee         PKM  N
	MOV	R5,.$LDAT+4				; w          B11  D
	BR	.$LDIR+144				; [            K5
	MOV	R1,.$LDAT+0				; w          BYO   
	BR	.$LDIR+240				; v            LV
	MOV	.$LDAT+0,R1				; A          D0Q   
	MOV	.$LDAT+6,R0				; @          D0P  F
	MOV	.$LDAT+22,(R1)+				; Q          D03  R
	MOV	#3,R2					; B          CSJ  C
	MOV	(R0)+,(R1)+				;             CHQ
	DEC	R2					; B           A.4
	BNE	.$LDIR+304				; }            SE
	MOVB	.$LDAT+56,(R1)+				; Q .        YJA AF
	MOVB	.$LDAT+57,(R1)+				; Q /        YJA AG
	CMPB	#40,.$LDAT+60				; w%  0     ZVG  2 AH
	BEQ	.$LDIR+336				;              SJ
	MOVB	.$LDAT+60,(R1)+				; Q 0        YJA AH
	MOVB	#72,(R1)+				; Q :        W83 AR
	MOV	#6,R2					; B          CSJ  F
	MOV	#.$LDAT+73,R0				; @ ;        CSH AS
	CMPB	#40,(R0)				; H%         ZU   2
	BEQ	.$LDIR+366				;              SK
	MOVB	(R0)+,(R1)+				;             W$Y
	DEC	R2					; B           A.4
	BNE	.$LDIR+352				; z            SB
	MOVB	#56,(R1)+				; Q .        W83 AF
	MOV	#.$LDAT+101,R0				; @ A        CSH AY
	MOVB	(R0)+,(R1)+				;             W$Y
	BNE	.$LDIR+376				; ~            SF
	CLC						; !            DA
	RTS	PC					;              CO
	MOV	R0,-(SP)				; &           BWN
	MOV	R1,-(SP)				; f           BX8
	MOV	R2,-(SP)				; &           BZV
	MOV	R3,-(SP)				; f           B.F
	MOV	R4,-(SP)				; &           B 0
	TST	(R5)+					; U           A5 
	MOV	@(R5)+,R1				; A           C.3
	MOV	(R5)+,R4				; D           CPD
	MOV	(R5),R5					; E           CCM
	MOV	#.$LDIR+552,R3				; C j        CSK IB
	MOV	(R4)+,R2				;             CNR
	TST	-(R3)					; c           A6C
	BEQ	.$LDIR+430				; {            YS
	MOV	#177777,R0				; @          CSHf8O
	CMP	#174777,R2				; B% y       FAZ999
	BCS	.$LDIR+500				;             UXJ
	INC	R0					;             A$H
	SUB	(R3),R2					; Bb          6KJ
	BCC	.$LDIR+454				; }           UW7
	ADD	(R3),R2					; Bb          O2B
	TST	R0					; @           A5H
	BEQ	.$LDIR+504				;              SN
	CMP	#33,R0					; @%         FAX  $
	BCS	.$LDIR+510				;             UXE
	BEQ	.$LDIR+514				;              SN
	ADD	#40,R0					; @e         PKH  2
	ADD	#16,R0					; @e         PKH  N
	ADD	#11,R0					; @e         PKH  I
	ADD	#11,R0					; @e         PKH  I
	MOVB	R0,(R5)+				;             WBE
	DEC	R1					; A           A.3
	BNE	.$LDIR+436				; d            RT
	MOV	(SP)+,R4				;             CQ.
	MOV	(SP)+,R3				;             CQ$
	MOV	(SP)+,R2				;             CQZ
	MOV	(SP)+,R1				;             CQY
	MOV	(SP)+,R0				;             CQX
	RTS	PC					;              CO
	HALT						;                
	WAIT						;               A
	.WORD	50					; (            A 
	BGT	.$LDIR+752				; @           A  
	HALT						;                
	MOV	R1,-(SP)				; f           BX8
	MOV	R2,-(SP)				; &           BZV
	MOV	R3,-(SP)				; f           B.F
	MOV	R4,-(SP)				; &           B 0
	TST	(R5)+					; U           A5 
	MOV	@(R5)+,R0				; @           C.2
	MOV	(R5)+,R4				; D           CPD
	MOV	(R5),R2					; B           CCJ
	MOV	R0,R5					;             BVU
	CLR	R3					;             AXC
	MOV	R2,-(SP)				; &           BZV
	JSR	PC,.$LDIR+632				; w          AW1  T
	MOV	(SP)+,R2				;             CQZ
	MOV	R1,(R2)+				; R           BXR
	TST	R5					; E           A5M
	BGT	.$LDIR+600				; y           ADY
	MOV	R3,R0					; @           B$H
	MOV	(SP)+,R4				;             CQ.
	MOV	(SP)+,R3				;             CQ$
	MOV	(SP)+,R2				;             CQZ
	MOV	(SP)+,R1				;             CQY
	RTS	PC					;              CO
	MOV	#2,-(SP)				; f          CTF  B
	CLR	R1					;             AXA
	CLR	R0					;             AX 
	DEC	R5					; E           A.7
	BMI	.$LDIR+706				;             TZ 
	MOV	#.$LDIR+734,R2				; B \        CSJ K6
	BISB	(R4)+,R0				;  U          4CH
	CMPB	(R2)+,R0				;  $          ZL2
	BCS	.$LDIR+666				;             UXC
	CMPB	(R2)+,R0				;  $          ZL2
	BCS	.$LDIR+702				;             UXG
	DEC	R2					; B           A.4
	ADD	#3,R2					; Be         PKJ  C
	TST	(R2)					; J           A5R
	BNE	.$LDIR+654				; w            R9
	NEG	R5					;             A0U
	CLR	R0					;             AX 
	ADC	R3					; C           A2C
	ADD	(R2),R0					;  b          O0P
	ASL	R1					; A           BAY
	ASL	R1					; A           BAY
	ASL	R1					; A           BAY
	ADD	R1,R0					; @`          OP 
	ASL	R1					; A           BAY
	ASL	R1					; A           BAY
	ADD	R0,R1					;  `          ONQ
	DEC	(SP)					; N           A F
	BPL	.$LDIR+640				; d           TX6
	TST	(SP)+					; V           A50
	RTS	PC					;              CO
	BIC	R1,@(R2)+				; Z@          JK4
	LDCDF	AC0,AC3					; @           f62
	CMP	@177756(R4),@17440(R1)			; 9/n       GVIf78D9H
	LDCDF	-(R0),AC3				; `           f7X
	CMP	(R4),-(R4)				; $#          EX6
	LDCDF	.$LDIR+27434,AC3			; w .-       f8GGIF
	LDCDF	@-(SP),AC3				; n           f78
	MOV	#.$LDAT+56,R1				; A .        CSI AF
	MOVB	#104,(R1)+				; Q D        W83 A.
	MOVB	#113,(R1)+				; Q K        W83 A5
	MOV	#12,R2					; B          CSJ  J
	MOVB	#40,(R1)+				; Q          W83  2
	DEC	R2					; B           A.4
	BNE	.$LDIR+1000				; |            SD
	MOV	#.$LDAT+106,R1				; A F        CSI A0
	CLR	.$LDAT+132				; 7 Z        AYO BJ
	CLR	.$LDAT+134				; 7 \        AYO BL
	MOVB	(R0)+,R2				;             W$J
	CMPB	#72,R2					; B%:        ZT4 AR
	BEQ	.$LDIR+1052				;              SO
	CMPB	#56,R2					; B%.        ZT4 AF
	BEQ	.$LDIR+1064				;              SQ
	TSTB	R2					; B           VNR
	BEQ	.$LDIR+1076				;              ST
	MOVB	R2,(R1)+				;             WEI
	BR	.$LDIR+1024				; u            LU
	INC	.$LDAT+132				; 7 Z        A.W BJ
	MOVB	#0,(R1)+				; Q          W83   
	BR	.$LDIR+1024				; p            LP
	INC	.$LDAT+134				; 7 \        A.W BL
	MOVB	#0,(R1)+				; Q          W83   
	BR	.$LDIR+1024				; k            LK
	MOVB	R2,(R1)+				;             WEI
	MOV	#.$LDAT+106,R1				; A F        CSI A0
	TST	.$LDAT+132				; w Z        A6W BJ
	BEQ	.$LDIR+1116				;              SJ
	JSR	PC,.$LDIR+1146				; w          AW1  X
	MOV	#.$LDAT+61,R0				; @ 1        CSH AI
	JSR	PC,.$LDIR+1164				; w          AW1  0
	TST	.$LDAT+134				; w \        A6W BL
	BEQ	.$LDIR+1144				;              SL
	MOV	#.$LDAT+67,R0				; @ 7        CSH AO
	JSR	PC,.$LDIR+1164				; w          AW1  P
	RTS	PC					;              CO
	MOV	#.$LDAT+56,R0				; @ .        CSH AF
	MOVB	(R1)+,(R0)+				; P           W H
	TSTB	(R1)					; I           VNY
	BNE	.$LDIR+1152				; }            SE
	TSTB	(R1)+					; Q           VN3
	RTS	PC					;              CO
	MOVB	(R1)+,R3				; C           W.5
	CMPB	#52,R3					; C%*        ZT5 AB
	BEQ	.$LDIR+1220				;              SR
	CMPB	#45,R3					; C%%        ZT5  7
	BEQ	.$LDIR+1226				;              SR
	CMPB	#77,R3					; C%?        ZT5 AW
	BEQ	.$LDIR+1226				;              SO
	MOVB	R3,(R0)+				; P           WF2
	TSTB	(R1)					; I           VNY
	BNE	.$LDIR+1164				; s            R5
	BR	.$LDIR+1234				;              FV
	TSTB	(R1)+					; Q           VN3
	BNE	.$LDIR+1220				; ~            SF
	RTS	PC					;              CO
	MOVB	#40,(R0)+				; P          W82  2
	BR	.$LDIR+1164				; l            LL
	TSTB	(R1)+					; Q           VN3
	RTS	PC					;              CO
	MOV	#.$LDAT+73,R1				; A ;        CSI AS
	MOV	#.$LDAT+61,R0				; @ 1        CSH AI
	TSTB	(R0)					; H           VNX
	BEQ	.$LDIR+1276				;              SQ
	CMPB	#40,(R0)				; H%         ZU   2
	BNE	.$LDIR+1266				;              L4
	CMPB	(R0)+,(R1)+				;  $          ZJA
	BR	.$LDIR+1250				; y            LY
	CMPB	(R0)+,(R1)+				;  $          ZJA
	BEQ	.$LDIR+1250				; w            YO
	SEC						; 1            DQ
	RTS	PC					;              CO
	CLC						; !            DA
	RTS	PC					;              CO
	.PSECT	WILDAT
.=.$LDAT+0
	HALT						;                
	HALT						;                
	HALT						;                
	HALT						;                
	HALT						;                
	HALT						;                
	HALT						;                
	HALT						;                
	HALT						;                
	MOV	@-(R2),@0(R0)				; 8          DK    
	HALT						;                
	HALT						;                
	BPT						;               C
	.WORD	.$LDAT+52				; *            AB
	.WORD	.$LDAT+56				; .            AF
	.WORD	.$LDAT+22				;               R
	BPT						;               C
	.WORD	.$LDAT+54				; ,            AD
	HALT						;                
	.WORD	.$LDAT+73				; ;            AS
	BPT						;               C
	.WORD	11					;               I
	BIC	@-(R5),R4				; DK          LA.
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	CMP	R0,R0					;             ED2
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	CMP	R0,-(R0)				;             EEX
	.BYTE	000					;           
.=.$LDAT+132
	HALT						;           
	HALT						;           
	.END