其控制核心是51系列單片機AT89C51,能產(chǎn)生14~44Hz的低頻正弦信號,可作為電子測量中的低頻信號源
附件里面包含源代碼文件,原理圖文件,希望能幫到大家
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
51hei.gif (235.07 KB, 下載次數(shù): 46)
下載附件
2024-5-22 13:51 上傳
單片機源程序如下:
- #include <intrins.h>
- #include <reg51.h>
- #include <math.h>
- typedef unsigned char Uchar;
- typedef unsigned int Uint;
- #define Segport P1
- #define DAport P2
- #define NOP _nop_()
- sbit DA0832wr = P3^7;
- Uchar FreqcValue = 30;
- Uchar code DAdata[] = {0x08,0x83,0x85,0x88,0x8A,0x8D,0x8F,0x92,
- 0x94,0x97,0x99,0x9B,0x9E,0xA0,0xA3,0xA5,
- 0xA7,0xAA,0xAC,0xAE,0xB1,0xB3,0xB5,0xB7,
- 0xB9,0xBB,0xBD,0xBF,0xC1,0xC3,0xC5,0xC7,
- 0xC9,0xCB,0xCC,0xCE,0xD0,0xD1,0xD3,0xD4,
- 0xD6,0xD7,0xD8,0xDA,0xDB,0xDC,0xDD,0xDE,
- 0xDF,0xE0,0xE1,0xE2,0xE3,0xE3,0xE4,0xE4,
- 0xE5,0xE5,0xE6,0xE6,0xE7,0xE7,0xE7,0xE7,
- 0xE7,0xE7,0xE7,0xE7,0xE6,0xE6,0xE5,0xE5,
- 0xE4,0xE4,0xE3,0xE3,0xE2,0xE1,0xE0,0xDF,
- 0xDE,0xDD,0xDC,0xDB,0xDA,0xD8,0xD7,0xD6,
- 0xD4,0xD3,0xD1,0xD0,0xCE,0xCC,0xCB,0xC9,
- 0xC7,0xC5,0xC3,0xC1,0xBF,0xBD,0xBB,0xB9,
- 0xB7,0xB5,0xB3,0xB1,0xAE,0xAC,0xAA,0xA7,
- 0xA5,0xA3,0xA0,0x9E,0x9B,0x99,0x97,0x94,
- 0x92,0x8F,0x8D,0x8A,0x88,0x85,0x83,0x80,
- 0x7D,0x7B,0x78,0x76,0x73,0x71,0x6E,0x6C,
- 0x69,0x67,0x65,0x62,0x60,0x5D,0x5B,0x59,
- 0x56,0x54,0x52,0x4F,0x4D,0x4B,0x49,0x47,
- 0x45,0x43,0x41,0x3F,0x3D,0x3B,0x39,0x37,
- 0x35,0x34,0x32,0x30,0x2F,0x2D,0x2C,0x2A,
- 0x29,0x28,0x26,0x25,0x24,0x23,0x22,0x21,
- 0x20,0x1F,0x1E,0x1D,0x1D,0x1C,0x1C,0x1B,
- 0x1B,0x1A,0x1A,0x1A,0x19,0x19,0x19,0x19,
- 0x19,0x19,0x19,0x19,0x1A,0x1A,0x1A,0x1B,
- 0x1B,0x1C,0x1C,0x1D,0x1D,0x1E,0x1F,0x20,
- 0x21,0x22,0x23,0x24,0x25,0x26,0x28,0x29,
- 0x2A,0x2C,0x2D,0x2F,0x30,0x32,0x33,0x35,
- 0x37,0x39,0x3B,0x3D,0x3F,0x41,0x43,0x45,
- 0x47,0x49,0x4B,0x4D,0x4F,0x52,0x54,0x56,
- 0x59,0x5B,0x5D,0x60,0x62,0x65,0x67,0x69,
- 0x6C,0x6E,0x71,0x73,0x76,0x78,0x7B,0x7D
- };
- void dlay();
- void T0f(void) interrupt 1
- {
- static Uchar i;
- P2 = DAdata[i++];
- DA0832wr = 1;
- NOP; NOP;
- DA0832wr = 0;
- }
- void main()
- {
- Uchar keyValue;
- float tmp;
- P3 = 0xFF;
- P1 = 0xff;
- TMOD = 0x02; // ö ʱ ģʽ
- IE = 0x82;
- dlay();
- while (1)
- {
- P1 = ((FreqcValue / 10) << 4) | (FreqcValue % 10);
- keyValue = P3 & 0x7f;
- switch (keyValue)
- {
- case 0x7b:
- dlay();
- do
- {
- keyValue = P3 & 0x7f;
- } while (keyValue == 0x7b);
- if (FreqcValue < 44)
- FreqcValue++;
- break;
- case 0x77:
- dlay();
- do
- {
- keyValue = P3 & 0x7f;
- } while (keyValue == 0x77);
- if (FreqcValue > 14)
- FreqcValue--;
- break;
- case 0x3f:
- dlay();
- do
- {
- keyValue = P3 & 0x7f;
- } while (keyValue == 0x3f);
- tmp = 256 - 3600 / FreqcValue;
- TH0 = tmp;
- TL0 = tmp;
- TR0 = 1;
- break;
- }
- }
- }
- void dlay()
- {
- Uchar i, j;
- for (i = 0; i < 20; i++)
- for (j = 0; j < 255; j++)
- {
- ;
- }
- }
復制代碼
Proteus8.13仿真和程序2個文件下載:
仿真程序.7z
(92.53 KB, 下載次數(shù): 9)
2024-5-22 13:51 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|