Directory of image this file is from
This file as a plain text file

*20
	SEGMNT 3
	*200
QAINIT,	LDA I
2
ADD
STA I
QAB,	0
ADD QAL+3
STC 1
LDA 1
ADD QAQ+1
STC QAG-3
LDA I 1
STC QARFSH-1
STC 6
QACA,SET 3
QARFSH-1
SET 4
QAG-3
SET 1
4
JMP QAT
16
LDH I 4
QAD,	JMP QAO
JMP .+6
JMP QAE
SAE I
43
JMP QAD
JMP QACA+4
STH 3
LDH I 4
ADA I
-60
COM
STC 6
STH I 3
XSK I 6
JMP .-2
LDH I 3
JMP QAD
QAE,	STH 3
SET I 4
0
QARFSH,	LDA I
277	/VERT COORD, TOP LINE
STC QAH-1
SET I 3
0
SET 5
QARFSH-1
QAG,	SET 1
3
JMP QAT
JMP .+7
LDH I 3
LDA I
BCL I
STC QAM+2
ADD QAW
JMP QAM
LDH I 3
LDA I
BSE I
STC QAM+2
ADD QAW+1
QAM,	STC QAP+3
MSC I 4
BSE I
200
MSC 4
SET I 1
100
LDA I
-40
ADM I
0
QAH,	LDH I 3
JMP QAO+1
JMP QAZ
JMP QAJ
SHD I
4300
JMP QAG
JMP QAP
JMP QAH
JMP QAP
SRO I
0
JMP QAF
QAI,	LDH I 5
JMP QAO+1
JMP QAH
JMP QAH
JMP QAI-4
QAJ,	JMP GETKBD
AZE I
JMP QAB
SET I 2
QAY
SHD 2
JMP QAK+4
SHD I 2
JMP QAN
XSK 6
JMP QARFSH
SHD I 2
JMP QAL
SHD I 2
JMP QAK
SHD I 2
JMP QACA
SHD I 2
JMP QARFSH
SHD I 2
JMP QAL
SHD I 2
JMP QARFSH
STC .+5
JMP QAO
JMP QAQ
JMP QAQ
LDA I
0
STH 4
JMP QARFSH
QAL,	LDH 4
JMP QAO+1
JMP QARFSH
-6002
LDH 2
SAE I
37
JMP QAQ
SET 5
4
SET 3
4
JMP .+2
LDH I 5
LDH I 3
JMP QAO+1
NOP
CLR
STH 5
AZE
JMP .-7
JMP QAQ
QAN,	XSK 6
JMP QAK+4
JMP QAO
JMP QARFSH
JMP QAE+1
JMP QAN+2
QAO,	LDH I 4
SHD I
7400
JMP
SAE I
34
XSK I
XSK I
JMP
QAP,	ROL 1
ADD QAX+4
STC 2
ADD QAU
ADD QAU
ADD 1
STC 1
ADD 5
COM
ADD 4
AZE
CLR
STC QAI-2
ADD QAH-1
DSC 2
DSC I 2
JMP
QAQ,	LDA I
-4000
ADM
4
JMP QARFSH
QAT,	LDH I 1
SHD I
600
JMP
SAE I
10
XSK I
XSK I
JMP
QAZ,	LDH I 3
LDA I
40
JMP QAI-4
QAK,	LDH I 4
AZE I
JMP QAQ
JMP QAX
LDA I
1
ADM
QAB
JMP QAB
QAV,	101
101
4477
7744
5177
2651
4136
2241
4177
3641
4577
4145
4477
4044
4136
2645
1077
7710
7741
41
4142
4076
1077
4324
177
301
3077
7730
3077
7706
4177
7741
4477
3044
4276
376
4477
3146
5121
4651
4040
4077
177
7701
176
7402
677
7701
1463
6314
770
7\7
4543
6151
4177
0
0
0
0
7741
QAY,	4543
7476
3634
3747
0
0
7500
0
7\0
70
QAX,	JMP QAO+1
JMP QAQ
JMP QAQ
JMP QARFSH
QAV
0
5166
526
0
0
3600
41
4100
36
2050
50
404
437
500
6
404
404
1
0
601
4030
4536
3651
2101
177
4523
2151
4122
2651
2414
477
5172
651
1506
4225
4443
6050
5126
2651
5122
3651
2200
0
4601
0
QAU,	2
0
1212
1212
QAW,	NOP
ADD QAU
4020
2055
QAF,	DSC I
6\0
JMP QAI
GETKBD,	LDA
0
STC QAEXIT+6
ADD 1
STC QAEXIT+3
ADD 2
STC QAEXIT+5
STC QAEXIT+1
KST
JMP
IOB
6036
STA I
QATY,	0
ADA I
-237
APO
JMP QACNTR
SET I 1
QACHAR-1
SET I 2
-7
LDA
QATY
SAE I 1
JMP .+2
JMP QAEXIT
XSK I 2
JMP .-4
ADA I
-337
APO
JMP QALEGL
SAE I 1
JMP .+7
LDA I
334
JMP QATPE
LDA I
37
JMP QAEXIT+2
SAE I 1
JMP QAEXIT
JMP QAEXIT+2
QALEGL,	LDA
QATY
JMP QATPE
ADD QATY
BCL I
7700
JMP QAEXIT+2
QACNTR,	SAE I
7755
JMP QACKLF
LDA I
43
STC QAEXIT+1
LDA I
215
JMP QATPE
LDA I
212
JMP QATPE
JMP QAEXIT
QACKLF,	SAE I
7752
JMP .+4
LDA I
45
JMP QACNTR+5
SAE I
7751
JMP QAEXIT
LDA I
47
JMP QAEXIT+2
QAEXIT,	LDA I
0
SET I 1
0
SET I 2
0
JMP
QATPE,	IOB
6046
LDA
0
STC .+4
IOB
6041
JMP .-2
JMP 0
QACHAR,	243
244
245
247
300
336
337
40
36
/END QANDAS
AQ,	JMP QAINIT
	T1
	ASW
	JMP QARFSH
	LDH
	ASW+1
	STH
	ASW
	LDA I
	JMP .+5
	STC DF
	LDA
	ASW
	JMP DD
	LDH
	ASW+4001
	ADA I
	-1
	JMP DE
	COM
	BCL I
	7770
	ROL 3
	ADA
	15
	STA
	X+2000
	LDH
	ASW+3
	STH
	ASW+2
	LDA I
	JMP .+5
	STC DF
	LDA
	ASW+2
	JMP DD
	LDH
	ASW+4003
	ADA I
	-1
	JMP DE
	COM
	BCL I
	7770
	ROL 3
	ADA
	15
	STA
	Y+2000
	LDF 3
	LIF 2
