Join The Elite.
PC Elite Reference
R3T3X command, inputs a reading from the D.V.M. and then
displays it on the PC screen.
Quick Basic Example.
___________________
10 OPEN "IEEECTRL" AS #1
20 OPEN "IEEEDATA" AS #2
30 PRINT#1,"REMOTE 5 OUTPUT ’R3T3X’"
40 READING$=IOCTL$(2)
50 PRINT READING$
Turbo Pascal Example.
____________________
_
VAR
buffer : String[255];
ieeedata,ieeectrl : Text;
BEGIN
Assign(ieeectrl,’IEEECTRL’);
Rewrite(ieeectrl);
Assign(ieeedata,’IEEEDATA’); Reset(ieeedata);
Writeln(ieeectrl,’REMOTE 5 OUTPUT "R3T3X"’);
Readln(ieeedata,buffer);
Writeln(buffer);
Close(ieeedata); Close(ieeectrl);
END.
Microsoft \ Lattice C Example.
___________________________
#include <stdio.h>
int ieeedata,ieeectrl;
char buffer[255];
void main(){
ieeedata=open("IEEEDATA",O_RDWR
O_BINARY);
ieeectrl=open("IEEECTRL",O_RDWR
O_BINARY);
write(ieeectrl,"REMOTE 5 OUTPUT ’R3T3X’\n",24);
read(ieeedata,buffer,255);
printf("%s\n",buffer); }
Fortran Example.
________________
CHARACTER BUFFER*255
OPEN(1,FILE=’IEEECTRL’,STATUS=OLD, ACCESS=’SEQUENTIAL’)
OPEN(2,FILE=’IEEEDATA’,STATUS=OLD, ACCESS=’SEQUENTIAL’)
WRITE(1,*)"REMOTE 5 OUTPUT ’R3T3X’"
READ(2,*)BUFFER
WRITE(*,*)’’,BUFFER
Chapter 1
1-7
