0~9.asm

来自「温度控制器的protell制图和各个能实现的程序。」· 汇编 代码 · 共 28 行

ORG 0000H
LJMP MAIN
ORG 0040H
MAIN:MOV R0,#0
     MOV A,R0
     MOV R1,#10
LOOP:MOV P2,#0E0H
     MOV DPTR,#TABLE
     MOVC A,@A+DPTR
     MOVX @DPTR,A
     LCALL DL1M
     INC R0
     MOV A,R0
     DJNZ R1,LOOP
     LJMP MAIN
TABLE: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
DL1M:MOV R5,#5
     MOV R2,#250
  D1:MOV R3,#250
  D2:DJNZ R3,D2
     DJNZ R2,D1
     DJNZ R5,D1
     RET
END