RQ,	0
DE,	STA I
UT,	0
	BCL I
	7
	SAE I
	60
	JMP AQ
	LDA
	UT
	BCL I
	60
	JMP
UAS,	LDA I
U0,	0
	ROL 3
	ADD U1
	JMP
U1,	0
DD,	SET I 15
	0
	SAE I
	2221
	SKP
	JMP DF
	XSK I 15
	SAE I
	1621
	SKP
	JMP DF
	XSK I 15
	SAE I
	221
	SKP
	JMP DF
	XSK I 15
	SAE I
	2140
	SKP
	JMP DF
	XSK I 15
	SAE I
	1340
	SKP
	JMP DF
	XSK I 15
	SAE I
	213
	SKP
	JMP DF
	XSK I 15
	SAE I
	1613
	SKP
	JMP DF
	XSK I 15
	SAE I
	2213
	JMP AQ
DF,	0
T1,	TEXT Z I
	 AM
	 BLK
	<3
	<3\Z
CQ,	LDH
	ASW+4000
	STH
	T2+4012
	LDA
	ASW+1
	STA
	T2+13
	JMP QAINIT
	T2
	ASW
	JMP QARFSH
	JMP AQ
T2,	TEXT ZYOU HAVE NO PIECE ON ABC\Z
EQ,	LDH
	ASW+4000
	STH
	T3+5
	LDH
	ASW+1
	STH
	T3+4005
	LDH
	ASW+4001
	STH
	T3+6
	LDH
	ASW+4002
	STH
	T3+4015
	LDA
	ASW+3
	STA
	T3+16
	JMP QAINIT
	T3
	ASW
	JMP QARFSH
	JMP AQ
