单片微机原理与接口技术——基于STC15W5K32S4:串口双机通信实验(51汇编软件仿真)

文章目录

  • main.asm
  • STC15_init
  • LCD1602
  • juzheng
  • delay
  • usart(应该是uart,下面的文件写错了,另行修改)

单片微机原理与接口技术——基于STC15W5K32S4:串口双机通信实验(51汇编软件仿真)_第1张图片

main.asm

/*----------------------------------------------------------------------------------
;实验名称:	串口双机通信实验
;功    能:	1.上电初始化LCD1602,显示指针在第二行;

;			2.第一行是从外界接收到的字符显示,第二行是本机通过矩阵键盘输入的字符字符显示;

;			3.通过矩阵键盘的功能键,可以设置数字符号、大小写模式切换,并使的对应的指示灯点亮;
;			  例如:按下“数字符号切换”按键,“数字符号切换指示灯”点亮,此时输入的字符是按键对应的数字和字符;
;				    再按下“数字符号切换”按键,“数字符号切换指示灯”熄灭,退出数字字符模式。
;			  当“数字符号切换指示灯”和“大小写切换指示灯”熄灭时,此时输入的是小写的英文字符;
;			  当同时设置数字字符模式,和大小写模式,优先级:数字字符 > 大写 > 小写;

;			4.设置了删除,清屏,发送功能键;
;			(1)“删除”是删除一位字符;
;			(2)输入完成,按下“发送”按键,才串口发送给所连接的单片机;
;				发送的字符串以 0A 0D 作为结束标志符号,在“发送”的服务程序中有单独的代码,按下“发送”自动添加

;			5.设置了避免连续按“发送”按键误操作程序;

;			6.可以同一单片机多次发送字符串到另一单片机。

;算法说明:	1.所有的工作寄存器R0~R7作为局部变量,不存储静态变量或全局变量;
;			2.所有的静态变量和全局变量都通过自定义地址来存储,所有变量总览如下:
;				LCD中的变量		LCD_RS				BIT			P2.5	 		;1602数据命令选择端口
;								LCD_RW				BIT			P2.6	 		;1602读写选择端口
;								LCD_EN				BIT			P2.7	 		;1602使能端口
;								LCD_OverLineSize_Light	BIT		P3.4			;1602一行显示越界指示灯
;								LCD_DATA			EQU			P0		 		;1602数据端口
;								LCD_ALL_FLAG		DATA		20H		 		;标志位
;								LCD_FLAG			BIT			LCD_ALL_FLAG.0	;1602读忙标志位
;								LCD_Line_BIT		BIT			LCD_ALL_FLAG.1	;换行标志位
;								LCD_DAT				DATA		21H		 		;1602数据命令字	
;								LCD_DELAYED			DATA		22H		 		;延时字
;								LCD_LineSP			DATA		23H				;LCD堆栈指针(最大为一行16个字符)
;								LCD_StackAddress	DATA		0A0H			;LCD堆栈首地址
;								LCD_StackSize		EQU			20				;LCD堆栈大小
;				juzheng中的变量 	KEY     			DATA        24H				;用于存储按键的编号:0~F
;								JZ_ALL_FLAG			DATA		25H				;矩阵键盘的所有标志位
;								Shift_number_BIT	BIT			JZ_ALL_FLAG.0	;切换数字标志位
;								Shift_LH_BIT		BIT			JZ_ALL_FLAG.1	;切换大小写标志位
;								Shift_number_Light	BIT			P3.2			;切换数字指示灯
;								Shift_LH_Light		BIT			P3.3			;切换大小写指示灯	
;				usart中的变量	Usart_Buffer		DATA		27H		 		;串口缓存器
;								Usart_StackSP		DATA		28H				;串口堆栈指针
;								Usart_StackAddress	DATA		80H				;串口堆栈首地址
;								Usart_StackSize		EQU			20				;串口堆栈大小
;			3.不足之处:
;			(1)函数块冗杂,一些函数块重复出现,但是这些重复出现的函数块所输入的参数不同,
;				此时还需要再通过设置新的变量来获得输入的值,再调用函数块,这样的话,定义的变量会较多,
;				这是一个需要改进的地方。
;			(2)关于LCD,串口堆栈的设置和处理,感觉冗杂,需要简化处理,此时就需要重新更改堆栈的处理方式
;设计者:
;设计时间:2020.4.24
;设计版本:V1.0	 */
/**************头文件包含*********************/
$INCLUDE(LCD1602.INC)
$INCLUDE(JUZHENG.INC)
$INCLUDE(USART.INC)

ORG		0000H
LJMP	MAIN
ORG		0023H
LJMP	Usart_ISR
ORG		0100H
/******************主函数********************/
MAIN:
	MOV		SP,	#0C0H			;设堆栈指针 ,远离工作区
	CLR		Shift_number_BIT	;清除切换标志位
	CLR		Shift_LH_BIT
	CLR		Shift_number_Light	;熄灭所有指示灯
	CLR		Shift_LH_Light
	LCALL	LCD_INIT			;LCD初始化
	LCALL	Usart_Init			;串口初始化
MAINLOOP:
	LCALL KEYSCAN  				;扫描矩阵按键
    LJMP  MAINLOOP				;死循环
/*******************结束********************/
END
	

STC15_init

