Quick Basic Example; Turbo Pascal Example; Microsoft \ Lattice C Example; Fortran Example - Brainboxes IE-285 User Manual

Join The Elite.
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
ieeectrl=open("IEEECTRL",O_RDWR
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
PC Elite Reference
O_BINARY);
O_BINARY);
1-7