T3,	TEXT ZYOUR A ON BCD CANT MOVE TO EFG\Z
HQ,	JMP QAINIT
	T5
	ASW
	JMP QARFSH
	JMP AQ
T5,	TEXT ZCHECK BY A X\Z
IQ,	JMP QAINIT
	T6
	ASW
	JMP QARFSH
	HLT
T6,	TEXT ZYOU WIN\Z
JQ,	JMP QAINIT
	T7
	ASW
	JMP QARFSH
	HLT
T7,	TEXT ZSTALEMATE\Z
SQ,	STH
	T1+4000
	LDA
	X+2000
	BCL I
	7
	ROR 3
	ADA I
	61
	STH
	T1+3
	LDA
	X+2000
	BCL I
	70
	ADA I
	TA1
	STC 7
	LDA 7
	STA
	T1+2
	LDA
	Y+2000
	BCL I
	7
	ROR 3
	ADA I
	61
	STH
	T1+6
	LDA
	Y+2000
	BCL I
	70
	ADA I
	TA1
	STC 7
	LDA 7
	STA
	T1+5
	SET I 15
	1767
PMW,	LDA I 15
	SAE I
	1
	JMP PM2
	LDA I
	5
	STA 15
PM2,	XSK 15
	JMP PMW
	LIF 2
	LDF 3
	JMP RSQ
TA1,	2122
	2116
	2102
	4021
	4013
	1302
	1316
	1322
LQ,	LDA
	ZM+2000
	ADA I
	TB-1
	STC 7
	LDA 7
	STH
	T4+4000
	LDA
	XM+2000
	BCL I
	7
	ROR 3
	ADA I
	61
	STH
	T4+3
	LDA
	XM+2000
	BCL I
	70
	ADA I
	TA1
	STC 7
	LDA 7
	STA
	T4+2
	LDA
	YM+2000
	BCL I
	7
	ROR 3
	ADA I
	61
	STH
	T4+6
	LDA
	YM+2000
	BCL I
	70
	ADA I
	TA1
	STC 7
	LDA 7
	STA
	T4+5
	JMP QAINIT
	T4
	ASW
	JMP QARFSH
	HLT
T4,	TEXT Z A
	BCD 
	EFG
	MATE\Z
TB,	20
	16
	2
	22
	21
	13
KQ,	JMP QAINIT
	T8
	ASW
	JMP QARFSH
	LDA
	ASW
	BCL I
	7770
	COM
	LIF 2
	JMP KQR
T8,	TEXT ZPROMOTE<1
	5=QUEEN
	4=ROOK
	3=BISHOP
	2=KNIGHT\Z
ASW,	0
	SEGMNT 1
	*20
ZAE,	LDA
	Y+2000
	BCL I
	7
	COM
	STC ZW
	LDA
	X+2000
	BCL I
	7
	ADD ZW
	STA
	ZWB
	APO
	COM
	JMP
ZAF,	LDA
	Y+2000
	BCL I
	70
	COM
	STC ZWD
	LDA
	X+2000
	BCL I
	70
	ADD ZWD
	JMP
ZW,	0
ZWA,	0
ZWB,	0
ZWD,	0
ZCR,	JMP ZAE
	AZE
	JMP CR4
	LDA
	X+2000
	BCL I
	70
	STC ZWA
	LDA
	Y+2000
	BCL I
	70
	STC ZWB
CR1,	ADD ZWB
	COM
	ADD ZWA
	STA
	ZW
	AZE I
	JMP ZNO
	APO
	COM
	SAE I
	1
	SKP
	JMP ZYES
	LDA
	ZW
	APO
	JMP CR2
	LDA I
	-1
	ADM
	ZWA
	JMP CR3
CR2,	LDA I
	1
	ADM
	ZWA
CR3,	LDA
	X+2000
	BCL I
	7
	ADD ZWA
	ADA I
	3700
	STC 15
	LDF 3
	LDA 15
	LDF 2
	AZE
	JMP ZNO
	JMP CR1
