?? counter.s
字號:
.module Counter.C
.area data(ram, con, rel)
_Table::
.blkb 2
.area idata
.byte 63,6
.area data(ram, con, rel)
.blkb 2
.area idata
.byte 91,'O
.area data(ram, con, rel)
.blkb 2
.area idata
.byte 'f,'m
.area data(ram, con, rel)
.blkb 2
.area idata
.byte 125,7
.area data(ram, con, rel)
.blkb 2
.area idata
.byte 127,'o
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\張軍\AVR\AVR單片機系統開發實例稿\第二章\第二章程序\IO端口的C語言編程\數碼管顯示設計\Counter.C
.dbsym e Table _Table A[10:10]c
_Data::
.blkb 2
.area idata
.byte 0,0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\張軍\AVR\AVR單片機系統開發實例稿\第二章\第二章程序\IO端口的C語言編程\數碼管顯示設計\Counter.C
.blkb 2
.area idata
.byte 0,0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\張軍\AVR\AVR單片機系統開發實例稿\第二章\第二章程序\IO端口的C語言編程\數碼管顯示設計\Counter.C
.dbsym e Data _Data A[4:4]c
_CNT::
.blkb 2
.area idata
.word 0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\張軍\AVR\AVR單片機系統開發實例稿\第二章\第二章程序\IO端口的C語言編程\數碼管顯示設計\Counter.C
.dbsym e CNT _CNT i
.area text(rom, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\張軍\AVR\AVR單片機系統開發實例稿\第二章\第二章程序\IO端口的C語言編程\數碼管顯示設計\Counter.C
.dbfunc e DelayMs _DelayMs fV
; j -> R20,R21
; i -> R16,R17
.even
_DelayMs::
rcall push_gset1
.dbline -1
.dbline 17
;
; //******************************FileName: Counter.C**************************//
; //******************************ICCAVR V6.30編譯*****************************//
;
; #include <io8535v.h>
; #define uchar unsigned char
; #define uint unsigned int
;
; //數碼管字型表，對應0，1，2，3，4，5，6，7，8，9//
; uchar Table[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
; uchar Data[4]={0,0,0,0}; //顯示初始值：0 0 0 0
; uint CNT=0; //初始計數值：0
; uchar Key_Up; //加計數按鍵標志
; uchar Key_Down; //減計數按鍵標志
;
; void DelayMs(uint i) //Ms級延時，參數i為延時時間
; {uint j;
.dbline 18
; for(;i!=0;i--)
rjmp L5
L2:
.dbline 19
.dbline 19
ldi R20,8000
ldi R21,31
rjmp L9
L6:
.dbline 19
.dbline 19
.dbline 19
L7:
.dbline 19
subi R20,1
sbci R21,0
L9:
.dbline 19
cpi R20,0
cpc R20,R21
brne L6
X0:
.dbline 19
L3:
.dbline 18
subi R16,1
sbci R17,0
L5:
.dbline 18
cpi R16,0
cpc R16,R17
brne L2
X1:
.dbline -2
.dbline 20
; {for(j=8000;j!=0;j--) {;}}
; }
L1:
rcall pop_gset1
.dbline 0 ; func end
ret
.dbsym r j 20 i
.dbsym r i 16 i
.dbend
.dbfunc e Display _Display fV
; sel -> R20
; i -> R22
; p -> R10,R11
.even
_Display::
rcall push_gset3
mov R10,R16
mov R11,R17
.dbline -1
.dbline 23
;
; void Display(uchar *p) //動態顯示函數，參數p為待顯示的數組名
; {uchar i,sel=0x01;
.dbline 23
ldi R20,1
.dbline 24
; for(i=0;i<4;i++)
clr R22
rjmp L14
L11:
.dbline 25
.dbline 25
out 0x15,R20
.dbline 26
mov R30,R22
clr R31
add R30,R10
adc R31,R11
ldd R30,z+0
clr R31
ldi R24,<_Table
ldi R25,>_Table
add R30,R24
adc R31,R25
ldd R2,z+0
out 0x1b,R2
.dbline 27
ldi R16,2
ldi R17,0
rcall _DelayMs
.dbline 28
lsl R20
.dbline 29
L12:
.dbline 24
inc R22
L14:
.dbline 24
cpi R22,4
brlo L11
.dbline -2
.dbline 30
; {PORTC=sel; //選通最右邊的數碼管
; PORTA=Table[p[i]]; //送字型碼
; DelayMs(2); //顯示延時
; sel=sel<<1; //移位以顯示前一位
; }
; }
L10:
rcall pop_gset3
.dbline 0 ; func end
ret
.dbsym r sel 20 c
.dbsym r i 22 c
.dbsym r p 10 pc
.dbend
.dbfunc e Process _Process fV
; p -> R20,R21
; i -> R22,R23
.even
_Process::
rcall push_gset2
mov R20,R18
mov R21,R19
mov R22,R16
mov R23,R17
.dbline -1
.dbline 36
;
; //******************************計數值處理函數******************************//
; //功能：此函數用于將計數值拆分為BCD碼的千，百，十，一數據，用于查表顯示//
; //參數說明：參數i:計數值；參數p:處理數據存放的數組名//
; void Process(uint i,uchar *p)
; {p[0]=i/1000;
.dbline 36
ldi R18,1000
ldi R19,3
mov R16,R22
mov R17,R23
rcall div16u
mov R30,R20
mov R31,R21
std z+0,R16
.dbline 37
; i=i%1000;
ldi R18,1000
ldi R19,3
mov R16,R22
mov R17,R23
rcall mod16u
mov R22,R16
mov R23,R17
.dbline 38
; p[1]=i/100;
ldi R18,100
ldi R19,0
rcall div16u
mov R30,R20
mov R31,R21
std z+1,R16
.dbline 39
; i=i%100;
ldi R18,100
ldi R19,0
mov R16,R22
mov R17,R23
rcall mod16u
mov R22,R16
mov R23,R17
.dbline 40
; p[2]=i/10;
ldi R18,10
ldi R19,0
rcall div16u
mov R30,R20
mov R31,R21
std z+2,R16
.dbline 41
; i=i%10;
ldi R18,10
ldi R19,0
mov R16,R22
mov R17,R23
rcall mod16u
mov R22,R16
mov R23,R17
.dbline 42
; p[3]=i;
mov R30,R20
mov R31,R21
std z+3,R22
.dbline -2
.dbline 43
; }
L15:
rcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r p 20 pc
.dbsym r i 22 i
.dbend
.dbfunc e Init_IO _Init_IO fV
.even
_Init_IO::
.dbline -1
.dbline 46
;
; void Init_IO(void) //初始化I/O口
; {DDRA=0xff; //設置A口為推挽1輸出
.dbline 46
ldi R24,255
out 0x1a,R24
.dbline 47
; PORTA=0xff;
out 0x1b,R24
.dbline 48
; DDRB=0x00; //設置B口為不帶上拉電阻輸入
clr R2
out 0x17,R2
.dbline 49
; PORTB=0x00;
out 0x18,R2
.dbline 50
; DDRC=0xff; //設置C口為推挽1輸出；
out 0x14,R24
.dbline 51
; PORTC=0xff;
out 0x15,R24
.dbline -2
.dbline 52
; }
L16:
.dbline 0 ; func end
ret
.dbend
.dbfunc e Get_Key _Get_Key fV
.even
_Get_Key::
.dbline -1
.dbline 55
;
; void Get_Key(void) //按鍵掃描函數
; {while((PINB&0x01)==0) //若S1按下，置位加計數標志；
rjmp L19
L18:
.dbline 56
.dbline 56
ldi R24,1
sts _Key_Up,R24
.dbline 57
ldi R16,<_Data
ldi R17,>_Data
rcall _Display
.dbline 57
L19:
.dbline 55
sbis 0x16,0
rjmp L18
rjmp L22
L21:
.dbline 59
.dbline 59
ldi R24,1
sts _Key_Down,R24
.dbline 60
ldi R16,<_Data
ldi R17,>_Data
rcall _Display
.dbline 60
L22:
.dbline 58
; {Key_Up=1;
; Display(Data);}
; while((PINB&0x02)==0) //若S2按下，置位減計數標志；
sbis 0x16,1
rjmp L21
.dbline -2
.dbline 61
; {Key_Down=1;
; Display(Data);}
; }
L17:
.dbline 0 ; func end
ret
.dbend
.dbfunc e main _main fV
; I -> <dead>
.even
_main::
.dbline -1
.dbline 64
;
; void main(void)
; {uchar I;
.dbline 65
; Init_IO(); //初始化I/O口
rcall _Init_IO
.dbline 66
; PORTA=0xff; //點亮測試所有的數碼管
ldi R24,255
out 0x1b,R24
.dbline 67
; PORTC=0x00;
clr R2
out 0x15,R2
.dbline 68
; DelayMs(3000); //延時
ldi R16,3000
ldi R17,11
rcall _DelayMs
.dbline 69
; PORTC=0xff; //數碼管熄滅，進入計數狀態
ldi R24,255
out 0x15,R24
rjmp L26
L25:
.dbline 71
; while(1)
; {Get_Key(); //按鍵掃描
.dbline 71
rcall _Get_Key
.dbline 72
; if(Key_Up==1) //加計數處理
lds R24,_Key_Up
cpi R24,1
brne L28
.dbline 73
; {if(CNT!=9999) //條件判斷是否計數到9999
.dbline 73
lds R24,_CNT
lds R25,_CNT+1
cpi R24,15
ldi R30,39
cpc R25,R30
breq L30
.dbline 74
; {CNT=CNT+1; //計數值加1
.dbline 74
adiw R24,1
sts _CNT+1,R25
sts _CNT,R24
.dbline 75
; Key_Up=0;} //加計數標志復位
clr R2
sts _Key_Up,R2
.dbline 75
L30:
.dbline 76
; }
L28:
.dbline 77
; if(Key_Down==1) //減計數處理
lds R24,_Key_Down
cpi R24,1
brne L32
.dbline 78
; {if(CNT!=0) //條件判斷是否計數到0000
.dbline 78
lds R2,_CNT
lds R3,_CNT+1
tst R2
brne X2
tst R3
breq L34
X2:
.dbline 79
; {CNT=CNT-1; //計數值減一
.dbline 79
lds R24,_CNT
lds R25,_CNT+1
sbiw R24,1
sts _CNT+1,R25
sts _CNT,R24
.dbline 80
; Key_Down=0;} //減計數標志復位
clr R2
sts _Key_Down,R2
.dbline 80
L34:
.dbline 81
; }
L32:
.dbline 82
ldi R18,<_Data
ldi R19,>_Data
lds R16,_CNT
lds R17,_CNT+1
rcall _Process
.dbline 83
ldi R16,<_Data
ldi R17,>_Data
rcall _Display
.dbline 84
L26:
.dbline 70
rjmp L25
X3:
.dbline -2
.dbline 85
; Process(CNT,Data); //計數值處理
; Display(Data); //動態掃描顯示
; }
; }
L24:
.dbline 0 ; func end
ret
.dbsym l I 1 c
.dbend
.area bss(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\張軍\AVR\AVR單片機系統開發實例稿\第二章\第二章程序\IO端口的C語言編程\數碼管顯示設計\Counter.C
_Key_Down::
.blkb 1
.dbsym e Key_Down _Key_Down c
_Key_Up::
.blkb 1
.dbsym e Key_Up _Key_Up c
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -