?? 矩陣式按鍵.lis
字號:
.module _矩陣式按鍵.c
.area text(rom, con, rel)
0000 .dbfile E:\xiaozhiyong2009\設計資料\項目設計\ICCAVR_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-12 17:58:29
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\設計資料\項目設計\ICCAVR_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_vetrix _key_vetrix fc
0096 ; k -> R20
0096 ; key0 -> R10
.even
0096 _key_vetrix::
0096 00D0 rcall push_xgsetF00C
0098 .dbline -1
0098 .dbline 91
0098 ; }
0098 ;
0098 ; /************************************
0098 ; 用 途:矩陣鍵盤掃描子程序
0098 ; Taget :mega8
0098 ; crystal :8M
0098 ; 介 紹:用的是D口
0098 ; 入口參數:
0098 ; 出口參數:沒有是-1不然是0-15
0098 ; *************************************/
0098 ; char key_vetrix()
0098 ; {
0098 .dbline 92
0098 ; char k=-1;
0098 4FEF ldi R20,255
009A .dbline 94
009A ; unsigned char key0;
009A ; DDRD=0xf0;
009A 80EF ldi R24,240
009C 81BB out 0x11,R24
009E .dbline 95
009E ; PORTD=0x0f;//掃描低位
009E 8FE0 ldi R24,15
00A0 82BB out 0x12,R24
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -