i／o并行口直接驱动led显示.asm

AT89S52单片机程序50例（00-50）

;I／O并行口直接驱动LED显示

      ORG 0000H
START:MOV P2,#07H
      MOV R1,#00H
 NEXT:MOV A,R1
      MOV DPTR,#TABLE  ;取TABLE的首地址给DPTR
      MOVC A,@A+DPTR  ;查表
      MOV P0,A  ;送P0口
      LCALL DELAY  ;调用延时子程序
      INC R1  ;R1加1
      CJNE R1,#10,NEXT  ;R1不为10时，跳转至NEXT
      LJMP START  ;R1=10时，跳转至START

;0.2s延时子程序
DELAY:MOV R5,#20
   D2:MOV R6,#20
   D1:MOV R7,#248
      DJNZ R7,$
      DJNZ R6,D1
      DJNZ R5,D2
 RET

;0-9的段码值
TABLE:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH
END