
6
Example
5
-
Increased
Tuning
Linearity
310
"Target
=
";I;"
NM"
320
!
330
Target_wl=I*1.0E-9
340
!
350
OUTPUT
@Tls;":WAVE";Target_wl
360
OUTPUT
@Tls;"*OPC?"
370
ENTER
@Tls;Ready
380
!
390
Loop_count=0
400
!
410
LOOP
420
OUTPUT
@Mwm;":MEAS:SCAL:POW:WAV?
430
ENTER
@Mwm;Current_wl
440
Diff_wl=Current_wl-Target_wl
450
"Current
=";Current_wl*1.0E+9,"Diff
=";PROUND(Diff_wl*1.E+9,-4)
460
EXIT
IF
ABS(Diff_wl)<(All.0005)*1.0E-9
OR
Loop_count=Numb_tries
470
OUTPUT
@Tls;":WAVEACT
";Current_wl
480
Loop_count=Loo1
490
END
LOOP
500
!
510
!
(Read
the
receiver
at
this
point)
520
!
530
NEXT
I
540
!
550
END
Programming
Examples
6-15
Содержание 8167A
Страница 2: ......
Страница 4: ......
Страница 26: ......
Страница 110: ......
Страница 130: ......
Страница 150: ......
Страница 164: ...D Figure D 1 Test Setup for the Wavelength Tests D 4 Performance Tests ...
Страница 168: ...D Figure D 2 Test Setup for the Maximum Output Power Test except HP 8168F D 8 Performance Tests ...
Страница 177: ...D Figure D 5 Test Setup for the Source Spontaneous Emission Test Performance Tests D 17 ...
Страница 240: ......