FIELD	0

	*0000
S00000,	0000
P00001,	D05001
P00002,	P00002
P00003,	P00003
D00004,	0200
P00005,	L00547
	7771
P00007,	P00007
P00010,	S00000
P00011,	S00000
D00012,	7401
P00013,	D03607
P00014,	P00003
P00015,	D02420
D00016,	5115
D00017,	5140
P00020,	S00000
D00021,	0000
D00022,	0000
D00023,	0000
D00024,	0004
P00025,	L00400
D00026,	0200
L00027,	AND P00100
D00030,	0000
D00031,	0260
P00032,	L00200
P00033,	L00205
P00034,	L00413
D00035,	1013
P00036,	L00600
D00037,	4440
P00040,	S00614
	AND P00014
	SZA CLA 
P00043,	D05425
	TAD D00035
P00045,	D03164
L00046,	CLA OSR 
P00047,	L00027
	SZA 
	JMP P00054
	JMS S00163
D00053,	3021
P00054,	L07604
D00055,	0026
	SZA CLA 
	JMP L00064
P00060,	D04163
P00061,	D03020
	TAD P00020
D00063,	4150
L00064,	CLA OSR 
	AND P00025
P00066,	D07640
	JMP L00074
P00070,	D04163
D00071,	3002
P00072,	L01002
P00073,	D04150
L00074,	CLA CMA 
P00075,	L01002
	DCA P00010
D00077,	1015
P00100,	D03410
	TAD D00016
P00102,	D03410
P00103,	D01017
D00104,	3410
	TAD D00021
	DCA I P00020
D00107,	1021
L00110,	DCA D00022
D00111,	1022
D00112,	7001
	DCA D00023
P00114,	D05405
P00115,	L07604
P00116,	D07004
P00117,	D07710
P00120,	D05131
	TAD I P00020
P00122,	D07041
P00123,	D01023
	SZA CLA 
P00125,	D05432
D00126,	1420
P00127,	D07650
	JMP I P00032
L00131,	CLA OSR 
	AND D00024
D00133,	7440
D00134,	5046
	IAC
	TAD D00022
	JMP L00110
P00140,	L07604
	RAL 
	SPA CLA 
D00143,	5046
P00144,	D01420
	SZA CLA 
	JMP I P00033
P00147,	D05046
S00150,	0000
P00151,	D07510
	JMP L00157
	TAD P00003
D00154,	7700
	JMP I S00150
D00156,	5164
L00157,	TAD D00004
P00160,	D07700
P00161,	D05164
	JMP I S00150
S00163,	0000
L00164,	TAD P00013
	CLL RAL 
	SZL 
	TAD P00014
	DCA P00013
	TAD P00013
	JMP I S00163
P00173,	D00333
P00174,	D00334
D00175,	1000
D00176,	0000
D00177,	0000

	*0200
L00200,	TAD D00341
	DCA D00333
	CMA 
	DCA D00030
	JMP L00207
L00205,	TAD D00332
	DCA D00333
L00207,	TAD D00342
	DCA D00334
	TAD P00002
D00212,	3010
	TAD D00371
	JMS S00343
D00215,	1020
	DCA P00010
	TAD D00372
	JMS S00343
	TAD D00021
	DCA P00010
	TAD D00373
	JMS S00343
	TAD D00022
	DCA P00010
	TAD D00374
	JMS S00343
	TAD I P00020
	DCA P00010
	TAD D00375
	JMS S00343
	IOF
	TAD D00031
	DCA P00010
L00240,	TAD I P00010
	TLS
L00242,	TSF 
	JMP L00242
	TAD D00012
	SZA CLA 
	JMP L00240
	TCF
	ION
	CLA OSR 
	SPA CLA 
	HLT
	TAD D00030
	SNA CLA 
	JMP L00046
	DCA D00030
D00260,	5131
	AND D00306
D00262,	0240
	AND S00000
	AND S00000
	AND S00000
	AND S00000
	AND L00240
	AND L00240
	AND D00324
D00272,	0240
	AND S00000
	AND S00000
	AND S00000
	AND S00000
	AND D00215
	AND D00212
	AND D00215
	AND D00215
	AND D00317
D00304,	0240
	AND S00000
D00306,	0000
	AND S00000
	AND S00000
	AND L00240
	AND L00240
	AND D00306
D00314,	0240
	AND S00000
D00316,	0000
D00317,	0000
	AND S00000
	AND L00240
D00322,	0240
D00323,	0322
D00324,	0240
	AND S00000
	AND S00000
	AND S00000
	AND S00000
	AND L00240
D00332,	0240
D00333,	0316
D00334,	0323
	AND D00215
	AND D00212
	AND D00212
	AND D00377
D00341,	0316
D00342,	0323
S00343,	0000
	DCA P00011
	TAD P00010
	RTL 
	RTL 
	JMS S00363
	RTR 
	RTR 
	RTR 
	JMS S00363
	RTR 
	RAR 
	JMS S00363
	JMS S00363
	CLA 
	JMP I S00343