CR4,	JMP ZAF
	AZE
	JMP ZNO
	LDA
	X+2000
	BCL I
	7
	STC ZWA
	LDA
	Y+2000
	BCL I
	7
	STC ZWB
CR5,	ADD ZWB
	COM
	ADD ZWA
	STA
	ZW
	APO
	COM
	SAE I
	10
	SKP
	JMP ZYES
	LDA
	ZW
	APO
	JMP CR6
	LDA I
	-10
	ADM
	ZWA
	JMP CR7
CR6,	LDA I
	10
	ADM
	ZWA
CR7,	LDA
	X+2000
	BCL I
	70
	ADD ZWA
	ADA I
	3700
	STC 15
	LDF 3
	LDA 15
	LDF 2
	AZE
	JMP ZNO
	JMP CR5
ZCB,	JMP ZAE
	ROR 3
	STC ZW
	JMP ZAF
	STC ZWA
	LDA
	X+2000
	STC ZWD
	ADD ZWA
	APO
	COM
	SAE
	ZW
	JMP ZNO
	AZE I
	JMP ZNO
CB5,	SAE I
	1
	SKP
	JMP ZYES
	ADA I
	-1
	STC ZW
	ADD ZWB
	APO
	JMP CB1
	LDA I
	-10
	ADM
	ZWD
	JMP CB2
CB1,	LDA I
	10
	ADM
	ZWD
CB2,	LDA
	ZWA
	APO
	JMP CB3
	LDA I
	-1
	ADM
	ZWD
	JMP CB4
CB3,	LDA I
	1
	ADM
	ZWD
CB4,	LDA I
	3700
	ADD ZWD
	STC 15
	LDF 3
	LDA 15
	LDF 2
	AZE
	JMP ZNO
	LDA
	ZW
	JMP CB5
ZYES,	LDF 3
	LIF 2
	JMP YES
ZNO,	LDF 3
	LIF 2
	JMP NO
GB,	SET I 1
	-100
	CLR
	STA I 1
	XSK 1
	JMP .-2
	LDA I
	1
	SET I 1
	3707
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	COM
	SET I 1
	3757
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	STA I 1
	LDA I
	2
	STA
	3701
	STA
	3706
	COM
	STA
	3771
	STA
	3776
	LDA I
	3
	STA
	3702
	STA
	3705
	COM
	STA
	3772
	STA
	3775
	LDA I
	4
	STA
	3700
	STA
	3707
	COM
	STA
	3770
	STA
	3777
	LDA I
	5
	STA
	3703
	COM
	STA
	3773
	LDA I
	6
	STA
	3704
	COM
	STA
	3774
	SET I 1
	T1+1777
	LDA I
	4011
	STA I 1
	LDA I
	4347
	STA I 1
	LDA I
	4001
	STA I 1
	LDA I
	1543
	STA I 1
	LDA I
	4740
	STA I 1
	LDA I
	0214
	STA I 1
	LDA I
	1343
	STA I 1
	LIF 2
	JMP GBR
ZCBP,	JMP ZAF
	AZE
	JMP CBP1
	LDA
	X+2000
	BCL I
	7
	SAE I
	60
	JMP CBP3
	LDA
	Y+2000
	BCL I
	7
	SAE I
	40
	JMP CBP3
	LDA
	Y+2000
	ADA I
	3710
	STC 7
	LDF 3
	LDA 7
	LDF 2
	AZE
	JMP ZNO
	JMP CBP4
CBP3,	LDA
	X+2000
	BCL I
	7
	STC ZW
	LDA
	Y+2000
	BCL I
	7
	ADA I
	10
	SAE
	ZW
	JMP ZNO
CBP4,	LDA
	Y+2000
	ADA I
	3700
	STC 16
	LDF 3
	LDA 16
	LDF 2
	AZE
	JMP ZNO
	JMP ZYES
