adqz1.a

3000TB51配套实验例程 1八段数码管显示实验 等

Q0000:             LJMP  Q00F5                        ;0000   02 00 F5
;==========================================================================
Q0003:		 DB  00H, 00H, 00H, 00H, 00H, 00H, 00H, 00H	;........
Q000B:		 DB  02H, 00H,0D0H	;...
;==========================================================================
Q000E:             MOV   DPTR,#0E100H                 ;000E   90 E1 00
                   MOV   A,#03H                       ;0011   74 03
                   MOVX  @DPTR,A                      ;0013   F0
                   MOV   TMOD,#01H                    ;0014   75 89 01
                   MOV   IE,#82H                      ;0017   75 A8 82
Q001A:             MOV   A,#0FFH                      ;001A   74 FF
                   JZ    Q001A                        ;001C   60 FC
                   LCALL Q005F                        ;001E   12 00 5F
                   MOV   R4,07H                       ;0021   AC 07
                   MOV   A,R4                         ;0023   EC
                   CLR   C                            ;0024   C3
                   SUBB  A,#01H                       ;0025   94 01
                   JC    Q001A                        ;0027   40 F1
                   MOV   A,R4                         ;0029   EC
                   SETB  C                            ;002A   D3
                   SUBB  A,#07H                       ;002B   94 07
                   JNC   Q001A                        ;002D   50 EB
                   MOV   A,R4                         ;002F   EC
                   ADD   A,ACC                        ;0030   25 E0
                   ADD   A,#0C0H                      ;0032   24 C0
                   MOV   DPL,A                        ;0034   F5 82
                   CLR   A                            ;0036   E4
                   ADDC  A,#00H                       ;0037   34 00
                   MOV   DPH,A                        ;0039   F5 83
                   CLR   A                            ;003B   E4
                   MOVC  A,@A+DPTR                    ;003C   93
                   MOV   R2,A                         ;003D   FA
                   MOV   A,#01H                       ;003E   74 01
                   MOVC  A,@A+DPTR                    ;0040   93
                   MOV   R3,A                         ;0041   FB
                   MOV   A,R2                         ;0042   EA
                   MOV   09H,A                        ;0043   F5 09
                   MOV   08H,#00H                     ;0045   75 08 00
                   MOV   0AH,#00H                     ;0048   75 0A 00
                   MOV   0BH,R3                       ;004B   8B 0B
                   MOV   TH0,A                        ;004D   F5 8C
                   MOV   TL0,0BH                      ;004F   85 0B 8A
                   SETB  TR0                          ;0052   D2 8C
                   MOV   0CH,#0C8H                    ;0054   75 0C C8
Q0057:             MOV   A,0CH                        ;0057   E5 0C
                   JNZ   Q0057                        ;0059   70 FC
                   CLR   TR0                          ;005B   C2 8C
                   SJMP  Q001A                        ;005D   80 BB
Q005F:             MOV   R7,#06H                      ;005F   7F 06
                   MOV   R6,#20H                      ;0061   7E 20
Q0063:             MOV   A,R6                         ;0063   EE
                   CPL   A                            ;0064   F4
                   MOV   DPTR,#0E101H                 ;0065   90 E1 01
                   MOVX  @DPTR,A                      ;0068   F0
                   MOV   A,R6                         ;0069   EE
                   CLR   C                            ;006A   C3
                   RRC   A                            ;006B   13
                   MOV   R6,A                         ;006C   FE
                   MOV   DPTR,#0E103H                 ;006D   90 E1 03
                   MOVX  A,@DPTR                      ;0070   E0
                   CPL   A                            ;0071   F4
                   ANL   A,#0FH                       ;0072   54 0F
                   MOV   R5,A                         ;0074   FD
                   DEC   R7                           ;0075   1F
                   MOV   A,R7                         ;0076   EF
                   JZ    Q007C                        ;0077   60 03
                   MOV   A,R5                         ;0079   ED
                   JZ    Q0063                        ;007A   60 E7
Q007C:             MOV   A,R5                         ;007C   ED
                   JZ    Q00A7                        ;007D   60 28
                   MOV   A,R7                         ;007F   EF
                   ADD   A,ACC                        ;0080   25 E0
                   ADD   A,ACC                        ;0082   25 E0
                   MOV   R7,A                         ;0084   FF
                   MOV   A,R5                         ;0085   ED
                   JNB   ACC.1,Q008C                  ;0086   30 E1 03
                   INC   R7                           ;0089   0F
                   SJMP  Q009B                        ;008A   80 0F
Q008C:             MOV   A,R5                         ;008C   ED
                   JNB   ACC.2,Q0094                  ;008D   30 E2 04
                   INC   R7                           ;0090   0F
                   INC   R7                           ;0091   0F
                   SJMP  Q009B                        ;0092   80 07
Q0094:             MOV   A,R5                         ;0094   ED
                   JNB   ACC.3,Q009B                  ;0095   30 E3 03
                   INC   R7                           ;0098   0F
                   INC   R7                           ;0099   0F
                   INC   R7                           ;009A   0F
Q009B:             MOV   DPTR,#0E101H                 ;009B   90 E1 01
                   CLR   A                            ;009E   E4
                   MOVX  @DPTR,A                      ;009F   F0
                   MOV   A,R7                         ;00A0   EF
                   MOV   DPTR,#00AAH                  ;00A1   90 00 AA
                   MOVC  A,@A+DPTR                    ;00A4   93
                   MOV   R7,A                         ;00A5   FF
                   RET                                ;00A6   22
;==========================================================================
Q00A7:             MOV   R7,#0FFH                     ;00A7   7F FF
                   RET                                ;00A9   22
;==========================================================================
Q00AA:		 DB  00H, 01H, 04H, 07H, 0FH, 02H, 05H, 08H	;........
Q00B2:		 DB  0EH, 03H, 06H, 09H, 0DH, 0CH, 0BH, 0AH	;........
Q00BA:		 DB  10H, 10H, 10H, 10H, 10H, 10H, 10H, 10H	;........
Q00C2:		 DB 0FCH, 42H,0FCH,0AEH,0FDH, 0AH,0FDH, 35H	;.B.....5
Q00CA:		 DB 0FDH, 82H,0FDH,0C8H,0FEH, 05H,0C0H,0D0H	;........
Q00D2:		 DB 0C2H, 8CH, 85H, 09H, 8CH, 85H, 0BH, 8AH	;........
Q00DA:		 DB 0D2H, 8CH,0A2H, 00H, 92H, 90H,0B2H, 00H	;........
Q00E2:		 DB  15H, 0CH,0D0H,0D0H, 32H, 90H,0E1H, 01H	;....2...
Q00EA:		 DB 0E4H,0F0H, 90H,0E1H, 03H,0E0H,0F4H, 54H	;.......T
Q00F2:		 DB  0FH,0FFH, 22H	;.."
;==========================================================================
Q00F5:             MOV   R0,#7FH                      ;00F5   78 7F
                   CLR   A                            ;00F7   E4
Q00F8:             MOV   @R0,A                        ;00F8   F6
                   DJNZ  R0,Q00F8                     ;00F9   D8 FD
                   MOV   SP,#20H                      ;00FB   75 81 20
                   LJMP  Q000E                        ;00FE   02 00 0E
;==========================================================================