yibupstc9.asm

LED显示屏驱动程序

xianshix:	nop	                                    ;显示程序
	mov	r0, #30h
        ;第一行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	clr	l1
	clr	l2
	mov	r1, #00h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi1:	nop
	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi1
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第2行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	clr	l1
	clr	l2
	mov	r1, #01h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi2:	nop
	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi2
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第3行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	setb	l1
	clr	l2
	mov	r1, #02h	                            ;行数
	lcall	zb_1	                                    ;数据准备
	
xianshi3:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi3
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第4行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	setb	l1
	clr	l2
	mov	r1, #03h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi4:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi4
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第5行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	clr	l1
	setb	l2
	mov	r1, #04h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi5:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi5
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第6行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	clr	l1
	setb	l2
	mov	r1, #05h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi6:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi6
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第7行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	setb	l1
	setb	l2
	mov	r1, #06h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi7:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi7
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第8行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	setb	l1
	setb	l2
	mov	r1, #07h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi8:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi8
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;*********
	nop	                                            ;显示程序
        ;clr     datr2                         ;防止乱显
        ;mov	p1, #00h
	;mov	r0, #30h
	;第1行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	clr	l1
	clr	l2
	mov	r1, #08h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi21:
	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi21
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第2行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	clr	l1
	clr	l2
	mov	r1, #09h	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi22:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi22
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第3行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	setb	l1
	clr	l2
	mov	r1, #0ah	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi23:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi23
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第4行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	setb	l1
	clr	l2
	mov	r1, #0bh	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi24:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi24
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第5行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	clr	l1
	setb	l2
	mov	r1, #0ch	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi25:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi25
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第6行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	clr	l1
	setb	l2
	mov	r1, #0dh	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi26:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi26
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第7行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	setb	l1
	setb	l2
	mov	r1, #0eh	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi27:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi27
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第8行***********************************************
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	setb	l1
	setb	l2
	mov	r1, #0fh	                            ;行数
	lcall	zb_1	                                    ;数据准备
xianshi28:	mov	a, @r0
	lcall	sendd	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe2                                         ;另外一排消隐
	cjne	r0, #40h, xianshi28
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe1	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
	setb	oe1	                                    ;消隐，等于setb	noe，clr hoe
	ret
;*****************************************************************
xianshis:	nop	                                    ;显示程序shang
	mov	r0, #30h
        ;第一行***********************************************
	setb	oe2	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	clr	l1
	clr	l2
	mov	r1, #00h	                            ;行数
	lcall	zb_2	                                    ;数据准备
xianshi31:	nop
	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe1                                         ;另外一排消隐
	cjne	r0, #40h, xianshi31
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe2	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第2行***********************************************
	setb	oe2	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	clr	l1
	clr	l2
	mov	r1, #01h	                            ;行数
	lcall	zb_2	                                    ;数据准备
xianshi32:	nop
	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe1                                         ;另外一排消隐
	cjne	r0, #40h, xianshi32
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe2	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第3行***********************************************
	setb	oe2	                                    ;消隐，等于setb	noe，clr hoe
	clr	l0
	setb	l1
	clr	l2
	mov	r1, #02h	                            ;行数
	lcall	zb_2	                                    ;数据准备
	
xianshi33:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe1                                         ;另外一排消隐
	cjne	r0, #40h, xianshi33
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe2	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第4行***********************************************
	setb	oe2	                                    ;消隐，等于setb	noe，clr hoe
	setb	l0
	setb	l1
	clr	l2
	mov	r1, #03h	                            ;行数
	lcall	zb_2	                                    ;数据准备
xianshi34:	mov	a, @r0
	lcall	send	                                    ;调用发送一位程序
	nop
	inc	r0
	;setb    oe1                                         ;另外一排消隐
	cjne	r0, #40h, xianshi34
	mov	r0, #30h
	clr	stb
	setb	stb
	clr	stb
	clr	oe2	                                    ;显示，等于clr	noe，setb hoe
	lcall	DELEY20MS
	nop
        ;第5行**********************