S00363,	0000
	AND P00007
	TAD D00376
	DCA I P00011
	TAD P00010
	JMP I S00363
D00371,	0262
D00372,	0272
D00373,	0304
D00374,	0314
D00375,	0324
D00376,	0260
D00377=0377

	*0400
L00400,	TAD P00003
	CIA
	DCA D00510
	TAD P00003
	CMA 
	DCA D00511
	TAD D00546
	DCA P00513
	TAD D00514
D00411,	3164
	JMP L00046
L00413,	TAD S00163
	CIA
	TAD D00505
	SNA CLA 
	JMP L00503
	TAD S00163
	CIA
	TAD D00506
	SNA CLA 
	JMP L00501
	JMP L00426
L00426,	TAD I P00513
	DCA D00512
	TAD D00512
	SNA 
	JMP L00440
	CLA IAC
	TAD P00513
	DCA P00513
	TAD D00512
	JMP I S00163
L00440,	TAD D00545
	DCA P00513
	IAC
	TAD D00511
	DCA D00511
	TAD D00511
	CIA
	TAD D00510
	SZA CLA 
	JMP L00455
	TAD D00511
	TAD P00014
	DCA D00511
L00455,	TAD D00511
	SMA 
	JMP L00476
D00460,	1004
	SPA CLA 
	JMP L00476
	CLA IAC
	TAD D00510
	DCA D00510
	TAD P00003
D00467,	7041
	DCA D00511
	TAD D00510
	TAD D00004
	SZA CLA 
	JMP L00476
	JMP L00400
L00476,	CLA 
	TAD D00512
	JMP I S00163
L00501,	TAD D00511
	JMP I S00163
L00503,	TAD D00510
	JMP I S00163
D00505,	0071
D00506,	0061
	AND D00053
D00510,	0000
D00511,	0000
D00512,	0000
P00513,	S00000
D00514,	5434
	SNA SPA SZL CLA OSR HLT
	7775
	7773
	7767
	7757
D00522,	7737
	7677
	7577
	CLA CLL CML RTL RTR CIA
	6777
	JMP I P00577
	DCA I P00577
	AND P00001
D00532,	0003
	AND P00007
	AND D00017
	AND D00037
	AND D00077
	AND D00177
	AND P00577
	AND I P00577
	TAD I P00577
	DCA I P00577
	AND S00000
D00545,	0515
D00546,	0544
L00547,	TAD D00177
	IAC
	DCA D00177
	TAD D00177
	SZA CLA 
	JMP I P00036
	TAD D00176
	TAD D00175
	DCA D00176
	TAD D00176
	SZA CLA 
	JMP I P00036
	IOF
	TAD D00575
	DCA I P00173
	TAD D00576
	DCA I P00174
	TAD D00574
	DCA P00010
	JMP I P00573
P00573,	L07602
D00574,	0332
D00575,	0260
D00576,	0267
P00577=0577

	*0600
L00600,	TAD P00020
	CIA
	TAD P00002
	SNA 
	JMP P00054
	IAC
	SNA 
	JMP P00054
	IAC
	SNA CLA 
	JMP P00054
	JMP I P00002
S00614,	0000
	DCA S00000
	TAD D00632
	DCA P00001
	TAD D00633
	DCA P00002
	TAD D00634
	DCA P00003
	TAD D00635
	DCA D00037
	TAD D00636
	DCA P00040
	ION
	JMP I S00614
D00632,	7402
D00633,	0000
D00634,	7157
D00635,	6001
D00636,	7604
L01002=1002
D01017=1017
D01023=1023
D01040=1040
D01215=1215
D01420=1420
D01517=1517
L01640=1640
D01722=1722
D01732=1732
D02237=2237
D02243=2243
D02304=2304
D02320=2320
D02362=2362
D02420=2420
D02445=2445
D02602=2602
D02625=2625
D03020=3020
D03154=3154
D03164=3164
D03410=3410
D03607=3607

	*4000
	CLA 
	SKP 
	CLA CMA 
	DCA P00003
	TAD I P00073
	DCA I P00072
P04006,	D06141
	AND I P04047
	AND I P00100
D04011,	6214
	AND D04101
	TAD I P00160
	SNA SPA SZL CLA 
	TAD P00120
	SNA SPA SZL CLA 
	AND I P00070
	CLL CIA
	TAD P00020
	NOP
	AND I P04040
	TAD P00040
P04025,	D02237
	TAD P00040
	ISZ P04041
	TAD P00040
	ISZ D04052
	TAD P00040
	ISZ D04054
	TAD P00040
	ISZ P04071
	TAD P00040
D04037,	2551
P04040,	D01040
P04041,	D02362
	TAD P00040
P04043,	D02625
	TAD P00040
	ISZ I P04066
	TAD P00040
P04047,	D03154
	TAD P00040
	DCA D00156
D04052,	0641
	TAD P00040
