Agilent Technologies 8935 Series Manual do Utilizador descarregar pdf (Página 249)

Chapter 8 249

IBASIC Controller

Method #1. Program Development on an External BASIC Language Computer

Example 8-7 Example

10 ! PROGRAM TO UPLOAD IBASIC CODE FROM TEST SET TO BASIC CONTROLLER THROUGH HP-IB.

20 !######################################################################

30 !

40 ! The file for uploaded code will be "C:\htb386\code".

50 ! If you want to use a different file or directory, modify the two lines

60 ! with the labels "File_name_1" and "File_name_2".

70 !

80 !####################################################################

90 Addr=714 !Test Set HP-IB address

100 ALLOCATE Line$[200]

110 PRINTER IS 1

120 CLEAR SCREEN

130 DISP "It may be several minutes before code begins transferring if program is long"

140 OUTPUT Addr;"*RST" !Reset the Test Set

150 OUTPUT Addr;"DISP TIB" !Displays the IBASIC screen

160 OUTPUT Addr;"PROG:EXEC ’CLS’" !Clears the Test Set display

170 OUTPUT 714;"PROG:DEF?" !Initiates the upload of whole program

180 ENTER Addr USING "X,D,#";Count_len!Number of lines in program

190 ENTER Addr USING VAL$(Count_len)&"D,#";Char_count !Number of characters

200 !

210 File_name_1: CREATE ASCII "C:\htb386\code",(1.05*Char_count/256)+5

220 ! Number of records reserved for upload.

230 File_name_2: ASSIGN @File TO "C:\htb386\code"

240 !

250 DISP "Transferring code from Test Set"

260 LOOP !Program transfer loop.

270 ENTER Addr;Line$ !CR/LF terminates each line.

280 PRINT Line$ !Displays new lines on Test Set display.

290 OUTPUT @File;Line$!Transfer new line to file.

300 Char_count=Char_count-LEN(Line$)-2 !Reduces Char_count by the number of

310 ! characters in current line.

320 EXIT IF Char_count<=0

330 END LOOP

340 !

350 ASSIGN @File TO *!Cleans out file buffer.

360 ENTER Addr;Line$!Close off reading

370 CLEAR SCREEN

380 DISP "Transfer complete."

390 LOCAL Addr

400

END

1 2 ... 244 245 246 247 248 249 250 251 252 253 254 ... 328 329

Comentários a estes Manuais

Sem comentários

Agilent Technologies 8935 Series Manual do Utilizador Página 249

Comentários a estes Manuais

Manuais e produtos relacionados com Multímetros Agilent Technologies 8935 Series