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 ;数据发送完毕
CALL LED ;调用显示子程序,将发送的数据显示出来
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("\t\tsend data or receive data: (s or r?)\n\n\n");
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("%d\n",a); /*显示a*/
while(!(inport(port 5)&1)); /*接收 单片机 送回的数据*/
ch[i]=inport(port); /*保存*/
}
delay(10);
for(j=0;j<8;j ) /*显示接收的回送数据*/
printf("\n%d\n",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 %d\n",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 ;程序完
上一篇:MCD2-DEMO 数码管显示PICC-18范例(适合初学者)
下一篇:PIC编的数字钟
推荐阅读最新更新时间:2024-03-16 15:49