QuadTech Guardian 6100 Plus Instruction Manual page 130

REM Program POWER TO VA LOW LIMIT 1000
PRINT #1, "SOURce:SAFEty:STEP8:LC:POWER:VA:LIMIT:LOW 1000"; CHR$(13); CHR$(10)
REM PROGRAM PRESET
REM PROGRAM PASS HOLD TO 0.5 SEC
PRINT #1, "SOUR:SAFE:PRESET:time:pass 0.5"; CHR$(13); CHR$(10)
REM PROGRAM STEP HOLD TO 1 SEC
PRINT #1, "SOUR:SAFE:PRESET:time:STEP 1"; CHR$(13); CHR$(10)
REM PROGRAM AC FREQ TO 100
PRINT #1, "SOUR:SAFE:PRESET:AC:FREQ 100"; CHR$(13); CHR$(10)
REM PROGRAM GB FREQ TO 50
PRINT #1, "SOUR:SAFE:PRESET:GB:FREQ 50"; CHR$(13); CHR$(10)
REM PROGRAM GB VOLTAGE TO 6
PRINT #1, "SOUR:SAFE:PRESET:GB:VOLT 6"; CHR$(13); CHR$(10)
REM PROGRAM IEC 601 ON
PRINT #1, "SOUR:SAFE:PRESET:IEC 1"; CHR$(13); CHR$(10)
REM PROGRAM SOFT AGC OFF
PRINT #1, "SOUR:SAFE:PRESET:AGC:SOFT 0"; CHR$(13); CHR$(10)
REM PROGRAM AUTO RANGE ON
PRINT #1, "SOUR:SAFE:PRESET:WRANGE:AUTO 1"; CHR$(13); CHR$(10)
REM FIND OUT HOW MANY STEPS TO LOOP FOR RESULTS
PRINT #1, "SOURce:SAFEty:SNUMBer?"; CHR$(13); CHR$(10)
INPUT #1, STEPNUM%
CLS
REM Start TEST
PRINT #1, "SOURce:SAFEty:STARt"; CHR$(13); CHR$(10)
PRINT " Testing"
REM Check status of the test
complete$ = "0"
WHILE complete$ <> "1"
PRINT #1, "SOURce:SAFEty:RESult:COMPlete?"; CHR$(13); CHR$(10)
INPUT #1, complete$
IF complete$ = "1" THEN
'
Page 130 of 177
www.valuetronics.com
CLS
PRINT #1, "SOURce:SAFEty:STOP"; CHR$(13); CHR$(10)
REM Print Output voltage for each step
PRINT #1, "SAFEty:RESult:ALL:OMET?"; CHR$(13); CHR$(10)
FOR j = 1 TO STEPNUM%
INPUT #1, RESult$
PRINT "Measured Output Voltage:"
PRINT "step", j, ":", RESult$
150799 Rev A3 Interface