信號發(fā)生器proteus仿真帶單片機源程序

ID:137190 · 發(fā)表于 2016-9-3 01:59

上面是proteus做的信號發(fā)生器的仿真，用到51單片機和DAC0832，工程文件請下載附件

下面是部分源程序（完整代碼和仿真工程文件請下載本帖最后的附件）

#include <reg52.h>
#include <absacc.h>
#define uchar unsigned char
#define DA0832 XBYTE[0xffff]
uchar code tab[13]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39};
uchar code num [93]={0,0,1,0,3,0,0,2,9,0,2,8,0,2,7,0,2,6,
0,2,5,0,2,4,0,2,3,0,2,2,0,2,1,0,2,0,0,1,9,0,1,8,0,1,7,0,1,6,0,1,5,0,1,4,0,1,3,
0,1,2,0,1,1,0,1,0,0,0,9,0,0,8,0,0,7,0,0,6,0,0,5,0,0,4,0,0,3,0,0,2,0,0,1};
uchar code tosin[256]={0x7F,0x82,0x85,0x88,0x8B,0x8F,0x92,0x95,0x98,0x9B,0x9E,0xA1,0xA4,0xA7,0xAA,0xAD
,0xB0,0xB3,0xB6,0xB8,0xBB,0xBE,0xC1,0xC3,0xC6,0xC8,0xCB,0xCD,0xD0,0xD2,0xD5,0xD7
,0xD9,0xDB,0xDD,0xE0,0xE2,0xE4,0xE5,0xE7,0xE9,0xEB,0xEC,0xEE,0xEF,0xF1,0xF2,0xF4
,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFB,0xFC,0xFD,0xFD,0xFE,0xFE,0xFE,0xFE,0xFE
,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFD,0xFD,0xFC,0xFB,0xFB,0xFA,0xF9,0xF8,0xF7,0xF6
,0xF5,0xF4,0xF2,0xF1,0xEF,0xEE,0xEC,0xEB,0xE9,0xE7,0xE5,0xE4,0xE2,0xE0,0xDD,0xDB
,0xD9,0xD7,0xD5,0xD2,0xD0,0xCD,0xCB,0xC8,0xC6,0xC3,0xC1,0xBE,0xBB,0xB8,0xB6,0xB3
,0xB0,0xAD,0xAA,0xA7,0xA4,0xA1,0x9E,0x9B,0x98,0x95,0x92,0x8F,0x8B,0x88,0x85,0x82
,0x7F,0x7C,0x79,0x76,0x73,0x6F,0x6C,0x69,0x66,0x63,0x60,0x5D,0x5A,0x57,0x54,0x51
,0x4E,0x4B,0x48,0x46,0x43,0x40,0x3D,0x3B,0x38,0x36,0x33,0x31,0x2E,0x2C,0x29,0x27
,0x25,0x23,0x21,0x1E,0x1C,0x1A,0x19,0x17,0x15,0x13,0x12,0x10,0x0F,0x0D,0x0C,0x0A
,0x09,0x08,0x07,0x06,0x05,0x04,0x03,0x03,0x02,0x01,0x01,0x00,0x00,0x00,0x00,0x00
,0x00,0x00,0x00,0x00,0x00,0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x05,0x06,0x07,0x08
,0x09,0x0A,0x0C,0x0D,0x0F,0x10,0x12,0x13,0x15,0x17,0x19,0x1A,0x1C,0x1E,0x21,0x23
,0x25,0x27,0x29,0x2C,0x2E,0x31,0x33,0x36,0x38,0x3B,0x3D,0x40,0x43,0x46,0x48,0x4B
,0x4E,0x51,0x54,0x57,0x5A,0x5D,0x60,0x63,0x66,0x69,0x6C,0x6F,0x73,0x76,0x79,0x7C};
uchar fun=1,b=0,c=0,d=0,e=0,tl,th,flag=0;
sbit P3_0=P3^0;
sbit P3_1=P3^1;
sbit P3_2=P3^2;
sbit P2_7=P2^7;
uchar de1,de2;
uchar A=3;
void key1(void);
void key2(void);
void key3(void);
void delay(uchar k);
void main(void)
{
TMOD=0X01;
th=0xff;
tl=0x1e;
TH0=th;
TL0=tl;
ET0=1;
EA=1;
EX1=1;
PX1=1;
IT1=1;
TR0=1;
while(1)
{
P3_0=0; P3_1=1; P3_2=0;
if(num[flag*3]!=0)
{
P1=tab[num[flag*3]];
delay(0.01);
}
else{
P1=0;
P3_0=1;
P3_1=0;
P3_2=0;
P1=tab[num[flag*3+1]];
delay(0.01);
P1=0;
P3_0=0; P3_1=0; P3_2=0;
P1=tab[num[flag*3+2]];
delay(0.01);
P1=0;
P3_0=1; P3_1=1; P3_2=0;
P1=tab[fun+9];
delay(0.01);
P1=0;
}
}
}
void delay(uchar k) //延時程序
{
for(de1=0;de1<10;de1++)
for(de2=0;de2<k;de2++){;}
}
void key1(void) //１鍵選擇發(fā)波類型,1為正弦波,2為三角波,3為方波
{
fun++;
if(fun==4)
fun=0x01;
}
void key2(void) //２鍵加大頻率
{
tl+=0x00;
if(tl>0x1e)
tl=0x01;
if(flag>0)
flag--;
else
flag=30;
}
void key3(void) //３鍵減小頻率
{
if(th>0x00)
{
th-=0x1;
if(flag<30)
flag++;
else
flag=0;
}
}
void time0_int(void) interrupt 1 //中斷服務(wù)程序
{
TR0=0;
if(fun==1)
{
DA0832=tosin[b]/4*A; //正弦波
delay(flag) ;
b++;
}
else if(fun==2) //三角波
{
if(c<128)
{
DA0832=c*2/4*A;
delay(flag);
}
else
{
DA0832=(255-c)*2/4*A;
delay(flag);
}
c++;
}
else if(fun==3) // 方波
{
d++;
if(d<=128)
{
DA0832=0x00;
delay(flag);
}
else
{
DA0832=0xff/4*A;
delay(flag);
}
}
TH0=th;
TL0=tl;
TR0=1;
}
void int1 (void) interrupt 2 //int1中斷服務(wù)程序
{
if(P2!=0xff)
delay(flag);
if(P2==0xff)
return;
if(P2==0xef) key1();
if(P2==0xdf) key2();
if(P2==0xbf) key3();
}