12864.s

数字频率计数字频率计数字频率计数字频率计

	.module _12864.c
	.area text(rom, con, rel)
	.dbfile E:\张秋伟\我的实验\数字频率计/LCD_PORT.h
	.dbfunc e Delayus _Delayus fV
;              i -> R20,R21
;             US -> R22,R23
	.even
_Delayus::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 15
; /*******************************************
;   文件：12864.C
;   环境：编译为ICC AVR6.31
; ********************************************
; 1 VSS -->接地
; 2 VDD -->电源VCC
; 3 V0  -->高电平
; 4 RS(CS) --> PB4
; 5 RW(STD)-->PB5
; 6 E      --> PB6
; 7 ~~~14 -->PA0~~PA7 (输出数据总线)
; 15 PSB-->VCC
; 16 NC
; 17 RST-->VCC
; 18 NC
	.dbline 17
; 19 LEDA -->VCC
; 20 LEDB -->GND
	ldi R16,5
	ldi R17,0
	movw R18,R22
	xcall empy16s
	movw R22,R16
	lsr R23
	ror R22
	lsr R23
	ror R22
	.dbline 18
	clr R20
	clr R21
	xjmp L5
L2:
	.dbline 18
L3:
	.dbline 18
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	.dbline 18
; /******************************************/
	cp R20,R22
	cpc R21,R23
	brlo L2
	.dbline -2
L1:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r US 22 i
	.dbend
	.dbfunc e Delayms _Delayms fV
;              i -> R20,R21
;              j -> R22,R23
;             MS -> R16,R17
	.even
_Delayms::
	xcall push_gset2
	.dbline -1
	.dbline 27
; #include <iom16v.h>			//包含型号头文件
; #include <macros.h>			//包含"位"操作头文件
; #include "LCD_PORT.h"		//包含自定义常量头文件
; 
; 
; /*******************************************
; 函数名称: LCD12864_portini
; 功    能: 初始化12864液晶用到的IO口
; 参    数: 无
	.dbline 29
; 返回值  : 无
; /********************************************/
	clr R20
	clr R21
	xjmp L10
L7:
	.dbline 30
	clr R22
	clr R23
	xjmp L14
L11:
	.dbline 30
L12:
	.dbline 30
	subi R22,255  ; offset = 1
	sbci R23,255
L14:
	.dbline 30
	cpi R22,117
	ldi R30,4
	cpc R23,R30
	brlo L11
L8:
	.dbline 29
	subi R20,255  ; offset = 1
	sbci R21,255
L10:
	.dbline 29
	cp R20,R16
	cpc R21,R17
	brlo L7
	.dbline -2
L6:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r j 22 i
	.dbsym r MS 16 i
	.dbend
	.dbfile E:\张秋伟\我的实验\数字频率计\12864.c
	.dbfunc e LCD12864_portini _LCD12864_portini fV
	.even
_LCD12864_portini::
	.dbline -1
	.dbline 31
