'****************************************************************************
'Module PSHP3457
'This module contains I/O subroutines for the HP3457.  Its primary use
'is monitoring transductor voltages for current measurements.
'
'Zachary Wolf
'7/23/95
'****************************************************************************

SUB pshp3457cmon (c%)

'****************************************************************************
'This routine displays the voltage applied to a specified channel of the
'HP3457 DVM on the front panel.  Voltages can be monitored while the
'program is running.
'
'Input:
' c%, the DVM channel to read and display
'
'Zachary Wolf
'5/23/94
'****************************************************************************

END SUB

SUB pshp3457cv (c%, v!)

'****************************************************************************
'This routine reads the voltage applied to a specified channel of the
'HP3457 DVM.
'
'Input:
' c%, the DVM channel to read
'
'Output:
' v!, the measured voltage
'
'Zachary Wolf
'4/21/94, 7/19/95
'****************************************************************************

v! = 1!

END SUB

SUB pshp3457init

'****************************************************************************
'This subroutine initializes the HP3457.
'
'Zachary Wolf
'4/19/94, 5/19/95
'****************************************************************************

'Message
PRINT
PRINT "Resetting the HP3457 routine..."

END SUB

SUB pshp3457setpar (gpibin%, gpibout%, pshp3457addr$)

END SUB