;以下是变量及函数的声明
PUBLIC STC15_INIT

	
;***************************************************
;定义程序区块,编译时动态分配程序地址,此段代码可以不要
	_STC15_INIT_ASM SEGMENT CODE
	RSEG	_STC15_INIT_ASM
;***************************************************
P0M1	DATA	0x93	; P0M1.n,P0M0.n 	=00--->Standard,	01--->push-pull
P0M0	DATA	0x94	; 					=10--->pure input,	11--->open drain
P1M1	DATA	0x91	; P1M1.n,P1M0.n 	=00--->Standard,	01--->push-pull
P1M0	DATA	0x92	; 					=10--->pure input,	11--->open drain
P2M1	DATA	0x95	; P2M1.n,P2M0.n 	=00--->Standard,	01--->push-pull
P2M0	DATA	0x96	; 					=10--->pure input,	11--->open drain
P3M1	DATA	0xB1	; P3M1.n,P3M0.n 	=00--->Standard,	01--->push-pull
P3M0	DATA	0xB2	; 					=10--->pure input,	11--->open drain
P4M1	DATA	0xB3	; P4M1.n,P4M0.n 	=00--->Standard,	01--->push-pull
P4M0	DATA	0xB4	; 					=10--->pure input,	11--->open drain
P5M1	DATA	0xC9	; P5M1.n,P5M0.n 	=00--->Standard,	01--->push-pull
P5M0	DATA	0xCA	; 					=10--->pure input,	11--->open drain
P6M1	DATA	0xCB	; P6M1.n,P6M0.n 	=00--->Standard,	01--->push-pull
P6M0	DATA	0xCC	; 					=10--->pure input,	11--->open drain
P7M1	DATA	0xE1	;
P7M0	DATA	0xE2	;
P4      DATA    0C0H
P5      DATA    0C8H
	
STC15_INIT:
	// 端口初始化
	CLR		A
	MOV		P0M1,	A 					;设置为准双向口
 	MOV		P0M0,	A
	MOV		P1M1,	A 					;设置为准双向口
 	MOV		P1M0,	A
	MOV		P2M1,	A 					;设置为准双向口
 	MOV		P2M0,	A
	MOV		P3M1,	A 					;设置为准双向口
 	MOV		P3M0,	A
	MOV		P4M1,	A 					;设置为准双向口
 	MOV		P4M0,	A
	MOV		P5M1,	A 					;设置为准双向口
 	MOV		P5M0,	A
	MOV		P6M1,	A 					;设置为准双向口
 	MOV		P6M0,	A
	MOV		P7M1,	A 					;设置为准双向口
 	MOV		P7M0,	A
	RET
;*****************结束*******************	
	END

LCD1602

;程序名称:	LCD1602.asm
;程序说明:	1602汇编程序,51单片机汇编程序,仅需修改引脚定义即可。晶振大小12M,
;			程序测试完全正确。内部包含写数据、写命令(包括读忙和不读忙)、初始化等子函数。
;			调用时先给LCD_DAT赋值,给出需要写入的数据或命令,然后调用。
;			eg:	写数据:	MOV		LCD_DAT,	#'A'	;30H为LCD_DAT
;						LCALL	LCD_W_DATA
;				写命令:	MOV		LCD_DAT,	#38H	;30H为LCD_DAT
;						LCALL	LCD_W_CMD			;(或者LCD_CMD)
;***********************命令字******************************************************************
;RS=0、RW=0——表示向LCM写入指令
;RS=0、RW=1——表示读取Busy标志
;RS=1、RW=0——表示向LCM写入数据
;RS=1、RW=1——表示从LCM读取数据

;01H:清除DDRAM的所有单元,光标被移动到屏幕左上角。
;02H:DDRAM所有单元的内容不变,光标移至左上角。
;04H:写入DDRAM后,地址指针减一,比如第一个字符写入8FH,则下一个字符会写入8EH;屏幕上的内容不滚动。
;05H:写入DDRAM后,地址指针减一,同上一种情况;每一个字符写入以后,屏幕上的内容向右滚动一个字符位。
;06H:写入DDRAM后,地址指针加一,比如第一个字符写入80H,则下一个字符会写入81H;屏幕上的内容也是不滚动。这应该是最常用的一种显示方式。
;07H:写入DDRAM后,地址指针加一,同上一种情况;每一个字符写入以后,屏幕上的内容向左滚动一个字符位。
;08H、09H、0AH、0BH:关闭显示屏,对DDRAM的操作还是在进行的,接着执行下面的某条指令,就能看到刚才屏幕关闭期间,对DDRAM操作的效果了。
;0cH:打开显示屏,不显示光标,光标所在位置的字符不闪烁。
;0dH:打开显示屏,不显示光标,光标所在位置的字符闪烁。
;0eH:打开显示屏,显示光标,光标所在位置的字符不闪烁。
;0fH:打开显示屏,显示光标,光标所在位置的字符闪烁。
;	关于光标的位置:光标所在的位置指示了下一个被写入的字符所处的位置,
;	加入在写入下一个字符前没有通过指令设置DDRAM的地址,那么这个字符就应该显示在光标指定的地方。
;10H:每输入一次该指令,AC就减一,对应了光标向左移动一格。整体的画面不滚动。
;14H:每输入一次该指令,AC就加一,对应了光标向右移动一格。整体的画面不滚动。
;18H:每输入一次该指令,整体的画面就向左滚动一个字符位。
;1CH:每输入一次该指令,整体的画面就向右滚动一个字符位。
;		画面在滚动的时候,每行的首尾是连在一起的,也就是每行的第一个字符,若左移25次,就会显示在该行的最后一格。
;		在画面滚动的过程中,AC的值也是变化的。
;20H:4位总线,单行显示,显示5×7的点阵字符。
;24H:4位总线,单行显示,显示5×10的点阵字符。
;28H:4位总线,双行显示,显示5×7的点阵字符。
;2CH:4位总线,双行显示,显示5×10的点阵字符。
;30H:8位总线,单行显示,显示5×7的点阵字符。
;34H:8位总线,单行显示,显示5×10的点阵字符。
;38H:8位总线,双行显示,显示5×7的点阵字符。这是最常用的一种模式。3CH:8位总线,双行显示,显示5×10的点阵字符。
;80H:第一行
;0C0H:第二行
;*********************************************************************************************************
/*********以下是变量及函数的声明**************/
PUBLIC LCD_R_DATA
PUBLIC LCD_W_DATA
PUBLIC LCD_W_CMD
PUBLIC LCD_CMD
PUBLIC LCD_INIT
PUBLIC LCD_DAT
PUBLIC LCD_FLAG
PUBLIC LCD_Line_BIT
PUBLIC LCD_LineSP
PUBLIC LCD_StackAddress
PUBLIC LCD_Save2Stack
PUBLIC LCD_OverLineSize_Light
;***************************************************
;定义程序区块,编译时动态分配程序地址,此段代码可以不要
	_LCD1602_ASM SEGMENT CODE
	RSEG	_LCD1602_ASM
