?? adc.s
字號:
.module adc.c
.area text(rom, con, rel)
.dbfile ./74164.h
.dbfunc e write164 _write164 fV
; ch -> R20
; i -> R22
; x -> R16
.even
_write164::
rcall push_gset2
.dbline -1
.dbline 2
; //ICC-AVR application builder : 2005-3-1 22:02:29
; // Target : M8
.dbline 5
; // Crystal: 8.0000Mhz
;
; #include <iom8v.h>
mov R20,R16
.dbline 6
; #include <macros.h>
cbi 0x18,0
.dbline 7
; #include <74164.h>
cbi 0x12,6
.dbline 8
clr R22
rjmp L5
L2:
.dbline 8
;
.dbline 9
; unsigned char display[4]; // 顯示緩沖區
sbrs R20,7
rjmp L6
.dbline 10
; unsigned char dis; // 當前顯示
sbi 0x12,7
rjmp L7
L6:
.dbline 12
; unsigned int adc; // 保存AD轉換的值
; unsigned char time; // AD轉換的時間間隔
cbi 0x12,7
L7:
.dbline 13
lsl R20
.dbline 14
sbi 0x12,6
.dbline 15
nop
.dbline 16
cbi 0x12,6
.dbline 17
L3:
.dbline 8
inc R22
L5:
.dbline 8
cpi R22,8
brlo L2
.dbline 18
;
;
; //TIMER0 initialisation - prescale:256
; // WGM: Normal
; // desired value: 5mSec
; // actual value: 4.992mSec (0.2%)
sbi 0x18,0
.dbline -2
.dbline 19
; void timer0_init(void)
L1:
rcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r ch 20 c
.dbsym r i 22 c
.dbsym r x 16 c
.dbend
.dbfile D:\job\avrtest\web\example\ad\adc.c
.dbfunc e timer0_init _timer0_init fV
.even
_timer0_init::
.dbline -1
.dbline 20
; {
.dbline 21
; TCCR0 = 0x00; //stop
clr R2
out 0x33,R2
.dbline 22
; TCNT0 = 0x64; //set count
ldi R24,100
out 0x32,R24
.dbline 23
; TCCR0 = 0x04; //start timer
ldi R24,4
out 0x33,R24
.dbline -2
.dbline 24
; }
L8:
.dbline 0 ; func end
ret
.dbend
.area vector(rom, abs)
.org 18
rjmp _timer0_ovf_isr
.area text(rom, con, rel)
.dbfile D:\job\avrtest\web\example\ad\adc.c
.dbfunc e timer0_ovf_isr _timer0_ovf_isr fV
.even
_timer0_ovf_isr::
rcall push_lset
rcall push_gset1
.dbline -1
.dbline 28
;
; #pragma interrupt_handler timer0_ovf_isr:10
; void timer0_ovf_isr(void)
; {
.dbline 29
; TCNT0 = 0x64; //reload counter value
ldi R24,100
out 0x32,R24
.dbline 31
; // ad
; if(++time == 40){
lds R24,_time
subi R24,255 ; addi 1
mov R2,R24
sts _time,R2
cpi R24,40
breq X2
rjmp L10
X2:
.dbline 31
.dbline 32
; time = 0;
clr R2
sts _time,R2
.dbline 33
; ADCSR = 0xC6; // 開始轉換
ldi R24,198
out 0x6,R24
L12:
.dbline 34
L13:
.dbline 34
; while(!(ADCSR & 0x10)); // 等待轉換完成
sbis 0x6,4
rjmp L12
.dbline 35
; adc = ADCL;
in R2,0x4
clr R3
sts _adc+1,R3
sts _adc,R2
.dbline 36
; adc |= (int)(ADCH << 8); // 注意順序
in R2,0x5
clr R3
mov R3,R2
clr R2
lds R4,_adc
lds R5,_adc+1
or R4,R2
or R5,R3
sts _adc+1,R5
sts _adc,R4
.dbline 37
; ADCSR = 0x10; // 停止
ldi R24,16
out 0x6,R24
.dbline 38
; display[0] = adc%10;
ldi R18,10
ldi R19,0
movw R16,R4
rcall mod16u
sts _display,R16
.dbline 39
; adc = adc / 10;
ldi R18,10
ldi R19,0
lds R16,_adc
lds R17,_adc+1
rcall div16u
sts _adc+1,R17
sts _adc,R16
.dbline 40
; display[1] = adc%10;
ldi R18,10
ldi R19,0
rcall mod16u
sts _display+1,R16
.dbline 41
; adc = adc / 10;
ldi R18,10
ldi R19,0
lds R16,_adc
lds R17,_adc+1
rcall div16u
sts _adc+1,R17
sts _adc,R16
.dbline 42
; display[2] = adc%10;
ldi R18,10
ldi R19,0
rcall mod16u
sts _display+2,R16
.dbline 43
; adc = adc / 10;
ldi R18,10
ldi R19,0
lds R16,_adc
lds R17,_adc+1
rcall div16u
sts _adc+1,R17
sts _adc,R16
.dbline 44
; display[3] = adc%10;
ldi R18,10
ldi R19,0
rcall mod16u
sts _display+3,R16
.dbline 45
; }
L10:
.dbline 48
lds R20,_dis
clr R21
cpi R20,0
cpc R20,R21
breq L21
X0:
cpi R20,1
ldi R30,0
cpc R21,R30
breq L22
cpi R20,2
ldi R30,0
cpc R21,R30
breq L23
cpi R20,3
ldi R30,0
cpc R21,R30
breq L24
rjmp L18
X1:
.dbline 48
; // end ad
; // display
; switch(dis){
L21:
.dbline 49
; case 0: write164(display[dis] | 0x70); break;
ldi R24,<_display
ldi R25,>_display
lds R30,_dis
clr R31
add R30,R24
adc R31,R25
ldd R16,z+0
ori R16,112
rcall _write164
.dbline 49
rjmp L19
L22:
.dbline 50
; case 1: write164(display[dis] | 0xB0); break;
ldi R24,<_display
ldi R25,>_display
lds R30,_dis
clr R31
add R30,R24
adc R31,R25
ldd R16,z+0
ori R16,176
rcall _write164
.dbline 50
rjmp L19
L23:
.dbline 51
; case 2: write164(display[dis] | 0xD0); break;
ldi R24,<_display
ldi R25,>_display
lds R30,_dis
clr R31
add R30,R24
adc R31,R25
ldd R16,z+0
ori R16,208
rcall _write164
.dbline 51
rjmp L19
L24:
.dbline 52
; case 3: write164(display[dis] | 0xE0); break;
ldi R24,<_display
ldi R25,>_display
lds R30,_dis
clr R31
add R30,R24
adc R31,R25
ldd R16,z+0
ori R16,224
rcall _write164
.dbline 52
L18:
L19:
.dbline 54
lds R24,_dis
subi R24,255 ; addi 1
mov R2,R24
sts _dis,R2
ldi R24,3
cp R24,R2
brsh L25
.dbline 54
clr R2
sts _dis,R2
L25:
.dbline -2
.dbline 56
; }
; if(++dis > 3) dis = 0;
; //end display
; }
L9:
rcall pop_gset1
rcall pop_lset
.dbline 0 ; func end
reti
.dbend
.dbfunc e adc_init _adc_init fV
.even
_adc_init::
.dbline -1
.dbline 61
;
; //ADC initialisation
; // Conversion time: 13uS
; void adc_init(void)
; {
.dbline 62
; ADCSR = 0x00; //disable adc
clr R2
out 0x6,R2
.dbline 63
; ADMUX = 0x00; //select adc input 0
out 0x7,R2
.dbline 64
; ACSR = 0x80;
ldi R24,128
out 0x8,R24
.dbline 65
; ADCSR = 0x83;
ldi R24,131
out 0x6,R24
.dbline -2
.dbline 66
; }
L27:
.dbline 0 ; func end
ret
.dbend
.dbfunc e init_devices _init_devices fV
.even
_init_devices::
.dbline -1
.dbline 70
;
; //call this routine to initialise all peripherals
; void init_devices(void)
; {
.dbline 72
; //stop errant interrupts until set up
; CLI(); //disable all interrupts
cli
.dbline 73
; DDRB = 0x01; // 初始化操作74LS164的管腳
ldi R24,1
out 0x17,R24
.dbline 74
; DDRD = 0xC0; // 初始化操作74LS164的管腳
ldi R24,192
out 0x11,R24
.dbline 75
; DDRC = 0x00;
clr R2
out 0x14,R2
.dbline 76
; timer0_init();
rcall _timer0_init
.dbline 77
; adc_init();
rcall _adc_init
.dbline 79
;
; MCUCR = 0x00;
clr R2
out 0x35,R2
.dbline 80
; GICR = 0x00;
out 0x3b,R2
.dbline 81
; TIMSK = 0x01; //timer interrupt sources
ldi R24,1
out 0x39,R24
.dbline 82
; SEI(); //re-enable interrupts
sei
.dbline -2
.dbline 84
; //all peripherals are now initialised
; }
L28:
.dbline 0 ; func end
ret
.dbend
.dbfunc e main _main fV
.even
_main::
.dbline -1
.dbline 88
;
; //
; void main(void)
; {
.dbline 89
; init_devices();
rcall _init_devices
L30:
.dbline 91
L31:
.dbline 91
rjmp L30
X3:
.dbline -2
.dbline 92
; //insert your functional code here...
; while(1);
; }
L29:
.dbline 0 ; func end
ret
.dbend
.area bss(ram, con, rel)
.dbfile D:\job\avrtest\web\example\ad\adc.c
_time::
.blkb 1
.dbsym e time _time c
_adc::
.blkb 2
.dbsym e adc _adc i
_dis::
.blkb 1
.dbsym e dis _dis c
_display::
.blkb 4
.dbsym e display _display A[4:4]c
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -