*/	SAMPLE.A
*/	6-bit CoCo ADC successive approximation routine
*/	Copyright (c) 1998 by Roger Taylor
*/
	LDB	#128
	STB	<32
	LDA	<0
	BMI	G@
	SUBB	#64
	STB	<32
	LDA	<0
	BMI	H@
B@	SUBB	#32
	STB	<32
	LDA	<0
	BMI	I@
C@	SUBB	#16
	STB	<32
	LDA	<0
	BMI	J@
D@	SUBB	#8
	STB	<32
	LDA	<0
	BMI	K@
E@	SUBB	#4
	STB	<32
	LDA	<0
	BMI	L@
F@	SUBB	#2
	BRA	Z@
G@	ADDB	#64
	STB	<32
	LDA	<0
	BPL	B@
H@	ADDB	#32
	STB	<32
	LDA	<0
	BPL	C@
I@	ADDB	#16
	STB	<32
	LDA	<0
	BPL	D@
J@	ADDB	#8
	STB	<32
	LDA	<0
	BPL	E@
K@	ADDB	#4
	STB	<32
	LDA	<0
	BPL	F@
L@	ADDB	#2
	BRA	Z@
Z@	EQU	*