中国石油大学计算机测控技术实践程序

setcolor(12);
}
}
/ *fifth2* /
#include<dos.h>
#include<math.h>
#include<stdio.h>
#include<stdlib.h>
#include<graphlics.h>
#define N 600
#define pi 3.1415926
}
}
int TRL_01()
{ int i;
for(i=0;i<600;i++)
data[i]=data_v[i]*10.0/4096.0-5.0; 转换，公式参照书的第八页
}
int PRW_01()
{ int i,x0=38,y0=240,xm=600,ym=180;
printf("input f\n"); /*输入延时时间，在CJ-AD子函数中使用此变量*/
scanf("%d",&f);
CJ_AD(); /*AD转换*/
TRL_01(); /*转换子函数*/
DRW_01();/*画图*/
getch();
closegraph();
for( ; ; )if(inportb(base+0x2)<0x80)break; 查询
dh=inportb(base+0x2); 高四位
dl=inportb(base+0x3); 低八位
data_v[i]=256*dh+dl;
delay(f); 延时，此处的延时和输入的信号频率相配合，得到完美波形
{line(x0+kx*x*100,y0,x0+kx*x*100,y0-4); 同上
sprintf(d,"%4.1f",x);
outtextxy(x0+kx*x*100-16,y0+4,d);
}
outtextxy(x0-3,y0-ym,"^"); 画向上箭头
outtextxy(x0+4,y0-ym,"U/v"); 写单位
}
int CJ_AD()
{ int i,base=0x100,ch=1,dl,dh; /*ch=1，实验时使用ch1通道*/
inportb(base+0x3); /*清零*/
outportb(base+0x0,ch); 送入采集通道
for(i=0;i<600;i++)
{outportb(base+0x1,0); 启动AD
if(key==0x3920) {ch+=1;key=0;} 空格键转换波形
if(a>=1000) a=1000; 保证周期和幅值在正常范围内
if(a<=0) a=0;
if(b>=50.0) b=50.0;
if(key==0x4b00) {a-=5;key=0;} <—周期减少
if(key==0x4d00) {a+=5;key=0;} —>周期增大
if(key==0x4800) {b+=0.5;key=0;} ^ 幅值增大
if(key==0x5000) {b-=0.5;key=0;} 向下箭头键 幅值减少
int TRL_01();
int DRW_01();
int f;
int data_v[600];
Double data[600];
main()
{ int gdriver=DETECT,gmode;
initgraph(&gdriver,&gmode,""); /* 画图需要这俩个语句*/
/ *fifth1* /
#include<dos.h>
#include<math.h>
#include<stdio.h>
#include<stdlib.h>
#include<graphlics.h>
#define Pi 3.1415926535697932
int CJ_AD();
{line(x0,y0-ky*y,x0+4,y0-ky*y); 画纵轴刻度线
sprinf(c,"%4.1f",y ); 整型数据转换到字符型
outtextxy(x0-34,y0-ky*y-4,c); 写刻度
}
for(x=1.0;x<=6.0;x+=1.0)
int ZH_DA();
main()
{ int gdriver=DETECT,gmode;
initgraph(&gdriver,&gmode,"");
for( ; ; )
{if(bioskey(1)!=0)
பைடு நூலகம் {key=bioskey(0);
if(key==0x11b) break; ESC键表示退出
setcolor(14); 设置曲线颜色
for(i=0;i<600;i++)
{ if(i==0)moveto(x0+ky*i,y0-ky*data[i]); 画曲线，如正弦波等
else lineto(x0+kx*i,y0-ky*data[i]);
int data_v[N];
double data[N];
int a=100;
float b=5.0;
int key,ch=1;
int zxb(int a,float b);
int fb(int a,float b);
int sjb(int a,float b);
int DRW()'
double kx,ky,x,y;
char c[40],d[40];
kx=1.0*xm/600; 比例系数
ky=1.0*ym/5.0;
line(x0,y0,x0+xm,y0); 画横轴
line(x0,y0-ym,x0,y0+ym); 画纵轴
for(y=-5.0;y<5.0;y+=1.0)