.GLOBL	$RESR6,$RESR5,$KORE,$SAV10,$VER
	.GLOBL	$BEGIN,FILE,$TTY,$END
	.RADIX	10
	$VER=59.
$BEGIN:
	ADD	#66,$KORE
	JSR	%7,$B127
	.GLOBL	$B127
	MOV 	#31,40(5)
	MOV 	#28,42(5)
	MOV 	#31,44(5)
	MOV 	#30,46(5)
	MOV 	#31,48(5)
	MOV 	#30,50(5)
	MOV 	#31,52(5)
	MOV 	#31,54(5)
	MOV 	#30,56(5)
	MOV 	#31,58(5)
	MOV 	#30,60(5)
	MOV 	#31,62(5)
	MOV 	#280,4(5)
	MOV 		#L0,-(6)
	MOV	#32,-(6)
	CLR	-(6)
	JSR	%7,$B32
	.GLOBL	$B32
	JSR	%7,$B4
	.GLOBL	$B4
	MOV 		(6)+,12(5)
	JSR	%7,$B16
	.GLOBL	$B16
	MOV 		#L1,-(6)
	MOV	#18,-(6)
	MOV 	#32,-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,20(5)
	JSR	%7,$B16
	MOV 		#L2,-(6)
	MOV	#18,-(6)
	MOV 	#32,-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,26(5)
	JSR	%7,$B16
	MOV 		#L3,-(6)
	MOV	#32,-(6)
	CLR	-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,14(5)
	JSR	%7,$B16
	MOV 		#L4,-(6)
	MOV	#27,-(6)
	MOV 	#32,-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,22(5)
	JSR	%7,$B16
	MOV 		#L5,-(6)
	MOV	#27,-(6)
	MOV 	#32,-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,28(5)
	JSR	%7,$B16
	MOV 		#L6,-(6)
	MOV	#32,-(6)
	CLR	-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,16(5)
	JSR	%7,$B16
	MOV 		#L7,-(6)
	MOV	#27,-(6)
	MOV 	#32,-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,24(5)
	JSR	%7,$B16
	MOV 		#L8,-(6)
	MOV	#27,-(6)
	MOV 	#32,-(6)
	JSR	%7,$B32
	JSR	%7,$B4
	MOV 		(6)+,30(5)
	JSR	%7,$B16
	CLR 	18(5)
	MOV 	%5,%0
	ADD 	#64,%0
	MOV 	%0,-(6)
	MOV 	#1,-(6)
	MOV 	#12,-(6)
	MOV 	2(6),@4(6)
L10:
	CMP 	@4(6),(6)
	BLE	.+6
	JMP	L11
	MOV 	64(5),%0
	CMP 	%0,#1
	BLT	L12
	CMP 	%0,#12
	BLE	L13
L12:	JSR	%7,$B125
	.GLOBL	$B125
L13:	ASL 	%0
	ADD 	%5,%0
	ADD 	38(0),18(5)
	INC 	@4(6)
	JMP	L10
L11:
	ADD	#6,%6
