📄 一般按键.lis
字号:
.module _一般按键.c
.area text(rom, con, rel)
0000 .dbfile E:\xiaozhiyong2009\设计资料\项目设计\mega8_C语言常用程序\ICCAVR_mega8_一般按键\一般按键.c
0000 .dbfunc e port_init _port_init fV
.even
0000 _port_init::
0000 .dbline -1
0000 .dbline 9
0000 ; //ICC-AVR application builder : 2009-3-10 17:31:43
0000 ; // Target : M8
0000 ; // Crystal: 8.0000Mhz
0000 ;
0000 ; #include <iom8v.h>
0000 ; #include <macros.h>
0000 ;
0000 ; void port_init(void)
0000 ; {
0000 .dbline 10
0000 ; PORTB = 0x00;
0000 2224 clr R2
0002 28BA out 0x18,R2
0004 .dbline 11
0004 ; DDRB = 0x00;
0004 27BA out 0x17,R2
0006 .dbline 12
0006 ; PORTC = 0x00; //m103 output only
0006 25BA out 0x15,R2
0008 .dbline 13
0008 ; DDRC = 0x00;
0008 24BA out 0x14,R2
000A .dbline 14
000A ; PORTD = 0x00;
000A 22BA out 0x12,R2
000C .dbline 15
000C ; DDRD = 0x00;
000C 21BA out 0x11,R2
000E .dbline -2
000E L1:
000E .dbline 0 ; func end
000E 0895 ret
0010 .dbend
0010 .dbfunc e init_devices _init_devices fV
.even
0010 _init_devices::
0010 .dbline -1
0010 .dbline 20
0010 ; }
0010 ;
0010 ; //call this routine to initialize all peripherals
0010 ; void init_devices(void)
0010 ; {
0010 .dbline 22
0010 ; //stop errant interrupts until set up
0010 ; CLI(); //disable all interrupts
0010 F894 cli
0012 .dbline 23
0012 ; port_init();
0012 F6DF rcall _port_init
0014 .dbline 25
0014 ;
0014 ; MCUCR = 0x00;
0014 2224 clr R2
0016 25BE out 0x35,R2
0018 .dbline 26
0018 ; GICR = 0x00;
0018 2BBE out 0x3b,R2
001A .dbline 27
001A ; TIMSK = 0x00; //timer interrupt sources
001A 29BE out 0x39,R2
001C .dbline 28
001C ; SEI(); //re-enable interrupts
001C 7894 sei
001E .dbline -2
001E L2:
001E .dbline 0 ; func end
001E 0895 ret
0020 .dbend
0020 .dbfunc e delay_us _delay_us fV
0020 ; time -> R16,R17
.even
0020 _delay_us::
0020 .dbline -1
0020 .dbline 40
0020 ; //all peripherals are now initialized
0020 ; }
0020 ;
0020 ; /************************************
0020 ; 用 途:微秒级延时程序
0020 ; Taget :mega8
0020 ; crystal :8M
0020 ; 介 绍:在8M的晶振上进行us级的延时
0020 ; 入口参数:
0020 ; *************************************/
0020 ; void delay_us(int time)
0020 ; {
0020 L4:
0020 .dbline 42
0020 ; do
0020 ; {
0020 .dbline 43
0020 ; time--;
0020 0150 subi R16,1
0022 1040 sbci R17,0
0024 .dbline 44
0024 ; }
0024 L5:
0024 .dbline 45
0024 ; while (time > 1);
0024 81E0 ldi R24,1
0026 90E0 ldi R25,0
0028 8017 cp R24,R16
002A 9107 cpc R25,R17
002C CCF3 brlt L4
002E X0:
002E .dbline -2
002E L3:
002E .dbline 0 ; func end
002E 0895 ret
0030 .dbsym r time 16 I
0030 .dbend
.area lit(rom, con, rel)
0000 _num::
0000 3F06 .byte 63,6
0002 5B4F .byte 91,'O
0004 666D .byte 'f,'m
0006 7D07 .byte 125,7
0008 7F6F .byte 127,'o
000A 777C .byte 'w,124
000C 395E .byte 57,94
000E 7971 .byte 'y,'q
0010 .dbsym e num _num A[16:16]kc
.area text(rom, con, rel)
0030 .dbfile E:\xiaozhiyong2009\设计资料\项目设计\mega8_C语言常用程序\ICCAVR_mega8_一般按键\一般按键.c
0030 .dbfunc e show_2_digit _show_2_digit fV
0030 ; i -> <dead>
0030 ; digi -> R10
.even
0030 _show_2_digit::
0030 AA92 st -y,R10
0032 A02E mov R10,R16
0034 .dbline -1
0034 .dbline 67
0034 ; }
0034 ;
0034 ;
0034 ; /************************************
0034 ; 用 途:两位数码管显示一个数
0034 ; Taget :mega8
0034 ; crystal :8M
0034 ; 介 绍:共阳数码管
0034 ; 1-PC1(片选)
0034 ; 2-PC0
0034 ; -----
0034 ; a-PB0(数据)
0034 ; b-PB1
0034 ; ...
0034 ; h-PB6
0034 ; DP-PB7
0034 ; 入口参数:要显示的数，十进制表示
0034 ; *************************************/
0034 ; const unsigned char num[16]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
0034 ; 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
0034 ; void show_2_digit(unsigned char digi)
0034 ; {
0034 .dbline 69
0034 ; unsigned char i;
0034 ; DDRC=0xff;
0034 8FEF ldi R24,255
0036 84BB out 0x14,R24
0038 .dbline 70
0038 ; DDRB=0xff;
0038 87BB out 0x17,R24
003A .dbline 71
003A ; PORTC=0;//关片选
003A 2224 clr R2
003C 25BA out 0x15,R2
003E .dbline 72
003E ; PORTB=~num[(unsigned char )(digi/10)];//显示十位
003E 2AE0 ldi R18,10
0040 30E0 ldi R19,0
0042 0A2D mov R16,R10
0044 1127 clr R17
0046 00D0 rcall div16s
0048 E02F mov R30,R16
004A FF27 clr R31
004C 80E0 ldi R24,<_num
004E 90E0 ldi R25,>_num
0050 E80F add R30,R24
0052 F91F adc R31,R25
0054 2490 lpm R2,Z
0056 2094 com R2
0058 28BA out 0x18,R2
005A .dbline 73
005A ; PORTC=(0x1<<1);//开十位的显示
005A 82E0 ldi R24,2
005C 85BB out 0x15,R24
005E .dbline 74
005E ; delay_us(200);
005E 08EC ldi R16,200
0060 10E0 ldi R17,0
0062 DEDF rcall _delay_us
0064 .dbline 75
0064 ; PORTC=0;//关显示
0064 2224 clr R2
0066 25BA out 0x15,R2
0068 .dbline 76
0068 ; PORTB=~num[(unsigned char )(digi%10)];//显示个位
0068 2AE0 ldi R18,10
006A 30E0 ldi R19,0
006C 0A2D mov R16,R10
006E 1127 clr R17
0070 00D0 rcall mod16s
0072 E02F mov R30,R16
0074 FF27 clr R31
0076 80E0 ldi R24,<_num
0078 90E0 ldi R25,>_num
007A E80F add R30,R24
007C F91F adc R31,R25
007E 2490 lpm R2,Z
0080 2094 com R2
0082 28BA out 0x18,R2
0084 .dbline 77
0084 ; PORTC=(0x1<<0);//开个位的显示
0084 81E0 ldi R24,1
0086 85BB out 0x15,R24
0088 .dbline 78
0088 ; delay_us(200);
0088 08EC ldi R16,200
008A 10E0 ldi R17,0
008C C9DF rcall _delay_us
008E .dbline 79
008E ; PORTC=0x0;//关显示
008E 2224 clr R2
0090 25BA out 0x15,R2
0092 .dbline -2
0092 L7:
0092 .dbline 0 ; func end
0092 A990 ld R10,y+
0094 0895 ret
0096 .dbsym l i 1 c
0096 .dbsym r digi 10 c
0096 .dbend
0096 .dbfunc e key_scan _key_scan fc
0096 ; j -> R16
0096 ; k -> R18
.even
0096 _key_scan::
0096 .dbline -1
0096 .dbline 91
0096 ; }
0096 ;
0096 ; /************************************
0096 ; 用 途:单键扫描程序
0096 ; Taget :mega8
0096 ; crystal :8M
0096 ; 介 绍:用的是D的前四个口,共有四个按键
0096 ; 入口参数:
0096 ; 出口参数:为0表示没有按键(1,2,3,4)
0096 ; *************************************/
0096 ; unsigned char key_scan()
0096 ; {
0096 .dbline 92
0096 ; unsigned char k,j=0;
0096 0027 clr R16
0098 .dbline 93
0098 ; PORTD|=0x0f;
0098 82B3 in R24,0x12
009A 8F60 ori R24,15
009C 82BB out 0x12,R24
009E .dbline 94
009E ; k=PIND;
009E 20B3 in R18,0x10
00A0 .dbline 95
00A0 ; k=k&0x0f;
00A0 2F70 andi R18,15
00A2 .dbline 96
00A2 ; if(k==0x0e)
00A2 2E30 cpi R18,14
00A4 11F4 brne L9
00A6 X1:
00A6 .dbline 97
00A6 ; j=1;
00A6 01E0 ldi R16,1
00A8 0BC0 rjmp L10
00AA L9:
00AA .dbline 98
00AA ; else if(k==0x0d)
00AA 2D30 cpi R18,13
00AC 11F4 brne L11
00AE X2:
00AE .dbline 99
00AE ; j=2;
00AE 02E0 ldi R16,2
00B0 07C0 rjmp L12
00B2 L11:
00B2 .dbline 100
00B2 ; else if(k==0x0b)
00B2 2B30 cpi R18,11
00B4 11F4 brne L13
00B6 X3:
00B6 .dbline 101
00B6 ; j=3;
00B6 03E0 ldi R16,3
00B8 03C0 rjmp L14
00BA L13:
00BA .dbline 102
00BA ; else if (k==0x07)
00BA 2730 cpi R18,7
00BC 09F4 brne L15
00BE X4:
00BE .dbline 103
00BE ; j=4;
00BE 04E0 ldi R16,4
00C0 L15:
00C0 L14:
00C0 L12:
00C0 L10:
00C0 .dbline 104
00C0 ; return j;
00C0 .dbline -2
00C0 L8:
00C0 .dbline 0 ; func end
00C0 0895 ret
00C2 .dbsym r j 16 c
00C2 .dbsym r k 18 c
00C2 .dbend
00C2 .dbfunc e main _main fV
.even
00C2 _main::
00C2 .dbline -1
00C2 .dbline 108
00C2 ; }
00C2 ;
00C2 ; void main()
00C2 ; {
00C2 .dbline 109
00C2 ; port_init();
00C2 9EDF rcall _port_init
00C4 .dbline 110
00C4 ; init_devices();
00C4 A5DF rcall _init_devices
00C6 02C0 rjmp L19
00C8 L18:
00C8 .dbline 113
00C8 ;
00C8 ; while(1)
00C8 ; {
00C8 .dbline 114
00C8 ; show_2_digit(key_scan());
00C8 E6DF rcall _key_scan
00CA B2DF rcall _show_2_digit
00CC .dbline 115
00CC ; }
00CC L19:
00CC .dbline 112
00CC FDCF rjmp L18
00CE X5:
00CE .dbline -2
00CE L17:
00CE .dbline 0 ; func end
00CE 0895 ret
00D0 .dbend
00D0 ; }
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -