116
────────────────────────────────────────────────────
8.3 Sample Program
────────────────────────────────────────────────────
100 DIM Cm$[10]
110 DIMRbm$[10],Vbm$[10]
120 CLEAR 701
130 OUTPUT 701;":HEAD OFF"
140 INPUT "COMPARATOR NUMBER? (1 ‑ 30) ";Nu
150 IF Nu<1 OR Nu>30 THEN 140
160 OUTPUT 701;":CSET:NUMB ";Nu
170 INPUT "COMPARATOR MODE? (R/RV) ";Cm$
180 IF Cm$<>"R" AND Cm$<>"RV" THEN 170
190 OUTPUT 701;":CSET:MOD ";Cm$
200 INPUT "COMPARATOR RESISTANCERANGE? (0 ‑
3100) ";Rr
210 IF Rr<0 OR Rr>3100 THEN 200
220 OUTPUT 701;":CSET:RRAN ";Rr
230 OUTPUT 701;":CSET:RRAN?"
240 ENTER 701;Rn
250 IF Cm$="R" THEN 300
260 INPUT "COMPARATOR VOLTAGERANGE? (‑50 ‑
50) ";Vr
270 OUTPUT 701;":CSET:VRAN ";Vr
280 OUTPUT 701;":CSET:VRAN?"
290 ENTER 701;Vn
300 INPUT "RESISTANCEPARAMETER? UPPER(0 ‑
RANGE) ";Rh
310 INPUT "RESISTANCEPARAMETER? LOWER(0 ‑
RANGE) ";Rl
320 IF Rh>Rn OR Rl>Rn THEN 300
330 OUTPUT 701;":CSET:RPAR ";Rh;",";Rl
340 IF Cm$="R" THEN 400
350 INPUT "VOLTAGEPARAMETER? UPPER(0 ‑ RANGE)
";Vh
360 INPUT "VOLTAGEPARAMETER? LOWER(0 ‑ RANGE)
";Vl
370 IF Vh>Vn OR Vl>Vn THEN 350
380 OUTPUT 701;":CSET:VPAR ";Vh;",";Vl
390 GOTO 440
400 INPUT "BEEPER MODE? (OFF/IN/HL) ";Rbm$
410 IF Rbm$<>"OFF" AND Rbm$<>"IN" AND
Rbm$<>"HL" THEN 400
420 OUTPUT 701;"CSET:BEEP ";Rbm$
430 GOTO 470
440 INPUT "BEEPER MODE? (OFF/PASS/FAIL) ";Vbm$
450 IF Vbm$<>"OFF" AND Vbm$<>"PASS" AND
Vbm$<>"FAIL" THEN 440
460 OUTPUT 701;"CSET:BEEP ";Vbm$
470 END
(3) 3560 comparator setup program
This program sets comparators for the 3560 and inquires to determine
the established settings.
100 Defines character strings
110 Defines character strings
120 Initialize the interface
130 Set the header
140 Specify the comparator number
150
160 Set the comparator number
170 Specify the measurement mode of the
comparator
180
190 Set the measurement mode of the
comparator
200 Specify the resistance mode of the
comparator
210
220 Set the reisistance range of the comparator
230 Query the reisistance range of the
comparator
240 Get data
250 Select the measurement mode
260 Specify the voltage range of the comparator
270 Set the voltage range of the comparator
280 Query the voltage range of the comparator
290 Get data
300 Specify the upper resistance value
310 Specify the lower resistance value
320
330 Set the upper and lower resistance value
340 Select the measurement mode
350 Specify the upper voltage value
360 Specify the lower voltage value
370
380 Set the upper and lower voltage value
390
400 Specify the buzzer (Resistance measurement
mode)
410
420 Specify the buzzer (Resistance measurement
mode)
430
440 Specify the buzzer (Resistance and voltage
measurement mode)
450
460 Specify the buzzer (Resistance and voltage
measurement mode)
470 End of program