ca999-v12.asm

HD44100静态驱动LCD的asm源文件

;HD44100 FOR STATIC DRIVER
	CP	EQU	p3.0	;CLK
	LP	EQU	P3.2	;LCK
	DI	EQU	P3.1
	KEY	EQU	P3.4
	ORG	0000H
	AJMP	MAIN
	ORG	0030H
MAIN:	MOV	SP,#60H
	MOV	R1,#16
        MOV     A,#0FFH
	LCALL	WRDATA
	MOV	A,#0FEH
LOOP:	LCALL	WRDATA
	RR	A
	LCALL	DELAY
	DJNZ	R1,LOOP
	MOV	A,#00H
	LCALL	WRDATA
	LCALL	DELAY
	AJMP	MAIN

WRDATA:	MOV	R2,#16
	MOV	R0,#30H		;从RAM 30H开始设置为起始地址,P249
LOOP1:	MOV	@R0,A
	INC	R0
	DJNZ	R2,LOOP1
        SETB    LP
        SETB    CP
	LCALL	LCDWRI
	RET

LCDWRI:	MOV	R2,#16
	MOV	R0,#30H		;从30H开始为起始地址,P249
LCDWR1:	MOV	R3,#8		;串口发送,1 byte = 8 bit
	MOV	A,@R0
LCDWR2:	RLC	A
	MOV	DI,C
        CLR     CP
        LCALL   DEL
        SETB    CP
	DJNZ	R3,LCDWR2
	INC	R0
	DJNZ	R2,LCDWR1
        CLR     LP
        LCALL   DEL
        SETB    LP
	RET
DELAY:				;视晶振而定
	MOV 	R7,#5
DEL2:	MOV	R6,#160D
DEL1:	MOV	R5,#200D
DEL0:   NOP
        NOP
        NOP
	DJNZ	R5,DEL0
	DJNZ	R6,DEL1
	DJNZ	R7,DEL2
	RET
DEL:    MOV     R7,#1
DD2:    MOV     R6,#40D
DD1:    NOP
        NOP
        NOP
        DJNZ    R6,DD1
        DJNZ    R7,DD2
        RET
END