m1-1.lst

该源码与书本配套

  Wed Jun 15 2005 16:06                                                                                                  Page    1







               2500 A.D. 8051 Macro Assembler  -  Version 4.05a
               ------------------------------------------------

                       Input  Filename : m1-1.asm
                       Output Filename : m1-1.obj


    1   0000                   		ORG	0H
    2   0000   78 00           	START:	MOV	R0,#00H
    3   0002   79 F7           		MOV	R1,#0F7H
    4   0004   89 A0           	LOOP:	MOV	P2,R1
    5   0006   E5 A0           		MOV	A,P2
    6   0008   C3              		CLR	C
    7   0009   B3              		CPL	C
    8   000A   7A 04           		MOV	R2,#04H
    9   000C   33              	LOOP1:	RLC	A
   10   000D   50 0C           		JNC	KEYIN
   11   000F   08              		INC	R0
   12   0010   DA FA           		DJNZ	R2,LOOP1
   13   0012   E9              		MOV	A,R1
   14   0013   C3              		CLR	C
   15   0014   B3              		CPL	C
   16   0015   13              		RRC	A
   17   0016   F9              		MOV	R1,A
   18   0017   40 EB           		JC	LOOP
   19   0019   01 00           		AJMP	START
   20   001B   7B 40           	KEYIN:	MOV	R3,#40H
   21   001D   7C 80           	DEL:	MOV	R4,#80H
   22   001F   DC FE           		DJNZ	R4,$
   23   0021   DB FA           		DJNZ	R3,DEL
   24   0023   E5 A0           	STOP:	MOV	A,P2
   25   0025   44 0F           		ORL	A,#0FH
   26   0027   64 FF           		XRL	A,#0FFH
   27   0029   70 F8           		JNZ	STOP
   28   002B   88 B0           		MOV	P3,R0
   29   002D   01 00           		AJMP	START
   30   002F                   		END



           Lines Assembled :  30             Assembly Errors :  0