;***************************************************
/***************变量声明区****************/
LCD_RS				BIT		P2.5	 			;1602数据命令选择端口
LCD_RW				BIT		P2.6	 			;1602读写选择端口
LCD_EN				BIT		P2.7	 			;1602使能端口
LCD_OverLineSize_Light	BIT		P3.4			;1602一行显示越界指示灯
LCD_DATA			EQU		P0		 			;1602数据端口

LCD_ALL_FLAG		DATA		20H		 		;标志位
LCD_FLAG			BIT			LCD_ALL_FLAG.0	;1602读忙标志位
LCD_Line_BIT		BIT			LCD_ALL_FLAG.1	;换行标志位
LCD_DAT				DATA		21H		 		;1602数据命令字	
LCD_DELAYED			DATA		22H		 		;延时字
LCD_LineSP			DATA		23H				;LCD堆栈指针(最大为一行16个字符)
LCD_StackAddress	DATA		0A0H			;LCD堆栈首地址
LCD_StackSize		EQU			20				;LCD堆栈大小
/***************************************************
函数名称:LCD_R_DATA
函数功能:1602读命令函数
输    入:LCD_DATA(P0口)
输    出:高位存至LCD_LAG中
***************************************************/
LCD_R_DATA:
		MOV		LCD_DATA,#0FFH
	LCD_BUSY:	CLR		LCD_RS
		SETB	LCD_RW
		NOP
		SETB	LCD_EN
		NOP
		MOV		Acc,LCD_DATA
		MOV		C,Acc.7
		MOV		LCD_FLAG,C
		CLR		LCD_EN
		NOP
		JB		LCD_FLAG,LCD_BUSY	
		RET			
/***************************************************
函数名称:LCD_W_DATA
函数功能:1602写数据函数
输    入:数据存在LCD_DAT
输    出:LCD_DATA(P0口)
***************************************************/
LCD_W_DATA:
		LCALL	LCD_R_DATA
		SETB	LCD_RS
		CLR		LCD_RW
		NOP			
		MOV		LCD_DATA,LCD_DAT
		SETB	LCD_EN
		NOP
		CLR		LCD_EN
		RET
/***************************************************
函数名称:LCD_W_CMD
函数功能:1602写命令函数,检测忙信号
输    入:命令存在LCD_DAT
输    出:LCD_DATA(P0口)
***************************************************/
LCD_W_CMD:
		LCALL	LCD_R_DATA
		CLR		LCD_RS
		CLR		LCD_RW
		NOP		
		MOV		LCD_DATA,LCD_DAT
		SETB	LCD_EN
		NOP
		CLR		LCD_EN
		RET	
/***************************************************
函数名称:LCD_CMD
函数功能:1602写命令函数,不检测忙信号
输    入:命令存在LCD_DAT
输    出:LCD_DATA(P0口)
***************************************************/
LCD_CMD:
		CLR		LCD_RS
		CLR		LCD_RW
		NOP		
		MOV		LCD_DATA,LCD_DAT
		SETB	LCD_EN
		NOP
		CLR		LCD_EN
		RET
