'Open the parameter file
REM $INCLUDE: 'param.inc'

SUB gpibinit

'****************************************************************************
'This is a dummy routine for testing.
'
'Zack Wolf
'5/21/94
'****************************************************************************

'Display a message
PRINT
PRINT "Resetting the GPIB routine"

END SUB