CBP1,	JMP ZAE
	LDA
	ZWB
	SAE I
	10
	JMP ZNO
	JMP ZAF
	APO
	COM
	SAE I
	1
	JMP ZNO
	LDA
	Y+2000
	ADA I
	3700
	STC 16
	LDF 3
	LDA 16
	LDF 2
	AZE
	APO
	SKP
	JMP ZYES
	SNS
	JMP ZNO
	LDA
	X+2000
	BCL I
	7
	SAE I
	30
	JMP ZNO
	LDA
	X+2000
	ADA I
	3700
	STC 17
	LDA
	Y+2000
	ADA I
	3700
	STC 16
	LDF 3
	LDA 17
	STA 16
	LDA I
	10
	ADM
	16
	CLR
	STA 17
	STA 16
	HLT
	LIF 2
	JMP CKR
ZCWP,	JMP ZAF
	AZE
	JMP CWP1
	LDA
	X+2000
	BCL I
	7
	SAE I
	10
	JMP CWP3
	LDA
	Y+2000
	BCL I
	7
	SAE I
	30
	JMP CWP3
	LDA
	Y+2000
	ADA I
	3670
	STC 7
	LDF 3
	LDA 7
	LDF 2
	AZE
	JMP ZNO
	JMP CWP4
CWP3,	LDA
	X+2000
	BCL I
	7
	STC ZW
	LDA
	Y+2000
	BCL I
	7
	ADA I
	-10
	SAE
	ZW
	JMP ZNO
CWP4,	LDA
	Y+2000
	ADA I
	3700
	STC 16
	LDF 3
	LDA 16
	LDF 2
	AZE
	JMP ZNO
	JMP ZYES
CWP1,	LDF 3
	LIF 2
	JMP CWPC
	SEGMNT 2
	*20
	LIF 1
	JMP GB
GBR,	SNS I 1
	JMP BM
RN,	LDA I
	LDA
	STC BT
	LDA I
	-0
	STC NWP
	LDA I
	JMP TR1
	STC TR
	SET I 2
	-10
	SET I 15
	3677
PMR,	LDA I 15
	SAE I
	-1
	JMP PM1
	LIF 3
	JMP KQ
KQR,	STA 15
PM1,	XSK I 2
	JMP PMR
	JMP AG
	SET I 10
	3677
MA,	LDA I 10
	APO I
	AZE I
	JMP MB
	SET I 12
	3677
MC,	LDA I 12
	APO I
	AZE I
	SKP
	JMP MD
	LDA
	12
	BCL I
	7700
	STA I
YM,	0
	STC Y
	LDA
	10
	BCL I
	7700
	STA I
XM,	0
	STC X
	JMP CWM
	LDA
	7
	AZE I
	JMP MD
	JMP A
	STA I
ZM,	0
	JMP AB
	JMP AC
	JMP WKCH
	LDA
	7
	AZE
	JMP ME
	JMP BKCH
	LDA
	7
	AZE I
	JMP ME
	SET I 11
	3677
	LDA I 11
	LDF
	STA 11
	LDF 3
	XSK 11
	JMP .-5
	SET I 3
	3677
MF,	LDA I 3
	APO I
	JMP MG
	SET I 14
	3677
MH,	LDA I 14
	APO
	JMP MJ
	LDA
	3
	BCL I
	7700
	STC X
	LDA
	14
	BCL I
	7700
	STC Y
	JMP CBM
	LDA
	7
	AZE I
	JMP MJ
	JMP A
	JMP AB
	JMP AC
	JMP BKCH
	LDA
	7
	AZE I
	JMP ME
	SET I 11
	3677
	LDF
	LDA I 11
	LDF 3
	STA 11
	XSK 11
	JMP .-5
MJ,	XSK 14
	JMP MH
MG,	XSK 3
	JMP MF
	LIF 3
	LDF 2
	JMP LQ
ME,	JMP AH
MD,	XSK 12
	JMP MC
MB,	XSK 10
	JMP MA
	SNS I 5
	JMP OO
	SNS I 4
	JMP OOO
RM,	SET I 5
	-100
	SET I 6
	-100
	SET I 4
	24
	LDA I
	JMP PG
	STC WCHR
	SET I 10
	3677
PD,	LDA I 10
	APO I
	JMP PE
	SET I 12
	3677
PF,	LDA I 12
	AZE I
	JMP PG
	APO I
	JMP PH
PG,	XSK 12
	JMP PF
PE,	XSK 10
	JMP PD
	LDA I
	NOP
	STC TR
	STC E
	JMP BA
PH,	STC P
	ADD 12
	BCL I
	7700
	STC X
	LDA
	10
	BCL I
	7700
	STC Y
	JMP CWM
	LDA
	7
	AZE
	JMP G
	JMP PG
E1,	LDA
	XT
	STC X
	ADD YT
	STC Y
	LDA I
	JMP TR1
	STC TR
	JMP WM
BA,	LDA I
	JMP BE
	STC WCHR
	LDA I 5
	AZE I
	JMP BB
	APO I
	JMP BC
BB,	XSK 5
	JMP BA
	LDA
	E
	AZE
	JMP E1
	LDA I
	-1
	ADM
	NWP
	SAE I
	-6
	JMP RM
	JMP WKCH
	LIF 3
	LDA
	7
	AZE
	JMP IQ
	JMP JQ
BC,	LDA
	5
	BCL I
	7700
	STA
	XB
BD,	LDA I
	1
	ADM
	4
	BCL I
	7700
	STA I
Y,	0
	LDA I
XB,	0
	STA I
X,	0
	JMP CWM
	LDA
	7
	AZE I
	JMP BE
	JMP AB
	APO I
	AZE I
	JMP TP
BE,	XSK I 6
	JMP BD
	SET I 6
	-100
	JMP BB
WM,	JMP AB
	JMP A
	STA I
P,	0
	JMP AC
TR,	JMP TR1
	JMP WKCH
	LDA
	7
	AZE I
	JMP .+3
	JMP AH
	JMP BE
	SET I 1
	0
	SET I 2
	3677
EV1,	SET I 15
	3677
	LDA I 2
	AZE
	APO
	JMP EV2
	LDA
	2
	BCL I
	7700
	STC X
EV3,	LDA I 15
	APO I
	AZE I
	SKP
	JMP EV4
	LDA
	15
	BCL I
	7700
	STC Y
	JMP CWM
	LDA
	7
	ADM
	1
	JMP AB
	APO I
	JMP EV5
	LDA
	7
	ROL 1
	STA
	7
	ADM
	1
EV5,	JMP A
	SAE I
	5
	SKP
	JMP EV4
	LDA
	7
	ROL 3
	ADM
	1
EV4,	XSK 15
	JMP EV3
EV2,	XSK 2
	JMP EV1
	JMP AH
	LDA I
E,	0
	COM
	ADD 1
	APO
	JMP BE
	LDA
	1
	STC E
	ADD XZ
	STA I
XT,	0
	LDA
	YZ
	STA I
YT,	0
	JMP BE
TR1,	JMP AA
	LIF 3
	LDF 2
	JMP SQ
RSQ,	JMP WKCH
	LDA
	7
	AZE I
	JMP BM
	JMP AH
WCHR,	JMP BE
BM,	JMP AG
	LDA I
	JMP .+6
	STA
	RQ+2000
	LDF 2
	LIF 3
	JMP AQ
	JMP A
	APO I
	JMP BQ
	JMP AB
	JMP CBM
	LDA
	7
	AZE I
	JMP DQ
	JMP AB
	APO
	JMP DQ
	JMP AC
CKR,	JMP BKCH
	LDA
	7
	AZE I
	JMP RN
	JMP AH
	JMP GQ
CK,	LDA
	0
	STC JR
	JMP AF
	APO
	COM
	STC WA
	JMP AE
	AZE
	JMP CK1
	ADD WA
	SAE I
	1
	JMP CK2
	JMP YES
CK1,	SAE I
	10
	JMP NO
	LDA I
	-1
	ADD WA
	APO
	JMP YES
	JMP NO
CK2,	SNS
	JMP NO
	LDA
	X
	SAE I
	74
	JMP NO
	LDA
	Y
	SAE I
	72
	SKP
	JMP CK3
	SAE I
	76
	JMP NO
	JMP AC
	LDA I
	3777
	STC 17
	LDA I
	3775
	STC 16
	JMP AC
	HLT
	JMP CKR
