📄 buzzer.lis
字号:
.module buzzer.c
.area text(rom, con, rel)
0000 .dbfile F:\job\M16学习板\BUZZER(实验三)\buzzer.c
0000 .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
0000 .dbfunc e ChangeIntToHex _ChangeIntToHex fV
0000 ; dec -> R20,R21
.even
0000 _ChangeIntToHex::
0000 0E940000 xcall push_gset1
0004 A801 movw R20,R16
0006 .dbline -1
0006 .dbline 136
0006 ; /*******************************************************************
0006 ; 实验三
0006 ; 实验名称: 蜂鸣器驱动程序实验,电子琴程序
0006 ; 实验目的: 对单片机输入输出端口的一个小综合
0006 ; 实验现象: 有点声音
0006 ; 环 境: ICCAVR6.31A
0006 ; 设 计 者: shinea8868
0006 ; 说 明: 部分程序原型源自网络,经本人修改调试可用,请尊重知识产权,如
0006 ; 作商业用途请保留本段文字
0006 ; 完成日期: 2007年4月9日
0006 ; *******************************************************************/
0006 ;
0006 ; #include <iom16v.h>
0006 ; #include <macros.h>
0006 ; #include "..\ICC_H\SOFTWARE.h"
0006 ;
0006 ; uint tab[] = {637,568,505,477,425,378,337};//音符
0006 ; /*-----------------------------------------------------------------
0006 ; 延时程序计算方法
0006 ; 计数个数j = 延时时间/6*晶振频率 - 1
0006 ; 函数名称: void DelayMs(uchar i)
0006 ; 函数功能: 毫秒延时
0006 ; 参 数:
0006 ; 返 回 值: 无
0006 ; -----------------------------------------------------------------*/
0006 ; void DelayMs(uchar i)
0006 ; {
0006 ; uchar j;
0006 ; while(i--)
0006 ; {
0006 ; j = 167;//1mhz 1ms延时
0006 ; while(j--);
0006 ; }
0006 ; }
0006 ;
0006 ; /*-----------------------------------------------------------------
0006 ; 函数名称: void KeyScan(void)
0006 ; 函数功能: 键盘扫描程序
0006 ; 参 数:
0006 ; 返 回 值: 无
0006 ; -----------------------------------------------------------------*/
0006 ; void KeyScan(void)
0006 ; {
0006 ; uchar temp; //存放音符
0006 ; uchar KeyNum = 0; //用来存放按键信息
0006 ; DDRA = 0xff; //置端口A为输出
0006 ; PORTA = 0xff; //全部输出为高电平
0006 ; DelayMs(1); //延时一段时间
0006 ; DDRA = 0x00; //置端口A为输入
0006 ; if( PINA != 0xff) //是否有按键按下
0006 ; DelayMs(1); //延时去抖动
0006 ;
0006 ; DDRA = 0xff; //置端口A为输出
0006 ; PORTA = 0xff; //全部输出为高电平
0006 ; DelayMs(1); //延时一段时间
0006 ; DDRA = 0x00; //置端口A为输入
0006 ; if( PINA != 0xff) //是否有按键按下
0006 ; { //确实有按键按下
0006 ; switch (PINA & 0xff)//判断是哪个按键按下
0006 ; {
0006 ; case 0b11111110: KeyNum = 1;break;
0006 ; case 0b11111101: KeyNum = 2;break;
0006 ; case 0b11111011: KeyNum = 3;break;
0006 ; case 0b11110111: KeyNum = 4;break;
0006 ; case 0b11101111: KeyNum = 5;break;
0006 ; case 0b11011111: KeyNum = 6;break;
0006 ; case 0b10111111: KeyNum = 7;break;
0006 ; case 0b01111111: KeyNum = 8;break;
0006 ; default: break;
0006 ; }
0006 ;
0006 ; while(PINA != 0xff)
0006 ; {
0006 ; DDRB = 0xff;
0006 ; PORTB&= ~(1<<(KeyNum-1));//显示对应的发光二极管
0006 ; DDRA = 0xff; //置端口A为输出
0006 ; PORTA = 0xff; //全部输出为高电平
0006 ; // DelayMs(1); //延时一段时间
0006 ; temp = tab[KeyNum-1];
0006 ; while(temp--)
0006 ; NOP();
0006 ; DDRD = (1<<5);
0006 ; PORTD ^= (1<<5);
0006 ; DDRA = 0x00;
0006 ; }
0006 ; DDRB = 0xff; //设为输出
0006 ; PORTB = 0xff; //灭所有的二极管
0006 ; }
0006 ;
0006 ; }
0006 ; /*-----------------------------------------------------------------
0006 ; 函数名称: void main(void)
0006 ; 函数功能:
0006 ; 参 数:
0006 ; 返 回 值: 无
0006 ; -----------------------------------------------------------------*/
0006 ; void main(void)
0006 ; {
0006 ; DDRB = 0xff;
0006 ; PORTB = 0xff;
0006 ; while(1)
0006 ; {
0006 ; // DelayMs(200);
0006 ; KeyScan();
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 ; }
0006 .dbline 137
0006 ; }
0006 FA01 movw R30,R20
0008 2080 ldd R2,z+0
000A 3324 clr R3
000C 1AE0 ldi R17,10
000E 022D mov R16,R2
0010 0E940000 xcall mod8u
0014 402E mov R4,R16
0016 1AE0 ldi R17,10
0018 022D mov R16,R2
001A 0E940000 xcall div8u
001E 802F mov R24,R16
0020 8F70 andi R24,#0x0F
0022 8295 swap R24
0024 8429 or R24,R4
0026 FA01 movw R30,R20
0028 8083 std z+0,R24
002A .dbline -2
002A L1:
002A 0E940000 xcall pop_gset1
002E .dbline 0 ; func end
002E 0895 ret
0030 .dbsym r dec 20 pc
0030 .dbend
0030 .dbfunc e ChangeHexToInt _ChangeHexToInt fV
0030 ; hex -> R16,R17
.even
0030 _ChangeHexToInt::
0030 .dbline -1
0030 .dbline 166
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 ; }
0030 .dbline 167
0030 ; }
0030 F801 movw R30,R16
0032 2080 ldd R2,z+0
0034 3324 clr R3
0036 822D mov R24,R2
0038 8295 swap R24
003A 8F70 andi R24,#0x0F
003C 9AE0 ldi R25,10
003E 989F mul R25,R24
0040 822D mov R24,R2
0042 8F70 andi R24,15
0044 202C mov R2,R0
0046 280E add R2,R24
0048 2082 std z+0,R2
004A .dbline -2
004A L2:
004A .dbline 0 ; func end
004A 0895 ret
004C .dbsym r hex 16 pc
004C .dbend
004C .dbfunc e Delay _Delay fV
004C ; i -> R16
.even
004C _Delay::
004C .dbline -1
004C .dbline 180
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C ; }
004C .dbline 182
004C ; }
004C ; }
004C 08EC ldi R16,200
004E L4:
004E .dbline 183
004E L5:
004E .dbline 183
004E ; }
004E 202E mov R2,R16
0050 3324 clr R3
0052 0150 subi R16,1
0054 2220 tst R2
0056 D9F7 brne L4
0058 .dbline -2
0058 L3:
0058 .dbline 0 ; func end
0058 0895 ret
005A .dbsym r i 16 c
005A .dbend
.area data(ram, con, rel)
0000 .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
0000 _tab::
0000 .blkb 2
.area idata
0000 7D02 .word 637
.area data(ram, con, rel)
0002 .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
0002 .blkb 2
.area idata
0002 3802 .word 568
.area data(ram, con, rel)
0004 .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
0004 .blkb 2
.area idata
0004 F901 .word 505
.area data(ram, con, rel)
0006 .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
0006 .blkb 2
.area idata
0006 DD01 .word 477
.area data(ram, con, rel)
0008 .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
0008 .blkb 2
.area idata
0008 A901 .word 425
.area data(ram, con, rel)
000A .dbfile F:\job\M16学习板\BUZZER(实验三)\..\ICC_H\SOFTWARE.h
000A .blkb 2
.area idata
000A 7A01 .word 378
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -