m5-4.lst

该源码与书本配套

                       Input  Filename : M5-4.asm
                       Output Filename : M5-4.obj


    1          0000            	P       EQU 00H
    2          00FF            	I       EQU FFH
    3          00FF            	CLOCK   EQU FFH
    4                          	
    5   0000                   	        ORG  0H
    6   0000   01 0D           	        AJMP START1
    7   000B                   	        ORG  0BH
    8   000B   01 58           	        AJMP TIME
    9                          	
   10   000D   D2 97           	START1: SETB P1.7
   11   000F   75 89 02        	        MOV  TMOD,#00000010B
   12   0012   75 8C 00        	        MOV  TH0,#0H
   13   0015   75 8A 00        	        MOV  TL0,#0H
   14   0018   D2 D5           	        SETB F0
   15   001A   D2 AF           	        SETB EA
   16   001C   D2 A9           	        SETB ET0
   17   001E   78 00           	        MOV  R0,#P
   18   0020   79 FF           	        MOV  R1,#I
   19   0022   7E FF           	        MOV  R6,#I
   20   0024   7D FF           	        MOV  R5,#CLOCK
   21   0026   C2 20           	        CLR  20H
   22   0028   C2 90           	        CLR P1.0
   23   002A   D2 8C           	        SETB TR0
   24   002C   20 20 02        	WAIT:   JB   20H,OUT
   25   002F   01 2C           	        AJMP WAIT
   26   0031   C2 A9           	OUT:    CLR  ET0
   27                          	
   28   0033   C2 97           	START2: CLR  P1.7
   29   0035   75 8C 00        	        MOV  TH0,#0H
   30   0038   75 8A 00        	        MOV  TL0,#0H
   31   003B   C2 D5           	        CLR  F0
   32   003D   D2 AF           	        SETB EA
   33   003F   D2 A9           	        SETB ET0
   34   0041   78 00           	        MOV  R0,#P
   35   0043   79 FF           	        MOV  R1,#I
   36   0045   7E FF           	        MOV  R6,#I
   37   0047   7D FF           	        MOV  R5,#CLOCK
   38   0049   C2 20           	        CLR  20H
   39   004B   D2 90           	        SETB P1.0
   40   004D   D2 8C           	        SETB TR0
   41   004F   20 20 02        	WAIT2:  JB   20H,OUT2
   42   0052   01 4F           	        AJMP WAIT2
   43   0054   C2 A9           	OUT2:   CLR  ET0
   44   0056   01 0D           	        AJMP START1
   45                          	
   46   0058   20 D5 02        	TIME:   JB F0,TIMADD
   47   005B   01 71           	        AJMP TIMDEC

   48                          	
   49   005D   D8 0D           	TIMADD: DJNZ R0,L1
   50   005F   DD 04           	        DJNZ R5,CONTI
   51   0061   D2 20           	        SETB 20H
   52   0063   01 70           	        AJMP OVER
   53                          	
   54   0065   C2 90           	CONTI:  CLR  P1.0
   55   0067   78 00           	        MOV  R0,#P
   56   0069   1E              	        DEC  R6
   57   006A   EE              	        MOV  A,R6
   58   006B   F9              	        MOV  R1,A
   59   006C   D9 02           	L1:     DJNZ R1,OVER
   60   006E   D2 90           	        SETB P1.0
   61   0070   32              	OVER:   RETI
   62                          	
   63   0071   D8 0D           	TIMDEC: DJNZ R0,L2
   64   0073   DD 04           	        DJNZ R5,CONT2
   65   0075   D2 20           	        SETB 20H
   66   0077   01 84           	        AJMP OVER2
   67   0079   D2 90           	CONT2:  SETB P1.0
   68   007B   78 00           	        MOV R0,#P
   69   007D   1E              	        DEC  R6
   70   007E   EE              	        MOV  A,R6
   71   007F   F9              	        MOV  R1,A
   72   0080   D9 02           	L2:     DJNZ R1,OVER2
   73   0082   C2 90           	        CLR  P1.0
   74   0084   32              	OVER2:  RETI
   75   0085                   	        END



           Lines Assembled :  75             Assembly Errors :  0