CK3,	JMP AC
	LDA I
	3770
	STC 17
	LDA I
	3773
	STC 16
	JMP AC
	HLT
	JMP CKR
CD,	LDA
	0
	STC JR1
	JMP CB
	LDA
	7
	AZE
	JMP YES1
	JMP CR
	JMP JR1
CR,	LDA
	0
	STC JR
	LDF 2
	LIF 1
	JMP ZCR
CB,	LDA
	0
	STC JR
	LDF 2
	LIF 1
	JMP ZCB
CN,	LDA
	0
	STC JR
	JMP AF
	APO
	COM
	ADA I
	JMP .+3
	STC .+1
	0
	JMP NO
	JMP CN2
	JMP CN1
	JMP NO
	JMP NO
	JMP NO
	JMP NO
	JMP NO
CN1,	JMP AE
	SAE I
	10
	JMP NO
	JMP YES
CN2,	JMP AE
	SAE I
	20
	JMP NO
	JMP YES
CWP,	LDA
	0
	STC JR
	LDF 2
	LIF 1
	JMP ZCWP
CBP,	LDA
	0
	STC JR
	LDF 2
	LIF 1
	JMP ZCBP
CWPC,	JMP AE
	LDA
	WB
	SAE I
	-10
	JMP NO
	JMP AF
	APO
	COM
	SAE I
	1
	JMP NO
	JMP AB
TC,	APO I
	JMP NO
	JMP YES
A,	LDA
	X
	ADA I
	3700
	STC 17
	LDA 17
	JMP
AA,	LDA
	P
	ADA I
	T-1
	STC 7
	LDA 7
	JMP
AB,	LDA
	Y
	ADA I
	3700
	STC 16
	LDA 16
	JMP
AC,	LDA 17
	STA 16
	CLR
	STA 17
	JMP
AE,	LDA
	Y
	BCL I
	7
	COM
	STC W
	ADD X
	BCL I
	7
	ADD W
	STA
	WB
	APO
	COM
	JMP
AF,	LDA
	Y
	BCL I
	70
	COM
	STC WD
	ADD X
	BCL I
	70
	ADD WD
	JMP
BQ,	LDF 2
	LIF 3
	JMP CQ
DQ,	JMP AA
	STH
	T3+6002
	LDF 2
	LIF 3
	JMP EQ
GQ,	JMP AA
	STH
	T5+6005
	LDF 2
	LIF 3
	JMP HQ
YES1,	SET I 7
	1
	JMP JR1
YES,	SET I 7
	1
	JMP JR
NO,	SET I 7
	0
JR,	0
NO1,	SET I 7
	0
JR1,	0
T,	20
	16
	2
	22
	21
	13
W,	0
WA,	0
WB,	0
WD,	0
CWM,	LDA
	0
	STC JR2
	JMP A
	ROL 1
	ADA I
	JMP WP-1
	STC WP
WP,	0
	JMP CWP
	JMP JR2
	JMP CN
	JMP JR2
	JMP CB
	JMP JR2
	JMP CR
	JMP JR2
	JMP CD
	JMP JR2
	JMP CK
	JMP JR2
JR2,	0
AG,	LDA
	0
	STC JR
	SET I 10
	2077
	SET I 11
	3677
	LDA I 11
	STA I 10
	XSK 11
	JMP .-3
	JMP JR
AH,	LDA
	0
	STC JR
	SET I 2
	2077
	SET I 15
	3677
	LDA I 2
	STA I 15
	XSK 15
	JMP .-3
	JMP JR
BKCH,	LDA
	0
	STC JR3
	SET I 11
	3677
BKCHR,	LDA I 11
	SAE I
	-6
	JMP BKCH1
	LDA
	11
	BCL I
	7700
	STC Y
	SET I 11
	3677
EA,	LDA I 11
	AZE I
	JMP EB
	APO I
	JMP EC
EB,	XSK 11
	JMP EA
	JMP NO3
EC,	STC P
	ADD 11
	BCL I
	7700
	STC X
	JMP CWM
	LDA
	7
	AZE
	JMP JR3
	JMP EB
