📄 adc-1602.s
字号:
; {
.dbline 174
; t = *pBuffer;
movw R30,R20
elpm R10,Z
.dbline 175
; PORTD = t;
out 0x12,R10
.dbline 176
; PORTA|=(1<<EN);
sbi 0x1b,7
.dbline 177
; s_ms(50);
ldi R16,50
ldi R17,0
xcall _s_ms
.dbline 178
; PORTA&=~(1<<EN);
cbi 0x1b,7
.dbline 179
; pBuffer++;
subi R20,255 ; offset = 1
sbci R21,255
.dbline 180
; }
L25:
.dbline 172
inc R22
L27:
.dbline 172
cpi R22,16
brlo L24
X4:
.dbline -2
L19:
.dbline 0 ; func end
xjmp pop_xgsetF00C
.dbsym r t 10 c
.dbsym r i 22 c
.dbsym r pBuffer 20 pkc
.dbend
.dbfunc e WriteNum _WriteNum fV
; num -> R20,R21
; col -> R10,R11
; row -> R22,R23
.even
_WriteNum::
xcall push_xgsetF00C
movw R10,R18
movw R22,R16
ldd R20,y+6
ldd R21,y+7
.dbline -1
.dbline 190
; }
; //====================================================
; // 描述：在任意位置写数字函数
; // 入口：’row‘表示要写数字所在的行地址，只能为1或2
; // ’col‘表示要写数字所在的列地址，只能为0--15
; // ‘num’表示要写的数字，只能为0--9
; // 出口：无
; //===================================================
; void WriteNum(uint row,uint col,uint num)
; {
.dbline 191
; if (row == 1) row = 0x80 + col;
cpi R22,1
ldi R30,0
cpc R23,R30
brne L29
X5:
.dbline 191
movw R22,R10
subi R22,128 ; offset = 128
sbci R23,255
xjmp L30
L29:
.dbline 192
; else row = 0xC0 + col;
movw R22,R10
subi R22,64 ; offset = 192
sbci R23,255
L30:
.dbline 193
; writecom(row);
mov R16,R22
xcall _writecom
.dbline 194
; if (num<=0 | num>9) num =0x30;
cpi R20,0
cpc R20,R21
brne L33
X6:
ldi R24,1
ldi R25,0
movw R10,R24
xjmp L34
L33:
clr R10
clr R11
L34:
ldi R24,9
ldi R25,0
cp R24,R20
cpc R25,R21
brsh L35
X7:
ldi R22,1
ldi R23,0
xjmp L36
L35:
clr R22
clr R23
L36:
movw R2,R10
or R2,R22
or R3,R23
tst R2
brne X8
tst R3
breq L31
X8:
.dbline 194
ldi R20,48
ldi R21,0
xjmp L32
L31:
.dbline 195
; else num = 0x30 + num;
subi R20,208 ; offset = 48
sbci R21,255
L32:
.dbline 197
;
; PORTA|=(1<<RS);
sbi 0x1b,5
.dbline 198
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 199
; PORTA&=~(1<<RW);
cbi 0x1b,6
.dbline 200
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 201
; PORTD = num;
out 0x12,R20
.dbline 202
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 203
; PORTA|=(1<<EN);
sbi 0x1b,7
.dbline 204
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 205
; PORTA&=~(1<<EN);
cbi 0x1b,7
.dbline 206
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline -2
L28:
.dbline 0 ; func end
xjmp pop_xgsetF00C
.dbsym r num 20 i
.dbsym r col 10 i
.dbsym r row 22 i
.dbend
.dbfunc e WriteChar _WriteChar fV
; t -> R12
; i -> R10
; pBuffer -> R20,R21
; num -> y+8
; col -> R10
; row -> R22
.even
_WriteChar::
xcall push_xgsetF03C
mov R10,R18
mov R22,R16
ldd R20,y+10
ldd R21,y+11
.dbline -1
.dbline 216
; }
; //================================================================
; // 描述：在任意位置写任意多个字符
; // 入口：’row‘要写的字符所在的行，只能为1或2；
; // ‘col’要写的字符所在的列，只能为0---15
; // ‘num’要写字符的个数
; // ‘pbuffer’要写字符的首地址
; //==================================================================
; void WriteChar(uchar row,uchar col,uint num,uchar *pBuffer)
; {
.dbline 218
; uchar i,t;
; if (row == 1) row = 0x80 + col;
cpi R22,1
brne L38
X9:
.dbline 218
mov R22,R10
subi R22,128 ; addi 128
xjmp L39
L38:
.dbline 219
; else row = 0xC0 + col;
mov R22,R10
subi R22,64 ; addi 192
L39:
.dbline 220
; writecom(row);
mov R16,R22
xcall _writecom
.dbline 224
; //if (num<=0 | num>9) num =0x30;
; //else num = 0x30 + num;
;
; PORTA|=(1<<RS);
sbi 0x1b,5
.dbline 225
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 226
; PORTA&=~(1<<RW);
cbi 0x1b,6
.dbline 227
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 228
; for(i=num;i!=0;i--)
ldd R10,y+8
xjmp L43
L40:
.dbline 229
; {
.dbline 230
; t = *pBuffer;
movw R30,R20
ldd R12,z+0
.dbline 231
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 232
; PORTD = t;
out 0x12,R12
.dbline 233
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 234
; PORTA|=(1<<EN);
sbi 0x1b,7
.dbline 235
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 236
; PORTA&=~(1<<EN);
cbi 0x1b,7
.dbline 237
; s_ms(500);
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 238
; pBuffer++;
subi R20,255 ; offset = 1
sbci R21,255
.dbline 239
; }
L41:
.dbline 228
dec R10
L43:
.dbline 228
tst R10
brne L40
X10:
.dbline -2
L37:
.dbline 0 ; func end
xjmp pop_xgsetF03C
.dbsym r t 12 c
.dbsym r i 10 c
.dbsym r pBuffer 20 pc
.dbsym l num 8 i
.dbsym r col 10 c
.dbsym r row 22 c
.dbend
.area data(ram, con, rel)
.dbfile D:\16实验程序\模数转换\adc_1602\1602.h
_adc_0::
.blkb 12
.area idata
.byte 'A,'D,'C,95,48,58,32,46,32,32,'V,0
.area data(ram, con, rel)
.dbfile D:\16实验程序\模数转换\adc_1602\1602.h
.dbfile D:\16实验程序\模数转换\adc_1602\ADC-1602.c
.dbsym e adc_0 _adc_0 A[12:12]c
_adc_1::
.blkb 12
.area idata
.byte 'A,'D,'C,95,49,58,32,46,32,32,'V,0
.area data(ram, con, rel)
.dbfile D:\16实验程序\模数转换\adc_1602\ADC-1602.c
.dbsym e adc_1 _adc_1 A[12:12]c
.area text(rom, con, rel)
.dbfile D:\16实验程序\模数转换\adc_1602\ADC-1602.c
.dbfunc e main _main fI
; adc_h1 -> <dead>
; adc_l1 -> <dead>
; ten_4 -> <dead>
; adc_h0 -> R12,R13
; adc_l0 -> R10,R11
; adc_data1 -> R20,R21
; ten_1 -> R10
; ten_2 -> R12
; adc_data0 -> R22,R23
; ten_3 -> R14
; i -> R20
.even
_main::
sbiw R28,4
.dbline -1
.dbline 16
; //ADC转换程序
; //通过电位器W1来调节ADC0的电压输入
; //采集的电压值用1602液晶显示
; #include<iom16v.h>
; #include <macros.h>
; #include"1602.h"
; #define uchar unsigned char
; #define uint unsigned int
;
; uchar adc_0[]={"ADC_0: . V"};
; uchar adc_1[]={"ADC_1: . V"};
;
; //ADC测试,使用1602显示ADC0和ADC1的值
; //主函数
; main()
; {
.dbline 21
; uchar ten_1,ten_2,ten_3,ten_4,i;
; uint adc_data0,adc_l0,adc_h0,adc_data1,adc_l1,adc_h1;
;
; //初始化端口
; DDRA=0xf0;
ldi R24,240
out 0x1a,R24
.dbline 22
; PORTA=0x00;
clr R2
out 0x1b,R2
.dbline 23
; DDRB=0x00;
out 0x17,R2
.dbline 24
; DDRD=0xff;
ldi R24,255
out 0x11,R24
.dbline 25
; PORTD=0x00;
out 0x12,R2
.dbline 27
; //1602初始化
; LcdInit();
xcall _LcdInit
.dbline 28
; WriteChar(1,2,11,adc_0);
ldi R24,<_adc_0
ldi R25,>_adc_0
std y+3,R25
std y+2,R24
ldi R24,11
ldi R25,0
std y+1,R25
std y+0,R24
ldi R18,2
ldi R16,1
xcall _WriteChar
.dbline 29
; WriteChar(2,2,11,adc_1);
ldi R24,<_adc_1
ldi R25,>_adc_1
std y+3,R25
std y+2,R24
ldi R24,11
ldi R25,0
std y+1,R25
std y+0,R24
ldi R18,2
ldi R16,2
xcall _WriteChar
xjmp L46
L45:
.dbline 32
;
; while(1)
; {
.dbline 34
; //取ADC_0
; ADCSR=0x00;
clr R2
out 0x6,R2
.dbline 35
; ADMUX=0x40;
ldi R24,64
out 0x7,R24
.dbline 36
; ADCSR=(1<<ADEN)|(1<<ADSC)|(1<<ADFR)|0x07; //128分频，连续转换
ldi R24,231
out 0x6,R24
.dbline 37
; s_ms(500); //延时很重要，给出转换的时间
ldi R16,500
ldi R17,1
xcall _s_ms
.dbline 38
; adc_l0=ADCL;
in R10,0x4
clr R11
.dbline 39
; adc_h0=ADCH;
in R12,0x5
clr R13
.dbline 40
; adc_data0=adc_h0<<8|adc_l0;
movw R22,R12
mov R23,R22
clr R22
or R22,R10
or R23,R11
.dbline 41
; adc_data0=adc_data0>>1; //放弃一位的精度
lsr R23
ror R22
.dbline 42
; adc_data0-=35; //修正
subi R22,35
sbci R23,0
.dbline 54
;
; //取ADC_1
; //ADCSR=0x00;
; //ADMUX=0x41;
; //ADCSR=(1<<ADEN)|(1<<ADSC)|(1<<ADFR)|0x07;
; //s_ms(500);
; //adc_l1=ADCL;
; //adc_h1=ADCH;
; //adc_data1=adc_h1<<8|adc_l1;
; //adc_data1=adc_data1>>1;
; //adc_data1-=35;
; adc_data1=500;
ldi R20,500
ldi R21,1
.dbline 57
;
; //显示ADC0
; ten_3=(adc_data0)/100;
ldi R18,100
ldi R19,0
movw R16,R22
xcall div16u
mov R14,R16
.dbline 58
; ten_2=(adc_data0-(ten_3*100))/10;
ldi R24,100
mul R24,R14
movw R16,R22
sub R16,R0
sbc R17,R1
ldi R18,10
ldi R19,0
xcall div16u
mov R12,R16
.dbline 59
; ten_1=adc_data0-(ten_3*100)-ten_2*10;
ldi R24,100
mul R24,R14
mov R10,R22
sub R10,R0
sbc R11,R1
ldi R24,10
mul R24,R12
sub R10,R0
sbc R11,R1
.dbline 60
; WriteNum(1,8,(ten_3));
mov R2,R14
clr R3
std y+1,R3
std y+0,R2
ldi R18,8
ldi R19,0
ldi R16,1
ldi R17,0
xcall _WriteNum
.dbline 61
; WriteNum(1,10,(ten_2));
mov R2,R12
clr R3
std y+1,R3
std y+0,R2
ldi R18,10
ldi R19,0
ldi R16,1
ldi R17,0
xcall _WriteNum
.dbline 62
; WriteNum(1,11,(ten_1));
mov R2,R10
clr R3
std y+1,R3
std y+0,R2
ldi R18,11
ldi R19,0
ldi R16,1
ldi R17,0
xcall _WriteNum
.dbline 65
;
; //显示ADC1
; ten_3=(adc_data1)/100;
ldi R18,100
ldi R19,0
movw R16,R20
xcall div16u
mov R14,R16
.dbline 66
; ten_2=(adc_data1-(ten_3*100))/10;
ldi R24,100
mul R24,R14
movw R16,R20
sub R16,R0
sbc R17,R1
ldi R18,10
ldi R19,0
xcall div16u
mov R12,R16
.dbline 67
; ten_1=adc_data1-(ten_3*100)-ten_2*10;
ldi R24,100
mul R24,R14
mov R10,R20
sub R10,R0
sbc R11,R1
ldi R24,10
mul R24,R12
sub R10,R0
sbc R11,R1
.dbline 68
; WriteNum(2,8,(ten_3));
mov R2,R14
clr R3
std y+1,R3
std y+0,R2
ldi R18,8
ldi R19,0
ldi R16,2
ldi R17,0
xcall _WriteNum
.dbline 69
; WriteNum(2,10,(ten_2));
mov R2,R12
clr R3
std y+1,R3
std y+0,R2
ldi R18,10
ldi R19,0
ldi R16,2
ldi R17,0
xcall _WriteNum
.dbline 70
; WriteNum(2,11,(ten_1));
mov R2,R10
clr R3
std y+1,R3
std y+0,R2
ldi R18,11
ldi R19,0
ldi R16,2
ldi R17,0
xcall _WriteNum
.dbline 72
;
; for(i=0;i<18;i++)
clr R20
xjmp L51
L48:
.dbline 73
; {
.dbline 74
; s_ms(60000);
ldi R16,60000
ldi R17,234
xcall _s_ms
.dbline 75
; }
L49:
.dbline 72
inc R20
L51:
.dbline 72
cpi R20,18
brlo L48
X11:
.dbline 76
; }
L46:
.dbline 31
xjmp L45
X12:
.dbline -2
L44:
.dbline 0 ; func end
adiw R28,4
ret
.dbsym l adc_h1 5 i
.dbsym l adc_l1 5 i
.dbsym l ten_4 5 c
.dbsym r adc_h0 12 i
.dbsym r adc_l0 10 i
.dbsym r adc_data1 20 i
.dbsym r ten_1 10 c
.dbsym r ten_2 12 c
.dbsym r adc_data0 22 i
.dbsym r ten_3 14 c
.dbsym r i 20 c
.dbend
; }
;
;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -