当前位置:首页 > 单片机 > 单片机
[导读] 1. 单片机 PIC1编程(发送部分)LIST P=16F877#INCLUDE P16F876.INCCBLOCK 0X24 ;保留三个字节作为显示用COUNT ;作计数器或暂存器用ENDCORG 0X0000 ;程序复位入口NOPSTART GOTO MAINORG 0X20MAIN MO

1. 单片机 PIC1编程(发送部分)
LIST P=16F877
#INCLUDE P16F876.INC
CBLOCK 0X24 ;保留三个字节作为显示用
COUNT ;作计数器或暂存器用
ENDC
ORG 0X0000 ;程序复位入口

NOP
START GOTO MAIN
ORG 0X20
MAIN MOVLW 0X30 ;以下将RAM内容初始化
MOVWF FSR ;从30H单元开始
MOVLW 0X30 ;将值30H赋给单元30H
MOVWF COUNT
INTRAM MOVF COUNT,0 ;将30H~7FH赋给单元30H~7FH
MOVWF INDF
INCF COUNT,1
INCF FSR,1
BTFSS COUNT,7
GOTO INTRAM
BSF STATUS,RP0 ;将SCI部件初始化
MOVLW 0X19 ;将传输的波特率设为约9600 bps
MOVWF SPBRG
MOVLW 0X04 ;选择异步高速方式传输8位数据
MOVWF TXSTA
BCF STATUS,RP0
MOVLW 0X80 ;允许同步串行口工作
MOVWF RCSTA
BSF STATUS,RP0
BSF TRISC,7 ;将RC6、RC7设置为输入方式,断绝与外接电路的连接
BSF TRISC,6
BCF STATUS,RP0
MOVLW 0X30 ;30H作为同步字符发送
MOVWF FSR
MOVF INDF,0
MOVWF TXREG ;将待发送的数据写入发送缓冲器TXREG
BSF STATUS,RP0
BSF TXSTA,TXEN ;发送允许
BCF STATUS,RP0
BSF RCSTA,CREN ;接收数据允许
LOOPTX BTFSS PIR1,RCIF ;等待PIC2的响应字节
GOTO LOOPTX
MOVF RCREG,0 ;读响应字节,清RCIF
LOOPTX1 BTFSS PIR1,TXIF ;发送下一字节
GOTO LOOPTX1
INCF FSR
MOVF INDF,0
MOVWF TXREG
BTFSS FSR,7 ;30H~7FH单元的内容是否发送完?
GOTO LOOPTX ;没有,继续下一字节的发送
BSF STATUS,RP0 ;如果是,则停止发送
BCF TXSTA,TXEN
BCF STATUS,RP0 ;数据发送完毕
CALLLED;调用显示子程序,将发送的数据显示出来
END ;程序完
2. 单片机 PIC2编程(接收部分)
LIST P=16F876
#INCLUDE P16F876.INC
CBLOCK 0X24
COUNT
ENDC
ORG 0X0000
NOP
START GOTO MAIN
MAIN BSF STATUS,RP0 ;初始化程序同发送子程序
MOVLW 0X19 ;波特率设置与PIC1相同
MOVWF SPBRG
MOVLW 0X04 ;异步高速传输
MOVWF TXSTA
BCF STATUS,RP0
MOVLW 0X80 ;串行口工作使能
MOVWF RCSTA
BSF STATUS,RP0


