Keithley 1801, Инструкция по эксплуатации, Страница: 80 / 93

Calibration Programs
B-4
Program B-2. Calibration Program for Use with Any Suitable Calibrator (Turbo C Version)
/* Model 1801 calibration program for use with any suitable
DC voltage calibrator. */
#include "ieeeio.h"
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <string.h>
main()
{
static char *msg[] = {
"Set 262 divider ratio to 10^2.",
"Set 262 divider ratio to 10^3.",
"Set 262 divider ratio to 10^4.",
"Make sure divider is still set to 10^4.",
"Set 262 divider ratio to 10^3.",
"Set 262 divider ratio to 10^2.",
"Calculating constants..."
};
static char *cmd[] = {
":cal:unpr:pre:z1k",":cal:unpr:pre:z10k",
":cal:unpr:pre:z100k",":cal:unpr:pre:fs100k 20e-6",
":cal:unpr:pre:fs10k 200e-6",
":cal:unpr:pre:fs1k 2e-3",
":cal:unpr:pre:calc"
};
void keypress(),errcheck(),checkopt();
char date[10];
int i,calend();
if (ieeeinit()==-1){
printf("Cannot initialize interface.\n");
exit(1);
}
ieeewt("remote 16\n"); /* Put 2001 in remote. */
ieeewt("clear\n"); /* Send DCL. */
ieeewt("term lf eoi\n"); /* Set terminator. */
ieeewt("output 16;:syst:pres;*cls\n"); /* Initialize 2001. */
ieeewt("output 16;*ese 1;*sre 32\n"); /* Enable OPC, SRQ. */
checkopt(); /* Check for 1801. */
clrscr(); /* Clear CRT. */
printf("Model 1801 Calibration Program.\n");
printf("Calibrator and Model 262 divider ratios"
" must be set manually.\n");
printf("Set calibrator to external sense, 0V DC output.\n"
"Place calibrator in operate mode.\n\n");
printf("Set 262 to POS+ polarity.\n");
printf("Wait two minutes for thermals to settle.\n");
keypress();
for(i=0;i<=6;i++) { /* Loop for cal points. */
printf("%s\n",msg[i]);
if(i==3) printf("Set calibrator output to "
"200.000mV.\n");
if (i<6) keypress();