$!	KITINSTAL.COM - for VMS Kermit-32
$!
$	On Control_Y Then Vmi$Callback CONTROL_Y
$	On Warning Then Exit $Status
$	If P1 .eqs. "VMI$_INSTALL" then goto Install
$	Exit Vmi$_unsupported
$
$ Install:
$	Type Sys$Input

+-----------------------------------------------------------------------+
| This installation will create KERMIT.DOC in SYS$HELP.			|
| Kermit should be initiated using the foreign command protocol.  	|
| Place the following command in the system login command procedure:	|
|									|
|	$ Kerm*it :== $KERMIT						|
+-----------------------------------------------------------------------+

$	Vmi$Callback SET PURGE yes
$	Vmi$Callback SET IVP no
$	
$	Vmi$Callback PROVIDE_IMAGE		Exe$	KERMIT.EXE	Vmi$Root:[SysExe]
$	Vmi$Callback PROVIDE_FILE		Hlb$	KERMIT.HLB	Vmi$Root:[SysHlp]
$	Vmi$Callback PROVIDE_DCL_HELP			KERMIT_SYS.HLP
$	Vmi$Callback PROVIDE_FILE		Hlb$	KERMIT.DOC	Vmi$Root:[SysHlp]
$	Vmi$Callback PROVIDE_DCL_COMMAND		KERMIT.CLD
$
$	Exit Vmi$_success