BSF TRISC,7 ;与外接电路隔离
BSF TRISC,6
BCF STATUS,RP0
MOVLW 0X30 ;从30H单元开始存放发送来的数据
MOVWF FSR
BSF RCSTA,CREN ;接收允许
BSF STATUS,RP0
BSF TXSTA,TXEN ;发送允许
BCF STATUS,RP0
WAIT BTFSS PIR1,RCIF ;等待接收数据
GOTO WAIT
MOVF RCREG,0 ;读取数据
MOVWF INDF ;将接收到的响应字节存入PIC2的RAM
INCF FSR
MOVWF TXREG ;发送响应字节
LOOPTX BTFSS PIR1,TXIF ;等待写入完成
GOTO LOOPTX
BTFSS FSR,7 ;全部数据接收否?
GOTO WAIT1 ;没有,继续接收其它数据
BCF RCSTA,RCEN ;接收完,则关断接收和发送数据允许
BSF STATUS,RP0
BCF PIE1,TXEN
BCF STATUS,RP0
CALL LED ;调用显示子程序,将接受到的数据显示出来
END ;程序完



单片机 双机同步通信
1. 单片机 PIC1编程(主控发送)
LIST P=16F876
#INCLUDE P16F876.INC
CBLOCK 0X24 ;保留三个字节作为显示用
COUNT ;作计数器或暂存器用
ENDC
ORG 0X0000 ;程序复位入口
NOP
START GOTO MAIN
ORG 0X0100
MAIN MOVLW 0X30
MOVWF FSR ;以下将从30H单元开始的RAM内容初始化
MOVLW 0X30 ;将值30H赋给单元30H
MOVWF COUNT
INTRAM MOVF COUNT,0 ;将30H~7FH赋给单元30H~7FH
MOVWF INDF
INCF COUNT,1
INCF FSR,1
BTFSS COUNT,7
GOTO INTRAM
BSF STATUS,RP0 ;将SCI部件初始化
MOVLW 0X19 ;将传输的波特率设为约9600 bps
MOVWF SPBRG
MOVLW 0X94 ;选择同步高速方式传输8位数据
MOVWF TXSTA
BCF STATUS,RP0
MOVLW 0X80 ;允许同步串行口工作
MOVWF RCSTA
BSF STATUS,RP0
BSF TRISC,7 ;将RC6、RC7设置为输入方式,断绝与外接电路的连接
BSF TRISC,6
BSF STATUS,RP0
MOVLW 0X30 ;将从30H单元开始的内容传送到PIC2
MOVWF FSR
MOVF INDF,0
MOVWF TXREG ;将待发送的数据写入发送缓冲器TXREG
BSF STATUS,RP0
BSF TXSTA,TXEN ;发送允许
BCF STATUS,RP0
TX1 BTFSS PIR1,TXIF ;等待上一个数据写完
GOTO TX1
INCF FSR ;准备发送下一个数据
MOVF INDF,0
MOVWF TXREG ;将新的数据写入TXREG
BTFSS FSR,7 ;判断所有30H~7FH单元的内容是否发送完毕?
GOTO TX1 ;没有,则继续发送其它字节
TX2 BTFSS PIR1,TXIF ;等所有要求发送的数据已经发送完,再额外
GOTO TX2 ;写一个字节到TXREG,使最后一个数据能够顺利发送
MOVWF TXREG
NOP ;延时几个微秒后,关发送允许
NOP
NOP
NOP
NOP
BSF STATUS,RP0
BCF TXSTA,TXEN
BCF STATUS,RP0
CALL LED ;调用显示子程序,将发送的数据显示出来
END ;程序完

2. 单片机 PIC2编程(从动接收)
LIST P=16F876
#INCLUDE P16F876.INC
CBLOCK 0X24
COUNT
ENDC
ORG 0X0000
NOP
START GOTO MAIN
ORG 0X0100
MAIN BSF STATUS,RP0
MOVLW 0X10 ;选择同步从动方式
MOVWF TXSTA
BCF STATUS,RP0
MOVLW 0X80 ;串行口使能
MOVWF RCSTA
BSF STATUS,RP0
BSF TRISC,7 ;关断与外部电路的联系
BSF TRISC,6
BCF STATUS,RP0
MOVLW 0X30 ;从30H单元开始存放接收的数据
MOVWF FSR
BSF RCSTA,CREN ;接收允许
WAIT BTFSS PIR1,RCIF ;等待接收
GOTO WAIT
MOVF RCREG,0 ;读取接收到的数据
MOVWF INDF ;将接收到的数据存入PIC2的RAM
INCF FSR
BTFSS FSR,7 ;所有的数据是否已接收完?
GOTO WAIT ;没有,继续接收其它字节
NOP ;延时数微秒后,清接收允许位
NOP
NOP
NOP
BCF RCSTA,RCEN
CALL LED ;调用显示子程序,将接受到的数据显示出来
END ;程序完



