D07200=7200
D07400=7400
D07554=7554
D07573=7573
D10000=10000
D10007=10007
D10050=10050
L10135=10135
P10150=10150
D10176=10176

	FIELD	1

	*7200
	TLS
L17201,	KCC
L17202,	DCA D17377
	DCA D17333
L17204,	DCA D17376
	TAD D17333
	CLL RTL 
	RAL 
	TAD D17375
	DCA D17212
D17212,	6201
	TAD D17377
	CLL RAR 
D17215,	1176
L17216,	KSF 
	JMP L17216
	KRB
	JMS S17350
	6224
	TAD D17375
	DCA D17225
D17225,	6201
	KRB
	TAD D17363
	SNA 
	JMP L17267
	TAD D17365
	SNA 
	JMP L17312
	TAD D17365
	SNA 
	JMP L17270
	TAD D17367
	SNA 
	JMP L17304
	TAD D17365
	SPA 
	JMP L17335
	TAD D17364
	SMA CLA 
	JMP L10135
	TAD D17376
	CLL RTL 
	RTL 
	AND D17366
	DCA D17333
	TAD D17376
	CLL RAL 
	CLL RAL 
	CLL RAL 
	DCA D17376
	KRB
	AND D17366
	TAD D17376
	JMP L17204
L17267,	TAD D17361
L17270,	DCA I P17374
	JMS S17343
	TAD D17376
	CIA
	SNA 
	TAD D17361
	DCA S17343
L17277,	TAD I P17374
	JMS I P17372
	ISZ S17343
	JMP L17277
	JMP L17334
L17304,	TAD D17333
	DCA D17331
	TAD D17376
	DCA D17332
	IAC
	JMP L17202
L17312,	TAD D17377
	SZA CLA 
	JMP L17321
	TAD D17333
	DCA D17331
	TAD D17376
	DCA D17332
L17321,	TAD D17331
	CIA
	TAD D17333
	SPA CLA 
	JMP L17335
	JMS S17343
	TAD D17376
	JMS I P17373
D17331,	0000
D17332,	0000
D17333,	0000
L17334,	JMS S17343
L17335,	CLA 
	TAD D17371
	JMS S17350
	TAD D17370
	JMS S17350
	JMP L17201
S17343,	0000
	CLA OSR 
	SPA CLA 
	HLT
	JMP I S17343
S17350,	0000
	DCA S17343
	CLA OSR 
	SMA CLA 
	JMP I P10150
	TAD S17343
L17356,	TSF 
	JMP L17356
	TLS
D17361,	7600
	JMP I S17350
D17363,	7464
D17364,	7770
D17365,	7774
D17366,	0007
D17367,	0050
D17370,	0212
D17371,	0215
P17372,	D07554
P17373,	D07400
P17374,	D07573
D17375,	6201
D17376,	0000
D17377,	0000

	*7400
P17400,	0000
	DCA D17572
	TAD I P17400
	DCA D17567
	ISZ P17400
	TAD I P17400
	DCA D17570
	ISZ P17400
	TAD I P17400
	AND D17512
	DCA D17571
	ISZ P17400
L17414,	TAD D17567
	CIA
	TAD D17571
	SZA 
	JMP L17430
	TAD D17570
	CLL CML CIA
	TAD D17572
	SZL CLA 
	JMP I P17400
	CLA CMA 
	JMP L17432
L17430,	SPA CLA 
	JMP I P17400
L17432,	DCA S17522
	TAD D17567
	CLL RTL 
	RAL 
	DCA D17574
	TAD D17574
	TAD D17566
	DCA D17442
D17442,	6201
	TAD D17570
	DCA P17573
	TAD D17564
	DCA D17442
L17447,	TAD D17562
	JMS S17554
	ISZ D17442
	JMP L17447
	JMS S17554
	TAD D17574
	JMS S17554
	TAD P17573
	DCA D17575
	CLL IAC
	TAD D17572
	ISZ S17522
	CLA CLL CML 
	TAD D17577
	CML CIA
	TAD D17570
	SNL 
	CLA 
	TAD D17577
	JMS S17522
	TAD D17576
	CIA
	TAD D17570
	SNA 
	ISZ D17567
	DCA D17570
	TAD D17576
	CLL CML RAR 
	DCA D17442
L17504,	TAD I P17573
	DCA D17575
	ISZ P17573
	TAD I P17573
	JMS S17522
	ISZ P17573
D17512,	0007
	ISZ D17442
	JMP L17504
	TAD D17574
	CMA 
	DCA D17575
	JMS S17522
	JMP L17414
S17522,	0000
	DCA D17576
	TAD D17575
	CLL RTR 
	RTR 
	JMS S17554
	TAD D17575
	AND D17565
	DCA S17554
	TAD D17576
	AND D17565
	CLL RTR 
	RTR 
	TAD S17554
	JMS S17554
	TAD D17576
	JMS S17554
	TAD D17574
	TAD D17575
	SZL 
	CLL IAC
	TAD D17576
	SZL 
	CLL IAC
	DCA D17574
	JMP I S17522
S17554,	0000
	TLS
	CLA CLL 
	TAD P17573
L17560,	TSF 
	JMP L17560
D17562,	7200
	JMP I S17554
D17564,	7774
D17565,	7417
D17566,	6201
D17567,	0000
D17570,	0000
D17571,	0000
D17572,	0000
P17573,	D07200
D17574,	0000
D17575,	0000
D17576,	0000
D17577,	7600
$