Automating Measurements 3-9
Operator Interaction
User-Defined BEGIN Key Menu
24 User_pause: PAUSE
25 GOTO User_pause
26 !
27 User_key1: ! Define softkey 1 here.
28 GOSUB Message ! Remove this line.
29 GOTO User_pause
30 !
31 User_key2: ! Define softkey 2 here.
32 GOSUB Message ! Remove this line
33 GOTO User_pause
34 !
35 User_key3: ! Example Marker Function
36 OUTPUT @Hp8714;"CALC1:MARK1 ON"
37 OUTPUT @Hp8714;"CALC1:MARK:FUNC MAX"
38 GOTO User_pause
39 !
40 User_key4: ! Example Title Entry
41 INPUT "Enter Title Line 1. Press [Enter] when done.",Name$
42 OUTPUT @Hp8714;"DISP:ANN:TITL1:DATA '""'"
43 OUTPUT @Hp8714;"DISP:ANN:TITL ON"
44 GOTO User_pause
45 !
46 User_key5: ! Define softkey 5 here.
47 GOSUB Message ! Remove this line.
48 GOTO User_pause
49 !
50 User_key6: ! Define softkey 6 here.
51 GOSUB Message ! Remove this line.
52 GOTO User_pause
53 !
54 User_key7: ! Define softkey 7 here.
55 GOSUB Message ! Remove this line.
56 GOTO User_pause
57 !
58 Message: !
59 Str1$="This key is programmable."
60 Str2$="To modify, select"
61 Str3$="[System Options], [IBASIC], [Edit]."
62 OUTPUT @Hp8714;"DISP:ANN:MESS '""', MEDIUM"
63 RETURN
64 !
65 END
NOTE For more  programs, see the Example Programs Disk and
the Example Programs Guide.