单片机 与PC机通信
1. PC机编程
PC采用Toubr C 进行编写。程序如下:
#include
#define port 0x3f8 /*利用串口1进行通信*/
int ch[15];
main ()
{
int a;
int i,j;
int b[6]={88,15,38,26,20,0};
char c;
clrscr();
outportb(port 3,0x80); /*准备设置波特率*/
outportb(port,0x0C); /*波特率设置为9 600 bps*/
outportb(port 1,0x00);
outportb(port 3,0x03); /*8位数据位,奇偶检验,1位停止位*/
outportb(port 1,0x00); /*关中断*/
inportb(port 5); /*读一次线路状态寄存器,使其复位*/
{
printf("ttsend dataorreceive data: (sorr?)nnn");
c=getchar();
switch(c)
{
case ’s’:
case ’S’:
{
while(!(inportb(port 5)&0x20)); /*发送保持器满则等待*/
outportb(port,0x01); /*否则发送数据01通知 单片机 准备接收*/
for(i=0;i<6;i ) /*共发送6个数据*/
{
a=b[i];
while(!(inportb(port 5)&0x20))
delay(100); /*发送保持器满,等待*/
outportb(port,a); /*发送a*/
printf("%dn",a); /*显示a*/
while(!(inport(port 5)&1)); /*接收 单片机 送回的数据*/
ch[i]=inport(port); /*保存*/
}
delay(10);
for(j=0;j<8;j ) /*显示接收的回送数据*/
printf("n%dn",ch[j]);
getch();
break;
}
case’r’: /*接收数据*/
case’R’:
{
while(!(inportb(port 5)&0x20));
outportb(port,0x02); /*发送数据02通知 单片机 发送数据*/
for(j=0;j<9;j ) /*共接收9个数据*/
{
while(!(inportb(port 5)&1));
ch[j]=inportb(port);
}
for(j=0;j<9;j )
printf("n %dn",ch[j]);
getch();
break;
}
}
}
}
2. 单片机 编程
LIST P=16F876
#INCLUDE P16F876.INC
CBLOCK 0X24
COUNT
TEMP
ENDC
ORG 0X0000
NOP
START GOTO MAIN
ORG 0X020

MAIN MOVLW 0X30 ;将RAM单元初始化
MOVWF FSR
BCF STATUS,RP0
MOVLW 0X22
MOVWF COUNT
INTRAM MOVF COUNT,0
MOVWF INDF
INCF COUNT,1
INCF FSR,1
BTFSS FSR,7
GOTO INTRAM
BANKSEL TXSTA ;波特率设置为9 600 bps
MOVLW 0X19
MOVWF SPBRG ;异步高速方式
MOVLW 0X04
MOVWF TXSTA
BCF STATUS,RP0
MOVLW 0X80 ;串行口使能
MOVWF RCSTA
MOVLW 0X30
MOVWF FSR
BSF RCSTA,CREN ;接收允许
BSF STATUS,RP0
BSF TXSTA,TXEN ;发送允许
BCF STATUS,RP0
WAIT BTFSS PIR1,RCIF ;接收PC机命令
GOTO WAIT
MOVF RCREG,0
MOVWF TEMP
MOVWF INDF
INCF FSR
DECFSZ TEMP ;接收到的数据为1,则接收
GOTO TXW ;否则发送数据
MOVLW 0X06
MOVWF TEMP
WAIT1 BTFSS PIR1,RCIF ;接收一个数据
GOTO WAIT1
MOVF RCREG,0
MOVWF COUNT
MOVWF TXREG
LOOPTX BTFSS PIR1,TXIF ;将接收到的数据送回PC机
GOTO LOOPTX
MOVF COUNT,0
MOVWF INDF
INCF FSR
DECFSZ TEMP
GOTO WAIT1
GOTO OVER ;处理完毕
TXW MOVLW 0X09 ;向PC机发送9个数据
MOVWF TEMP
MOVLW 0X30
MOVWF FSR
TXW0 MOVF INDF,0
MOVWF TXREG
INCF FSR
TXW1 BTFSS PIR1,TXIF
GOTO TXW1
DECFSZ TEMP
GOTO TXW0
OVER BCF RCSTA,CREN ;通信任务完成,关接受和发送允许
BSF STATUS,RP0
BCF TXSTA,TXEN
BCF STATUS,RP0
CALL LED ;调用显示子程序,将发送(或接收)的数据显示出来
END ;程序完

本站声明: 本文章由作者或相关机构授权发布,目的在于传递更多信息,并不代表本站赞同其观点,本站亦不保证或承诺内容真实性等。需要转载请联系该专栏作者,如若文章内容侵犯您的权益,请及时联系本站删除。
换一批
延伸阅读

9月2日消息,不造车的华为或将催生出更大的独角兽公司,随着阿维塔和赛力斯的入局,华为引望愈发显得引人瞩目。

关键字: 阿维塔 塞力斯 华为

加利福尼亚州圣克拉拉县2024年8月30日 /美通社/ -- 数字化转型技术解决方案公司Trianz今天宣布,该公司与Amazon Web Services (AWS)签订了...

关键字: AWS AN BSP 数字化

伦敦2024年8月29日 /美通社/ -- 英国汽车技术公司SODA.Auto推出其旗舰产品SODA V,这是全球首款涵盖汽车工程师从创意到认证的所有需求的工具,可用于创建软件定义汽车。 SODA V工具的开发耗时1.5...

关键字: 汽车 人工智能 智能驱动 BSP

北京2024年8月28日 /美通社/ -- 越来越多用户希望企业业务能7×24不间断运行,同时企业却面临越来越多业务中断的风险,如企业系统复杂性的增加,频繁的功能更新和发布等。如何确保业务连续性,提升韧性,成...

关键字: 亚马逊 解密 控制平面 BSP

8月30日消息,据媒体报道,腾讯和网易近期正在缩减他们对日本游戏市场的投资。

关键字: 腾讯 编码器 CPU

8月28日消息,今天上午,2024中国国际大数据产业博览会开幕式在贵阳举行,华为董事、质量流程IT总裁陶景文发表了演讲。

关键字: 华为 12nm EDA 半导体

8月28日消息,在2024中国国际大数据产业博览会上,华为常务董事、华为云CEO张平安发表演讲称,数字世界的话语权最终是由生态的繁荣决定的。

关键字: 华为 12nm 手机 卫星通信

要点: 有效应对环境变化,经营业绩稳中有升 落实提质增效举措,毛利润率延续升势 战略布局成效显著,战新业务引领增长 以科技创新为引领,提升企业核心竞争力 坚持高质量发展策略,塑强核心竞争优势...

关键字: 通信 BSP 电信运营商 数字经济

北京2024年8月27日 /美通社/ -- 8月21日,由中央广播电视总台与中国电影电视技术学会联合牵头组建的NVI技术创新联盟在BIRTV2024超高清全产业链发展研讨会上宣布正式成立。 活动现场 NVI技术创新联...

关键字: VI 传输协议 音频 BSP

北京2024年8月27日 /美通社/ -- 在8月23日举办的2024年长三角生态绿色一体化发展示范区联合招商会上,软通动力信息技术(集团)股份有限公司(以下简称"软通动力")与长三角投资(上海)有限...

关键字: BSP 信息技术
关闭
关闭