📄 ccapature.s
字号:
.module CCapature.c
.area data(ram, con, rel)
_Flag::
.blkb 1
.area idata
.byte 0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.dbsym e Flag _Flag c
_Table::
.blkb 2
.area idata
.byte 63,6
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 91,'O
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 'f,'m
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 125,7
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 127,'o
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 'w,124
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 57,94
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 'y,'q
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 4
.area idata
.byte 0,0,0,0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.dbsym e Table _Table A[20:20]c
_Data::
.blkb 2
.area idata
.byte 0,0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.blkb 2
.area idata
.byte 0,0
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.dbsym e Data _Data A[4:4]c
_CNT::
.blkb 2
.area idata
.word 100
.area data(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.dbsym e CNT _CNT i
.area text(rom, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
.dbfunc e DelayMs _DelayMs fV
; j -> R20,R21
; i -> R16,R17
.even
_DelayMs::
rcall push_gset1
.dbline -1
.dbline 21
; //***************FileName:Capature.C***************//
; //***************ICCAVR V6.30编译*****************//
;
; #include <io8535v.h>
; #include <macros.h>
; #define uchar unsigned char
; #define uint unsigned int
;
; #define CON 1000 //频率常数定义
; uchar Flag=0; //捕获次数定义
;
; //数码管字型表,对应0,1,2,3,4,5,6,7,8,9,A,b,C,d,E,F//
; uchar Table[20]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
; 0x7f,0x6f,0x77,0x7c,0x39,0x5E,0x79,0x71};
; uchar Data[4]={0,0,0,0}; //显示初始值:0 0 0 0
; uint CNT1; //第一次捕获值
; uint CNT2; //第二此捕获值
; uint CNT=100; //捕获差值
;
; void DelayMs(uint i) //Ms级延时,参数i为延时时间
; {uint j;
.dbline 22
; for(;i!=0;i--)
rjmp L5
L2:
.dbline 23
.dbline 23
ldi R20,2000
ldi R21,7
rjmp L9
L6:
.dbline 23
.dbline 23
.dbline 23
L7:
.dbline 23
subi R20,1
sbci R21,0
L9:
.dbline 23
cpi R20,0
cpc R20,R21
brne L6
X0:
.dbline 23
L3:
.dbline 22
subi R16,1
sbci R17,0
L5:
.dbline 22
cpi R16,0
cpc R16,R17
brne L2
X1:
.dbline -2
.dbline 24
; {for(j=2000;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 Pre_Display _Pre_Display fV
; i -> R20
.even
_Pre_Display::
rcall push_gset1
.dbline -1
.dbline 27
;
; void Pre_Display(void) //预显示函数,数码管显示检测
; {uchar i;
.dbline 28
; for(i=0;i<16;i++)
clr R20
rjmp L14
L11:
.dbline 29
.dbline 29
clr R2
out 0x18,R2
.dbline 30
ldi R24,<_Table
ldi R25,>_Table
mov R30,R20
clr R31
add R30,R24
adc R31,R25
ldd R2,z+0
out 0x1b,R2
.dbline 31
ldi R16,100
ldi R17,0
rcall _DelayMs
.dbline 32
L12:
.dbline 28
inc R20
L14:
.dbline 28
cpi R20,16
brlo L11
.dbline -2
.dbline 33
; {PORTB=0x00;
; PORTA=Table[i];
; DelayMs(100);
; }
; }
L10:
rcall pop_gset1
.dbline 0 ; func end
ret
.dbsym r i 20 c
.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 36
;
; void Display(uchar *p) //动态显示函数,参数p为待显示的数组名
; {uchar i,sel=0x08;
.dbline 36
ldi R20,8
.dbline 37
; for(i=0;i<4;i++)
clr R22
rjmp L19
L16:
.dbline 38
.dbline 38
mov R2,R20
com R2
out 0x15,R2
.dbline 39
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 40
ldi R16,2
ldi R17,0
rcall _DelayMs
.dbline 41
lsr R20
.dbline 42
L17:
.dbline 37
inc R22
L19:
.dbline 37
cpi R22,4
brlo L16
.dbline -2
.dbline 43
; {PORTC=~sel; //选通最右边的数码管
; PORTA=Table[p[i]]; //送字型码
; DelayMs(2); //显示延时
; sel=sel>>1; //移位以显示前一位
; }
; }
L15:
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 HZ _HZ fV
; TEM -> R22,R23
; p -> R20,R21
; i -> R10,R11
.even
_HZ::
rcall push_gset3
mov R20,R18
mov R21,R19
mov R10,R16
mov R11,R17
.dbline -1
.dbline 46
;
; void HZ(uint i,uchar *p)
; {uint TEM;
.dbline 47
; p[0]=CON/i;
ldi R16,1000
ldi R17,3
mov R18,R10
mov R19,R11
rcall div16u
mov R30,R20
mov R31,R21
std z+0,R16
.dbline 48
; TEM=CON%i;
ldi R16,1000
ldi R17,3
mov R18,R10
mov R19,R11
rcall mod16u
mov R22,R16
mov R23,R17
.dbline 49
; TEM=TEM*10;
ldi R16,10
ldi R17,0
mov R18,R22
mov R19,R23
rcall mpy16s
mov R22,R16
mov R23,R17
.dbline 50
; p[1]=TEM/i;
mov R18,R10
mov R19,R11
rcall div16u
mov R30,R20
mov R31,R21
std z+1,R16
.dbline 51
; TEM=TEM%i;
mov R18,R10
mov R19,R11
mov R16,R22
mov R17,R23
rcall mod16u
mov R22,R16
mov R23,R17
.dbline 52
; TEM=TEM*10;
ldi R16,10
ldi R17,0
mov R18,R22
mov R19,R23
rcall mpy16s
mov R22,R16
mov R23,R17
.dbline 53
; p[2]=TEM/i;
mov R18,R10
mov R19,R11
rcall div16u
mov R30,R20
mov R31,R21
std z+2,R16
.dbline 54
; TEM=TEM%i;
mov R18,R10
mov R19,R11
mov R16,R22
mov R17,R23
rcall mod16u
mov R22,R16
mov R23,R17
.dbline 55
; TEM=TEM*10;
ldi R16,10
ldi R17,0
mov R18,R22
mov R19,R23
rcall mpy16s
mov R22,R16
mov R23,R17
.dbline 56
; p[3]=TEM/i;
mov R18,R10
mov R19,R11
rcall div16u
mov R30,R20
mov R31,R21
std z+3,R16
.dbline -2
.dbline 57
; }
L20:
rcall pop_gset3
.dbline 0 ; func end
ret
.dbsym r TEM 22 i
.dbsym r p 20 pc
.dbsym r i 10 i
.dbend
.dbfunc e Init_IO _Init_IO fV
.even
_Init_IO::
.dbline -1
.dbline 60
;
; void Init_IO(void) //初始化I/O口
; {DDRA=0xff; //设置A口为推挽1输出
.dbline 60
ldi R24,255
out 0x1a,R24
.dbline 61
; PORTA=0xff;
out 0x1b,R24
.dbline 62
; DDRC=0xff; //设置C口为推挽1输出
out 0x14,R24
.dbline 63
; PORTC=0xff;
out 0x15,R24
.dbline 64
; DDRD=0x00; //设置D口为带上拉电阻输入
clr R2
out 0x11,R2
.dbline 65
; PORTD=0x00;
out 0x12,R2
.dbline -2
.dbline 66
; }
L21:
.dbline 0 ; func end
ret
.dbend
.dbfunc e Init_Timer1 _Init_Timer1 fV
.even
_Init_Timer1::
.dbline -1
.dbline 69
;
; void Init_Timer1(void) //初始化T/C1的输入捕获中断
; {TIMSK=TIMSK|0x20; //输入捕获使能
.dbline 69
in R24,0x39
ori R24,32
out 0x39,R24
.dbline 70
; TCCR1B=0xC2; //输入捕获噪音使能,下降沿捕获,时钟8分频1uS计数一次。
ldi R24,194
out 0x2e,R24
.dbline 71
; TIFR=0x20; //清中断标志
ldi R24,32
out 0x38,R24
.dbline 72
; SREG=SREG&0x7f; //全局中断关
in R24,0x3f
andi R24,127
out 0x3f,R24
.dbline -2
.dbline 73
; }
L22:
.dbline 0 ; func end
ret
.dbend
.dbfunc e main _main fV
; i -> R20
.even
_main::
.dbline -1
.dbline 76
;
; void main(void)
; {uchar i;
.dbline 77
; Init_IO(); //初始化I/O口
rcall _Init_IO
.dbline 78
; PORTA=0xff; //点亮以测试所有的数码管
ldi R24,255
out 0x1b,R24
.dbline 79
; PORTC=0xf0;
ldi R24,240
out 0x15,R24
.dbline 80
; DelayMs(300);
ldi R16,300
ldi R17,1
rcall _DelayMs
.dbline 81
; PORTC=0xff; //熄灭所有的数码管
ldi R24,255
out 0x15,R24
.dbline 82
; Pre_Display(); //预显示,数码管显示测试
rcall _Pre_Display
.dbline 83
; PORTC=0xff;
ldi R24,255
out 0x15,R24
.dbline 84
; Init_Timer1(); //T/C1初试化
rcall _Init_Timer1
rjmp L25
X2:
.dbline 86
; while(1)
; {
L27:
.dbline 88
.dbline 88
in R24,0x38
ori R24,32
out 0x38,R24
.dbline 89
in R2,0x26
clr R3
sts _CNT+1,R3
sts _CNT,R2
.dbline 90
in R2,0x26
in R3,0x27
sts _CNT2+1,R3
sts _CNT2,R2
.dbline 91
lds R2,_CNT1
lds R3,_CNT1+1
lds R4,_CNT2
lds R5,_CNT2+1
sub R4,R2
sbc R5,R3
sts _CNT+1,R5
sts _CNT,R4
.dbline 92
lds R2,_CNT2
lds R3,_CNT2+1
sts _CNT1+1,R3
sts _CNT1,R2
.dbline 93
lds R24,_Flag
subi R24,255 ; addi 1
sts _Flag,R24
.dbline 93
L28:
.dbline 87
; while(TIFR&0x20) //捕获检测
in R2,0x38
sbrc R2,5
rjmp L27
.dbline 94
; {TIFR|=0x20; //清除捕获标志
; CNT=ICR1L; //CNT暂存
; CNT2=(ICR1H<<8)+ICR1L; //CNT2存放当前捕获值
; CNT=CNT2-CNT1; //CNT存放两次时间差
; CNT1=CNT2; //CNT1存放上次捕获值
; Flag++;} //检测到第一次捕获
; if(Flag==2) //检测到第二此捕获
lds R24,_Flag
cpi R24,2
brne L30
.dbline 95
; {Flag=0; //清除捕获检测标志
.dbline 95
clr R2
sts _Flag,R2
.dbline 96
; HZ(CNT,Data); //数据处理
ldi R18,<_Data
ldi R19,>_Data
lds R16,_CNT
lds R17,_CNT+1
rcall _HZ
.dbline 97
; for(i=0;i<100;i++) //频率显示
clr R20
rjmp L35
L32:
.dbline 98
ldi R16,<_Data
ldi R17,>_Data
rcall _Display
L33:
.dbline 97
inc R20
L35:
.dbline 97
cpi R20,100
brlo L32
.dbline 99
clr R2
clr R3
sts _CNT+1,R3
sts _CNT,R2
.dbline 99
sts _CNT1+1,R3
sts _CNT1,R2
.dbline 99
sts _CNT2+1,R3
sts _CNT2,R2
.dbline 99
L30:
.dbline 99
L25:
.dbline 85
rjmp L28
X3:
.dbline -2
.dbline 100
; Display(Data);
; CNT=0;CNT1=0;CNT2=0;}} //清除捕获值及捕获差值
; }
L23:
.dbline 0 ; func end
ret
.dbsym r i 20 c
.dbend
.area bss(ram, con, rel)
.dbfile C:\DOCUME~1\Administrator\桌面\复件基~1\CCapature.c
_CNT2::
.blkb 2
.dbsym e CNT2 _CNT2 i
_CNT1::
.blkb 2
.dbsym e CNT1 _CNT1 i
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -