;
	ORG	00100	; addr  code
	DOF		; 00100 0001012
L00101	DSN		; 00101 0102010
	JMP	L00101	; 00102 0010101
L00103	SSF		; 00103 0002200
	JMP	L00103	; 00104 0010103
	SCF		; 00105 0001071
	LDA		; 00106 0100041
	AND	L00164	; 00107 0044164
	DAC	L00111	; 00110 0020111
L00111	HLT		; 00111 0000000
	LAW	L00116	; 00112 0004116
	DLA		; 00113 0001003
	DON		; 00114 0003100
	JMP	L00101	; 00115 0010101
L00116	DLXA	05000	; 00116 0015000
	DLYA	05000	; 00117 0025000
	DSTS	1	; 00120 0004005
	DHVC		; 00121 0006000
	DJMS	L00132	; 00122 0050132
	DJMS	L00141	; 00123 0050141
	DJMS	L00151	; 00124 0050151
	DJMS	L00151	; 00125 0050151
	DJMS	L00156	; 00126 0050156
	DLXA	05000	; 00127 0015000
	DLYA	05000	; 00130 0025000
	DHLT		; 00131 0000000
L00132	DEIM	B+0+3	; 00132 0030303
	B+0+3	B+0+2	; 00133 0141702
	D+3+0	D+3+0	; 00134 0114230
	B+0-3	B+0-3	; 00135 0143707
	B+0-2	D+0+3	; 00136 0143203
	D+0+1	B-3+0	; 00137 0100770
	B-3+0	FR+0_0	; 00140 0174171
L00141	DEIM	B+0+3	; 00141 0030303
	B+0+3	B+0+2	; 00142 0141702
	B+3+0	B+3+0	; 00143 0154330
	D-1-3	D-1-1	; 00144 0127655
	B-3+0	B-1+0	; 00145 0174350
	D+0-3	D+0-1	; 00146 0103605
	B+3+0	B+3+0	; 00147 0154330
	FR+0_0	FR+0_0	; 00150 0074571
L00151	DEIM	B+0+3	; 00151 0030303
	B+0+3	B+0+2	; 00152 0141702
	_____0	D+0+0	; 00153 0000600
	B+3+0	B+3+0	; 00154 0154330
	FR+0_0	FR+0_0	; 00155 0074571
L00156	DEIM	D+0+2	; 00156 0030202
	B+0+3	B+2+3	; 00157 0141723
	B+2+0	B+2-3	; 00160 0150327
	B+0-3	B-2-2	; 00161 0143766
	B-2+0	B-2+2	; 00162 0170362
	FR+0_0	FR+0_0	; 00163 0074571
L00164	DATA	100000	; 00164 0100000
	END		;