; void LCD12864_portini(void)
; {
	.dbline 32
; 	LCDb_CTRL_DDR |= BIT(LCDb_RS)|BIT(LCDb_RW)|BIT(LCDb_E)|BIT(LCDb_RST);//配置控制管脚为输出
	in R24,0x17
	ori R24,240
	out 0x17,R24
	.dbline 33
; 	LCDb_DATA_DDR |= 0xFF;  //配置数据管脚为输出
	in R24,0x1a
	ori R24,255
	out 0x1a,R24
	.dbline 34
; 	LCDb_SET_RST;		//不使能复位端
	sbi 0x18,7
	.dbline -2
L15:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD12864_readbyte _LCD12864_readbyte fc
;          dByte -> R20
;         DatCmd -> R20
	.even
_LCD12864_readbyte::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 43
; }
; /*******************************************
; 函数名称: LCD12864_readbyte
; 功    能: 从12864液晶读出一个字节数据或者指令
; 参    数: DatCmd--为iDat时是数据，为iCmd时是指令
; 返回值  : dByte--读回的数据或者指令
; /********************************************/
; uchar LCD12864_readbyte(uchar DatCmd)
; {
	.dbline 45
;  	uchar dByte;
; 	if (DatCmd == iCmd)		 //指令操作
	tst R20
	brne L17
	.dbline 46
; 		LCDb_CLR_RS;
	cbi 0x18,4
	xjmp L18
L17:
	.dbline 48
; 	else
; 		LCDb_SET_RS;
	sbi 0x18,4
L18:
	.dbline 50
; 		
; 	LCDb_SET_RW;	   	  	 //读操作
	sbi 0x18,5
	.dbline 51
; 	LCDb_SET_E;
	sbi 0x18,6
	.dbline 52
; 	LCDb_DATA_DDR=0x00;	 //数据总线定义为输入
	clr R2
	out 0x1a,R2
	.dbline 53
; 	dByte=LCDb_DI;			 //读数据或者指令
	in R20,0x19
	.dbline 54
; 	Delayms(1);				 //时序调整
	ldi R16,1
	ldi R17,0
	xcall _Delayms
	.dbline 55
; 	LCDb_CLR_E;	
	cbi 0x18,6
	.dbline 56
; 	LCDb_DATA_DDR|=0xff;	 //数据总线还原为输出
	in R24,0x1a
	ori R24,255
	out 0x1a,R24
	.dbline 57
; 	return dByte;
	mov R16,R20
	.dbline -2
L16:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r dByte 20 c
	.dbsym r DatCmd 20 c
	.dbend
	.dbfunc e LCD12864_sendbyte _LCD12864_sendbyte fV
;          dByte -> R20
;         DatCmd -> R22
	.even
_LCD12864_sendbyte::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 67
; }
; /*******************************************
; 函数名称: LCD12864_sendbyte
; 功    能: 向12864液晶写入一个字节数据或者指令
; 参    数: DatCmd--为iDat时是数据，为iCmd时是指令
; 	  	  dByte--为写入12864的数据或者指令
; 返回值  : 无
; /********************************************/
; void LCD12864_sendbyte(uchar DatCmd, uchar dByte)
; {
	.dbline 68
; 	if (DatCmd == iCmd)		//指令操作
	tst R22
	brne L20
	.dbline 69
; 		LCDb_CLR_RS;
	cbi 0x18,4
	xjmp L21
L20:
	.dbline 71
; 	else
; 		LCDb_SET_RS;
	sbi 0x18,4
L21:
	.dbline 73
; 		
; 	LCDb_CLR_RW;			//写操作
	cbi 0x18,5
	.dbline 74
; 	LCDb_SET_E;
	sbi 0x18,6
	.dbline 75
; 	LCDb_DO = dByte;		//写入数据
	out 0x1b,R20
	.dbline 76
; 	Delayus(100);
	ldi R16,100
	ldi R17,0
	xcall _Delayus
	.dbline 77
; 	LCDb_CLR_E;	
	cbi 0x18,6
	.dbline -2
L19:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r dByte 20 c
	.dbsym r DatCmd 22 c
	.dbend
	.dbfunc e LCD12864_sendstr _LCD12864_sendstr fV
;       ptString -> R20,R21
	.even
_LCD12864_sendstr::
	xcall push_gset1
	movw R20,R16
	.dbline -1
	.dbline 86
; }
; /*******************************************
; 函数名称: LCD12864_sendstr
; 功    能: 向12864液晶写入一个字符串
; 参    数: ptString--字符串指针
; 返回值  : 无
; /********************************************/
; void LCD12864_sendstr(uchar *ptString)
; {
	xjmp L24
L23:
	.dbline 88
	.dbline 89
	movw R30,R20
	ld R18,Z+
	movw R20,R30
	ldi R16,1
	xcall _LCD12864_sendbyte
	.dbline 90
L24:
	.dbline 87
; 	while((*ptString)!='\0')		 //字符串未结束一直写
	movw R30,R20
	ldd R2,z+0
	tst R2
	brne L23
	.dbline -2
L22:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r ptString 20 pc
	.dbend
	.dbfunc e LCD12864_clear _LCD12864_clear fV
	.even
_LCD12864_clear::
	.dbline -1
	.dbline 99
; 	{
; 		LCD12864_sendbyte(iDat, *ptString++);
; 	}
; }
; /*******************************************
; 函数名称: LCD12864_clear
; 功    能: 12864液晶清屏
; 参    数: 无
; 返回值  : 无
; /********************************************/
; void LCD12864_clear(void)
; {
	.dbline 100
; 	LCD12864_sendbyte(iCmd,LCDb_CLS);
	ldi R18,1
	clr R16
	xcall _LCD12864_sendbyte
	.dbline 101
; 	Delayms(2);// 清屏指令写入后，2ms 的延时是很必要的!!!
	ldi R16,2
	ldi R17,0
	xcall _Delayms
	.dbline -2
L26:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD12864_readBF _LCD12864_readBF fc
;           busy -> R20
	.even
_LCD12864_readBF::
	xcall push_gset1
	.dbline -1
	.dbline 110
; }
; /*******************************************
; 函数名称: LCD12864_readBF
; 功    能: 12864液晶清屏
; 参    数: 无
; 返回值  : busy--为1时忙，为0时可以接收指令
; /********************************************/
; uchar LCD12864_readBF(void)
; {	  
	.dbline 112
; 	uchar busy;
; 	busy=LCD12864_readbyte(iCmd);		//读回BF标志和地址
	clr R16
	xcall _LCD12864_readbyte
	mov R20,R16
	.dbline 113
; 	if(busy&0x80)						//如果忙，返回忙状态
	sbrs R16,7
	rjmp L28
	.dbline 114
; 		busy=1;
	ldi R20,1
	xjmp L29
L28:
	.dbline 116
; 	else	   							//不忙，可以写入
; 		busy=0;
	clr R20
L29:
	.dbline 117
; 	return busy;
	mov R16,R20
	.dbline -2
L27:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r busy 20 c
	.dbend
	.dbfunc e LCD12864_gotoXY _LCD12864_gotoXY fV
;            Col -> R20
;            Row -> R22