Stanford Research Systems DS335, Руководство пользователя

Страница: 45 / 86

Programming Examples 3-13
DS335 Synthesized Function Generator
EXAMPLE 2: RS232 COMMUNICATION. BASIC LANGUAGE
BASIC Program to demonstrate communication with the DS335 via RS232. Program assumes the RS232
option is enabled (use [SHIFT] [2]) and the BAUD rate is set to 9600.
10 OPEN "com2:9600,n,8,2,cs,ds,cd" FOR RANDOM AS #1 'Set up com2'
20 PRINT #1, " "
30 PRINT #1, "*rst" 'Reset the DS335'
40 GOSUB 190 'Query DS335 and diplay result'
50 PRINT #1, "freq1234567" 'Set new frequency'
60 GOSUB 190 'Query DS335 and diplay result'
70 PRINT #1, "*rst" 'Reset the DS335'
80 FOR I = 0 TO 4 'Step through all functions'
90 PRINT #1, "func", I
100 GOSUB 190 'Query DS335 and diplay result'
110 NEXT I
120 PRINT #1, "*rst" 'Reset the DS335'
130 PRINT #1, "ampl 0vp" 'Set amplitude to 0 volts '
140 FOR I = -5 TO 5 'Set DS335 offset from -5V to +5V'
150 PRINT #1, "offs", I 'and query each time'
160 GOSUB 190 'Query DS335 and diplay result'
170 NEXT I
180 END
'Routine to query the DS335 frequency,'
190 PRINT #1, "freq?" 'offset, and amplitude and display them'
200 INPUT #1, F
210 PRINT #1, "ampl?"
220 INPUT #1, A
230 PRINT #1, "offs?"
240 INPUT #1, O
250 PRINT " Frequ="; F; " Ampl="; A; " Offs="; O
260 RETURN