	.GLOBL	$RESR6,$RESR5,$KORE,$SAV10,$VER
	.GLOBL	$BEGIN,FILE,$TTY,$END
	.RADIX	10
L0:
	SUB	#6,%6
	JSR	%7,$B127
	.GLOBL	$B127
	TST 	10(6)
	BLT	L1
	JMP	L2
L1:
	MOV 	10(6),%0
	NEG 	%0
	MOV 	%0,4(6)
	JMP	L3
L2:
	MOV 	10(6),4(6)
L3:
	MOV 	4(6),%0
	BIC 	#65520,%0
	MOV 	%0,2(6)
	MOV 	8(6),%0
	MOV 	4(6),%1
	SWAB	%1
	MOVB	%1,%1
	TSTB	%1
	BPL	L4
	DECB	%1
L4:
	ASRB	%1
	ASRB	%1
	BPL	L5
	INCB	%1
L5:
	ADD 	#64,%1
	MOVB	%1,@%0
	MOV 	8(6),%0
	MOV 	4(6),%1
	SUB 	2(6),%1
	TST 	%1
	BPL	L6
	DEC 	%1
L6:
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	BPL	L7
	INC 	%1
L7:
	BIC 	#65472,%1
	ADD 	#64,%1
	MOVB	%1,1(0)
	TST 	10(6)
	BLT	L8
	JMP	L9
L8:
	MOV 	2(6),@%6
	JMP	L10
L9:
	MOV 	2(6),%0
	ADD 	#16,%0
	MOV 	%0,@%6
L10:
	MOV 	8(6),%0
	MOV 	@%6,%1
	ADD 	#32,%1
	MOVB	%1,2(0)
	MOV	6(6),10(6)
	ADD	#10,%6
	RTS	%7
L11:
	CMP	-(6),-(6)
	JSR	%7,$B127
	TST 	10(6)
	BLT	L12
	JMP	L13
L12:
	NEG 	10(6)
L13:
	TST 	8(6)
	BLT	L14
	JMP	L15
L14:
	NEG 	8(6)
L15:
	MOV 	10(6),%0
	BIC 	#65532,%0
	MOV 	%0,@%6
	MOV 	8(6),%0
	BIC 	#65532,%0
	MOV 	%0,2(6)
	MOV 	6(6),%0
	MOV 	8(6),%1
	TST 	%1
	BPL	L16
	DEC 	%1
L16:
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	BPL	L17
	INC 	%1
L17:
	ADD 	#32,%1
	MOVB	%1,@%0
	MOV 	6(6),%0
	MOV 	2(6),%1
	ASL 	%1
	ASL 	%1
	ADD 	#64,%1
	ADD 	@%6,%1
	MOVB	%1,1(0)
	MOV 	6(6),%0
	MOV 	8(6),%1
	SUB 	2(6),%1
	TST 	%1
	BPL	L18
	DEC 	%1
L18:
	ASR 	%1
	ASR 	%1
	BPL	L19
	INC 	%1
L19:
	BIC 	#65504,%1
	ADD 	#64,%1
	MOVB	%1,2(0)
	MOV 	6(6),%0
	MOV 	10(6),%1
	TST 	%1
	BPL	L20
	DEC 	%1
L20:
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	ASR 	%1
	BPL	L21
	INC 	%1
L21:
	ADD 	#32,%1
	MOVB	%1,3(0)
	MOV 	6(6),%0
	MOV 	10(6),%1
	SUB 	@%6,%1
	TST 	%1
	BPL	L22
	DEC 	%1
L22:
	ASR 	%1
	ASR 	%1
	BPL	L23
	INC 	%1
L23:
	BIC 	#65504,%1
	ADD 	#64,%1
	MOVB	%1,4(0)
	MOV	4(6),10(6)
	ADD	#10,%6
	RTS	%7
L24:
	SUB	#12,%6
	JSR	%7,$B127
	MOV 	18(6),-(6)
	MOV 	%6,%0
	ADD 	#2,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	16(6),-(6)
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	14(6),-(6)
	MOV 	%6,%0
	ADD 	#10,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	.GLOBL	$B20
	MOV 		#L25,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	.GLOBL	$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#8,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	12(6),18(6)
	ADD	#18,%6
	RTS	%7
L25:	.WORD	18764
	.WORD	0
