led_cycle.a51

来自「汇编语言编写的EMU100A 51单片机仿真器的流水灯演示工程文件」· A51 代码 · 共 59 行

NAME	LED_CYCLE

PROG	SEGMENT	CODE

	CSEG  AT   0
	USING	0  ; Register-Bank 0
; Execution starts at address 0 on power-up.
	JMP   START

	RSEG  PROG
; first set Stack Pointer
START:	MOV   SP,#0x70

	MOV      0x08,#0xFE
	MOV      P1,0x08
label1:
	MOV      A,0x08
	JNB      0xE0.7,label2
	ADD      A,ACC
	MOV      0x08,A
	ORL      0x08,#0x01
	SJMP     label3
label2:
	MOV      0x08,#0xFE
label3:
	MOV      P1,0x08
	LCALL    delay
	SJMP     label1


delay:
	CLR      A
	MOV      R7,A
	MOV      R6,A
label_delay1:
	CLR      A
	MOV      R5,A
	MOV      R4,A
label_delay2:
	INC      0x09
	INC      R5
	CJNE     R5,#0x00,label_delay3
	INC      R4
label_delay3:
	MOV      A,R5
	XRL      A,#0x0A
	ORL      A,R4
	JNZ      label_delay2
	INC      R7
	CJNE     R7,#0x00,label_delay4
	INC      R6
label_delay4:
	CJNE     R6,#0x03,label_delay1
	CJNE     R7,#0xe8,label_delay1
	RET      	


	END