|
lda #$FF
sta P_IOA_Attrib ;PA as float
lda #C_AD_CE ;Enable ADC power
sta P_AD_Ctrl2
lda #(C_AD_EN+C_AD_CS_8+C_AD_RDY)
sta P_AD_Ctrl0 ;Enable ADC function, ADC clock = Fsys(8MHz)/8 = 1MHz(max)
lda #(C_AD_Pin0+C_AD_Pin1+C_AD_Pin2+C_AD_Pin3+C_AD_Pin4+C_AD_Pin5+C_AD_Pin6+C_AD_Pin7)
;Set analog PIN, PA[7:0] as AN[7:0] sta P_AD_Ctrl1
lda #(C_AD_CE+C_AD_Ch1) ;select AN1
sta P_AD_Ctrl2
clr P_AD_Ctrl0, CB_AD_Start ;start convert
set P_INT_Flag0, CB_INT_ADIF ;clear INT request flag
Loop:
tst P_INT_Flag0, CB_INT_ADIF
beq Loop
set P_INT_Flag0, CB_INT_ADIF
lda P_AD_DataHi ;read high 8 bit convert reasult
nop
clr P_AD_Ctrl0, CB_AD_Start ;start convert
jmp Loop
|