BKCH1,	XSK 11
	JMP BKCHR
	JMP NO3
NO3,	SET I 7
	0
JR3,	0
CBM,	LDA
	0
	STC JR2
	JMP A
	COM
	STA
	P
	ROL 1
	ADA I
	JMP BP-1
	STC BP
BP,	0
	JMP CBP
	JMP JR2
	JMP CN
	JMP JR2
	JMP CB
	JMP JR2
	JMP CR
	JMP JR2
	JMP CD
	JMP JR2
	JMP CK
	JMP JR2
WKCH,	LDA
	0
	STC JR3
	SET I 11
	3677
WKCHR,	LDA I 11
	SAE I
	6
	JMP WKCH1
	LDA
	11
	BCL I
	7700
	STC Y
	SET I 11
	3677
FA,	LDA I 11
	APO
	JMP FC
FB,	XSK 11
	JMP FA
	JMP NO3
FC,	LDA
	11
	BCL I
	7700
	STC X
	JMP CBM
	LDA
	7
	AZE
	JMP JR3
	JMP FB
WKCH1,	XSK 11
	JMP WKCHR
	JMP NO3
TP,	JMP A
	STA
	P
	STC PT
	JMP AC
BT,	LDA
	X
	STC XZ
	ADD Y
	STA I
YZ,	0
	LDA
	P
	STA I
PZ,	0
	SET I 2
	3677
TS3,	LDA I 2
	ADA I
NWP,	-0
	APO
	JMP TS4
	LDA I
	AZE I
	STC TC
	LDA
	2
	BCL I
	7700
	STC Y
	SET I 1
	0
	SET I 12
	3677
TS,	LDA I 12
	AZE I
	JMP TS1
	APO
	JMP TS2
	LDA
	12
	BCL I
	7700
	STC X
	JMP CWM
	LDA
	7
	COM
	ADM
	1
	JMP TS1
TS2,	LDA
	12
	BCL I
	7700
	STC X
	JMP CBM
	LDA
	7
	ADM
	1
TS1,	XSK 12
	JMP TS
	LDA I
PT,	0
	STC P
	LDA I
	APO I
	STC TC
	ADD 1
	APO I
	JMP TP3
	SET I 12
	3677
J1,	LDA I 12
	APO I
	JMP J2
	ADA 2
	APO
	JMP J2
	LDA
	12
	BCL I
	7700
	STC X
	ADD 2
	BCL I
	7700
	STC Y
	JMP CBM
	LDA
	7
	AZE
	JMP TP3
J2,	XSK 12
	JMP J1
TS4,	XSK 2
	JMP TS3
	LDA I
XZ,	0
	STC X
	ADD YZ
	STC Y
	ADD PZ
	STC P
	JMP TR
TP3,	JMP AH
	JMP BE
G,	LDA
	X
	STA I
GX,	0
	LDA
	Y
	STA I
GY,	0
	LDA I
	6
	STC H1+2
	LDA 10
	COM
	STC B
	JMP AB
	JMP A
	JMP AC
	JMP HV
G3,	JMP AH
	JMP PG
H,	SET I 15
	3677
H1,	LDA I 15
	SAE I
	5
	JMP H2
	LDA
	15
	BCL I
	7700
	STC Y
	SET I 2
	3677
H3,	LDA I 2
	APO I
	JMP H4
	LDA
	2
	BCL I
	7700
	STC X
	JMP CBM
	LDA
	7
	AZE
	JMP G3
H4,	XSK 2
	JMP H3
H2,	XSK 15
	JMP H1
HV,	LDA I
	-1
	ADM
	H1+2
	SAE I
B,	0
	JMP H
	JMP AH
	LDA
	GX
	STC X
	ADD GY
	STC Y
	JMP WM
OO,	LDA I
	3707
	STC 17
	LDA I
	3705
	STC 16
	JMP AC
	LDA I
	4
	STC X
	LDA I
	6
	STC Y
	JMP WM
OOO,	LDA I
	3700
	STC 17
	LDA I
	3703
	STC 16
	JMP AC
	LDA I
	4
	STC X
	LDA I
	2
	STC Y
	JMP WM