利用，红外-霍尔传感测速，4位数码管显示测速-89C51-含C语言及汇编 程序-制作 DIY

sydz

转载自互联网！！！

输入 高低点平即可。
  10个脉冲 记一圈， 4位数码管显示
可以更改程序，改成1个脉冲，一圈，或者2个脉冲一圈 等等

1. #include <REG52.H>
   
2. #define uchar unsigned char
   
3. #define uint unsigned int
   
4. #define ulong unsigned long
   
5. #define LED_DAT P0
   
6. sbit LED_SEG0 = P2^7;
   
7. sbit LED_SEG1 = P2^6;
   
8. sbit LED_SEG2 = P2^5;
   
9. sbit LED_SEG3 = P2^4;
   
10. #define TIME_CYLC 100 //12M晶振，定时器10ms 中断一次 我们1秒计算一次转速 // 1000ms/10ms = 100
    
11. #define PLUS_PER 10 //码盘的齿数 ，这里假定码盘上有10个齿，即传感器检测到10个脉冲，认为1圈
    
12. #define K       1.65   //校准系数
    
13. 
    
14. 
    
15. 
    
16. unsigned char code  table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
    
17. uchar data Disbuf[4];// 显示缓冲区
    
18. uint Tcounter = 0;   //时间计数器
    
19. bit Flag_Fresh = 0; // 刷新标志
    
20. bit Flag_clac = 0; //计算转速标志
    
21. bit Flag_Err = 0; //超量程标志
    
22. 
    
23. void DisplayFresh();//在数码管上显示一个四位数
    
24. 
    
25. void ClacSpeed();//计算转速，并把结果放入数码管缓冲区
    
26. 
    
27. void init_timer();//初始化定时器T0\T1
    
28. 
    
29. void Delay(uint ms);//延时函数
    
30. 
    
31. void it_timer0() interrupt 1 /* interrupt address is 0x000b */
    
32. {
    
33. TF0 = 0;       //定时器 T0用于数码管的动态刷新
    
34. TH0 = 0xC0;   
    
35. TL0 = 0x00;
    
36. Flag_Fresh = 1;
    
37. Tcounter++;
    
38. if(Tcounter>TIME_CYLC)
    
39. { Flag_clac = 1;//周期到，该重新计算转速了
    
40. }
    
41. }
    
42. void it_timer1() interrupt 3 /* interrupt address is 0x001b */
    
43. {
    
44. TF1 = 0;   //定时器T1用于单位时间内收到的脉冲数
    
45.            //要速度不是很快，T1永远不会益处
    
46. Flag_Err = 1;   //如果速度很高，我们应考虑另外一种测速方法：T测速法
    
47.      
    
48. }
    
49. void main(void)
    
50. {
    
51. Disbuf[0] = 0; //开机时，初始化为0000
    
52. Disbuf[1] = 0;
    
53. Disbuf[2] = 0;
    
54. Disbuf[3] = 0;
    
55. init_timer();
    
56. while(1)
    
57. {  
    
58. if(Flag_Fresh)
    
59.    { Flag_Fresh = 0;
    
60.     DisplayFresh();    // 定时刷新数码管显示
    
61.    }
    
62.    if(Flag_clac)
    
63.    { Flag_clac = 0;
    
64.     ClacSpeed(); //计算转速，并把结果放入数码管缓冲区  
    
65.     Tcounter = 0;//周期定时 清零
    
66.     TH1=TL1 = 0x00;//脉冲计数清零
    
67.    
    
68.    }
    
69.   if(Flag_Err)        //超量程处理
    
70.   {
    
71.     Disbuf[0] = 0x9e; //开机时，初始化为0000
    
72.     Disbuf[1] = 0x9e;
    
73.     Disbuf[2] = 0x9e;
    
74.     Disbuf[3] = 0x9e;
    
75.    while(1)
    
76.     { DisplayFresh();//不再测速 等待复位i
    
77.     }
    
78.   }
    
79. 
    
80. }
    
81. }
    
82. 
    
83. //在数码管上显示一个四位数
    
84. void DisplayFresh()
    
85. {
    
86. P2 |= 0xF0;
    
87. LED_SEG0 = 0;
    
88. LED_DAT = table[Disbuf[0]];
    
89. Delay(1);
    
90. P2 |= 0xF0;
    
91. LED_SEG1 = 0;
    
92. LED_DAT = table[Disbuf[1]];
    
93. Delay(1);
    
94. P2 |= 0xF0;
    
95. LED_SEG2 = 0;
    
96. LED_DAT = table[Disbuf[2]];
    
97. Delay(1);
    
98. P2 |= 0xF0;
    
99. LED_SEG3 = 0;
    
100. LED_DAT = table[Disbuf[3]];
     
101. Delay(1);
     
102. P2 |= 0xF0;
     
103. 
     
104. }
     
105. //计算转速，并把结果放入数码管缓冲区
     
106. void ClacSpeed()
     
107. {
     
108. uint speed ;
     
109. uint PlusCounter;
     
110. 
     
111. PlusCounter = TH1*256 + TL1;
     
112. speed =6*PlusCounter/K;      //K是校准系数，如速度不准，调节K的大小
     
113. Disbuf[3] = (speed/1000)%10;  
     
114. Disbuf[2] = (speed/100)%10;
     
115. Disbuf[1] = (speed/10)%10;
     
116. Disbuf[0] = speed%10;
     
117. }
     
118.          
     
119. void init_timer()//初始化定时器T0\T1
     
120. {
     
121. TMOD=0x51; //定时器0工作于定时方式1,定时器1工作于计数方式
     
122. TH0=(65536-10000)/256;
     
123. TL0=(65536-10000)%256; //TO定时时间为10000个周期即10毫秒
     
124. TH1=0x00;
     
125. TL1=0x00;
     
126. ET0=1;                     /* enable timer0 interrupt */
     
127. EA=1;                /* enable interrupts */
     
128. TR0=1;               /* timer0 run */
     
129. ET1=1;                     /* enable timer1 interrupt */
     
130. EA=1;                /* enable interrupts */
     
131. TR1=1;   
     
132. 
     
133. }
     
134. //延时函数
     
135. void Delay(uint ms)
     
136. {
     
137. uchar i;
     
138. while(ms--)
     
139.    for(i=0;i<100;i++);
     
140. }
     
141. 
     

复制代码

包含C，汇编程序，HEX
syyyd.com-测速 1T=10.zip (4.71 KB, 下载次数: 129)

2011-9-25 22:38 上传

点击文件名下载附件