/***************************************************
函数名称:LCD_INIT
函数功能:1602初始化函数
输    入:无
输    出:无
***************************************************/
LCD_INIT:
		MOV		LCD_LineSP,		#00H	;LCD存储区指针归零
		CLR		LCD_OverLineSize_Light
		
		SETB	LCD_Line_BIT			;第二行
		MOV		LCD_DELAYED,	#30
		LCALL	LCD_DELAY_MS
		MOV		LCD_DAT,		#38H	//设置显示模式
		LCALL	LCD_CMD
		MOV		LCD_DELAYED,	#10
		LCALL	LCD_DELAY_MS		    
		MOV		LCD_DAT,		#38H
		LCALL	LCD_CMD
		MOV		LCD_DELAYED,	#10
		LCALL	LCD_DELAY_MS
		MOV		LCD_DAT,		#38H
		LCALL	LCD_CMD
		MOV		LCD_DELAYED,	#10
		LCALL	LCD_DELAY_MS
		MOV		LCD_DAT,		#038H	//设置显示模式
		LCALL	LCD_W_CMD
		MOV		LCD_DAT,		#08H	//显示开
		LCALL	LCD_W_CMD
		MOV		LCD_DAT,		#01H	//清屏
		LCALL	LCD_W_CMD
		MOV		LCD_DAT,		#06H	//写第一个指针+1
		LCALL	LCD_W_CMD
		MOV		LCD_DAT,		#0CH	//开显示不显示光标,光标不闪烁
		LCALL	LCD_W_CMD
		MOV		LCD_DAT,		#0C0H	//第二行
		LCALL	LCD_W_CMD
	RET
/***************************************************
函数名称:LCD_Save2Stack
函数功能:存储LCD_DAT的内容到堆栈
输    入:LCD_StackAddress,LCD_LineSP
输    出:无
***************************************************/
LCD_Save2Stack:
	MOV		A,				#LCD_StackAddress
	ADD		A,				LCD_LineSP
	MOV		R0,				A
	MOV		@R0,			LCD_DAT
	INC		LCD_LineSP
	RET

/*****************************************
延时函数,延时时间为LCD_DELAYED*0.5毫秒 0~100毫秒的延时
*****************************************/			
LCD_DELAY_MS:	
	MOV		R7,		LCD_DELAYED
D1:	MOV		R6,		#0F8H
D2:	DJNZ	R6,		D2	
	DJNZ	R7,		D1
	
	RET

/*****************************************
延时函数,延时时间为LCD_DELAYED*2微秒	 0~500微秒的延时
*****************************************/			
LED_DELAY_US:
	MOV		R7,		A	
DU1:		
	DJNZ	R7,		DU1
	RET
END

juzheng

;程序名称:	juzheng.asm
;程序说明:	矩阵按键4行*8列,占用P1口和P2的低四位
;按键表示符号含义:
;	  ;Y     P1.0      P1.1     P1.2     P1.3	  P1.4	   P1.5	    P1.6	P1.7
			  ;|        |        |        |		   |        |        |        |   
	;X         |        |        |        |		   |        |        |        |  
   ;P2.0 ---- A/1 ---- B/2 ---- C/3 ---- D/4 ---- E/5 ---- F/6 ---- G/7 ---- 换行 ----
			  ;|        |        |        |		   |        |        |        |  
   ;P2.1 ---- H/8 ---- I/9 ---- J/0 ---- K/" ---- L/= ---- M/@ ---- N/# ---- 清除 ----
			  ;|        |        |        |		   |        |        |        |  
   ;P2.2 ---- O/$ ---- P/% ---- Q/& ---- R/, ---- S/. ---- T/( ---- U/) ---- 确定 ----
			  ;|        |        |        |		   |        |        |        |  
   ;P2.3 ---- V/+ ---- W/- ---- X/* ---- Y/ /---- Z/? ----空格/!----数字----大小写切换 ----
			  ;|        |        |        |		   |		|	  符号切换	  |
;按键数字标号:	  
		;Y     P1.0      P1.1     P1.2     P1.3	  P1.4	   P1.5	    P1.6	P1.7
			  ;|        |        |        |		   |        |        |        |   
	;X         |        |        |        |		   |        |        |        |  
	;P2.0 ---- 0 ------ 1 ------ 2 ------ 3 ------ 4 ------ 5 ------ 6 ------ 7 ----
			  ;|        |        |        |		   |        |        |        |  
	;P2.1 ---- 8 ------ 9 ------ 10 ----- 11 ----- 12 ----- 13 ----- 14 ----- 15 ----
			  ;|        |        |        |		   |        |        |        |  
	;P2.2 ---- 16 ----- 17 ----- 18 ----- 19 ----- 20 ----- 21 ----- 22 ----- 23 ----
			  ;|        |        |        |		   |        |        |        |  
	;P2.3 ---- 24 ----- 25 ----- 26 ----- 27 ----- 28 ----- 29 ----- 30 ----- 31 ----
			  ;|        |        |        |		   |		|	     |	      |
;以下是变量及函数的声明
PUBLIC KEYSCAN
PUBLIC KEY
PUBLIC Shift_number_BIT, Shift_LH_BIT, Shift_number_Light, Shift_LH_Light

;***************************************************
;定义程序区块,编译时动态分配程序地址,此段代码可以不要
	_JUZHENG_ASM SEGMENT CODE
	RSEG	_JUZHENG_ASM
;***************************************************
;****************头文件包含****************
$INCLUDE(DELAY.INC)
$INCLUDE(LCD1602.INC)
$INCLUDE(USART.INC)
;*****************自定义*********************************************
KEY     			DATA        24H				;用于存储按键的编号:0~F
JZ_ALL_FLAG			DATA		25H				;矩阵键盘的所有标志位
Shift_number_BIT	BIT			JZ_ALL_FLAG.0	;切换数字标志位
Shift_LH_BIT		BIT			JZ_ALL_FLAG.1	;切换大小写标志位
Shift_number_Light	BIT			P3.2			;切换数字指示灯
Shift_LH_Light		BIT			P3.3			;切换大小写指示灯	
/******************************************************************
函数名称:KEYSCAN
函数说明:按键扫描子程序:反转法识别按键,并将按键编码压入显示缓冲区
		;行列键扫描程序
		;使用XY查找4x8键的方法,只能单键,速度快
;****************************************************************/
KEYSCAN:
	ANL		P2,		#0F0H				
	MOV		P1,		#0FFH				;置列(P1)为输入模式,行(P2低四位)为输出模式
	MOV		A,		P1					;读入P1口状态,判断是否有键按下
	CJNE	A,		#0FFH,		KEYCODE ;不相等说明有键按下,转按下键的处理 
	MOV		KEY,	#0xFF
	RETURN:		
		RET							    ;相等说明没有键按下,返回

	KEYCODE:
		LCALL	DELAY4ms				;延时消除抖动
		MOV		A,		P1				;
		CJNE	A,		#0FFH,	KEYID	;延时后读入P1口状态,不相等说明确实有键按下,转入键识别处理过程
		LJMP	RETURN					; 相等则说明是干扰引起,不予处理

			KEYID:
				MOV		R4,		A 		; 此时的P1口状态已经读入R4中,对应按下的行为0,将行状态咱存于R4
				ORL		P2,		#0FH
				MOV		P1,		#00H    ;行列反转置列为输入模式,列为输出模式全为0
					NOP
					NOP					; 适当短延时,待端口电平稳定
				MOV		A,		P2      ;读入P2口状态,有键按下的话,则对应的行会被拉低,将列状态存入A中,
				ANL		A,		#0FH	;去除高四位,保留低四位
				MOV		R3,		A      	;按键扫描码暂存于R3中

				//下面等待键释放
				KEYUP:
					MOV 	A,		P2				;读入P2口状态
					ANL		A,		#0FH
					CJNE	A,		#0FH,	KEYUP  	; 不相等说明按键没有松开,继续等待
					LCALL	DELAY4ms				;相等说明按键松开,延时消除抖动
					MOV 	A,		P2				;读入P2口状态
					ANL		A,		#0FH
					CJNE	A,		#0FH,	KEYUP  	; 不相等说明按键没有真正松开,干扰造成,继续等待
                                             		; 相等说明按键真正松开了,开始根据存储于R3,R4中的按键扫描码做按键编码处理
			   KEYCODE1:MOV		DPTR,	#JBKEY	;DPTR指向显示码存储区
						MOV		R2,		#20H	;32个按键,循环32次
						MOV		R5,		#00H	;顺序读取按键的数字标号

						KEYCODELOOP:
							MOV		A,		R5
							ADD		A,		R5
							MOVC	A,		@A+DPTR	;
							SUBB	A,		R3		;
							JNZ		KEYCODEi
							MOV		A,		R5
							ADD		A,		R5							
							INC		A
							MOVC	A,		@A+DPTR	;
							SUBB	A,		R4
							JNZ		KEYCODEi		;
							MOV		DPTR,	#SEGCODE	;DPTR指向显示码存储区
							
							MOV		A,		R5
							MOV		KEY,	A		;保存到KEY
							
							MOV		A,		R5
							CLR		C
							SUBB	A,		#7
							JZ		JMP_KEY_7			;跳转到下方JMP_KEY_7
														
							MOV		A,		R5
							CLR		C
							SUBB	A,		#15
							JZ		JMP_KEY_15			;跳转到下方JMP_KEY_15
									
							MOV		A,		R5
							CLR		C
							SUBB	A,		#23
							JZ		JMP_KEY_23			;跳转到下方JMP_KEY_23
									
							MOV		A,		R5
							CLR		C
							SUBB	A,		#30
							JZ		JMP_KEY_30			;跳转到下方JMP_KEY_30
							
							MOV		A,		R5
							CLR		C
							SUBB	A,		#31
							JZ		JMP_KEY_31			;跳转到下方JMP_KEY_31
							
							MOV		A,	LCD_LineSP
							JNZ     Character_Show_Normal	;判断LCD_LineSP是否为0,否,正常显示
							MOV		LCD_DAT,	#01H		;是,则进行LCD清屏
							LCALL	LCD_W_CMD
							//显示串口堆栈里的内容
							;MOV		R0,		#Usart_StackAddress
							;MOV		R1,		#16				;LCD一行显示16个字符,不采取滚动模式
				;Show_UsartStask:
							;MOV		LCD_DAT,	@R0			;30H为LCD_DAT
							;LCALL	LCD_W_DATA				;显示串口堆栈中的内容到LCD显示
							;INC		R0
							;DJNZ	R1,		Show_UsartStask	;显示串口堆栈中的前16位
							MOV		R0,		#Usart_StackAddress		;获取堆栈首地址
							MOV		R1,		#16						;获取堆栈指针
							LCALL	ShowStask
							
							MOV		LCD_DAT,	#0C0H		;切换到LCD的第二行
							LCALL	LCD_W_CMD
				Character_Show_Normal:			
							MOV		A,	LCD_LineSP
							CJNE	A	,#16, Character_Show_Normali	;判断输入是否超过16个字符越界,越界则不保存
							SETB	LCD_OverLineSize_Light				;越界指示灯点亮
							LJMP RETURN           ; 返回
				Character_Show_Normali:	
							CLR		LCD_OverLineSize_Light				;没有越界,越界指示灯熄灭
							LCALL	Character_Show						;正常显示
							LJMP RETURN          						;退出本次按键扫描

				KEYCODEi:
					INC		R5				;
					DJNZ	R2,		KEYCODELOOP
					RET
				JMP_KEY_7:	
					LJMP KEY_7			;删除(删除一位字符)
					RET
				JMP_KEY_15:	
					LJMP KEY_15			;清屏
					RET
				JMP_KEY_23:	
					LJMP KEY_23			;确定发送
					RET
				JMP_KEY_30:	
					LJMP KEY_30			;切换成数字
					RET
				JMP_KEY_31:	
					LJMP KEY_31			;切换大小写
					RET	
					
