SNAD02C
8-CHANNEL 10-BIT ADC
@Read_DIO macro
mov a p2
mov tmp #0001b
and a tmp
endm
;;********************************
@P20_Out_Mode macro
mov a #0000b
mov p2s a
endm
;;********************************
@P20_In_Mode macro
mov a #0001b
mov p2s a
mov a #1110b
and a p2state
mov p2state a
mov p2 a
endm
;;READ DIO Æ A.0 (1-BIT)
;;SWITCH ALL 4-BIT OF P2 TO OUTPUT MODE
;;SWITCH P2.0 (DIO) TO INPUT MODE
;;**************************************************************************
;; Set Analog/Digital Mode to each channel (1:Analog, 0:Digital) *
;; y7 Æ Ch7. y6 Æ Ch6. y5 Æ Ch5, …
*
;;**************************************************************************
@Set_Attrib macro y7,y6,y5,y4,y3,y2,y1,y0
@P20_Out_mode ;; SWITCH P2 TO OUTPUT MODE
@ON_START
;; SET START=0
@Send_0
@Clock
@Send_0
@Clock
@Send_1
@Clock
;; SEND COMMAND (001)
@Send y7
@Clock
@Send y6
@Clock
@Send y5
@Clock
@Send y4
@Clock
@Send y3
@Clock
@Send y2
@Clock
@Send y1
@Clock
@Send y0
@Clock
;; SEND y7 TO y0
@OFF_START ;; SET START=1
@P20_In_mode ;; SWITCH P2.0 TO INPUT MODE
endm
Version: 1.3
17
July 31, 2003