ss.src

《单片机c程序设计及应用实列》一书的源代

	RSEG  ?PR?_delay?SECOND
L?0070:
	USING	0
L?0071:
	CLR  	P0_1
L?0072:
	MOV  	R7,#03H
	MOV  	R6,#00H
_delay:
			; SOURCE LINE # 179
;---- Variable 'i?242' assigned to Register 'R6/R7' ----
; {
			; SOURCE LINE # 180
; short ii;
; ii=i;
			; SOURCE LINE # 182
	MOV  	ii?243,R6
	MOV  	ii?243+01H,R7
; //for(ii=0;ii<i;ii++);
; /*#pragma asm
; //		PUSH R7
; //		PUSH A
; 		MOV A,R7
; DELAY: NOP
; 	   NOP
; 	   DJNZ R7,DELAY
; 	   MOV R7,A
; //	   POP A
; //	   POP R7
; #pragma endasm
; */}
			; SOURCE LINE # 195
	RET  	
; END OF _delay

; void delay(short i)	//延迟子程序，为精确计时，需要用汇编语言来做。R7刚好存的是i的值

	RSEG  ?PR?_delay?SECOND
L?0074:
	USING	0
L?0075:
	CLR  	P0_1
L?0076:
	MOV  	R7,#03H
	MOV  	R6,#00H
_delay:
	USING	0
			; SOURCE LINE # 179
;---- Variable 'i?242' assigned to Register 'R6/R7' ----
; {
			; SOURCE LINE # 180
; short ii;
; ii=i;
			; SOURCE LINE # 182
;---- Variable 'ii?243' assigned to Register 'R4/R5' ----
; for(ii=0;ii<i;ii++);
			; SOURCE LINE # 183
	CLR  	A
	MOV  	R4,A
	MOV  	R5,A
?C0025:
	CLR  	C
	MOV  	A,R5
	SUBB 	A,R7
	MOV  	A,R6
	XRL  	A,#080H
	MOV  	R0,A
	MOV  	A,R4
	XRL  	A,#080H
	SUBB 	A,R0
	JNC  	?C0028
	INC  	R5
	CJNE 	R5,#00H,?C0069
	INC  	R4
?C0069:
	SJMP 	?C0025
; /*#pragma asm
; //		PUSH R7
; //		PUSH A
; 		MOV A,R7
; DELAY: NOP
; 	   NOP
; 	   DJNZ R7,DELAY
; 	   MOV R7,A
; //	   POP A
; //	   POP R7
; #pragma endasm
; */}
			; SOURCE LINE # 195
?C0028:
	RET  	
; END OF _delay