SNAD02C
8-CHANNEL 10-BIT ADC
@Read_DIO macro
mov p2
;;READ DIO Æ A.0 (1-BIT)
a
mov tmp #0001b
and
a
tmp
endm
;;********************************
@P20_Out_Mode macro
;;SWITCH ALL 4-BIT OF P2 TO OUTPUT MODE
;;SWITCH P2.0 (DIO) TO INPUT MODE
mov
a
#0000b
a
mov p2s
endm
;;********************************
@P20_In_Mode macro
mov
a
#0001b
a
mov p2s
mov
and
a
#1110b
p2state
a
mov p2state a
mov p2
endm
a
;;**************************************************************************
;; 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
@ON_START
;; SWITCH P2 TO OUTPUT MODE
;; SET START=0
@Send_0
@Clock
;; SEND COMMAND (001)
@Send_0
@Clock
@Send_1
@Clock
@Send y7
@Clock
;; SEND y7 TO y0
@Send y6
@Clock
@Send y5
@Clock
@Send y4
@Clock
@Send y3
@Clock
@Send y2
@Clock
@Send y1
@Clock
@Send y0
@Clock
@OFF_START ;; SET START=1
@P20_In_mode ;; SWITCH P2.0 TO INPUT MODE
endm
Version: 1.3
July 31, 2003
17