0~255.asm

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

        ORG 0000H
        LJMP MAIN
        ORG 0030H
   MAIN: MOV R0,#0
   START:JNB P3.2,JIA
         LCALL ZH
         LCALL DISP
         AJMP START
    JIA: JB P3.2,JIA1
         LCALL DISP
         AJMP JIA
   JIA1: INC R0
         LJMP START
         LJMP MAIN
   DISP:MOV A,40H
        MOV DPTR,#TAB
        MOVC A,@A+DPTR
        MOV DPTR,#0EFFFH
        MOVX @DPTR,A
        CLR P2.3
        LCALL DEL
        SETB P2.3
        
        MOV A,41H
        MOV DPTR,#TAB
        MOVC A,@A+DPTR
        MOV DPTR,#0EFFFH
        MOVX @DPTR,A
        CLR P2.2
        LCALL DEL
        SETB P2.2

        MOV A,42H
        MOV DPTR,#TAB
        MOVC A,@A+DPTR
        MOV DPTR,#0EFFFH
        MOVX @DPTR,A
        CLR P2.1
        LCALL DEL
        SETB P2.1
        RET

  ZH:  MOV B,#10               
       MOV A,R0
       DIV AB
       MOV 40H,B
       MOV B,#10
       DIV AB
       MOV 41H,B
       MOV 42H,A
       RET 

    TAB:DB 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H,080H,090H
      DEL:MOV R6,#50
        D2:MOV R7,#50
        D1:DJNZ R7,D1
           DJNZ R6,D2
           RET
           END