//键7:删除(删除一位字符)
KEY_7:
	MOV		LCD_DAT,	#01H				;LCD清屏
	LCALL	LCD_W_CMD
	MOV		R0,		#Usart_StackAddress		;获取堆栈首地址
	MOV		R1,		#16						;获取堆栈指针
	LCALL	ShowStask
	MOV		LCD_DAT,	#0C0H				;切换到LCD第二行
	LCALL	LCD_W_CMD
	DEC		LCD_LineSP
	MOV		R0,		#LCD_StackAddress		;获取堆栈首地址
	MOV		R1,		LCD_LineSP				;获取堆栈指针
	LCALL	ShowStask
	
	LJMP 	RETURN					;退出本次按键扫描
	RET
	
//键15:清屏
KEY_15:
	MOV		LCD_LineSP,	#00H		;LCD堆栈指针归零
	CLR		LCD_OverLineSize_Light	;越界指示灯熄灭
	MOV		LCD_DAT,	#01H		;LCD清屏
	LCALL	LCD_W_CMD
	MOV		LCD_DAT,	#0C0H		;切换到LCD第二行
	LCALL	LCD_W_CMD
	LJMP 	RETURN					;退出本次按键扫描
	RET

//键23:确定发送
KEY_23:
	LCALL	SendNByte				;发送LCD堆栈中的字符
	MOV		Usart_Buffer,	#0AH	;结束标志字符 0A 0D
	LCALL	Send0neByte
	MOV		Usart_Buffer,	#0DH
	LCALL	Send0neByte
	//如果想在发送后本机LCD上显示刚刚发送的字符串,只有把下面的代码注释即可
  ;*******************************************************************
		MOV		LCD_DAT,	#01H				;LCD清屏
		LCALL	LCD_W_CMD
		MOV		R0,		#Usart_StackAddress		;获取堆栈首地址
		MOV		R1,		#16						;获取堆栈指针
		LCALL	ShowStask
		MOV		LCD_DAT,	#0C0H				;切换到LCD第二行
		LCALL	LCD_W_CMD
  ;*********************************************************************
	MOV		LCD_LineSP,	#00H		;LCD堆栈指针归零
	CLR		LCD_OverLineSize_Light	;越界指示灯熄灭
	LJMP 	RETURN					;退出本次按键扫描
	RET

//键30:切换成数字
KEY_30:
	CPL		Shift_number_BIT		;翻转数字符号切换标志位
	CPL		Shift_number_Light		;翻转数字符号切换指示灯
	LJMP 	RETURN					;退出本次按键扫描
	RET

//键31:切换大小写
KEY_31:
	CPL		Shift_LH_BIT		;翻转切换大小写标志位
	CPL		Shift_LH_Light		;切换大小写标志位指示灯
	LJMP 	RETURN				;退出本次按键扫描
	RET

Character_Show:									;优先级:数字 > 大写 > 小写
	JB		Shift_number_BIT,	Shift_number	;数字的优先级高
	JB		Shift_LH_BIT,	Shift_upper			;其次是大写
	LCALL	Shift_lower							;最后是小写
	RET
	Shift_number:
		MOV		DPTR,	#SEGCODE		;设置DPTR到标准字库
		MOV		A,		KEY				;获取按键数字标号
		ADD		A,		#64				;数字符号区
		MOVC	A,		@A+DPTR	;
		MOV		LCD_DAT,	A			;
		LCALL	LCD_Save2Stack			;保存到LCD堆栈
		LCALL	LCD_W_DATA				;LCD显示字符
		LJMP 	RETURN					;退出本次按键扫描
		RET
	Shift_upper:
		MOV		DPTR,	#SEGCODE		;设置DPTR到标准字库
		MOV		A,		KEY				;获取按键数字标号
		ADD		A,		#32				;大写英文区
		MOVC	A,		@A+DPTR	;
		MOV		LCD_DAT,	A
		LCALL	LCD_Save2Stack			;保存到LCD堆栈
		LCALL	LCD_W_DATA				;LCD显示字符
		LJMP	RETURN					;退出本次按键扫描
		RET
	Shift_lower:
		MOV		DPTR,	#SEGCODE		;设置DPTR到标准字库
		MOV		A,		KEY				;获取按键数字标号
		MOVC	A,		@A+DPTR	;		;小写英文区
		MOV		LCD_DAT,	A
		LCALL	LCD_Save2Stack			;保存到LCD堆栈
		LCALL	LCD_W_DATA				;LCD显示字符
		LJMP 	RETURN					;退出本次按键扫描
	RET

