📄 1602test.s
字号:
cpi R24,10
brsh L40
.dbline 171
; *g+=0x30;
subi R24,208 ; addi 48
std z+0,R24
xjmp L41
L40:
.dbline 172
movw R30,R20
ldd R24,z+0
subi R24,201 ; addi 55
std z+0,R24
L41:
.dbline -2
.dbline 173
; else *g+=0x37;
; }
L33:
xcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r g 20 pc
.dbsym r dt_meas 22 i
.dbend
.dbfunc e filter _filter fV
; q -> <dead>
; wendu -> R20
; phillp -> R10,R11
; ad_temp -> y+0
; y -> R12
; maj -> R22
.even
_filter::
xcall push_gset4
mov R22,R16
sbiw R28,36
.dbline -1
.dbline 176
;
; void filter(unsigned char maj)
; { unsigned char *q,y,wendu;
.dbline 177
; unsigned int ad_temp[18],phillp=0;
clr R10
clr R11
.dbline 178
; if(maj!=8)
cpi R22,8
brne X1
xjmp L43
X1:
.dbline 179
; {
.dbline 180
; ADMUX=0x40+maj;
mov R24,R22
subi R24,192 ; addi 64
out 0x7,R24
.dbline 181
; ADCSRA=(1<<ADEN)|(1<<ADSC)|(1<<ADPS2)|(1<<ADPS1) ;//64分频
ldi R24,198
out 0x6,R24
.dbline 182
; for(y=0;y<=16;y++)
clr R12
xjmp L48
L45:
.dbline 183
; { ADCSRA |= 0x40; // Start a new A/D conversion
.dbline 183
sbi 0x6,6
L49:
.dbline 184
L50:
.dbline 184
sbis 0x6,4
rjmp L49
.dbline 185
ldi R24,2
mul R24,R12
movw R30,R0
movw R24,R28
add R30,R24
adc R31,R25
in R24,0x4
in R25,0x5
andi R25,3
std z+1,R25
std z+0,R24
.dbline 186
L46:
.dbline 182
inc R12
L48:
.dbline 182
ldi R24,16
cp R24,R12
brsh L45
.dbline 187
; while (!(ADCSRA & (1<<ADIF))); // wait until ADC is ready
; ad_temp[y]=ADC&0X3FF;
; }
; for(y=6;y<=13;y++)
ldi R24,6
mov R12,R24
xjmp L55
L52:
.dbline 188
ldi R24,2
mul R24,R12
movw R30,R0
movw R24,R28
add R30,R24
adc R31,R25
ldd R2,z+0
ldd R3,z+1
add R10,R2
adc R11,R3
L53:
.dbline 187
inc R12
L55:
.dbline 187
ldi R24,13
cp R24,R12
brsh L52
.dbline 189
; phillp+=ad_temp[y];
; adc_rel=phillp/32;
ldi R18,5
ldi R19,0
movw R16,R10
xcall lsr16
sts _adc_rel+1,R17
sts _adc_rel,R16
.dbline 190
; y=adc_rel;
mov R12,R16
.dbline 191
; wendu=t_per[y];
ldi R24,<_t_per
ldi R25,>_t_per
mov R30,R12
clr R31
add R30,R24
adc R31,R25
lpm R20,Z
.dbline 193
; //y=dypass[maj].ad_samp;
; }
xjmp L44
L43:
.dbline 194
; else {
.dbline 195
; channel=PORTD;
in R2,0x12
sts _channel,R2
.dbline 196
; adc_rel=(unsigned int)channel;
clr R3
sts _adc_rel+1,R3
sts _adc_rel,R2
.dbline 197
; dypass[maj].ad_samp=adc_rel;
ldi R24,15
mul R24,R22
movw R30,R0
ldi R24,<_dypass
ldi R25,>_dypass
add R30,R24
adc R31,R25
lds R2,_adc_rel
lds R3,_adc_rel+1
std z+1,R3
std z+0,R2
.dbline 198
; }
L44:
.dbline 201
; // dypass[maj].class_data[0]=" ";
; //dypass[maj].class_data[1]=" ";
; dypass[maj].class_data[2]=0x30+wendu/16;
ldi R24,15
mul R24,R22
movw R30,R0
ldi R24,<_dypass+8+2
ldi R25,>_dypass+8+2
add R30,R24
adc R31,R25
mov R24,R20
swap R24
andi R24,#0x0F
subi R24,208 ; addi 48
std z+0,R24
.dbline 202
; dypass[maj].class_data[3]=0x30+wendu%16;
ldi R24,15
mul R24,R22
movw R30,R0
ldi R24,<_dypass+8+3
ldi R25,>_dypass+8+3
add R30,R24
adc R31,R25
ldi R17,16
mov R16,R20
xcall mod8u
mov R24,R16
subi R24,208 ; addi 48
std z+0,R24
.dbline -2
.dbline 204
;
; }
L42:
adiw R28,36
xcall pop_gset4
.dbline 0 ; func end
ret
.dbsym l q 1 pc
.dbsym r wendu 20 c
.dbsym r phillp 10 i
.dbsym l ad_temp 0 A[36:18]i
.dbsym r y 12 c
.dbsym r maj 22 c
.dbend
.dbfunc e vfd_init _vfd_init fV
.even
_vfd_init::
.dbline -1
.dbline 208
; /*------------------------------------液晶驱动函数-------------------------------------*/
; //液晶初始化
; void vfd_init(void)
; {
.dbline 209
; delay_nms(15);
ldi R16,15
ldi R17,0
xcall _delay_nms
.dbline 210
; vfd_write_command(0x38,0);//显示模式设置三次(此时不管vfd空闲与否)
clr R18
ldi R16,56
xcall _vfd_write_command
.dbline 211
; delay_nms(5);
ldi R16,5
ldi R17,0
xcall _delay_nms
.dbline 212
; vfd_write_command(0x38,0);
clr R18
ldi R16,56
xcall _vfd_write_command
.dbline 213
; delay_nms(5);
ldi R16,5
ldi R17,0
xcall _delay_nms
.dbline 214
; vfd_write_command(0x38,0);
clr R18
ldi R16,56
xcall _vfd_write_command
.dbline 215
; delay_nms(5);
ldi R16,5
ldi R17,0
xcall _delay_nms
.dbline 217
;
; vfd_write_command(0x38,1);//显示模式设置(从此之后均需vfd空闲)
ldi R18,1
ldi R16,56
xcall _vfd_write_command
.dbline 218
; vfd_write_command(0x08,1);//显示关闭
ldi R18,1
ldi R16,8
xcall _vfd_write_command
.dbline 219
; vfd_write_command(0x01,1);//显示清屏
ldi R18,1
ldi R16,1
xcall _vfd_write_command
.dbline 220
; vfd_write_command(0x06,1);//显示光标移动设置
ldi R18,1
ldi R16,6
xcall _vfd_write_command
.dbline 221
; vfd_write_command(0x0c,1);//显示开及光标设置
ldi R18,1
ldi R16,12
.dbline -2
.dbline 222
; }
L60:
.dbline 0 ; func end
xjmp _vfd_write_command
.dbend
.dbfunc e vfd_write_command _vfd_write_command fV
; wait_en -> R22
; command -> R20
.even
_vfd_write_command::
xcall push_gset2
mov R22,R18
mov R20,R16
.dbline -1
.dbline 225
; //写指令函数: E=高脉冲 RS=0 RW=0
; void vfd_write_command(unsigned char command,unsigned char wait_en)//command为指令，wait_en指定是否要检测VFD忙信号
; {
.dbline 226
; if(wait_en)wait_enable();//若wait_en为1，则要检测VFD忙信号，等待其空闲
tst R22
breq L62
.dbline 226
xcall _wait_enable
L62:
.dbline 227
; vfd_control_port&=~vfd_RS;//RS=0
cbi 0x12,5
.dbline 228
; vfd_control_port&=~vfd_RW;//RW=0
cbi 0x12,7
.dbline 229
; vfd_control_port&=~vfd_EN;//E=0,下面给VFD一个高脉冲
cbi 0x12,6
.dbline 230
; NOP();
nop
.dbline 231
; vfd_control_port|=vfd_EN;//E=1
sbi 0x12,6
.dbline 232
; vfd_data_port=command;
out 0x18,R20
.dbline 233
; vfd_control_port&=~vfd_EN;//重设E=0
cbi 0x12,6
.dbline -2
.dbline 234
; }
L61:
xcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r wait_en 22 c
.dbsym r command 20 c
.dbend
.dbfunc e vfd_write_data _vfd_write_data fV
; char_data -> R20
.even
_vfd_write_data::
xcall push_gset1
mov R20,R16
.dbline -1
.dbline 237
; //写数据函数: E =高脉冲 RS=1 RW=0
; void vfd_write_data(unsigned char char_data)
; {
.dbline 238
; wait_enable();//等待VFD空闲
xcall _wait_enable
.dbline 239
; vfd_control_port|=vfd_RS;//RS=1
sbi 0x12,5
.dbline 240
; vfd_control_port&=~vfd_RW;//RW=0
cbi 0x12,7
.dbline 242
;
; vfd_control_port&=~vfd_EN;//E=0,下面给VFD一个高脉冲
cbi 0x12,6
.dbline 243
; NOP();
nop
.dbline 244
; vfd_control_port|=vfd_EN;//E=1
sbi 0x12,6
.dbline 245
; vfd_data_port=char_data;
out 0x18,R20
.dbline 246
; vfd_control_port&=~vfd_EN;//重设E=0
cbi 0x12,6
.dbline -2
.dbline 247
; }
L64:
xcall pop_gset1
.dbline 0 ; func end
ret
.dbsym r char_data 20 c
.dbend
.dbfunc e wait_enable _wait_enable fV
.even
_wait_enable::
.dbline -1
.dbline 251
; //正常读写操作之前必须检测VFD控制器状态:E=1 RS=0 RW=1;DB7: 0 VFD控制器空闲，1 VFD控制器忙。
; //检测忙信号,等待VFD空闲函数
; void wait_enable(void)
; {
.dbline 253
; //delay_nms(10);
; vfd_busy_ddr&=~busy;//设置busy口为输入
cbi 0x17,7
.dbline 254
; vfd_control_port&=~vfd_RS;//RS=0
cbi 0x12,5
.dbline 255
; vfd_control_port|=vfd_RW;//RW=1
sbi 0x12,7
.dbline 256
; NOP();
nop
.dbline 257
; vfd_control_port|=vfd_EN;//E=1
sbi 0x12,6
L66:
.dbline 258
L67:
.dbline 258
; while(vfd_busy_pin&busy);//等待VFD_DB7为0
sbic 0x16,7
rjmp L66
.dbline 259
; vfd_control_port&=~vfd_EN;//重设E=0
cbi 0x12,6
.dbline 260
; vfd_busy_ddr|=busy;//设置busy口为输出
sbi 0x17,7
.dbline -2
.dbline 261
; }
L65:
.dbline 0 ; func end
ret
.dbend
.dbfunc e display_a_char _display_a_char fV
; position_tem -> R22
; char_data -> R20
; position -> R10
.even
_display_a_char::
xcall push_gset3
mov R20,R18
mov R10,R16
.dbline -1
.dbline 265
; //指定位置显示一个字符:第一行位置0~15,第二行16~31
; //显示一个字符函数
; void display_a_char(unsigned char position,unsigned char char_data)//参数position指定位置0~31,char_data为要显示的字符
; {
.dbline 267
; unsigned char position_tem;
; if(position>=0x10)
mov R24,R10
cpi R24,16
brlo L70
.dbline 268
; position_tem=position+0xb0;
mov R22,R24
subi R22,80 ; addi 176
xjmp L71
L70:
.dbline 270
; else
; position_tem=position+0x80;
mov R22,R10
subi R22,128 ; addi 128
L71:
.dbline 271
; vfd_write_command(position_tem,1);
ldi R18,1
mov R16,R22
xcall _vfd_write_command
.dbline 272
; vfd_write_data(char_data);
mov R16,R20
xcall _vfd_write_data
.dbline -2
.dbline 273
; }
L69:
xcall pop_gset3
.dbline 0 ; func end
ret
.dbsym r position_tem 22 c
.dbsym r char_data 20 c
.dbsym r position 10 c
.dbend
.dbfunc e d_a_s _d_a_s fV
; col_tem -> R20
; i -> R22
; ptr -> R10,R11
; col -> R20
.even
_d_a_s::
xcall push_gset3
movw R10,R18
mov R20,R16
.dbline -1
.dbline 277
; //指定一行显示连续字符串:0显示在第一行,1显示在第二行,注字符串不能长于16个字符
; //显示一行连续字符串函数
; void d_a_s(unsigned char col,unsigned char *ptr)//参数col指定行,*ptr指字符串数组的首指针
; {
.dbline 279
; unsigned char col_tem,i;
; col_tem=col<<4;//若col为1(即在VFD第二行显示字符串),先把col左移4位,使显示字符的首位置改到第二行首位,即位置16
mov R24,R20
andi R24,#0x0F
swap R24
mov R20,R24
.dbline 280
; for(i=0;i<16;i++)
clr R22
xjmp L76
L73:
.dbline 281
mov R30,R22
clr R31
add R30,R10
adc R31,R11
ldd R18,z+0
mov R2,R20
subi R20,255 ; addi 1
mov R16,R2
xcall _display_a_char
L74:
.dbline 280
inc R22
L76:
.dbline 280
cpi R22,16
brlo L73
.dbline -2
.dbline 282
; display_a_char(col_tem++,*(ptr+i));
; }
L72:
xcall pop_gset3
.dbline 0 ; func end
ret
.dbsym r col_tem 20 c
.dbsym r i 22 c
.dbsym r ptr 10 pc
.dbsym r col 20 c
.dbend
.dbfunc e display_a_ch_r _display_a_ch_r fV
; position_tem -> R20
; char_data -> R22
; position -> R10
.even
_display_a_ch_r::
xcall push_gset3
mov R22,R18
mov R10,R16
.dbline -1
.dbline 285
; //光标定位子程序
; void display_a_ch_r(unsigned char position,unsigned char char_data)//参数position指定位置0~31,char_data为要显示的字符
; {
.dbline 287
; unsigned char position_tem;
; if(position>=0x10)
mov R24,R10
cpi R24,16
brlo L78
.dbline 288
; position_tem=position+0xb0;
mov R20,R24
subi R20,80 ; addi 176
xjmp L79
L78:
.dbline 290
; else
; position_tem=position+0x80;
mov R20,R10
subi R20,128 ; addi 128
L79:
.dbline 291
; vfd_write_command(position_tem,1);
ldi R18,1
mov R16,R20
xcall _vfd_write_command
.dbline 292
; vfd_write_data(char_data);
mov R16,R22
xcall _vfd_write_data
.dbline 293
; vfd_write_command(position_tem,1);
ldi R18,1
mov R16,R20
xcall _vfd_write_command
.dbline -2
.dbline 294
; }
L77:
xcall pop_gset3
.dbline 0 ; func end
ret
.dbsym r position_tem 20 c
.dbsym r char_data 22 c
.dbsym r position 10 c
.dbend
.dbfunc e delay_1ms _delay_1ms fV
; i -> R16,R17
.even
_delay_1ms::
.dbline -1
.dbline 298
; /*---------------------------------------延时函数-------------------------------------*/
; //1ms延时函数
; void delay_1ms(void)
; {
.dbline 300
clr R16
clr R17
xjmp L84
L81:
.dbline 300
L82:
.dbline 300
subi R16,255 ; offset = 1
sbci R17,255
L84:
.dbline 300
; unsigned int i;
; for(i=0;i<600;i++);
cpi R16,88
ldi R30,2
cpc R17,R30
brlo L81
.dbline -2
.dbline 301
; }
L80:
.dbline 0 ; func end
ret
.dbsym r i 16 i
.dbend
.dbfunc e delay_nms _delay_nms fV
; i -> R20,R21
; n -> R22,R23
.even
_delay_nms::
xcall push_gset2
movw R22,R16
.dbline -1
.dbline 304
; //n ms延时函数
; void delay_nms(unsigned int n)
; {
.dbline 306
clr R20
clr R21
xjmp L89
L86:
.dbline 306
xcall _delay_1ms
L87:
.dbline 306
subi R20,255 ; offset = 1
sbci R21,255
L89:
.dbline 306
; unsigned int i;
; for(i=0;i<n;i++)delay_1ms();
cp R20,R22
cpc R21,R23
brlo L86
.dbline -2
.dbline 307
; }
L85:
xcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r i 20 i
.dbsym r n 22 i
.dbend
.area bss(ram, con, rel)
.dbfile D:\医疗电子采样板\1602test\1602test.c
_channel::
.blkb 1
.dbsym e channel _channel c
_point::
.blkb 2
.dbsym e point _point pc
_meas_coun::
.blkb 1
.dbsym e meas_coun _meas_coun c
_rece_coun::
.blkb 1
.dbsym e rece_coun _rece_coun c
_hex_meas::
.blkb 5
.dbsym e hex_meas _hex_meas A[5:5]c
_adc_meas::
.blkb 20
.dbsym e adc_meas _adc_meas A[20:20]c
_sin::
.blkb 2
.dbsym e sin _sin i
_adc_old::
.blkb 2
.dbsym e adc_old _adc_old i
_adc_rel::
.blkb 2
.dbsym e adc_rel _adc_rel i
_i::
.blkb 1
.dbsym e i _i c
_adc_mux::
.blkb 1
.dbsym e adc_mux _adc_mux c
_dypass::
.blkb 135
.dbsym e dypass _dypass A[135:9]X
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -