⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 twi.s

📁 PTR8000无线通信模块的单片机控制程序
💻 S
📖 第 1 页 / 共 2 页
字号:
	.module twi.c
	.area vector(rom, abs)
	.org 34
	rjmp _twi_isr
	.area text(rom, con, rel)
	.dbfile E:\iccavr\无线+I2C\test1--mt\twi.c
	.dbfunc e StopDelay _StopDelay fV
;              i -> R16,R17
	.even
_StopDelay::
	.dbline -1
	.dbline 40
; 
; /*函数的使用说明:
; 1.该twi模块包含四种工作模式,主发,主收,从收,从发,其中主发由
;   twiWriteByte(从机地址,要发送的数据)实现,主收由twiReadByte(从机地址)实现,从机
;   的发送与接收均通过中断实现
; 2.在从机模式下,需调用twi_init()来使能并初始化twi总线
; 3.在主机模式下,调用twiWriteByte(从机地址,要发送的数据)向指定的从机写入数据,
;   调用twiReadByte(从机地址)从指定的从机读取数据,然后可通过查询错误状态error_state
;   的值决定下一步如何操作。
; */
; 
; //************************* 头文件 ******************************************
; #include "twi.h"
; 
; //TWI同程序的接口参数
; //receive_data,error_state不用设置
; extern char receive_data;  		 // 接收到的数据
; extern char error_state;   		 // twi错误状态
; //以下三个参数根据需求进行设置
; extern char slave_address;      // 设置从机地址,Bits 7..1:存放从机地址,Bit 0:最低位为广播识别使能位
; extern char bit_race;           // 设置主机模式的比特率,SCL=CPU频率/(16+2*(TWBR)*4TWPS),TWPS在4的指数位置
; extern char send_data;     	    // 从机发送模式下从机向主机发送的数据
; 
; //*************************** twi错误状态说明*********************************
; // 0:twi传送无错误
; // 1:在主发模式下,SLA+W已发送,返回NOT ACK
; // 2:在主发模式下,DATA已发送,返回NOT ACK
; // 3:在主发模式下,SLA+W或者数据的仲裁失败
; // 4:在主收模式下,SLA+R或者数据的仲裁失败
; // 5:在主收模式下,SLA+R已发送,返回NOT ACK
; // 6:在主发模式下,START信号发送不成功
; // 7:在主收模式下,START信号发送不成功
; // 8:在主收模式下,数据接受完成
; // 9:在主收模式下,数据接受不成功
; //*****************************************************************************
; 
; //*************************** twi stop 信号延时时间 ****************************
; //******************************************************************************
; void StopDelay(void)
; {
	.dbline 42
	clr R16
	clr R17
	rjmp L5
L2:
	.dbline 42
L3:
	.dbline 42
	subi R16,255  ; offset = 1
	sbci R17,255
L5:
	.dbline 42
; 	unsigned int i;
; 	for(i = 0;i < 20;i ++);
	cpi R16,20
	ldi R30,0
	cpc R17,R30
	brlo L2
	.dbline -2
	.dbline 43
; }
L1:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e start _start fV
	.even
_start::
	.dbline -1
	.dbline 47
; //******************************* twi 启动总线*********************************
; //******************************************************************************
; void start(void)
; {
	.dbline 48
; 	TWCR = (1 << TWINT) | (1 << TWSTA) | (1 << TWEN);	//发出start信号
	ldi R24,164
	out 0x36,R24
	.dbline 49
; 	_NOP();
	nop
	.dbline 50
; 	_NOP();
	nop
	.dbline -2
	.dbline 51
; }
L6:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e stop _stop fV
	.even
_stop::
	.dbline -1
	.dbline 55
; //************************** twi 释放总线************************************
; //***************************************************************************
; void stop(void)
; {
	.dbline 56
; 	TWCR = (1 << TWINT) |(1 << TWEN)|(1 << TWSTO); //发出stop信号	
	ldi R24,148
	out 0x36,R24
	.dbline 57
; 	StopDelay();           //等待总线恢复
	rcall _StopDelay
	.dbline 58
; 	TWCR= 0x45;
	ldi R24,69
	out 0x36,R24
	.dbline -2
	.dbline 59
; }
L7:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e twi_init _twi_init fV
	.even
_twi_init::
	.dbline -1
	.dbline 71