/***************************************************
函数名称:SendNByte
函数功能:发送N个字节
输    入:Usart_Buffer
输    出:无
***************************************************/	
SendNByte:
	MOV		R0,		#LCD_StackAddress		;获取LCD堆栈首地址
	MOV		R1,		LCD_LineSP				;获取LCD堆栈指针
	CJNE	R1,		#00H,	SendNByteLOOP	;R1不为0,串口发送LCD_LineSP个字符
	RET										;R1为0,返回
SendNByteLOOP:
	MOV		Usart_Buffer,		@R0
	LCALL	Send0neByte						;
	INC		R0
	DJNZ	R1,		SendNByteLOOP			;串口发送LCD_LineSP个字符
	RET
JBKEY:							;判断按键对应的标号
;	 	0			1			2			3			4			5			6			7
DB	0EH,0FEH,	0EH,0FDH,	0EH,0FBH,	0EH,0F7H,	0EH,0EFH,	0EH,0DFH,	0EH,0BFH,	0EH,07FH
;	 	8			9			10			11			12			13			14			15
DB	0DH,0FEH,	0DH,0FDH,	0DH,0FBH,	0DH,0F7H,	0DH,0EFH,	0DH,0DFH,	0DH,0BFH,	0DH,07FH
;	 	16			17			18			19			20			21			22			23
DB	0BH,0FEH,	0BH,0FDH,	0BH,0FBH,	0BH,0F7H,	0BH,0EFH,	0BH,0DFH,	0BH,0BFH,	0BH,07FH
;	 	24			25			26			27			28			29			30			31
DB	07H,0FEH,	07H,0FDH,	07H,0FBH,	07H,0F7H,	07H,0EFH,	07H,0DFH,	07H,0BFH,	07H,07FH

SEGCODE:						;标准字库
DB	'a','b','c','d','e','f','g',' '
DB	'h','i','j','k','l','m','n',' '
DB	'o','p','q','r','s','t','u',' '
DB	'v','w','x','y','z',' ',' ',' '
	
DB	'A','B','C','D','E','F','G',' '
DB	'H','I','J','K','L','M','N',' '
DB	'O','P','Q','R','S','T','U',' '
DB	'V','W','X','Y','Z',' ',' ',' '
	
DB	'1','2','3','4','5','6','7',' '
DB	'8','9','0','"','=','@','#',' '
DB	'$','%','&',',','.','(',')',' '
DB	'+','-','*','/','?','!'

;*****************结束*******************
	END               ;

delay

;以下是变量及函数的声明
PUBLIC DELAY400MS
PUBLIC DELAY1ms	
PUBLIC DELAY4ms	
	
;***************************************************
;定义程序区块,编译时动态分配程序地址,此段代码可以不要
	_DELAY_ASM SEGMENT CODE
	RSEG	_DELAY_ASM
;***************************************************
//延时400ms子程序,用于数码管闪烁显示报警
//延时400ms子程序,用于数码管闪烁显示报警
DELAY400MS:								;@12.000MHz
	NOP
	NOP
	NOP
	PUSH	60H
	PUSH	61H
	PUSH	62H
	MOV		60H,	#5			;#15
	MOV		61H,	#152		;#152
	MOV		62H,	#2			;#82
NEXT0:
	DJNZ	62H,	NEXT0
	DJNZ	61H,	NEXT0
	DJNZ	60H,	NEXT0
	POP		62H
	POP		61H
	POP		60H
	RET
//延时1ms子程序:修改R7可以改变延时时间的长短,控制扫描速度,12MHz时钟,延时约1ms
DELAY1ms:
	MOV		R7,		#2
	DEL2:
		MOV		R6,		#248
		NOP
	DEL3:
		DJNZ	R6,		DEL3
		DJNZ	R7,		DEL2
	RET									; 子程序返回
//延时4ms子程序:用于按键消除抖动,实际应用时可以根据按键灵敏度修改
DELAY4ms:								;@12.000MHz
	MOV		70H,	#38					;#38
	MOV		71H,	#5					;#85
	NEXT:
		DJNZ	71H,	NEXT
		DJNZ	70H,	NEXT
		RET
;*****************结束*******************		
		END	

usart(应该是uart,下面的文件写错了,另行修改)

;以下是变量及函数的声明
PUBLIC Usart_Init
PUBLIC Usart_ISR	
PUBLIC Send0neByte	
PUBLIC Usart_Buffer
PUBLIC Usart_StackSP
PUBLIC Usart_StackAddress
PUBLIC ShowStask
;***************************************************
;定义程序区块,编译时动态分配程序地址,此段代码可以不要
	_USART_ASM SEGMENT CODE
	RSEG	_USART_ASM
;***************************************************
$INCLUDE(LCD1602.INC)

