HP E1340A User Manual page 81

HP IBASIC Program Example (SIN_R)
C and QuickBASIC
Program Versions
81 Generating Arbitrary Waveforms with the HP E1340A
This program is similar to the " SIN_D" BASIC program on page 76, with
the following differences:
1 !RE-SAVE"SIN_R"
2 !This program generates a 1/2 wave rectified sine wave.
210 CALL Rec_sine
310 SUB Rec_sine
320 Rec_sine: !Subprogram which defines a rectified sine wave
330 COM @Afg,Waveform(*)
340 FOR I=1 TO 4096
350 Waveform(I)=SIN(2*PI*(I/4096))
360 NEXT I
370 FOR I=2049 TO 4096
380 Waveform(I)=0
390 NEXT I
400 !
410 OUTPUT @Afg;"SOUR:LIST:SEGM:SEL A"!select segment name
420 OUTPUT @Afg;"SOUR:LIST:SEGM:VOLT";Waveform(*)!load
430 SUBEND
The C example program, SIN_R.C, is in directory "CPROG" and the
QuickBASIC example program, SIN_R.BAS, is in directory "QBPROG"
on the C and QuickBASIC example disk (part number E1340-10036).
waveform points
Chapter 3