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

📄 rtc.lis

📁 在AVR开发板驱动时钟芯片DS1302
💻 LIS
📖 第 1 页 / 共 5 页
字号:
                        .module RTC.C
                        .area text(rom, con, rel)
 0000                   .dbfile C:/icc/include/AVR_PQ1A.h
 0000                   .dbfunc e Delayus _Delayus fV
 0000           ;              i -> R20,R21
 0000           ;             US -> R22,R23
                        .even
 0000           _Delayus::
 0000 0E940000          xcall push_gset2
 0004 B801              movw R22,R16
 0006                   .dbline -1
 0006                   .dbline 28
 0006           ; /*******************************************
 0006           ;   文件:RTC.C
 0006           ;   环境:编译为ICC AVR6.25A,仿真为AVR Studio4.10 
 0006           ;   硬件:ATMEGA16芯片
 0006           ;   日期:2006年12月10日 
 0006           ;   功能:驱动开发板上的DS1302时钟芯片
 0006           ;   备注:参考《AVR系列单片机C语言编程与应用实例》(清华大学出版社)
 0006           ; /******************************************/
 0006           ; #include <iom16v.h>                   //包含型号头文件
 0006           ; #include <macros.h>                   //包含"位"操作头文件
 0006           ; #include <stdio.h>                    //标准输入输出头文件
 0006           ; #include <AVR_PQ1A.h>         //包含自定义常量头文件
 0006           ; #include "YJ1602.C"                   //包含1602液晶函数文件
 0006           ; #include "MKEY.C"                     //包含矩阵键盘函数文件
 0006           ; 
 0006           ; /*******************************************
 0006           ; 函数名称: DS1302_init
 0006           ; 功    能: 初始化DS1302的数据接口
 0006           ; 参    数: 无
 0006           ; 返回值  : 无
 0006           ; /********************************************/
 0006           ; void DS1302_portinit(void)              
 0006           ; {
 0006           ;  DDRB|=BIT(RTC_CLK)|BIT(RTC_DATA)|BIT(RTC_CS);//将时钟端(RTC_CLK)数据端(RTC_DATA)片选端(RTC_CS)设置为输出
 0006           ; }
 0006           ; /*******************************************
 0006           ; 函数名称: DS1302_writeB
 0006           ; 功    能: 向DS1302写入一个字节数据(没有RST操作)
 0006                   .dbline 30
 0006           ; 参    数: byte--要写入的数据
 0006           ; 返回值  : 无
 0006 05E0              ldi R16,5
 0008 10E0              ldi R17,0
 000A 9B01              movw R18,R22
 000C 0E940000          xcall empy16s
 0010 B801              movw R22,R16
 0012 7695              lsr R23
 0014 6795              ror R22
 0016 7695              lsr R23
 0018 6795              ror R22
 001A                   .dbline 31
 001A 4427              clr R20
 001C 5527              clr R21
 001E 02C0              xjmp L5
 0020           L2:
 0020                   .dbline 31
 0020           L3:
 0020                   .dbline 31
 0020 4F5F              subi R20,255  ; offset = 1
 0022 5F4F              sbci R21,255
 0024           L5:
 0024                   .dbline 31
 0024           ; /********************************************/
 0024 4617              cp R20,R22
 0026 5707              cpc R21,R23
 0028 D8F3              brlo L2
 002A                   .dbline -2
 002A                   .dbline 32
 002A           ; void DS1302_writeB(uchar byte)
 002A           L1:
 002A 0E940000          xcall pop_gset2
 002E                   .dbline 0 ; func end
 002E 0895              ret
 0030                   .dbsym r i 20 i
 0030                   .dbsym r US 22 i
 0030                   .dbend
 0030                   .dbfunc e Delayms _Delayms fV
 0030           ;              i -> R20,R21
 0030           ;              j -> R22,R23
 0030           ;             MS -> R16,R17
                        .even
 0030           _Delayms::
 0030 0E940000          xcall push_gset2
 0034                   .dbline -1
 0034                   .dbline 40
 0034           ; {
 0034           ;  uchar i;
 0034           ;  for(i=0;i<8;i++)                       //8位数据计数
 0034           ;  {
 0034           ;   PORTB&=~BIT(RTC_CLK);                 //拉低时钟端
 0034           ;   if(byte&0x01)                                 //当前位是否是1
 0034           ;   {
 0034           ;    PORTB|=BIT(RTC_DATA);        //当前位是1,拉高数据端
 0034                   .dbline 42
 0034           ;   }
 0034           ;   else                                                  
 0034 4427              clr R20
 0036 5527              clr R21
 0038 0BC0              xjmp L10
 003A           L7:
 003A                   .dbline 43
 003A 6627              clr R22
 003C 7727              clr R23
 003E 02C0              xjmp L14
 0040           L11:
 0040                   .dbline 43
 0040           L12:
 0040                   .dbline 43
 0040 6F5F              subi R22,255  ; offset = 1
 0042 7F4F              sbci R23,255
 0044           L14:
 0044                   .dbline 43
 0044 6537              cpi R22,117
 0046 E4E0              ldi R30,4
 0048 7E07              cpc R23,R30
 004A D0F3              brlo L11
 004C           L8:
 004C                   .dbline 42
 004C 4F5F              subi R20,255  ; offset = 1
 004E 5F4F              sbci R21,255
 0050           L10:
 0050                   .dbline 42
 0050 4017              cp R20,R16
 0052 5107              cpc R21,R17
 0054 90F3              brlo L7
 0056                   .dbline -2
 0056                   .dbline 44
 0056           ;   {
 0056           ;    PORTB&=~BIT(RTC_DATA);       //当前位是0,拉低数据端
 0056           L6:
 0056 0E940000          xcall pop_gset2
 005A                   .dbline 0 ; func end
 005A 0895              ret
 005C                   .dbsym r i 20 i
 005C                   .dbsym r j 22 i
 005C                   .dbsym r MS 16 i
 005C                   .dbend
 005C                   .dbfunc e Board_init _Board_init fV
                        .even
 005C           _Board_init::
 005C                   .dbline -1
 005C                   .dbline 52
 005C           ;   }  
 005C           ;   Delayus(10);                                  //调整时钟和脉冲宽度
 005C           ;   PORTB|=BIT(RTC_CLK);                  //时钟上升沿(DS1302采样数据)
 005C           ;   byte>>=1;                                     //数据右移1位,为送出新数据位做准备
 005C           ;  }
 005C           ; }
 005C           ; /*******************************************
 005C           ; 函数名称: DS1302_readB
 005C                   .dbline 53
 005C           ; 功    能: 从DS1302读出一个字节数据(没有RST操作)
 005C 8FEF              ldi R24,255
 005E 8ABB              out 0x1a,R24
 0060                   .dbline 54
 0060           ; 参    数: 无
 0060 87BB              out 0x17,R24
 0062                   .dbline 55
 0062           ; 返回值  : byte--读出的数据
 0062 84BB              out 0x14,R24
 0064                   .dbline 56
 0064           ; /********************************************/
 0064 81BB              out 0x11,R24
 0066                   .dbline 58
 0066           ; uchar DS1302_readB(void)
 0066           ; {
 0066 2224              clr R2
 0068 2DB8              out 0xd,R2
 006A                   .dbline 60
 006A           ;  uchar i,byte=0;
 006A           ;  DDRB&=~BIT(RTC_DATA);                 //将数据端口设置为输入           
 006A DE9A              sbi 0x1b,6
 006C                   .dbline 61
 006C           ;  PORTB&=~BIT(RTC_DATA);                //无上拉电阻
 006C AE98              cbi 0x15,6
 006E                   .dbline 62
 006E           ;  for(i=0;i<8;i++)                      //8位数据计数
 006E D998              cbi 0x1b,1
 0070                   .dbline 63
 0070           ;  {
 0070 88BB              out 0x18,R24
 0072                   .dbline 64
 0072           ;   byte>>=1;                            //保存读入的数据位
 0072 DA9A              sbi 0x1b,2
 0074                   .dbline 65
 0074           ;   PORTB|=BIT(RTC_CLK);                 //时钟上升沿
 0074 05E0              ldi R16,5
 0076 10E0              ldi R17,0
 0078 C3DF              xcall _Delayus
 007A                   .dbline 66
 007A           ;   Delayus(10);                                 //延时,调整时钟脉冲宽度
 007A DA98              cbi 0x1b,2
 007C                   .dbline 68
 007C           ;   PORTB&=~BIT(RTC_CLK);                //时钟下降沿,DS1302输出数据位
 007C           ;   Delayus(10);                                 //等待数据变化(MEGA16太快,必须等待DS1302的数据位输出,否则不能正确读出)
 007C 2224              clr R2
 007E 28BA              out 0x18,R2
 0080                   .dbline 69
 0080           ;   if(PINB&BIT(RTC_DATA))       //当前位是否是高电平
 0080 DB9A              sbi 0x1b,3
 0082                   .dbline 70
 0082           ;   {
 0082 02E3              ldi R16,50
 0084 10E0              ldi R17,0
 0086 BCDF              xcall _Delayus
 0088                   .dbline 71
 0088           ;    byte|=BIT(PB7);                     //是高电平就将返回数据的当前位置1
 0088 DB98              cbi 0x1b,3
 008A                   .dbline 73
 008A           ;   }
 008A           ;   else
 008A 8FEF              ldi R24,255
 008C 88BB              out 0x18,R24
 008E                   .dbline 74
 008E           ;   {
 008E DC9A              sbi 0x1b,4
 0090                   .dbline 75
 0090           ;    byte&=~BIT(PB7);                    //是低电平就将返回数据的当前位置0
 0090 02E3              ldi R16,50
 0092 10E0              ldi R17,0
 0094 B5DF              xcall _Delayus
 0096                   .dbline 76
 0096           ;   }
 0096 DC98              cbi 0x1b,4
 0098                   .dbline 78
 0098           ;  }
 0098           ;  DDRB|=BIT(RTC_DATA);          //最后将数据端口设置为输出
 0098 8FEF              ldi R24,255
 009A 82BB              out 0x12,R24
 009C                   .dbline 79
 009C           ;  return byte;                          //返回读出的数据
 009C DF9A              sbi 0x1b,7
 009E                   .dbline 80
 009E           ; }
 009E 02E3              ldi R16,50
 00A0 10E0              ldi R17,0
 00A2 AEDF              xcall _Delayus
 00A4                   .dbline 81
 00A4           ; /*******************************************
 00A4 DF98              cbi 0x1b,7
 00A6                   .dbline -2
 00A6                   .dbline 84
 00A6           ; 函数名称: DS1302_writeD
 00A6           ; 功    能: 向DS1302的某个地址写入一个字节数据
 00A6           ; 参    数: addr--地址值(寄存器或RAM)
 00A6           L15:
 00A6                   .dbline 0 ; func end
 00A6 0895              ret
 00A8                   .dbend
 00A8                   .dbfile C:\icc\examples.avr\AVR_PQ1A_DEMO\17_RTC/YJ1602.C
 00A8                   .dbfunc e LCD1602_portini _LCD1602_portini fV
                        .even
 00A8           _LCD1602_portini::
 00A8                   .dbline -1
 00A8                   .dbline 20
 00A8                   .dbline 21
 00A8 81B3              in R24,0x11
 00AA 8067              ori R24,112
 00AC 81BB              out 0x11,R24
 00AE                   .dbline 22
 00AE 87B3              in R24,0x17
 00B0 8F6F              ori R24,255
 00B2 87BB              out 0x17,R24
 00B4                   .dbline -2
 00B4                   .dbline 23
 00B4           L16:
 00B4                   .dbline 0 ; func end
 00B4 0895              ret
 00B6                   .dbend
 00B6                   .dbfunc e LCD1602_readbyte _LCD1602_readbyte fc
 00B6           ;          dByte -> R20
 00B6           ;         DatCmd -> R20
                        .even
 00B6           _LCD1602_readbyte::
 00B6 0E940000          xcall push_gset1
 00BA 402F              mov R20,R16
 00BC                   .dbline -1
 00BC                   .dbline 31
 00BC                   .dbline 33
 00BC 4423              tst R20
 00BE 11F4              brne L18
 00C0                   .dbline 34
 00C0 9498              cbi 0x12,4
 00C2 01C0              xjmp L19
 00C4           L18:
 00C4                   .dbline 36
 00C4 949A              sbi 0x12,4
 00C6           L19:
 00C6                   .dbline 38
 00C6 959A              sbi 0x12,5
 00C8                   .dbline 39
 00C8 969A              sbi 0x12,6
 00CA                   .dbline 40
 00CA 2224              clr R2
 00CC 27BA              out 0x17,R2
 00CE                   .dbline 41
 00CE 46B3              in R20,0x16
 00D0                   .dbline 42
 00D0 01E0              ldi R16,1
 00D2 10E0              ldi R17,0
 00D4 ADDF              xcall _Delayms
 00D6                   .dbline 43
 00D6 9698              cbi 0x12,6
 00D8                   .dbline 44
 00D8 87B3              in R24,0x17
 00DA 8F6F              ori R24,255
 00DC 87BB              out 0x17,R24
 00DE                   .dbline 45
 00DE 042F              mov R16,R20
 00E0                   .dbline -2
 00E0           L17:
 00E0 0E940000          xcall pop_gset1
 00E4                   .dbline 0 ; func end
 00E4 0895              ret
 00E6                   .dbsym r dByte 20 c
 00E6                   .dbsym r DatCmd 20 c
 00E6                   .dbend
 00E6                   .dbfunc e LCD1602_sendbyte _LCD1602_sendbyte fV
 00E6           ;          dByte -> R20
 00E6           ;         DatCmd -> R22
                        .even
 00E6           _LCD1602_sendbyte::
 00E6 0E940000          xcall push_gset2
 00EA 422F              mov R20,R18
 00EC 602F              mov R22,R16
 00EE                   .dbline -1
 00EE                   .dbline 55
 00EE                   .dbline 56

⌨️ 快捷键说明

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