; //****************************** twi 初始化*************************************
; // TWCR: 控制寄存器,用来控制TWI操作,说明如下:
; // Bit 7-TWINT:中断标志位,Bit 6-TWEA:使能应答位,Bit 5-TWSTA:START状态位
; // Bit 4-TWSTO:STOP状态位,Bit 3-TWWC: 写冲突标志,Bit 2-TWEN:TWI使能位
; // Bit 1-RES:保留,Bit 0-TWIE:中断使能                   
; // TWSR: 状态寄存器,Bits 7..3:表示了TWI总线的当前状态,读取时需屏蔽低三位的值,Bits 1..0-TWPS:TWI预分频位
; // TWBR: 比特率寄存器,用来设置TWI的工作频率,计算公式为:SCL=CPU频率/(16+2*(TWBR)*4TWPS),TWPS在4的指数位置
; // TWAR: 从机地址寄存器,Bits 7..1:存放从机地址,Bit 0:最低位为广播识别使能位
; // TWDR: 数据寄存器,用来存放接收或要发送的地址和数据
; //******************************************************************************
; void twi_init(void)
; {
	.dbline 72
; 	TWCR= 0x00;    			//disable twi
	clr R2
	out 0x36,R2
	.dbline 73
; 	TWBR= bit_race;   		//set bit rate
	lds R2,_bit_race
	out 0x0,R2
	.dbline 74
; 	TWSR= 0x00;             //set prescale为1
	clr R2
	out 0x1,R2
	.dbline 75
; 	TWAR= slave_address;    //set slave address
	lds R2,_slave_address
	out 0x2,R2
	.dbline 76
; 	TWCR= 0x45;          //enable twi
	ldi R24,69
	out 0x36,R24
	.dbline -2
	.dbline 77
; }
L8:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e checkstate _checkstate fV
;     TWSR_state -> R16
	.even
_checkstate::
	.dbline -1
	.dbline 81
; //************************** 检测发送时的状态码 ****************************
; //**************************************************************************
; void checkstate(void)
; {
	.dbline 83
; 	unsigned char TWSR_state;
; 	TWSR_state = TWSR & 0xf8; //屏蔽第三位读取状态
	in R16,0x1
	andi R16,248
	.dbline 84
; 	switch(TWSR_state)
	clr R17
	cpi R16,32
	ldi R30,0
	cpc R17,R30
	breq L15
	ldi R24,32
	ldi R25,0
	cp R24,R16
	cpc R25,R17
	brlt L20
L19:
	cpi R16,8
	ldi R30,0
	cpc R17,R30
	breq L13
	cpi R16,8
	ldi R30,0
	cpc R17,R30
	brlt L11
L21:
	cpi R16,24
	ldi R30,0
	cpc R17,R30
	breq L14
	rjmp L11
L20:
	cpi R16,48
	ldi R30,0
	cpc R17,R30
	breq L17
	ldi R24,48
	ldi R25,0
	cp R24,R16
	cpc R25,R17
	brlt L23
L22:
	cpi R16,40
	ldi R30,0
	cpc R17,R30
	breq L16
	rjmp L11
L23:
	cpi R16,56
	ldi R30,0
	cpc R17,R30
	breq L18
	rjmp L11
X0:
	.dbline 85
; 	{
L13:
	.dbline 86
; 	case 0x08:error_state=0;break;  // START已发送
	clr R2
	sts _error_state,R2
	.dbline 86
	rjmp L11
L14:
	.dbline 87
; 	case 0x18:error_state=0;break;  // SLA+W已发送,接收到ACK
	clr R2
	sts _error_state,R2
	.dbline 87
	rjmp L11
L15:
	.dbline 88
; 	case 0x20:error_state=1;break;  // SLA+W已发送,接收到NOT ACK
	ldi R24,1
	sts _error_state,R24
	.dbline 88
	rjmp L11
L16:
	.dbline 89
; 	case 0x28:error_state=0;break;  // 数据已发送,接收到ACK
	clr R2
	sts _error_state,R2
	.dbline 89
	rjmp L11
L17:
	.dbline 90
; 	case 0x30:error_state=2;break;  // 数据已发送,接收到NOT ACK
	ldi R24,2
	sts _error_state,R24
	.dbline 90
	rjmp L11
L18:
	.dbline 91
; 	case 0x38:error_state=3;break;  // SLA+W或数据的仲裁失败
	ldi R24,3
	sts _error_state,R24
	.dbline 91
	.dbline 92
; 	default: break;
L11:
	.dbline 94
; 	}
; 	TWCR=0x45;
	ldi R24,69
	out 0x36,R24
	.dbline -2
	.dbline 95
; }
L9:
	.dbline 0 ; func end
	ret
	.dbsym r TWSR_state 16 c
	.dbend
	.dbfunc e twiWriteByte _twiWriteByte fV
