Agilent Technologies Infiniium 8000A Programmer's Reference Manual page 146

310 !
320 ! NOTE: This routine also turns on system headers. This allows the
330 !
learnstring so the
340 !
350 !
360 SUB Initialize
370 COM /Io/@Scope,@Path,Interface
380 COM /Variables/Max_length
390 Max_length=40000
400 ASSIGN @Scope TO 707
410 Interface=7
420 RESET Interface
430 CLEAR @Scope
440 OUTPUT @Scope;"*RST"
450 OUTPUT @Scope;"*CLS"
460 OUTPUT @Scope;":SYSTem:HEADer ON"
470 OUTPUT @Scope;":AUToscale"
480 SUBEND
490 !
500 !
510
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!
520 !
530 !
540 ! Subprogram name: Store_lrnstr
550 ! Parameters: none
560 ! Return value: none
570 ! Description:
learnstring
580 ! configuration (Filename:Lrn_strg). It requests the learnstring
590 !
600 !
610 !
620 SUB Store_lrnstr
630 COM /Io/@Scope,@Path,Interface
640 COM /Variables/Max_length
650 ON ERROR GOTO Cont
660 PURGE "Lrn_strg"
670 Cont: OFF ERROR
680 CREATE BDAT "Lrn_strg",1,40000
690 DIM Setup$[40000]
700 ASSIGN @Path TO "Lrn_strg"
710 OUTPUT @Scope;":SYSTem:SETup?"
720 ENTER @Scope USING "-K";Setup$
730 OUTPUT @Path,1;Setup$
740 CLEAR SCREEN
Sample Programs
lrn_str.bas Sample Program
acquires the data on channel 1, and turns on the display.
string ":SYSTEM:SETUP " to be returned with the
return string is in the proper format.
This routine creates a file in which to store the
and inputs the configuration to the PC. Finally, it stores the
configuration to the file.
6-52