Keysight 3458A Benutzerhandbuch Seite 250

5 Digitalisierung
172 !der nächsten Zeile erforderlich)
180 R=ABS(Samp(I))
185
190 IF R>=32767 THEN PRINT "OVLD" !Falls Bereichsüberschreitung, Meldung anzeigen
200 Samp(I)=Samp(I)*S
210 Samp(I)=DROUND(Samp(I),4) !Auf vier Stellen runden
220 NEXT I
230 Inc=Nl+N2
240 K=l
250 FOR I=1 TO Nl
260 L=I
270 FOR J=l TO N3
280 Wave_form(L)=Samp(K)
290 K=K+l
300 L=L+Inc
310 NEXT J
320 NEXT I
330 FOR I=Nl+l TO Nl+N2
340 L=I
350 FOR J=l TO N3-1
360 Wave_form(L)=Samp(K)
370 K=K+l
380 L=L+Inc
390 NEXT J
400 NEXT I
410 DISP
420 Time_div=l.0E-5
430 Volts_div=5
431
440 Plot_it(Time_div,Volts_div,Wave_form(*),Eff_int)
450 END
460 SUB Plot_it(Time_div,Volts_div,Wave_form(*),Time_base)
470 DIM X_axis$[80],Y_axis$[80]
480 GINIT
490 GRAPHICS ON
500 RAD
510 MOVE 35,10
520 LDIR 0
530 X_axis$="TIME/DIV = "&VAL$(Time_div)
540 LABEL X_axis$
550 MOVE 15,35
560 LDIR PI/2
570 Y_axis$="VOLTS/DIV = "&VAL$(Volts_div)
580 LABEL Y_axis$
590 VIEWPORT 20,110,20,90
600 WINDOW 0,10*Time_div,-4*Volts_div,4*Volts_div
610 AXES Time_div/5,Volts_div/5,0,0,1,1,1
620 GRID Time_div,Volts_div
250
!Anhand des absoluten Wertes auf Bereichsüber-
!schreitung überprüfen
!Messwert mit Skalierungsfaktor multiplizieren
!Inc = Gesamtzahl der Bursts
!Messwerte sortieren
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
! "
!Steuercomputer-Bildschirm löschen
!Zeiteinheit pro Skalenteil für Signaldarstellung
!Spannungseinheit pro Skalenteil für Signaldar-
!stellung
Keysight 3458A Benutzerhandbuch