ad - copy.asm

我学单片机89C51时编的大部分程序都在里面

;改用一个通道判别方式
        ORG 0000H
        LJMP START
        ORG 0020H
        LJMP SERVE
        ORG 0030H
START:  MOV R0,#00H
        MOV R1,#0FFH            ;256个数据
        MOV DPTR,#7FF7H         ;给DPTR置的初值

        MOV P1,#0FFH            ;读取键值
        MOV A,P1
        CPL A
        JZ START
        LCALL D10MS
        MOV A,P1
        CPL A
        ANL A,#0FFH
        JZ START
        MOV B,A
KEY:    MOV A,P1
        CPL A
        ANL A,#0FFH
        JNZ KEY                 ;判断是那个键按下，并执行相应操作
        LCALL D10MS
        MOV A,B
        
        MOV R2,#00H             ;选择计数器通道
RR0:    RR A
        INC R2
        CPL ACC.7
        JNZ RR0     
        MOV A,DPL
        ADD A,B              
        MOV DPL,A
        MOVX @DPTR,A           ;启动A/D转换

        SJMP $

SERVE:  MOVX A,@DPTR            ;读数
        MOVX @R0,A              ;存数
        INC R0                  ;更新暂存单元
        DJNZ R1,DONE            ;N次采样是否结束
        RETI
DONE:   MOVX @DPTR,A            ;转换完毕
        RETI


D10MS:  MOV R7,#10H           ;10MS延时程序
DS11:   MOV R6,#0FFH
DS22:   DJNZ R6,DS22
        DJNZ R7,DS11
        RET