led16.asm

51单片机用汇编实例 包括ad

;===============================================================
; 文件名称: LED16.ASM
; 功能描述: 滚动显示"西安唐都科教仪器公司"
;===============================================================

ROW1	EQU 0EF00H
ROW2	EQU 0DF00H
COL1	EQU 0BF00H
COL2	EQU 07F00H

AUXR1	EQU 0A2H

	ORG 0000H
	LJMP MAIN
	ORG 0100H
MAIN:	MOV A, #00H		;清屏
	MOV DPTR, #ROW1
	MOVX @DPTR, A
	MOV DPTR, #ROW2
	MOVX @DPTR, A
	MOV A, #0FFH
	MOV DPTR, #COL1
	MOVX @DPTR, A
	MOV DPTR, #COL2
	MOVX @DPTR, A

BG1:	MOV R2, #144		;所有汉字显示一遍计数
	MOV DPTR, #HZDOT	;汉字字库首地址
BG2:	CALL DISP		;调用显示子程序
	INC DPTR
	INC DPTR
	DEC R2
	CJNE R2, #00, BG2
	AJMP BG1

;======显示子程序======
DISP:	MOV R6, #0FH
DPL0:	MOV R7, #08H		;8行
	MOV R5, #01H		;按行扫描
DPL1:	MOV A, #00H		;扫描显示0--7行
	MOVC A, @A+DPTR		;查表取数
	CPL A
	MOV R3, A		;COL1
	INC DPTR
	MOV A, #00H
	MOVC A, @A+DPTR
	CPL A
	MOV R4, A		;COL2
	INC DPTR
	INC AUXR1		;转换到数据指针2
	MOV DPTR, #ROW1
	MOV A, #00H
	MOVX @DPTR, A
	MOV DPTR, #COL1
	MOV A, R3
	MOVX @DPTR, A
	MOV DPTR, #COL2
	MOV A, R4
	MOVX @DPTR, A
	MOV DPTR, #ROW1
	MOV A, R5
	MOVX @DPTR, A
	RL A
	MOV R5, A
	INC AUXR1		;切换到数据指针1
	CALL DELAY
	DJNZ R7, DPL1

	INC AUXR1
	MOV DPTR, #ROW1
	MOV A, #00H
	MOVX @DPTR, A
	INC AUXR1
	MOV R7, #08H

DPL2:	MOV A, #00H		;扫描显示8--15行
	MOVC A, @A+DPTR
	CPL A
	MOV R3, A		;COL1
	INC DPTR
	MOV A, #00H
	MOVC A, @A+DPTR
	CPL A
	MOV R4, A		;COL2
	INC DPTR
	INC AUXR1
	MOV DPTR, #ROW2
	MOV A, #00H
	MOVX @DPTR, A
	MOV DPTR, #COL1
	MOV A, R3
	MOVX @DPTR, A
	MOV DPTR, #COL2
	MOV A, R4
	MOVX @DPTR, A
	MOV DPTR, #ROW2
	MOV A, R5
	MOVX @DPTR, A
	RL A
	MOV R5, A
	INC AUXR1
	CALL DELAY
	DJNZ R7, DPL2

	INC AUXR1
	MOV DPTR, #ROW2
	MOV A, #00H
	MOVX @DPTR, A
	INC AUXR1

	CLR C
	MOV A, DPL
	SUBB A, #32
	MOV DPL, A
	MOV A, DPH
	SUBB A, #00
	MOV DPH, A

	DJNZ R6, DPL0
	RET

;======延时子程序======
DELAY:	MOV A, R7
	PUSH ACC
	MOV R7, #0FFH
DY1:	NOP
	NOP
	DJNZ R7, DY1
	POP ACC
	MOV R7, A
	RET


	$INCLUDE(HZDOT.ASM)


;HZDOT:
;唐   CCCC6
;DB 080H,000H,000H,001H,0FCH,03FH,004H,001H
;DB 0F4H,00FH,004H,009H,0FCH,03FH,004H,009H
;DB 0F4H,00FH,004H,001H,0F4H,00FH,014H,008H
;DB 012H,008H,0F2H,00FH,011H,008H,000H,000H

	END