DATA REGISTERS for each port.

100CLEAR SCREEN

110DIM A$[40]

120Vxi_address=70900

130!

140CLEAR 7

150OUTPUT Vxi_address;"*RST;*CLS" ! reset E1406

160!

170REPEAT

180OUTPUT Vxi_address;"SYST:ERR?"

190ENTER Vxi_address;Error

200PRINT "E1406 Reports Error: ";Error

210UNTIL (Error=0)

220!

230OUTPUT Vxi_address;"VXI:WRITE 128,4,1"! reset E1459A

240WAIT .1

250OUTPUT Vxi_address;"VXI:WRITE 128,4,0"! un-reset E1459A

260WAIT .1

270!

275! dav enable, ext clk, edge enable, port 0

280OUTPUT Vxi_address;"VXI:WRITE 128,16,7"

285! unmask high order 8 pos bits for port 0

290OUTPUT Vxi_address;"VXI:WRITE 128,24,-256"

295! unmask high order 8 neg bits for port 0

300OUTPUT Vxi_address;"VXI:WRITE 128,26,-256"

310!

315! dav enable, ext clk, edge enable, port 1

320OUTPUT Vxi_address;"VXI:WRITE 128,32,7"

325! unmask high order 8 pos bits for port 1

330OUTPUT Vxi_address;"VXI:WRITE 128,36,-256"

335! unmask high order 8 neg bits for port 1

340OUTPUT Vxi_address;"VXI:WRITE 128,38,-256"

350!

355! set debounce to 16 uS (250 KHz) for ports 0/1

360OUTPUT Vxi_address;"VXI:WRITE 128,30,2"

370!

375! E1459A ints disabled, port 2/3 select

380OUTPUT Vxi_address;"VXI:WRITE 128,4,16"

390!

395! dav enable, ext clk, edge enable, port 2

400OUTPUT Vxi_address;"VXI:WRITE 128,16,7"

405! unmask high order 8 pos bits for port 2

410OUTPUT Vxi_address;"VXI:WRITE 128,24,-256"

415! unmask high order 8 neg bits for port 2

420OUTPUT Vxi_address;"VXI:WRITE 128,26,-256"

430!

435! dav enable, ext clk, edge enable, port 3

440OUTPUT Vxi_address;"VXI:WRITE 128,32,7"

445! unmask high order 8 pos bits for port 3

450OUTPUT Vxi_address;"VXI:WRITE 128,36,-256"

455! unmask high order 8 neg bits for port 3

460OUTPUT Vxi_address;"VXI:WRITE 128,38,-256"

470!

475! set debounce to 16 uS (250 KHz) for ports 2/3

480OUTPUT Vxi_address;"VXI:WRITE 128,46,2"

490!

500OUTPUT Vxi_address;"*SRE 128"

HP E1459A Register Definitions 99