L26:
	SUB	#8,%6
	JSR	%7,$B127
	MOV 	12(6),-(6)
	MOV 	%6,%0
	ADD 	#2,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	10(6),-(6)
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L27,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	8(6),12(6)
	ADD	#12,%6
	RTS	%7
L27:	.WORD	17492
	.WORD	0
L28:
	JSR	%7,$B127
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L29,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	RTS	%7
L29:	.WORD	8485
	.WORD	51
L30:
	JSR	%7,$B127
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L31,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	RTS	%7
L31:	.WORD	8485
	.WORD	48
L32:
	SUB	#6,%6
	JSR	%7,$B127
	MOV 	10(6),-(6)
	MOV 	10(6),-(6)
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L33,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	6(6),10(6)
	ADD	#10,%6
	RTS	%7
L33:	.WORD	18517
	.WORD	0
L34:
	SUB	#16,%6
	JSR	%7,$B127
	MOV 	26(6),-(6)
	MOV 	26(6),-(6)
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	22(6),-(6)
	MOV 	22(6),-(6)
	MOV 	%6,%0
	ADD 	#10,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	18(6),-(6)
	MOV 	%6,%0
	ADD 	#14,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L35,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#12,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	16(6),26(6)
	ADD	#26,%6
	RTS	%7
L35:	.WORD	21074
	.WORD	0
L36:
	SUB	#12,%6
	JSR	%7,$B127
	MOV 	20(6),-(6)
	MOV 	20(6),-(6)
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	16(6),-(6)
	MOV 	16(6),-(6)
	MOV 	%6,%0
	ADD 	#10,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L37,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L38,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	12(6),20(6)
	ADD	#20,%6
	RTS	%7
L37:	.WORD	18005
	.WORD	0
L38:	.WORD	18261
	.WORD	0
L39:
	SUB	#24,%6
	JSR	%7,$B127
	MOV 	32(6),-(6)
	MOV 	32(6),-(6)
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	28(6),-(6)
	MOV 	32(6),-(6)
	MOV 	%6,%0
	ADD 	#10,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	28(6),-(6)
	MOV 	28(6),-(6)
	MOV 	%6,%0
	ADD 	#16,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	32(6),-(6)
	MOV 	28(6),-(6)
	MOV 	%6,%0
	ADD 	#22,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L40,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L41,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L42,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L43,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#12,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L44,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#12,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L45,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#18,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L46,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#18,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L47,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	24(6),32(6)
	ADD	#32,%6
	RTS	%7
L40:	.WORD	18005
	.WORD	0
L41:	.WORD	18261
	.WORD	0
L42:	.WORD	18005
	.WORD	0
L43:	.WORD	18261
	.WORD	0
L44:	.WORD	18005
	.WORD	0
L45:	.WORD	18261
	.WORD	0
L46:	.WORD	18005
	.WORD	0
L47:	.WORD	18261
	.WORD	0
L48:
	SUB	#10,%6
	JSR	%7,$B127
	MOV 	16(6),-(6)
	MOV 	16(6),-(6)
	MOV 	%6,%0
	ADD 	#4,%0
	MOV 	%0,-(6)
	JSR	%7,L11
	MOV 	12(6),-(6)
	MOV 	%6,%0
	ADD 	#8,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L49,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L50,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	%6,%0
	ADD 	#6,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L51,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	10(6),16(6)
	ADD	#16,%6
	RTS	%7
L49:	.WORD	18005
	.WORD	0
L50:	.WORD	20557
	.WORD	0
L51:	.WORD	16981
	.WORD	0
L52:
	CMP	-(6),-(6)
	JSR	%7,$B127
	MOV 	6(6),-(6)
	MOV 	%6,%0
	ADD 	#2,%0
	MOV 	%0,-(6)
	JSR	%7,L0
	MOV 	#27,-(6)
	CLR	-(6)
	JSR	%7,$B20
	MOV 		#L53,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	%6,%0
	MOV 	%0,-(6)
	MOV	#3,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV	4(6),6(6)
	ADD	#6,%6
	RTS	%7
L53:	.WORD	19533
	.WORD	0
L54:
	JSR	%7,$B127
	MOV 	#12,-(6)
	CLR	-(6)
	JSR	%7,$B20
	RTS	%7
	$VER=59.
$BEGIN:
	ADD	#16,$KORE
	JSR	%7,$B127
	JMP	$END
	.END
                                                                                                                                                                                                                                                                                                         