1250 Frequency Response Analyzer The RS423 and GPIB Ports. Remote Control
AMK/1250/4 13-29
13.14.5 EXAMPLE OF CONTROLLER PROGRAM FOR TRANSFERRING
LEARNT PROGRAM 1 FROM 1250 VIA GPIB PORT, WITHOUT
HANDSHAKE
Instruction Meaning
DIM A$ (100) Allocate temporary store space
OUTPUT "?PN1" How many lines in Learnt Program 1?
INPUT N N = number of lines in Learnt Program 1
OUTPUT ”*P1" List Learnt Program 1 to the GPIB
FOR I = 1 to N Store all lines of Learnt Program until I = N
INPUT A$ (I)
NEXT I
13.14.6 EXAMPLE OF CONTROLLER PROGRAM FOR TRANSFERRING
LEARNT PROGRAM 1 FROM 1250 VIA GPIB PORT, WITH
HANDSHAKE
Instruction Meaning
DIM A$ (100) Allocate temporary store space
OUTPUT "?PN1" How many lines in Learnt Program 1?
INPUT N N = number of lines in Learnt Program 1
OUTPUT ”*E1" The command "Edit Learnt Program 1" sends Line 1 of the
Program to the GPIB.
INPUT A$ (1) Store Line 1
FOR I = 2 to N Keep sending *F (Edit Next Line) to the 1250 and store all
OUTPUT “*F” until 1 = N
INPUT A$ (I) Note the "handshake" effect of putting *F inside the loop,
NEXT I compared with the example in Section 14.5, where *P is outside
the loop.
OUTPUT *Q Send the Command: “end of Program Edit”.
13.14.7 RELOADING A LEARNT PROGRAM TO 1250 VIA GPIB
Learnt Programs which have been saved or compiled on an external device can be
reloaded to the 1250 by using the Learn Program Command *Ln, as shown in the
following example for loading Program 1.
Instruction Meaning
OUTPUT ”*L1" Instructs the 1250 to Learn Program 1
FOR I = 1 to N
OUTPUT A$ (I) Send all lines of Learnt program 1 to the 1250 until I = N
NEXT I
Note: the last line of the Learnt Program should be *Q. There is therefore no need to
send a separate *Q instruction from the Controller to quit the Learnt Program mode.