HP (Hewlett-Packard) E1459A Network Router User Manual


 
102 HP E1459A Register Definitions
1470 A=BINAND(A0,-256)
1480 PRINT "Wrd 0 Pos Edge: ";A
1490 A=BINAND(A1,-256)
1500 PRINT "Wrd 0 Neg Edge: ";A
1510 !
1515 ! get edge int status register
1520 OUTPUT Vxi_address;"VXI:READ? 128,6"
1530 ENTER Vxi_address;A
1540 A=BINAND(A,15)
1550 PRINT "EInt Status: ";A
1560 !
1565 ! print wrd 1 edge registers
1570 B=BINAND(B0,-256)
1580 PRINT "Wrd 1 Pos Edge: ";B
1590 B=BINAND(B1,-256)
1600 PRINT "Wrd 1 Neg Edge: ";B
1610 !
1615 ! get edge int status register
1620 OUTPUT Vxi_address;"VXI:READ? 128,6"
1630 ENTER Vxi_address;A
1640 A=BINAND(A,15)
1650 PRINT "EInt Status: ";A
1660 !
1665 ! print wrd 2 edge registers
1670 C=BINAND(C0,-256)
1680 PRINT "Wrd 2 Pos Edge: ";C
1690 C=BINAND(C1,-256)
1700 PRINT "Wrd 2 Neg Edge: ";C
1710 !
1715 ! get edge int status register
1720 OUTPUT Vxi_address;"VXI:READ? 128,6"
1730 ENTER Vxi_address;A
1740 A=BINAND(A,15)
1750 PRINT "EInt Status: ";A
1760 !
1765 ! print wrd 3 edge registers
1770 D=BINAND(D0,-256)
1780 PRINT "Wrd 3 Pos Edge: ";D
1790 D=BINAND(D1,-256)
1800 PRINT "Wrd 3 Neg Edge: ";D
1810 !
1815 ! get edge int status register
1820 OUTPUT Vxi_address;"VXI:READ? 128,6"
1830 ENTER Vxi_address;A
1840 A=BINAND(A,15)
1850 PRINT "EInt Status: ";A
1860 PRINT
1870 !
1880 OUTPUT Vxi_address;"DIAG:INT:SET1 ON"
1890 OUTPUT Vxi_address;"DIAG:INT:ACT ON"
1900 OUTPUT Vxi_address;"*OPC?"
1910 ENTER Vxi_address;Done
1920 !
1930 ENABLE INTR 7;2
1935 !dav/edge int enabled, port 0/1 select
1940 OUTPUT Vxi_address;"VXI:WRITE 128,4,96"
1950 !
1960 RETURN