home *** CD-ROM | disk | FTP | other *** search
- ; PhonePak VFX/GVPPatch Installation Script
- ; Version 1.04
- ; By Russel Miranda - 20 Aug 1992
- ; modified for IOExtender ECQ 24aug92
- ; modified for a2000 040 ecq 24aug92
-
- ; Written for use with Commodore's Installer.
-
- (set IOX "GVP.Install:")
-
- ; ====================
- ; Make sure the user really wants to install this patch...
- ;
-
- (message "This installation should only be performed if you are experiencing "
- "character loss during high speed serial transfers."
- "with the A2000 68040r Serial port.\n\n")
-
- (if (askbool (prompt "Do you understand, and wish to proceed with the "
- "installation of the GVPPatch program?")
- (help "Please read the GVPPatch.Readme file supplied for more "
- "information.")
- (choices "Yes" "No"))
- (
- (copyfiles (source (tackon IOX "GVP/GVPPatch/GVPPatch"))
- (dest "C:"))
- (startup "c/GVPPatch"
- (prompt "Is it OK to modify your startup to run the GVPPatch "
- "program when you boot?")
- (help "For this program to be useful, it should be run in your "
- "User-Startup or Startup-Sequence.\n\n"
- @startup-help)
- (command ("Run >NIL: GVPPatch -sgvpser.device")))
- )
- (
- (message "Aborting installation of the GVPPatch program.")
- (exit (quiet))
- )
- )
-
- ; Set up the default dest so the user isn't confused.
- (set @default-dest "C:")
-