Usart_Buffer			DATA		27H		 		;串口缓存器
Usart_StackSP			DATA		28H				;串口堆栈指针
Usart_StackAddress		DATA		80H				;串口堆栈首地址
Usart_StackSize			EQU			20				;串口堆栈大小
;AT89C52定时器有4种工作方式,与STC15的定时器工作方式不同
;有四种工作方式:
;方式0,13位定时/计数方式。
;方式1,16位的定时/计数方式。
;方式2,自动重装载8位工作方式
;方式3,定时/计数器0被拆成2个独立的定时/计数器来用。
;其中,TL0可以构成8位的定时器或计数器的工作方式,而TH0则只能作为定时器来用。
/***************************************************
函数名称:Usart_Init
函数功能:串口初始化
输    入:无
输    出:无
***************************************************/
Usart_Init:
	MOV		TMOD,	#20H	;定时器T1,模式1
	MOV		SCON,	#50H	;设置波特率重装值(256-12000000/12/32/2400)=243=F3
	MOV		TH1,	#0F3H
	MOV		TL1,	#0F3H
	MOV		PCON,	#00H
	SETB	ES
	SETB	EA
	SETB	TR1
	MOV		Usart_Buffer,	#00H		;清空Buffer
	MOV		Usart_StackSP,	#00H
	RET
/***************************************************
函数名称:Usart_ISR
函数功能:串口中断服务程序
输    入:无
输    出:Usart_Buffer
***************************************************/
Usart_ISR:
	PUSH	ACC
	JB		RI,		Usart_Receive	;判断是否在接收数据
Usart_Transmit:
	CLR		TI					;清除发送标志位
	RETI
Usart_Receive:
	CLR		RI					;清除接收标志位
	MOV		A,		SBUF
	CJNE	A,	#0AH,	JReceiveEND1	;判断结束标志字符 0A,不是,则跳转
	MOV		Usart_Buffer,	SBUF		;是 0A ,存放到串口缓存器
	JMP		Usart_Receive_RET			;退出串口中断服务函数
JReceiveEND1:
	MOV		A,		Usart_Buffer		
	CJNE	A,		#0AH,	Usart_Receive_Normal;判断串口缓存器中是否是 0A,不是,则跳转
	MOV		A,		SBUF						;是 0A,将SBUF中的内容放到累加器A
	CJNE	A,		#0DH,	JReceiveEND2		;判断A中是否是结束标志字符 0D,不是,则跳转
												;是 0D,串口接收字符串结束
	MOV		A,		Usart_StackSP				;				 
	JZ		JReceiveEND1i						;Usart_StackSP为0,则跳转,归零串口缓存器,和串口指针
												;避免了避免连续按“发送”按键误操作
	//接收完成后进行数据处理
		//此次接收,堆栈没有存内容的地址里的内容清除,即 Usart_StackSP ~ Usart_StackSize的内容清除
		MOV		A,		#Usart_StackAddress		;获取堆栈首地址
		ADD		A,		Usart_StackSP			;获取堆栈指针
		MOV		R0,		A
		MOV		A,		#Usart_StackSize
		SUBB	A,		Usart_StackSP
		MOV		R1,		A
		CLR_LOOP:
		MOV		@R0,	#00H			;30H为LCD_DAT
		INC		R0
		DJNZ	R1,		CLR_LOOP		;循环
		
		//接收到的字符串显示到LCD
		MOV		LCD_DAT,	#01H					;LCD清屏
		LCALL	LCD_W_CMD
		MOV		R0,		#Usart_StackAddress		;获取堆栈首地址
		MOV		R1,		Usart_StackSP			;获取堆栈指针
		LCALL	ShowStask
		
	MOV		LCD_DAT,	#0C0H			;切换到LCD第二行输入
	LCALL	LCD_W_CMD
JReceiveEND1i:	
	MOV		Usart_Buffer,	#00H		;串口缓存器清零
	MOV		Usart_StackSP,	#00H		;串口指针归零
	JMP		Usart_Receive_RET
JReceiveEND2:	
		MOV		Usart_Buffer,	#0AH		;获取接收到的数据到累加器A  
		MOV		A,				#Usart_StackAddress
		ADD		A,				Usart_StackSP
		MOV		R0,				A
		MOV		@R0,			Usart_Buffer
		INC		Usart_StackSP
Usart_Receive_Normal:
		MOV		Usart_Buffer,	SBUF		;获取接收到的数据到累加器A  
		MOV		A,				#Usart_StackAddress
		ADD		A,				Usart_StackSP
		MOV		R0,				A
		MOV		@R0,			Usart_Buffer
		INC		Usart_StackSP

Usart_Receive_RET:
	POP		ACC
	RETI
/***************************************************
函数名称:ShowStask
函数功能:显示堆栈里的内容
输    入:R0(堆栈首地址),R1(获取堆栈指针)
输    出:无
调用举例:例如:
			MOV		R0,		#Usart_StackAddress		;获取堆栈首地址
			MOV		R1,		Usart_StackSP			;获取堆栈指针
			LCALL	ShowStask
***************************************************/		
ShowStask:	
		MOV		LCD_DAT,	@R0			;30H为LCD_DAT
		LCALL	LCD_W_DATA				;显示堆栈里的内容
		INC		R0
		DJNZ	R1,		ShowStask		;循环
	RET
/***************************************************
函数名称:Send0neByte
函数功能:发送一个字节
输    入:Usart_Buffer
输    出:无
***************************************************/	
Send0neByte:
	CLR		ES					;关闭串口中断
	CLR		TI					;清除发送标志位
	MOV		SBUF,	Usart_Buffer;将数据Buffer里的数据发送出去
SendFinish:
	JNB		TI,		SendFinish	;判断是否发送完毕
	CLR		TI					;是,则清除发送标志位
	SETB	ES					;开启串口中断
	RET

END

你可能感兴趣的:(STC15)