Teledyne LeCroy X-STREAM OSCILLOSCOPES Remote Control - Manual (Page 140)

P A R T T W O : C O M M A N D S
134
ISSUED: February 2005 WM-RCM-E Rev D
F1:DEF EQN,"MCAD(C1, C2)",SOURCE1VAR,S1,SOURCE2VAR,S2,OUTPUTVAR,S1,
SOURCE1HEADERVAR,S1HDR,SOURCE2HEADERVAR,S2HDR,OUTPUTHEADERVAR,O1HDR,
WITHHEADER,ON,OUTPUTENABLE,ON,SOURCE1ENABLE,ON,SOURCE2ENABLE,OFF,
NEWSHEET,ON,ADVANCED,OFF,SCALING,AUTOMATIC,
WORKSHEETFILENAME,C:\MATHCAD89.MCD
F1:DEF EQN,"MATLAB(C1,C2)",MATLABCODE,WFORMOUT = -0.5 * WFORMIN1;,
MATLABPLOT,OFF,MATLABZEROOFFSET,0E-9,MATLABSCALEPERDIV,50E-3
F1:DEF EQN,"SPARSE(C1)",SPARSINGFACTOR,1,SPARSINGPHASE,0
F1:DEF EQN,"TRACK(C1)",AUTOFINDSCALE,ON,VERSCALE,50E-3,CENTER,-1.56249851E-3
F1:DEF EQN,"SCRIPT(C1,C2)",LANGUAGE,VBSCRIPT,
CODE,FUNCTION UPDATE()" + vbcrlf + "OUTRESULT.SAMPLES = INRESULT.SAMPLES" + vbcrlf
+ "STARTDATA = 0" + vbcrlf + "ENDDATA = OUTRESULT.SAMPLES" + vbcrlf +
"REDIM NEWDATAARRAY(OUTRESULT.SAMPLES)" + vbcrlf +
"UNSCALEDDATA = INRESULT.DATAARRAY(FALSE)" + vbcrlf +
"LASTPOINT = ENDDATA - 1" + vbcrlf + "FOR I = 0 TO LASTPOINT" +
vbcrlf + "NEWDATAARRAY(I) = -UNSCALEDDATA(I)" + vbcrlf + "NEXT" +
vbcrlf + "OUTRESULT.DATAARRAY(FALSE) = NEWDATAARRAY" + vbcrlf + "END FUNCTION" +
vbcrlf + ",STATUS,OK,TIMEOUT,360 S