Table of Contents
Advertisement
1050 FOR 1 = 1 to 10
1060 CALL CHECK.DONE(DIG.IN.01,INSTATUS)
1070 IF INSTATUS=0 THEN GOTO 1060
These statements start a FOR/NEXT loop that first checks the
handshake status to see if the IDAV signal has been sent by the
external device.
1080 CALL MEASURE(DIG.IN.01,ABCD)
1090 PRINT ABCD
1100 NEXT I
When the signal is received, the input bits are read by the
Digital Input and the loop repeats for the next reading of the
input bits.
1110 STOP
Example 2 will execute faster without the CHECK. DONE
routine used in lines 1060 and 1070. However,, if the
external device does not send the IDAV signal, the
MEASURE statement will wait for it to arrive before
reading any data from the input register. If the IDAV
signal never arrives, it will be necessary for you to reset
the computer to continue.
Programming with BASIC
5-15
Advertisement
Table of Contents