L9:
	MOV 	12(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	.GLOBL	$B24
	MOV 	20(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	26(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	18(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	JSR	%7,$B36
	.GLOBL	$B36
	MOV 	14(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	22(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	28(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	4(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	JSR	%7,$B36
	MOV 	16(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	24(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	30(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	JSR	%7,$B36
	CMP 	20(5),#1
	BLT	L14
	CLR	%0
	BR	L15
L14:	MOV	#1,%0
L15:
	CMP 	20(5),#12
	BGT	L16
	CLR	%1
	BR	L17
L16:	MOV	#1,%1
L17:
	BISB	%0,%1
	BNE	L18
	JMP	L19
L18:
	MOV 		#L20,-(6)
	MOV	#19,-(6)
	CLR	-(6)
	JSR	%7,$B32
	JSR	%7,$B36
L19:
	MOV 	26(5),6(5)
	MOV 	%5,%0
	ADD 	#64,%0
	MOV 	%0,-(6)
	MOV 	20(5),%0
	DEC 	%0
	MOV 	%0,-(6)
	MOV 	#1,-(6)
	MOV 	2(6),@4(6)
L22:
	CMP 	@4(6),(6)
	BGE	.+6
	JMP	L23
	MOV 	64(5),%0
	CMP 	%0,#1
	BLT	L24
	CMP 	%0,#12
	BLE	L25
L24:	JSR	%7,$B125
L25:	ASL 	%0
	ADD 	%5,%0
	ADD 	38(0),6(5)
	MOV 	64(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	MOV 	6(5),-(6)
	CLR	-(6)
	JSR	%7,$B24
	JSR	%7,$B36
	DEC 	@4(6)
	JMP	L22
L23:
	ADD	#6,%6
L21:
	MOV 	28(5),8(5)
	MOV 	%5,%0
	ADD 	#64,%0
	MOV 	%0,-(6)
	MOV 	22(5),%0
	DEC 	%0
	MOV 	%0,-(6)
	MOV 	#1,-(6)
	MOV 	2(6),@4(6)
L27:
	CMP 	@4(6),(6)
	BGE	.+6
	JMP	L28
	MOV 	64(5),%0
	CMP 	%0,#1
	BLT	L29
	CMP 	%0,#12
	BLE	L30
L29:	JSR	%7,$B125
L30:	ASL 	%0
	ADD 	%5,%0
	ADD 	38(0),8(5)
	DEC 	@4(6)
	JMP	L27
L28:
	ADD	#6,%6
L26:
	MOV 	30(5),10(5)
	MOV 	%5,%0
	ADD 	#64,%0
	MOV 	%0,-(6)
	MOV 	24(5),%0
	DEC 	%0
	MOV 	%0,-(6)
	MOV 	#1,-(6)
	MOV 	2(6),@4(6)
L32:
	CMP 	@4(6),(6)
	BGE	.+6
	JMP	L33
	MOV 	64(5),%0
	CMP 	%0,#1
	BLT	L34
	CMP 	%0,#12
	BLE	L35
L34:	JSR	%7,$B125
L35:	ASL 	%0
	ADD 	%5,%0
	ADD 	38(0),10(5)
	DEC 	@4(6)
	JMP	L32
L33:
	ADD	#6,%6
L31:
	MOV 	12(5),%0
	SUB 	14(5),%0
	MOV 	%0,-(6)
	JSR	%7,$B88
	.GLOBL	$B88
	MOV 	#4,-(6)
	JSR	%7,$B88
	FDIV %6
	JSR	%7,$B86
	.GLOBL	$B86
	MOV 	(6)+,@%5
	MOV 	12(5),%0
	SUB 	16(5),%0
	MOV 	%0,-(6)
	JSR	%7,$B88
	MOV 	#4,-(6)
	JSR	%7,$B88
	FDIV %6
	JSR	%7,$B86
	MOV 	(6)+,2(5)
	MOV 	12(5),%0
	SUB 	14(5),%0
	MOV 	18(5),-(6)
	MOV 	%0,-(6)
	JSR	%7,$B78
	.GLOBL	$B78
	ADD 	@%5,@%6
	ADD 	6(5),@%6
	SUB 	8(5),@%6
	SUB 	4(5),@%6
	JSR	%7,$B88
	MOV 	#4,-(6)
	JSR	%7,$B88
	FDIV %6
	MOV	(6)+,32(5)
	MOV	(6)+,34(5)
	MOV 	12(5),%0
	SUB 	16(5),%0
	MOV 	18(5),-(6)
	MOV 	%0,-(6)
	JSR	%7,$B78
	ADD 	2(5),@%6
	ADD 	6(5),@%6
	SUB 	10(5),@%6
	SUB 	4(5),@%6
	JSR	%7,$B88
	MOV 	#3,-(6)
	JSR	%7,$B88
	FDIV %6
	MOV	(6)+,36(5)
	MOV	(6)+,38(5)
	MOV 	34(5),-(6)
	MOV 	32(5),-(6)
	MOV 	34(5),-(6)
	MOV 	32(5),-(6)
	JSR	%7,$B86
	JSR	%7,$B88
	FSUB %6
	MOV 	38(5),-(6)
	MOV 	36(5),-(6)
	MOV 	38(5),-(6)
	MOV 	36(5),-(6)
	JSR	%7,$B86
	JSR	%7,$B88
	FSUB %6
	JSR	%7,$B84
	.GLOBL	$B84
	BGT	L36
	JMP	L37
L36:
	MOV 		#L38,-(6)
	MOV	#5,-(6)
	CLR	-(6)
	JSR	%7,$B32
	JSR	%7,$B36
	JMP	L39
L37:
	MOV 		#L40,-(6)
	MOV	#6,-(6)
	CLR	-(6)
	JSR	%7,$B32
	JSR	%7,$B36
L39:
	MOV 		#L41,-(6)
	MOV	#2,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	34(5),-(6)
	MOV 	32(5),-(6)
	MOV 	34(5),-(6)
	MOV 	32(5),-(6)
	JSR	%7,$B86
	JSR	%7,$B88
	FSUB %6
	MOV 	#4,-(6)
	MOV 	#3,-(6)
	JSR	%7,$B28
	.GLOBL	$B28
	MOV 		#L42,-(6)
	MOV	#4,-(6)
	CLR	-(6)
	JSR	%7,$B32
	MOV 	38(5),-(6)
	MOV 	36(5),-(6)
	MOV 	38(5),-(6)
	MOV 	36(5),-(6)
	JSR	%7,$B86
	JSR	%7,$B88
	FSUB %6
	MOV 	#4,-(6)
	MOV 	#3,-(6)
	JSR	%7,$B28
	JSR	%7,$B36
	JMP	$END
L0:	.WORD	25614
	.WORD	21569
	.WORD	8257
	.WORD	20307
	.WORD	22850
	.WORD	18772
	.WORD	14929
	.WORD	26400
	.WORD	17487
	.WORD	8224
	.WORD	10272
	.WORD	17679
	.WORD	14968
	.WORD	26382
	.WORD	10599
	.WORD	3898
	.WORD	0
L1:	.WORD	27918
	.WORD	21317
	.WORD	17233
	.WORD	10272
	.WORD	17679
	.WORD	14968
	.WORD	27918
	.WORD	10605
	.WORD	3898
	.WORD	0
L2:	.WORD	25614
	.WORD	20037
	.WORD	8280
	.WORD	10272
	.WORD	17679
	.WORD	14968
	.WORD	25614
	.WORD	10596
	.WORD	3898
	.WORD	0
L3:	.WORD	25870
	.WORD	20295
	.WORD	8250
	.WORD	20327
	.WORD	8260
	.WORD	20306
	.WORD	17494
	.WORD	20037
	.WORD	20809
	.WORD	8250
	.WORD	10272
	.WORD	17679
	.WORD	14968
	.WORD	26382
	.WORD	10599
	.WORD	3898
	.WORD	0
L4:	.WORD	27918
	.WORD	21317
	.WORD	17233
	.WORD	21024
	.WORD	22095
	.WORD	17732
	.WORD	18766
	.WORD	14929
	.WORD	3880
	.WORD	30789
	.WORD	3642
	.WORD	28013
	.WORD	14889
	.WORD	15
L5:	.WORD	25614
	.WORD	20037
	.WORD	8280
	.WORD	20306
	.WORD	17494
	.WORD	20037
	.WORD	20809
	.WORD	8250
	.WORD	3880
	.WORD	30789
	.WORD	3642
	.WORD	25700
	.WORD	14889
	.WORD	15
L6:	.WORD	25870
	.WORD	14917
	.WORD	8224
	.WORD	20327
	.WORD	8260
	.WORD	20306
	.WORD	17494
	.WORD	20037
	.WORD	20809
	.WORD	8250
	.WORD	10272
	.WORD	17679
	.WORD	14968
	.WORD	26382
	.WORD	10599
	.WORD	3898
	.WORD	0
L7:	.WORD	27918
	.WORD	21317
	.WORD	17233
	.WORD	21024
	.WORD	22095
	.WORD	17732
	.WORD	18766
	.WORD	14929
	.WORD	3880
	.WORD	30789
	.WORD	3642
	.WORD	28013
	.WORD	14889
	.WORD	15
L8:	.WORD	25614
	.WORD	20037
	.WORD	8280
	.WORD	20306
	.WORD	17494
	.WORD	20037
	.WORD	20809
	.WORD	8250
	.WORD	3880
	.WORD	30789
	.WORD	3642
	.WORD	25700
	.WORD	14889
	.WORD	15
L20:	.WORD	29710
	.WORD	19265
	.WORD	18255
	.WORD	8271
	.WORD	17741
	.WORD	20819
	.WORD	16707
	.WORD	20000
	.WORD	21573
	.WORD	15
L38:	.WORD	16938
	.WORD	22863
	.WORD	42
L40:	.WORD	18218
	.WORD	21065
	.WORD	10828
	.WORD	0
L41:	.WORD	14925
	.WORD	0
L42:	.WORD	8224
	.WORD	14935
	.WORD	0
	.END