11.3.asm

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

      ORG 0000H
      LJMP MAIN
      ORG 0030H
 MAIN:MOV DPTR,#TAB
      MOV R1,#4
      MOV P2,#0FEH
      MOV R0,#02H
LOOP1:MOV A,R0
      MOVC A,@A+DPTR
      MOVX @DPTR,A
      CLR P2.5
      LCALL DEL
      SETB P2.5
      MOV R3,P2
      MOV A,R3
      RL A
      MOV P2,A
      INC R0
      DJNZ R1,LOOP1
      LJMP MAIN
  TAB:DB 0C0H,0C0H,0F9H,79H,0B0H,0C6H,92H,82H,0F8H,80H
  DEL:MOV R6,#50
   D2:MOV R7,#50
   D1:DJNZ R7,D1
      DJNZ R6,D2
      RET
      END