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

📄 smg.lis

📁 AVR单片机开发版资料测试程序里的源程序
💻 LIS
📖 第 1 页 / 共 2 页
字号:
                        .module SMG.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           ;   文件:SMG.C
 0006           ;   环境:编译为ICC AVR6.25A,仿真为AVR Studio4.10 
 0006           ;   硬件:ATMEGA16芯片
 0006           ;   日期:2006年12月10日 
 0006           ;   功能:驱动开发板上的数码管,滚动显示1、2、3、4、5、6
 0006           ;   备注:参考《AVR系列单片机C语言编程与应用实例》(清华大学出版社)
 0006           ; /******************************************/
 0006           ; #include <iom16v.h>                   //包含型号头文件
 0006           ; #include <macros.h>                   //包含"位"操作头文件
 0006           ; #include <stdio.h>                    //标准输入输出头文件
 0006           ; #include <AVR_PQ1A.h>         //包含自定义常量头文件
 0006           ; 
 0006           ; #pragma data:code 
 0006           ; const SEGMENT[16]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d, 0x07,
 0006           ;                  0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
 0006           ; 
 0006           ; /*******************************************
 0006           ; 函数名称: One_smg_display
 0006           ; 功    能: 指定的数码管显示指定的内容
 0006           ; 参    数: data--显示的内容(0-15)
 0006           ;                 number--指定的数码管(1-6)
 0006           ; 返回值  : 无
 0006           ; /********************************************/
 0006           ; void One_smg_display(uchar data,uchar number)
 0006           ; { 
 0006           ;  PORTB|=0x3F;                    //输出位选
 0006           ;  PORTA|=BIT(BITLK);              //更新位选
 0006                   .dbline 30
 0006           ;  Delayus(50);                    //调整时序
 0006           ;  PORTA&=~BIT(BITLK);     //锁存位选
 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           ;  PORTB=SEGMENT[data];    //输出段选
 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           ;  PORTA|=BIT(SEGLK);              //更新段选
 0034           ;  Delayus(50);                    //调整时序
 0034           ;  PORTA&=~BIT(SEGLK);     //锁存段选
 0034           ;  
 0034           ;  number=~BIT(number-1);          //调整位选(指定时是1~6,而操作的时候是0~5)
 0034           ;  PORTB=number;                           //输出位选
 0034           ;  PORTA|=BIT(BITLK);              //更新位选
 0034           ;  Delayus(50);                            //调整时序
 0034                   .dbline 42
 0034           ;  PORTA&=~BIT(BITLK);     //锁存位选
 0034           ; }
 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           ; 函数名称: All_smg_display
 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           ; 功    能: 6个数码管显示指定的内容
 005C           ; 参    数: *pdata--显示内容数组地址
 005C           ; 返回值  : 无
 005C           ; /********************************************/
 005C           ; void All_smg_display(uchar *pdata)
 005C           ; {
 005C           ;  uchar i;
 005C           ;  for(i=0;i<6;i++)
 005C                   .dbline 53
 005C           ;       {
 005C 8FEF              ldi R24,255
 005E 8ABB              out 0x1a,R24
 0060                   .dbline 54
 0060           ;        One_smg_display(pdata[i],i+1);
 0060 87BB              out 0x17,R24
 0062                   .dbline 55
 0062           ;        Delayms(1);
 0062 84BB              out 0x14,R24
 0064                   .dbline 56
 0064           ;       }
 0064 81BB              out 0x11,R24
 0066                   .dbline 58
 0066           ; }
 0066           ; /*******************************************
 0066 2224              clr R2
 0068 2DB8              out 0xd,R2
 006A                   .dbline 60
 006A           ; 函数名称: Cycle_smg_display
 006A           ; 功    能: 6个数码管从右向左循环滚动显示指定的内容(循环一次)
 006A DE9A              sbi 0x1b,6
 006C                   .dbline 61
 006C           ; 参    数: *pdata--显示内容数组地址
 006C AE98              cbi 0x15,6
 006E                   .dbline 62
 006E           ; 返回值  : 无
 006E D998              cbi 0x1b,1
 0070                   .dbline 63
 0070           ; /********************************************/
 0070 88BB              out 0x18,R24
 0072                   .dbline 64
 0072           ; void Cycle_smg_display(uchar *pdata)
 0072 DA9A              sbi 0x1b,2
 0074                   .dbline 65
 0074           ; {
 0074 05E0              ldi R16,5
 0076 10E0              ldi R17,0
 0078 C3DF              xcall _Delayus
 007A                   .dbline 66
 007A           ;  uchar i,j;
 007A DA98              cbi 0x1b,2
 007C                   .dbline 68
 007C           ;  for(i=0;i<240;i++)                    //共滚动6次,每次内容显示40个循环
 007C           ;  { 
 007C 2224              clr R2
 007E 28BA              out 0x18,R2
 0080                   .dbline 69
 0080           ;   for(j=0;j<6;j++)                     //扫描6个数码管
 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           ;        One_smg_display(pdata[(i/40+j)%6],j+1);//显示
 0088 DB98              cbi 0x1b,3
 008A                   .dbline 73
 008A           ;        Delayus(2000);                  //调整显示时间和亮度(时间越长亮度越高,但是太长数码管就闪了)
 008A           ;       }
 008A 8FEF              ldi R24,255
 008C 88BB              out 0x18,R24
 008E                   .dbline 74
 008E           ;  }
 008E DC9A              sbi 0x1b,4
 0090                   .dbline 75
 0090           ; }
 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           ; 函数名称: main
 0098           ; 功    能: 6个数码管循环滚动显示指定的内容
 0098 8FEF              ldi R24,255
 009A 82BB              out 0x12,R24
 009C                   .dbline 79
 009C           ; 参    数: 无
 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           ; void main(void)
 00A6           ; {      
 00A6           ;        uchar data[6]={1,2,3,4,5,6};//六个数码管滚动显示1,2,3,4,5,6        
 00A6           L15:
 00A6                   .dbline 0 ; func end
 00A6 0895              ret
 00A8                   .dbend
                        .area code(ram, con, rel)
 0000                   .dbfile C:/icc/include/AVR_PQ1A.h
                        .area lit(rom, con, rel)
 0000           _SEGMENT::
 0000 3F00              .word 63
 0002 0600              .word 6
 0004 5B00              .word 91
 0006 4F00              .word 79
 0008 6600              .word 102
 000A 6D00              .word 109
 000C 7D00              .word 125

⌨️ 快捷键说明

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