Measurement-computing Serial488A Manuel d'utilisateur télécharger pdf (Page 84)

A.1

Sample Programs

10 REM *** DUMB TERMINAL PROGRAM FOR THE Serial488A

20 REM *** Running under IBM Basica

30 REM *** This Program allows direct interaction between the

40 REM *** IBM-PC and an IEEE bus device through the Serial488A.

50 REM *** The Serial488A must be configured as the IEEE bus

60 REM *** controller and have talk back on terminator enabled.

70 REM ***

80 REM ***

90 REM ***

100 CLS

110 ' Open the serial communications port and set the serial parameters

120 OPEN "COM1: 9600,n,8,2,cs,ds" AS 1

130 ' Display any characters received from the COM1 port

140 IF LOC(1) THEN PRINT INPUT$(LOC(1),1);

150 ' Transmit any key presses from keyboard to the COM1 port and to the screen

160 K$=INKEY$

170 PRINT #1,K$; : PRINT K$;

180 GOTO 140 ' Do it again

1 2 ... 79 80 81 82 83 84 85

Pas de commentaire

Measurement-computing Serial488A Manuel d'utilisateur Page 84