630 DEVNAME$ = 1590"
640 CALL IBFIND(DEVNAME$, DEV1%)
650 CALL IBSIC(BRD0%): send interface clear, IFC
660 CMD$ = CHR$(LLO): set local lockout, LLO
670 CALL IBCMD(BRD0%, CMD$)
679 set termination to linefeed, time on, date off
680 WRT$ = term=lf & ieet=on & ieed=off\n
690 CALL IBWRT(DEV1%, WRT$)
699 command 1590 to make measurements
700 WRT$ = sact=run\n
710 CALL IBWRT(DEV1%, WRT$)
1000 Main loop
1010 A$ = INKEY$: check if a key was pressed
1020 IF A$ = CHR$(27) GOTO 1500 test for ESC key, end
1030 CALL IBRSP(DEV1%, SPR%) read serial poll
1040 IF (SPR% AND &H10)=0 GOTO 1000 loop back if MAV bit not set
1050 WRT$ = tem\n request measurement data
1060 CALL IBWRT(DEV1%, WRT$)
1070 RD$ = SPACE$(80)
1080 CALL IBRD(DEV1%, RD$) read measurement data
1090 PRINT LEFT$(RD$,IBCNT%-1) print measurement data
1100 GOTO 1000 loop back
1500 End
1510 CALL IBCLR(DEV1%) send device clear, SDC
1520 CALL IBLOC(DEV1%) set local mode, GTL
1530 END
8.3 Digital Interface Commands
The various commands for reading or programming the 1575/1590 parameters
via the digital interfaces are listed on the following pages. These commands are
used with both the serial interface and the IEEE-488 interface. Multiple com
-
mands can be sent in one string using the “&” character in between commands.
A command or string of commands must be terminated with a carriage-return
or linefeed character. The 1575/1590 makes no distinction between upper and
103
8 Communications Interface
Digital Interface Commands
To Next Page
Loading...
Need help?
General