;              i -> R12
;     TWCR_state -> R20
;           data -> R22
;   WriteAddress -> R10
	.even
_twiWriteByte::
	rcall push_gset4
	mov R22,R18
	mov R10,R16
	.dbline -1
	.dbline 102
; //********** twi主机发送,向地址为WriteAddress的从机发送1个字节数据************
; // 入口参数1:WriteAddress:从机地址
; // TWDR中存放的高七位为地址,最低位表示读写控制,0为写,1为读
; // 入口参数2:data,向从机写的数据
; //******************************************************************************
; void twiWriteByte(unsigned char WriteAddress,char data)
; {
	.dbline 104
; 	unsigned char TWCR_state;
; 	char i=0;
	clr R12
	.dbline 105
; 	error_state=0;
	clr R2
	sts _error_state,R2
	.dbline 108
; 	
; 	//初始化 twi 
; 	twi_init();
	rcall _twi_init
	.dbline 111
; 	
; 	//发送START信号 
; 	start();
	rcall _start
	.dbline 112
; 	TWCR_state = TWCR & 0x80;
	in R20,0x36
	andi R20,128
	rjmp L26
L25:
	.dbline 114
; 	while((TWCR_state == 0x00))
; 	{ 
	.dbline 115
; 		i++; 
	inc R12
	.dbline 116
; 		if(i>=10){error_state=6;break;}
	mov R24,R12
	cpi R24,10
	brlo L28
	.dbline 116
	.dbline 116
	ldi R24,6
	sts _error_state,R24
	.dbline 116
	rjmp L27
L28:
	.dbline 117
	in R20,0x36
	andi R20,128
	.dbline 118
L26:
	.dbline 113
	tst R20
	breq L25
L27:
	.dbline 121
; 		TWCR_state = TWCR & 0x80;    //轮循等待START信号发送完成
; 	}	
; 	
; 	//若START发送成功,发送从机地址
; 	if(error_state==0)
	lds R2,_error_state
	tst R2
	brne L30
	.dbline 122
; 	{
	.dbline 123
; 		TWDR = WriteAddress;        //发地址
	out 0x3,R10
	.dbline 124
; 		_NOP();
	nop
	.dbline 125
; 		_NOP();
	nop
	.dbline 127
; 		
; 		TWCR = (1 << TWINT) | (1 << TWEN);
	ldi R24,132
	out 0x36,R24
	.dbline 128
; 		TWCR_state = TWCR & 0x80;
	in R20,0x36
	andi R20,128
	rjmp L33
L32:
	.dbline 130
	.dbline 130
	in R20,0x36
	andi R20,128
	.dbline 130
L33:
	.dbline 129
; 		while(TWCR_state == 0x00)
	tst R20
	breq L32
	.dbline 131
; 		{TWCR_state = TWCR & 0x80;}	  //轮循查询地址是否发送
; 		checkstate();
	rcall _checkstate
	.dbline 132
; 	}
L30:
	.dbline 135
; 	
; 	//若从机地址发送成功,向从机发送数据
; 	if(error_state==0)
	lds R2,_error_state
	tst R2
	brne L35
	.dbline 136
; 	{
	.dbline 137
; 		TWDR = data;               //发数据
	out 0x3,R22
	.dbline 138
; 		_NOP();
	nop
	.dbline 139
; 		_NOP();
	nop
	.dbline 140
; 		TWCR = (1 << TWINT) | (1 << TWEN);
	ldi R24,132
	out 0x36,R24
	.dbline 141
; 		TWCR_state = TWCR & 0x80;
	in R20,0x36
	andi R20,128
	rjmp L38
L37:
	.dbline 142
	in R20,0x36
	andi R20,128
L38:
	.dbline 142
; 		while(TWCR_state == 0x00) TWCR_state = TWCR & 0x80;	//轮循查询数据是否发送
	tst R20
	breq L37
	.dbline 143
; 		checkstate();
	rcall _checkstate
	.dbline 144
; 	}
L35:
	.dbline 147
; 	
; 	//发送STOP,退出总线控制
; 	stop();
	rcall _stop
	.dbline -2
	.dbline 148
; }
L24:
	rcall pop_gset4
	.dbline 0 ; func end
	ret
	.dbsym r i 12 c
	.dbsym r TWCR_state 20 c
	.dbsym r data 22 c
	.dbsym r WriteAddress 10 c
	.dbend
	.dbfunc e twiReadByte _twiReadByte fV
;     TWCR_state -> R10

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -