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

📄 main.lis

📁 本文提出了基于MCU和RS485总线的嵌入式系统的常用设计方法
💻 LIS
📖 第 1 页 / 共 3 页
字号:
                        .module main.c
                        .area text(rom, con, rel)
 0000                   .dbfile F:\ChengXuCunFang\ChengXU\AVR单片机程序存放\max485多机通讯1\从机1/delay.h
 0000                   .dbfunc e delay_1us _delay_1us fV
                        .even
 0000           _delay_1us::
 0000                   .dbline -1
 0000                   .dbline 15
 0000           ; //从机11
 0000           ; #include<iom16v.h>
 0000           ; #include <macros.h>
 0000           ; #include "delay.h"
 0000           ; #include "1602.h"
 0000           ; 
 0000           ; #define  amount  10                                        //设定通讯数据量
 0000           ; #define  address 11                                        //请在这里设定本机地址  
 0000           ; #define  max485_out   PORTD |=(1<<PD4)   
 0000           ; #define  max485_in    PORTD &=~(1<<PD4)
 0000           ; #define  max485_RW_ok DDRD|=(1<<PD4)
 0000           ; 
 0000           ; unsigned char  send[amount];                               //发件箱 
 0000           ; unsigned char inbox[amount];                               //收件箱 
 0000           ; unsigned char n=0;                                         //记忆中断次数 
 0000                   .dbline 16
 0000           ; 
 0000 0000              nop
 0002                   .dbline -2
 0002           L1:
 0002                   .dbline 0 ; func end
 0002 0895              ret
 0004                   .dbend
 0004                   .dbfunc e delay_nus _delay_nus fV
 0004           ;              i -> R20,R21
 0004           ;              n -> R22,R23
                        .even
 0004           _delay_nus::
 0004 0E940000          xcall push_gset2
 0008 B801              movw R22,R16
 000A                   .dbline -1
 000A                   .dbline 20
 000A           ; //波特率9600/9个数据位/1个停止位/奇校验/收发开启/接收中断/地址过滤 
 000A           ; void usart_init(void) 
 000A           ; {   
 000A           ;   UCSRA=0x01; 
 000A                   .dbline 21
 000A           ;   UCSRB=0x9C; 
 000A 4427              clr R20
 000C 5527              clr R21
 000E                   .dbline 22
 000E           ;   UCSRC=0xB6; 
 000E 03C0              xjmp L6
 0010           L3:
 0010                   .dbline 23
 0010 F7DF              xcall _delay_1us
 0012           L4:
 0012                   .dbline 22
 0012 4F5F              subi R20,255  ; offset = 1
 0014 5F4F              sbci R21,255
 0016           L6:
 0016                   .dbline 22
 0016 4617              cp R20,R22
 0018 5707              cpc R21,R23
 001A D0F3              brlo L3
 001C                   .dbline -2
 001C           L2:
 001C 0E940000          xcall pop_gset2
 0020                   .dbline 0 ; func end
 0020 0895              ret
 0022                   .dbsym r i 20 i
 0022                   .dbsym r n 22 i
 0022                   .dbend
 0022                   .dbfunc e delay_1ms _delay_1ms fV
 0022           ;              i -> R16,R17
                        .even
 0022           _delay_1ms::
 0022                   .dbline -1
 0022                   .dbline 27
 0022           ;   UBRRH=0x00; 
 0022           ;   UBRRL=47;  
 0022           ; }
 0022           ; 
 0022           ; unsigned char crc8(unsigned char *ptr, unsigned char len)   
 0022                   .dbline 29
 0022 0027              clr R16
 0024 1127              clr R17
 0026 02C0              xjmp L11
 0028           L8:
 0028                   .dbline 29
 0028           L9:
 0028                   .dbline 29
 0028 0F5F              subi R16,255  ; offset = 1
 002A 1F4F              sbci R17,255
 002C           L11:
 002C                   .dbline 29
 002C           ; {  
 002C           ;   unsigned char i;  
 002C 0437              cpi R16,116
 002E E4E0              ldi R30,4
 0030 1E07              cpc R17,R30
 0032 D0F3              brlo L8
 0034                   .dbline -2
 0034           L7:
 0034                   .dbline 0 ; func end
 0034 0895              ret
 0036                   .dbsym r i 16 i
 0036                   .dbend
 0036                   .dbfunc e delay_nms _delay_nms fV
 0036           ;              i -> R20,R21
 0036           ;              n -> R22,R23
                        .even
 0036           _delay_nms::
 0036 0E940000          xcall push_gset2
 003A B801              movw R22,R16
 003C                   .dbline -1
 003C                   .dbline 33
 003C           ;   unsigned char crc=0;  
 003C           ;   while(len--!=0)   
 003C           ;    {  
 003C           ;      for(i=1; i!=0; i*=2)  
 003C                   .dbline 34
 003C           ;       {  
 003C 4427              clr R20
 003E 5527              clr R21
 0040                   .dbline 35
 0040           ;         if((crc&1)!=0) {crc/=2; crc^=0x8C;} 
 0040 03C0              xjmp L16
 0042           L13:
 0042                   .dbline 36
 0042 EFDF              xcall _delay_1ms
 0044           L14:
 0044                   .dbline 35
 0044 4F5F              subi R20,255  ; offset = 1
 0046 5F4F              sbci R21,255
 0048           L16:
 0048                   .dbline 35
 0048 4617              cp R20,R22
 004A 5707              cpc R21,R23
 004C D0F3              brlo L13
 004E                   .dbline -2
 004E           L12:
 004E 0E940000          xcall pop_gset2
 0052                   .dbline 0 ; func end
 0052 0895              ret
 0054                   .dbsym r i 20 i
 0054                   .dbsym r n 22 i
 0054                   .dbend
 0054                   .dbfile F:\ChengXuCunFang\ChengXU\AVR单片机程序存放\max485多机通讯1\从机1/1602.h
 0054                   .dbfunc e LCD_init _LCD_init fV
                        .even
 0054           _LCD_init::
 0054                   .dbline -1
 0054                   .dbline 44
 0054           ;         else crc/=2;  
 0054           ;         if((*ptr&i)!=0) crc^=0x8C;      
 0054           ;        }   
 0054           ;      ptr++;  
 0054           ;     }  
 0054           ;   return(crc);  
 0054           ; }
 0054           ; 
 0054           ; 
 0054                   .dbline 45
 0054           ; 
 0054 84B3              in R24,0x14
 0056 8F60              ori R24,15
 0058 84BB              out 0x14,R24
 005A                   .dbline 46
 005A           ; //**************************************************************************************
 005A A59A              sbi 0x14,5
 005C                   .dbline 47
 005C           ; 
 005C A49A              sbi 0x14,4
 005E                   .dbline 48
 005E           ; void usart_out(unsigned char *datas,unsigned char n) 
 005E 08E2              ldi R16,40
 0060 14D0              xcall _LCD_write_command
 0062                   .dbline 49
 0062           ; { 
 0062 0DD0              xcall _LCD_en_write
 0064                   .dbline 50
 0064           ;   unsigned char i=0;   
 0064 08E2              ldi R16,40
 0066 10E0              ldi R17,0
 0068 CDDF              xcall _delay_nus
 006A                   .dbline 51
 006A           ;   max485_out;                                              //使MAX485处于发送状态 
 006A 08E2              ldi R16,40
 006C 0ED0              xcall _LCD_write_command
 006E                   .dbline 52
 006E           ;   while(i<n)                                               //一共发送n个数据 
 006E 0CE0              ldi R16,12
 0070 0CD0              xcall _LCD_write_command
 0072                   .dbline 53
 0072           ;   {   
 0072 01E0              ldi R16,1
 0074 0AD0              xcall _LCD_write_command
 0076                   .dbline 54
 0076           ;     if(i==0) UCSRB|=1; else UCSRB&=254;    
 0076 02E0              ldi R16,2
 0078 10E0              ldi R17,0
 007A DDDF              xcall _delay_nms
 007C                   .dbline -2
 007C           L17:
 007C                   .dbline 0 ; func end
 007C 0895              ret
 007E                   .dbend
 007E                   .dbfunc e LCD_en_write _LCD_en_write fV
                        .even
 007E           _LCD_en_write::
 007E                   .dbline -1
 007E                   .dbline 61
 007E           ;     UDR=*(datas+i);                                        //装载数据开始发送  
 007E           ;     while((UCSRA&64)==0);                                  //等待发送结束 
 007E           ;     UCSRA|=64;                                             //清除发送结束标志 
 007E           ;     i++;                                                   //发送次数统计 
 007E           ;   }  
 007E           ;   max485_in;                                               //使MAX485处于接收状态 
 007E           ; }  
 007E                   .dbline 62
 007E           ; 
 007E AD9A              sbi 0x15,5
 0080                   .dbline 63
 0080           ; //**************************************************************************************
 0080 01E0              ldi R16,1
 0082 10E0              ldi R17,0
 0084 BFDF              xcall _delay_nus
 0086                   .dbline 64
 0086           ; #pragma interrupt_handler RXC_Int: 12
 0086 AD98              cbi 0x15,5
 0088                   .dbline -2
 0088           L18:
 0088                   .dbline 0 ; func end
 0088 0895              ret
 008A                   .dbend
 008A                   .dbfunc e LCD_write_command _LCD_write_command fV
 008A           ;        command -> R20
                        .even
 008A           _LCD_write_command::
 008A 0E940000          xcall push_gset1
 008E 402F              mov R20,R16
 0090                   .dbline -1
 0090                   .dbline 68
 0090           ; void RXC_Int(void)                              //接收中断 
 0090           ; {   
 0090           ;   if( UCSRA&28 ){ n=UDR; n=0; UCSRA|=0x01; } else          //接收出错就重新打开地址帧筛选功能 
 0090           ;   {
 0090                   .dbline 82
 0090           ;     if( UCSRB&2  ) n=0;                                    //检测到地址信息时计数清零
 0090           ;     inbox[n]=UDR;  n++;                                    //把接收到的数据保存到收件箱   
 0090           ;     if( inbox[0]==address ) UCSRA&=254; else UCSRA|=0x01;  //地址筛选  
 0090           ;     if( n==amount )                                        //如果接收到完整的数据包
 0090           ;     {
 0090           ;       if( inbox[amount-1]==crc8(inbox,amount-1) )          //如果crc8校验正确就... 
 0090           ;       {  
 0090           ;         send[0]=1;                                         //发件箱地址指向主机    
 0090           ;         //send[1]=?                                        //请更新发件箱的数据
 0090           ;         //send[n]=? 
 0090           ;         send[amount-1]=crc8(send,amount-1);                //产生发件箱的crc8校验码  
 0090           ;         usart_out(send,amount);                            //发送发件箱的数据包/查询方式比较耗时
 0090           ;         OCR1A=inbox[3];                                    //收件箱测试(控制T/C1的PWM驱动LED)  
 0090           ;       }
 0090 00E1              ldi R16,16
 0092 10E0              ldi R17,0
 0094 B7DF              xcall _delay_nus
 0096                   .dbline 83
 0096           ;     } 
 0096 AC98              cbi 0x15,4
 0098                   .dbline 84
 0098           ;   } 
 0098 85B3              in R24,0x15
 009A 807F              andi R24,240
 009C 85BB              out 0x15,R24
 009E                   .dbline 85
 009E           ; }
 009E 842F              mov R24,R20
 00A0 8295              swap R24
 00A2 8F70              andi R24,#0x0F
 00A4 8F70              andi R24,15
 00A6 25B2              in R2,0x15
 00A8 282A              or R2,R24
 00AA 25BA              out 0x15,R2
 00AC                   .dbline 86
 00AC           ; 
 00AC E8DF              xcall _LCD_en_write
 00AE                   .dbline 87
 00AE           ; //**************************************************************************************
 00AE 85B3              in R24,0x15
 00B0 807F              andi R24,240
 00B2 85BB              out 0x15,R24
 00B4                   .dbline 88
 00B4           ; 
 00B4 842F              mov R24,R20
 00B6 8F70              andi R24,15
 00B8 25B2              in R2,0x15
 00BA 282A              or R2,R24
 00BC 25BA              out 0x15,R2

⌨️ 快捷键说明

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