6 2
PCLS-848-P User's Manual
B.
Example in Turbo Pascal
{ FILE NAME
: EX4 TB.PAS
}
{
ADSOO PMU PROGRAMMING
}
{ Purpose
: This program measures 16 channel of voltages l
}
{
and displays them. If the voltage of any channe
}
{
is greater than a certain level then it close a
}
{
relay to drive an alarm.
}
{ Remark
: The ADSOO has a 16 channel multiplexer in slot
}
{
O and 16 channel relay actuator in slot 1. The
}
{
voltage measurement is done by an BP3478A DMM.
}
{
The ADSOO has an address of 9 and BP3478A has an }
{
address of 23.
}
{ Language
: Turbo Pascal
}
Program example4(input,output);
{$I TBPGPIB.INC}
Procedure iochk; {I/O error check routine}
var
errno : integer absolute $D000:$201A;
begin
case errno of
0
:
;
1
:
writeln(‘TIME OUTI!’);
else
writeln(‘INTERFACE ERROR!!’);
end;
end;
var
oeolstr
: lstring;
instr,outstr,chstr : lstring;
v
: array[0..15] of real;
v_lmt
: real;
i,k,hp3478,adSOO
: integer;
alarm,meas
: integer;
begin
hp3478:=23;
{ main
}
adSOO:=9;
v_lmt:=3;
{ Voltage limit
}
oeolstr:=chr(13);
clrscr;
iainit($2B8,21,0);
ieabort;
for i:=1 to 10000 do i:=i+1-1;
{ Delay for ADSOO reset
}
ietimout(30000);
{ Setting timeout S sec.
}
ieeol(adS00,2,ooolstr,0,10);
{ Init ADSOOA terminator
}
Содержание PCLS-848-P
Страница 1: ...PCLS 848 P IEEE 488 INTERFACE CARD PASCA SUPPORT PACKAGE USER S MANUAL...
Страница 6: ...Figures Figuree 7 1 PCL 848A B Block Diagram 77...
Страница 10: ...4 PCLS 848 P User s Manual...
Страница 20: ...14 PCLS 848 P User s Manual...
Страница 32: ...26 PCLS 848 P User s Manual If addr 0 or addr 30 ATN is set false String is entered...
Страница 37: ...CHAPTER 2 INSTALLATION 31 ieinit ioport myaddr setting...
Страница 42: ...36 PCLS 848 P User s Manual If addr 0 or addr 30 ATN is set false Long string is sent...
Страница 56: ...50 PCLS 848 P User s Manual...
Страница 80: ...74 PCLS 848 P User s Manual...
Страница 83: ...CHAPTER 7 THEORY OF OPERATION 77 Figuree 7 1 PCL 848A B Block Diagram...
Страница 84: ...78 PCLS 848 P User s Manual...
Страница 95: ...CHAPTER 7 THEORY OF OPERATION 89...
Страница 97: ...CHAPTER 7 THEORY OF OPERATION 91 Handshake Timing Sequence...
Страница 102: ...96 PCLS 848 P User s Manual...