runlights.asm

跑马灯

P0MDOUT   DATA  0A4H                   ; Port 0 Output Mode Configuration
P1MDOUT   DATA  0A5H                   ; Port 1 Output Mode Configuration  
XBR1      DATA  0E2H                   ; Port I/O Crossbar Control 1
OSCICN    DATA  0B2H                   ; Internal Oscillator Control
PCA0MD    DATA  0D9H                   ; PCA Mode
;=========================================================================
    ORG 0000H
	AJMP MAIN
	ORG 00beH
MAIN:
    MOV  SP,#60H
    mov  P1MDOUT,   #0FFh
    mov  XBR1,      #0C0h
    anl  PCA0MD,    #0BFh
    mov  PCA0MD,    #000h
L2:
	MOV  R0,#00H
L1:
	MOV  A,R0
	MOV  DPTR,#TABLE1
	MOVC A,@A+DPTR
	MOV  P1,A
	LCALL DELAY750MS
	INC R0
	CJNE R0,#12H,L1
	SJMP L2
DELAY750MS:
          MOV A,R4
		  PUSH ACC
          
          MOV R2,#75
D4:		  MOV R3,#20
D3:		  MOV R4,#250
		  DJNZ R4,$
		  DJNZ R3,D3
		  
		  DJNZ R2,D4
		  POP ACC
		  MOV R4,A
		  RET
TABLE1: DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,80H,40H,20H,10H,08H,04H,02H,01H,00H
	
	end