D04054,	2003
	TAD P00040
	ISZ D00021
	TAD P00040
D04060,	2304
	TAD P00040
	ISZ D04106
	TAD P00040
	ISZ I P00032
	TAD P00040
P04066,	D02445
	TAD P00040
	ISZ I P00066
P04071,	D01040
	ISZ I P00075
	TAD P00040
	ISZ I P00114
	TAD P00040
	ISZ I P00115
	TAD P00040
	ISZ I P00117
D04101,	1040
	ISZ I P00125
	TAD P00040
D04104,	3547
	TAD P00040
D04106,	3551
	TAD P00040
	DCA I P00161
	TAD P00040
	DCA I S00163
	TAD P00020
	AND I P04043
	TAD P00040
	DCA D04104
	JMS L00074
	TAD P00020
	CLA CLL CML RTL RTR CIA
	AND I P04040
	TAD P00040
	ISZ D04167
	TAD P00020
	7577
	TAD P00040
	ISZ I P04173
	TAD P00020
P04132,	D01732
	TAD P00040
	ISZ L00074
	TAD P00020
	AND I P04071
	TAD P00040
	ISZ D00112
	AND I P04043
	AND P00002
	JMS I P04146
	JMS I P00060
	JMP I P00072
P04146,	4274
	JMS 4147
D04150,	2401
	AND I P00040
	TAD P00140
	6166
	JMS 4147
	AND P00116
	AND I P00040
	ISZ I P00005
	TAD I P00120
	JMS 4147
D04162,	0116
D04163,	0440
	ISZ D00063
	6767
	6743
D04167,	0304
	AND I P04006
	JMP I P00047
	6662
P04173,	D06061
	JMS 4147
	AND I P00003
	AND P00140
	TAD P00140

	*4200
	6167
	JMS 4347
P04202,	D01215
	ISZ P00040
P04204,	D01517
P04205,	D02602
	JMS P04322
	AND P00116
	AND I P00054
	JMS I P04360
	JMS D04301
	TAD I P04204
D04214,	4003
D04215,	1716
	JMS D04304
	AND D04301
	JMS P00003
	TAD I P04316
	JMS 4312
	TAD I P00120
P04224,	D04011
	JMS D00022
P04226,	P00116
	AND I P00043
	AND I P00116
	AND I P00015
	ISZ D04354
	JMS I P04324
	AND D00104
	JMS P00020
	AND P00123
	ISZ D04343
P04240,	D02320
	AND P00140
	AND P04314
D04243,	0143
	TAD D04215
	ISZ P00040
	TAD P00140
	ISZ P04205
	ISZ I P00061
	JMS 4312
	TAD I P00120
	JMS P00011
	JMS P00015
	AND D00111
	TAD I P04205
	DCA P00043
	JMS I P04352
	6567
	6343
	TSF TCF
	TSF TCF
	TSF TLS
L04266,	JMP I P04306
	TAD D00126
	AND I P00140
	ISZ D04320
	AND P00103
	AND I P00123
	JMS P00010
	AND I P00122
	AND I P00140
	TAD I P04322
	JMS D00023
D04301,	1715
	AND I P00127
	TAD P00005
D04304,	2205
D04305,	4011
P04306,	L01640
	JMS P04360
	JMS I P04357
	ISZ D04305
	AND I P04315
	TAD I P04224
P04314,	D04060
P04315,	P04006
P04316,	D01722
D04317,	4004
D04320,	1123
	TAD D04340
P04322,	D00411
D04323,	0114
P04324,	P04360
	JMS P04357
	ISZ D00004
	ISZ D00055
	6162
D04331,	4001
	ISZ D04323
	AND I P00115
	AND D04214
	AND I P00122
	JMS P00020
	AND D00107
D04340,	0540
	6343
	JMP L04266
D04343,	6060
	JMS P04357
	ISZ D04331
	TAD I P00102
	TAD I P04314
	JMS D00016
	ISZ I P00115
P04352,	L00205
	ISZ P04240
D04354,	0405
	AND D04317
	AND I P00005
P04357,	D02243
P04360,	D02304
	AND I P00103
	TAD I P04370
	JMP I P00047
	TSF TLS
	JMS I P04357
	AND D04317
	TAD I P04226
P04370,	D00522
	ISZ I P00040
	AND P00140
	ISZ D04331
	TAD I P00102
	TAD I P04314
	JMS D00016
	ISZ I P00115
D05001=5001
D05046=5046
D05131=5131
D05164=5164
D05405=5405
D05425=5425
D05432=5432
D06061=6061
D06141=6141
D07004=7004
D07041=7041
D07510=7510

	*7602
L07602,	TAD I P00010
	TLS
L07604,	TSF 
	JMP L07604
	TAD D00012
	SZA CLA 
	JMP L07602
	JMP L07617

	*7617
L07617,	TCF
	ION
	JMP I P00036
D07640=7640
D07650=7650
D07700=7700
D07710=7710
$