;AD 0804控制程序：轉(zhuǎn)動(dòng)電位器，數(shù)碼管依次顯示1-9，0,ABCDE，把8位數(shù)據(jù)255
;等分為16份,程序的后面用CJNE 比較指令,如果到了多少就顯示某一個(gè)數(shù)字
;***************************************************************************
;*  sxj1974@163.com		     (51c51 test web)     www.8951.com     *
;*  Create by :石學(xué)軍      www.51c51.com 更多例程請(qǐng)登陸網(wǎng)站        	   *
;***************************************************************************
;//定義ADC的連接端口
ad_cs   equ P3.6   	;芯片選擇
ad_wr   equ P2.0   	;轉(zhuǎn)換開始
ad_rd   equ P3.7   	;RD=LOW,數(shù)字信號(hào)輸出
ad_input_port   equ p1   ;定義數(shù)據(jù)位

    org 0000h
    ajmp    main
    org 0030h
main:
    lcall adc_demo
    ajmp    main

;//==========================================
;// 啟動(dòng)AD轉(zhuǎn)換
;//==========================================
Adc_Start:
    clr ad_cs
    nop
    clr ad_wr
    nop
    setb    ad_wr
    nop
    setb    ad_cs
    nop
    ret
;//==========================================
;// 讀AD轉(zhuǎn)換
;//==========================================
Adc_Read:
    mov ad_input_port,#0ffh
    clr ad_cs
    nop
    clr ad_rd
    nop
    nop
    mov a,AD_INPUT_PORT
    nop
    setb    ad_rd
    nop
    setb    ad_cs
    ret
;//==========================================
;// AD轉(zhuǎn)換讀取延時(shí)程序，顯示讀到的數(shù)值
;//==========================================
Adc_Demo:
	lcall Adc_Start
	lcall delay1ms
	lcall adc_read
  BIJIAO:
  CLR P2.1     			;打開P2.1端口數(shù)碼管的第一位顯示
	CJNE A,#10h,TT1
	MOV P0,#7EH             ;數(shù)碼管顯示1
TT1: 	CJNE A,#20h,T2
	MOV P0,#0A2H            ;數(shù)碼管顯示2
T2: 	CJNE A,#30h,T3
	MOV P0,#62H             ;數(shù)碼管顯示3
T3: 	CJNE A,#40h,T4
MOV 	P0,#74H             	;數(shù)碼管顯示4
T4: 	CJNE A,#50h,T5
	MOV P0,#61H             ;數(shù)碼管顯示5
T5: 	CJNE A,#60h,T6
	MOV P0,#21H             ;數(shù)碼管顯示6
T6:	CJNE A,#70h,T7
	MOV P0,#7AH             ;數(shù)碼管顯示7
T7:	 CJNE A,#80h,T8
	MOV P0,#20H             ;數(shù)碼管顯示8
T8:	CJNE A,#90h,t9
	MOV P0,#60H             ;數(shù)碼管顯示9
 T9:	CJNE A,#0A0h,t10
	MOV P0,#28H             ;數(shù)碼管顯示0
 T10: 	CJNE A,#0B0h,t11
	MOV P0,#30H               ;數(shù)碼管顯示A
T11: 	CJNE A,#0C0h,t12
	MOV P0,#25H               ;數(shù)碼管顯示b
T12: 	CJNE A,#0D0h,t13
	MOV P0,#0a9H              ;數(shù)碼管顯示C
T13: 	CJNE A,#0E0h,t14
	MOV P0,#26H               ;數(shù)碼管顯示d
T14: 	CJNE A,#0F0h,t15
	MOV P0,#0a1H              ;數(shù)碼管顯示E
T15:
 ret
delay1ms:                       ;延時(shí)子程序
	mov	r7,#10
	MM:mov	r6,#50
	djnz	r6,$		;2us
	djnz	r7,MM
	ret
	end