?? mian.lis
字號:
.module mian.c
.area text(rom, con, rel)
0000 .dbfile D:\avr\+++精華+++\計算器/delay.h
0000 .dbfunc e delay_1us _delay_1us fV
.even
0000 _delay_1us::
0000 .dbline -1
0000 .dbline 15
0000 ; /*****************************************
0000 ; * 計算器程序設計 *
0000 ; * 功 能：計算器 *
0000 ; * 時鐘頻率：內部1M *
0000 ; * 設 計：莫錦攀 *
0000 ; * 修改日期：2007年07月16日 *
0000 ; * 編譯環境：ICC-AVR6.31 *
0000 ; * 實驗環境：M16學習板 *
0000 ; * 使用端口：1602: PC6,PC7,PA4~PA7, *
0000 ; 44KEY: PB0~PB7 *
0000 ; *****************************************/
0000 ;
0000 ; #include <iom16v.h>
0000 ; #include "1602.h"
0000 ; #include "key.h"
0000 .dbline 16
0000 ; unsigned char a1[5]={32,32,32,32,0};//第一個數的顯示數組
0000 0000 nop
0002 .dbline -2
0002 L1:
0002 .dbline 0 ; func end
0002 0895 ret
0004 .dbend
0004 .dbfunc e delay_nus _delay_nus fV
0004 ; i -> R20,R21
0004 ; n -> R22,R23
.even
0004 _delay_nus::
0004 0E940000 xcall push_gset2
0008 B801 movw R22,R16
000A .dbline -1
000A .dbline 20
000A ; unsigned char a2[5]={32,32,32,32,0};//第二個數的顯示數組
000A ; unsigned char result_dp[7]={32,32,32,32,32,32,0};//結果的顯示數組
000A ; int data1,data2;//兩個要運算的數
000A ; long int result;//結果
000A .dbline 21
000A ; unsigned char flag_a1=1,flag_a2=1;//兩個數的輸入完成標志位
000A 4427 clr R20
000C 5527 clr R21
000E .dbline 22
000E ; unsigned char key=0x00;//按鍵值
000E 03C0 xjmp L6
0010 L3:
0010 .dbline 23
0010 F7DF xcall _delay_1us
0012 L4:
0012 .dbline 22
0012 4F5F subi R20,255 ; offset = 1
0014 5F4F sbci R21,255
0016 L6:
0016 .dbline 22
0016 4617 cp R20,R22
0018 5707 cpc R21,R23
001A D0F3 brlo L3
001C .dbline -2
001C L2:
001C 0E940000 xcall pop_gset2
0020 .dbline 0 ; func end
0020 0895 ret
0022 .dbsym r i 20 i
0022 .dbsym r n 22 i
0022 .dbend
0022 .dbfunc e delay_1ms _delay_1ms fV
0022 ; i -> R16,R17
.even
0022 _delay_1ms::
0022 .dbline -1
0022 .dbline 27
0022 ; unsigned char flag_count=32;//符號存放變量
0022 ; unsigned char ok=32;//等號的顯示符
0022 ; unsigned char error=0;//錯誤標志位
0022 ; //----------函數聲明-------------------
0022 ; void key_display(void);//按鍵顯示函數
0022 .dbline 29
0022 0027 clr R16
0024 1127 clr R17
0026 02C0 xjmp L11
0028 L8:
0028 .dbline 29
0028 L9:
0028 .dbline 29
0028 0F5F subi R16,255 ; offset = 1
002A 1F4F sbci R17,255
002C L11:
002C .dbline 29
002C ; void process_key(void);//輸入接收函數
002C ; void process_data(void);//數字處理函數
002C 0437 cpi R16,116
002E E4E0 ldi R30,4
0030 1E07 cpc R17,R30
0032 D0F3 brlo L8
0034 .dbline -2
0034 L7:
0034 .dbline 0 ; func end
0034 0895 ret
0036 .dbsym r i 16 i
0036 .dbend
0036 .dbfunc e delay_nms _delay_nms fV
0036 ; i -> R20,R21
0036 ; n -> R22,R23
.even
0036 _delay_nms::
0036 0E940000 xcall push_gset2
003A B801 movw R22,R16
003C .dbline -1
003C .dbline 33
003C ; void process_count(void);//運算函數
003C ; void process_count(void);//運算函數
003C ; void display_result(void);//結果處理函數
003C ; //--------------------------------------
003C .dbline 34
003C ;
003C 4427 clr R20
003E 5527 clr R21
0040 .dbline 35
0040 ; void process_key(void)//輸入接收函數
0040 03C0 xjmp L16
0042 L13:
0042 .dbline 36
0042 EFDF xcall _delay_1ms
0044 L14:
0044 .dbline 35
0044 4F5F subi R20,255 ; offset = 1
0046 5F4F sbci R21,255
0048 L16:
0048 .dbline 35
0048 4617 cp R20,R22
004A 5707 cpc R21,R23
004C D0F3 brlo L13
004E .dbline -2
004E L12:
004E 0E940000 xcall pop_gset2
0052 .dbline 0 ; func end
0052 0895 ret
0054 .dbsym r i 20 i
0054 .dbsym r n 22 i
0054 .dbend
0054 .dbfile D:\avr\+++精華+++\計算器/1602.h
0054 .dbfunc e LCD_init _LCD_init fV
.even
0054 _LCD_init::
0054 .dbline -1
0054 .dbline 44
0054 ; {static unsigned char i=0;
0054 ; if(key>='0'&&key<='9')//如果按下的是數字鍵著存放到a1或a2數組中
0054 ; {if(flag_a1==1)
0054 ; {
0054 ; if(a1[i]==32)a1[i]=key;//限制輸入的數字不能超過4位
0054 ; i++;//i用來確定存放的位,應為輸入是連續的所以需要靜態局部變量
0054 ; if(a1[3]!=32){flag_a1=0;i=0;}
0054 ; }
0054 ; else if(flag_a2==1&&flag_count!=32)
0054 .dbline 45
0054 ; {
0054 8AB3 in R24,0x1a
0056 806F ori R24,240
0058 8ABB out 0x1a,R24
005A .dbline 46
005A ; if(a2[i]==32)a2[i]=key;
005A A79A sbi 0x14,7
005C .dbline 47
005C ; i++;
005C A69A sbi 0x14,6
005E .dbline 48
005E ; if(a2[3]!=32){flag_a2=0;i=0;}
005E 08E2 ldi R16,40
0060 14D0 xcall _LCD_write_command
0062 .dbline 49
0062 ; }
0062 0DD0 xcall _LCD_en_write
0064 .dbline 50
0064 ; }
0064 08E2 ldi R16,40
0066 10E0 ldi R17,0
0068 CDDF xcall _delay_nus
006A .dbline 51
006A ; else if(key=='+'||key=='-'||key=='*'||key=='/'){flag_a1=0;flag_count=key;i=0;}
006A 08E2 ldi R16,40
006C 0ED0 xcall _LCD_write_command
006E .dbline 52
006E ; //運算符號記錄,按下運算符號表示第一個數輸入完成
006E 0CE0 ldi R16,12
0070 0CD0 xcall _LCD_write_command
0072 .dbline 53
0072 ; else if(key=='=')
0072 01E0 ldi R16,1
0074 0AD0 xcall _LCD_write_command
0076 .dbline 54
0076 ; {
0076 02E0 ldi R16,2
0078 10E0 ldi R17,0
007A DDDF xcall _delay_nms
007C .dbline -2
007C L17:
007C .dbline 0 ; func end
007C 0895 ret
007E .dbend
007E .dbfunc e LCD_en_write _LCD_en_write fV
.even
007E _LCD_en_write::
007E .dbline -1
007E .dbline 61
007E ;
007E ; ok='=';
007E ; if(flag_a2==1&&a2[0]==32)
007E ; {error=1;
007E ;
007E ; LCD_write_string(10,1,"ERROR");
007E ; }//如果第二個數沒有輸入著輸入有錯
007E .dbline 62
007E ; else
007E AF9A sbi 0x15,7
0080 .dbline 63
0080 ; {process_data();
0080 01E0 ldi R16,1
0082 10E0 ldi R17,0
0084 BFDF xcall _delay_nus
0086 .dbline 64
0086 ; flag_a2=0;}//按下等于號表示第二個數輸入完成
0086 AF98 cbi 0x15,7
0088 .dbline -2
0088 L18:
0088 .dbline 0 ; func end
0088 0895 ret
008A .dbend
008A .dbfunc e LCD_write_command _LCD_write_command fV
008A ; command -> R20
.even
008A _LCD_write_command::
008A 0E940000 xcall push_gset1
008E 402F mov R20,R16
0090 .dbline -1
0090 .dbline 68
0090 ; }
0090 ;
0090 ; else if(key=='R')i=0;//如果復位著數字位標志也要復位
0090 ; key_display();//輸入接受完畢,調用顯示函數顯示輸入值
0090 .dbline 70
0090 ; }
0090 ;
0090 00E1 ldi R16,16
0092 10E0 ldi R17,0
0094 B7DF xcall _delay_nus
0096 .dbline 71
0096 ; void key_display(void)//按鍵顯示函數
0096 AE98 cbi 0x15,6
0098 .dbline 72
0098 ; {unsigned char i;
0098 8BB3 in R24,0x1b
009A 8F70 andi R24,15
009C 8BBB out 0x1b,R24
009E .dbline 73
009E ;
009E 842F mov R24,R20
00A0 807F andi R24,240
00A2 2BB2 in R2,0x1b
00A4 282A or R2,R24
00A6 2BBA out 0x1b,R2
00A8 .dbline 74
00A8 ; if(key!=0x00&&key!='R')//如果不是按下復位按鍵著顯示,沒有輸入到的地方都是空格(ASCII=32)
00A8 EADF xcall _LCD_en_write
00AA .dbline 75
00AA ; {LCD_write_char(0,1,a1[0]);
00AA 842F mov R24,R20
00AC 8F70 andi R24,#0x0F
00AE 8295 swap R24
00B0 482F mov R20,R24
00B2 .dbline 76
00B2 ; LCD_write_char(1,1,a1[1]);
00B2 8BB3 in R24,0x1b
00B4 8F70 andi R24,15
00B6 8BBB out 0x1b,R24
00B8 .dbline 77
00B8 ; LCD_write_char(2,1,a1[2]);
00B8 842F mov R24,R20
00BA 807F andi R24,240
00BC 2BB2 in R2,0x1b
00BE 282A or R2,R24
00C0 2BBA out 0x1b,R2
00C2 .dbline 78
00C2 ; LCD_write_char(3,1,a1[3]);
00C2 DDDF xcall _LCD_en_write
00C4 .dbline -2
00C4 L19:
00C4 0E940000 xcall pop_gset1
00C8 .dbline 0 ; func end
00C8 0895 ret
00CA .dbsym r command 20 c
00CA .dbend
00CA .dbfunc e LCD_write_data _LCD_write_data fV
00CA ; data -> R20
.even
00CA _LCD_write_data::
00CA 0E940000 xcall push_gset1
00CE 402F mov R20,R16
00D0 .dbline -1
00D0 .dbline 95
00D0 ; LCD_write_char(4,1,flag_count);
00D0 ; LCD_write_char(5,1,a2[0]);
00D0 ; LCD_write_char(6,1,a2[1]);
00D0 ; LCD_write_char(7,1,a2[2]);
00D0 ; LCD_write_char(8,1,a2[3]);
00D0 ; LCD_write_char(9,1,ok);
00D0 ;
00D0 ; key=0x00;
00D0 ; }
00D0 ; if(key!=0x00&&key=='R')//復位按鍵
00D0 ; {
00D0 ; LCD_write_string(0,1," ");
00D0 ; for(i=0;i<5;i++)a1[i]=32;
00D0 ; for(i=0;i<5;i++)a2[i]=32;
00D0 ; for(i=0;i<7;i++)result_dp[i]=32;
00D0 ; flag_a1=1;
00D0 ; flag_a2=1;
00D0 .dbline 97
00D0 ; key=0x00;
00D0 ; flag_count=32;
00D0 00E1 ldi R16,16
00D2 10E0 ldi R17,0
00D4 97DF xcall _delay_nus
00D6 .dbline 98
00D6 ; ok=32;
00D6 AE9A sbi 0x15,6
00D8 .dbline 99
00D8 ; error=0;
00D8 8BB3 in R24,0x1b
00DA 8F70 andi R24,15
00DC 8BBB out 0x1b,R24
00DE .dbline 100
00DE ; }
00DE 842F mov R24,R20
00E0 807F andi R24,240
00E2 2BB2 in R2,0x1b
00E4 282A or R2,R24
00E6 2BBA out 0x1b,R2
00E8 .dbline 101
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -