输入输出编程.asm

AD AND TLC549 TLC548C, TLC548I, TLC549C, TLC549I

; 输入输出接口编程
      ORG 0000H
LP:   MOV P1,#0FFH      ;P1，P3.0，P3.1复位
      SETB P3.0
      SETB P3.1
LP0:  MOV R7,#8       ;置旋环次数
      MOV R4,#0
LP1:  LCALL GETDPTR     ;判断取何表值
      MOV A,R4          ;查表
      MOVC A,@A+DPTR
      CPL A
      MOV P1,A          ;送P1口
      INC R4
      LCALL DELAY1
      DJNZ R7,LP1
      SJMP LP0
DELAY1:MOV R5,#250    ;(250)；延时一秒
LL1:   LCALL DELAY0
       LCALL DELAY0
;       LCALL DELAY0
;       LCALL DELAY0
       DJNZ R5,LL1
       RET
DELAY0:MOV R6,#0FFH
LL0:   NOP
;       NOP
       DJNZ R6,LL0
       RET
GETDPTR:MOV A,P3        
       ANL A,#03H
L0:    JNZ L1
       MOV DPTR,#TAB1  ;P3.1P3.0=00的情况
       RET
L1:    CJNE A,#01H,L2  ;P3.1P3.0=01的情况
       MOV DPTR,#TAB2
       RET
L2:    CJNE A,#02H,L3  ;P3.1P3.0=10的情况
       MOV DPTR,#TAB3       
       RET
L3:    MOV DPTR,#TAB4  ;P3.1P3.0=11的情况
       RET       
TAB1:DB 03H,06H,0CH,18H,30H,60H,0C0H,81H
TAB2:DB 01H,02H,04H,08H,10H,20H,40H,80H
TAB3:DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,7FH
TAB4:DB 80H,40H,20H,10H,08H,04H,02H,01H
END