; $Id: insget.pro,v 1.2 1997/01/15 03:11:50 ali Exp $
;
; Copyright (c) 1996-1997, Research Systems, Inc.  All rights reserved.
;       Unauthorized reproduction prohibited.
;
;+
; NAME:
;       INSGET
;
; PURPOSE:
;       Stub for INSGET.  Displays message saying that insight must be running.
;		Once Insight is restored and running this routine will be replaced by
;		the actual compiled version in the insight save file.
;
; CALLING SEQUENCE:
;       INSGET
;
; DEVELOPMENT NOTES:
;		- 
;
;------------------------------------------------------------------------------
function InsGet, $
	arg1,  arg2,  arg3,  $
	arg4,  arg5,  arg6,  $
	arg7,  arg8,  arg9,  $
	arg10, arg11, arg12, $
	arg13, arg14, arg15, $
    arg16, arg17, arg18, $
	arg19, arg20, arg21, $
	arg22, arg23, arg24, $
	arg25, _EXTRA=extra

	; Notify user that Insight must be running to use this function
	;
	result = DIALOG_MESSAGE($
		['Insight must be running in order to use InsGet.', $
  		'Please start Insight and try again.'] )
	return, 0
end