
Programming
6–10
2714 & 2715 Programmer Manual
FOR i% = 19 TO 25
LOCATE i%, 6
PRINT STRING$(70, " ");
NEXT
'
'======================
'set up linkage to 2714 or 2715
'======================
'
func% = 1
CALL RS232.CALLS
'
'====================================================
' initialize string which holds communication message
'====================================================
'
wrt$ = ""
'
'=================================================
' now accept user input which will be sent to 2714 or 2715
'=================================================
'
LOCATE 11, 8, 1
'======
INLOOP:
'======
IN$ = INKEY$
IF IN$ = "" THEN
GOTO INLOOP
ELSEIF LEN(IN$) <> 1 THEN
BEEP
GOTO INLOOP
ELSEIF IN$ = CHR$(27) THEN
COLOR 7, 0
CLS
END
ELSEIF IN$ = CHR$(13) AND LEN(wrt$) = 0 TH EN
'
carriage return with no
'
message
BEEP
'is an error
GOTO INLOOP
ELSEIF IN$ = CHR$(13) THEN
'carriage return is the signal
'
to
CALL SENDCOMMAND
'send user input to 2714 or
2715
wrt$ = ""
'reĆinitialize string holding
'
input
Summary of Contents for 2714
Page 4: ......
Page 11: ...Introduction ...
Page 12: ......
Page 38: ...Introduction to Programming 1 26 2714 2715 Programmer Manual ...
Page 39: ...Message Structure ...
Page 40: ......
Page 54: ...Instrument Specific Message Structure 2 14 2714 2715 Programmer Manual ...
Page 55: ...Functional Groups ...
Page 56: ......
Page 85: ...Command Query ...
Page 86: ......
Page 179: ...Status Reporting ...
Page 180: ......
Page 197: ...Programming ...
Page 198: ......
Page 266: ...Programming 6 68 2714 2715 Programmer Manual ...
Page 267: ...Appendices ...
Page 268: ......
Page 276: ...Appendix A RS 232 Concepts A 8 2714 2715 Programmer Manual ...
Page 296: ...Appendix B GPIB System Concepts B 20 2714 2715 Programmer Manual ...
Page 297: ...Index ...
Page 298: ......
Page 307: ......
Page 308: ......