home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
windows
/
adon.zip
/
SHOPPER.INF
< prev
Wrap
INI File
|
1990-10-15
|
14KB
|
423 lines
SetMainBorderTo Double
SetCompletionStatusTo Unfinished
SetSupportInformation
Please call 1-800-234-9497 and ask for Clip-Art Window Shopper Support
to report this error and request assistance. Our office is open from
9 AM to 5 PM Pacific time.
EndSetSupportInformation
Dialog
.c =====================================
.c *** CLIP-ART WINDOW SHOPPER (TM) ***
.c *** INSTALLATION ***
.c ======================================
If you make a mistake during installation, just exit with Ctrl+X and
start over.
Clip-Art Window Shopper requires:
1) a VGA or EGA graphics adapter,
2) a hard drive (fixed disk),
3) a Hayes-compatible modem (300, 1200, 2400, 4800 or 9600 baud),
4) DOS version 3.0 or later,
5) the retail version of MS-Windows version 2.10 or later (NOT the
runtime single-application version distributed with some programs
such as Micrografx Designer(tm) and Aldus Pagemaker(tm)).
EndDialog
SetBottomLineTo Use <Ctrl+X> to quit. Call 1(800)234-9497 for assistance.
If DOSVersion < 3.0
Dialog
Clip-Art Window Shopper cannot be used on your machine
because the DOS Version is too old. Please install DOS
Version 3.0 or later, then try installing 'Shopper' again.
'Shopper' Installation is aborting.
EndDialog
SoLong
EndIf
[Point1]
;; here is where the minimal files are selected for expanding and copying
QueFiles
shopper.exe
shopper.ico
update.bat
update.pif
EndQueFiles
QueFiles to DATA
;; non-thumbnail database files
??0*.*
;;??1*.*
;;??3*.*
;;??4*.*
;;??5*.*
;;??6*.*
;;??7*.*
;;??9*.*
EndQueFiles
;;[Number1] := QueSize ;; override below
[Number1] := 540672 ;; from test on 2048 cluster size drive
Dialog
Clip-Art Window Shopper will need at least [Number1] bytes of space on
a single drive for all its files (the exact space requirement depends
on the drive size). 'Shopper' can use more space if it is available.
We recommend installing 'Shopper' on a hard drive (fixed disk).
You may not install 'Shopper' onto a floppy drive or RAM disk.
If installing to a network drive, you must have Write, Erase and
Directory Creation access rights to the installation directory.
EndDialog
;; Set default drive and directory
[InstallationDirectory] := C:\SHOPPER
;; Prompt for drive -- Come back here if drive must be reselected
[Point2]
[Number1] := 540672 ;; reset in case has been recalculated for larger disk
DetermineInstallationDrive RequireFixed [Number1]
Do CheckDrive
If [Number5] = 1
GoTo [Point2]
EndIf
;; Save this drive for detecting a change in the InstallationDirectory selection
[String1] := InstallationDrive
;; Set default directory
[InstallationDirectory] := InstallationDrive:\SHOPPER
[Point3] ;; Come back here if directory must be reselected
Dialog [InstallationDirectory] ;;Prompt for directory --
Clip-Art Window Shopper will keep all its files together on the
directory you specify, with some of the files in a subdirectory
called DATA. Please enter the directory where 'Shopper' should be
stored. (Note: this cannot be the root directory.)
If the directory does not exist, INSTALL will create it for you.
EndDialog
If [String1] <> InstallationDrive
Do CheckDrive
If [Number5] = 1
GoTo [Point2]
EndIf
[String1] := InstallationDrive
EndIf
;; Check for root directory
If [InstallationDirectory] = InstallationDrive:\
Dialog PressAKey
Shopper may not be installed to or run from the root directory.
Please choose another directory on the installation drive.
EndDialog
[InstallationDirectory] := InstallationDrive:\SHOPPER
GoTo [Point3]
EndIf
[DIR1] := [InstallationDirectory]
If DirectoryExists [DIR1]
Dialog [YesOrNo1]
The installation directory already exists; existing files
will be deleted or overwritten if INSTALL continues.
Do you want to continue and overwrite?
EndDialog
If [YesOrNo1] = N
Dialog PressAKey
Please choose a directory which may be overwritten,
or which doesn't exist yet.
EndDialog
GoTo [Point3]
EndIf
;; OK to overwrite
DeleteFiles from [InstallationDirectory] Quietly
shopper.exe ;; wipe files about to install to prevent
shopper.ico ;; "OK to replace?" prompts
update.bat
update.pif
read.me
;; wipe data from old BETA version:
0*.* ;; all database files
1*.*
;;2*.* etc. if ever used
[DIR1] := [InstallationDirectory]\DATA
If DirectoryExists [DIR1]
;; all non-thumbnail database files
??0*.*
??1*.*
??3*.*
??4*.*
??5*.*
??6*.*
??7*.*
??9*.*
;;ArtRight Volume 1
0080002F.*
00200032.*
00800030.*
00200033.*
00800031.*
00200034.*
00800032.*
00200035.*
00800033.*
00200036.*
EndIf
EndDeleteFiles
DeleteFiles from [InstallationDirectory] Quietly
EndDeleteFiles
EndIf
;; Calculate space required from drive size (QueSize doesn't take cluster size
;; into account)
[Number2] := TotalSpaceOnDrive InstallationDrive
;;If [Number2] < 16777216 ;; then cluster size is 2048? or 4096?
;; [Number1] := unchanged from initial setting
;;else
If [Number2] > 33554432 ;; then cluster size is 4096?
[Number1] := 860160 ;; calc'd size for cluster size=4096
EndIf
If [Number2] > 67108864 ;; then cluster size is 8192?
[Number1] := 1581056 ;; calc'd size for cluster size=8192
EndIf
If [Number2] > 134217728 ;; then cluster size is 16384?
[Number1] := 3014656 ;; calc'd size for cluster size=16384
EndIf
;; Now that old files have been cleared, check for sufficient free space
If FreeSpaceOnDrive InstallationDrive < [Number1]
Dialog [YesOrNo1]
Clip-Art Window Shopper would require at least [Number1] bytes
of free space on drive InstallationDrive for full installation.
There is not enough space on the drive to ensure successful
installation. Installation may not be complete and 'Shopper'
may not work correctly.
.c Do you want to try installing anyway?
EndDialog
If [YesOrNo1] = N
Dialog
Please select a different drive with sufficient space, or
exit INSTALL, delete unwanted files to free up space,
and try INSTALL again.
EndDialog
GoTo [Point2]
EndIf
EndIf
;; here is where the essential files actually get copied
GetQuedFiles
CopyFiles
READ.ME
EndCopyFiles
;;****************************************************************************
;; now add optional thumbnail files if there is room
[Number1] := 186368 ;; from test, 2048 cluster size
If [Number2] > 33554432 ;; then cluster size is 4096? or 8192?
[Number1] := 225280 ;; calc'd size for cluster size=4096
EndIf
If [Number2] > 67108864 ;; then cluster size is 8192? or 16384?
[Number1] := 303104 ;; calc'd size for cluster size=8192
EndIf
If [Number2] > 134217728 ;; then cluster size is 16384? or 32768?
[Number1] := 458752 ;; calc'd size for cluster size=16384
EndIf
If FreeSpaceOnDrive InstallationDrive >= [Number1]
QueFiles to DATA
002*.*
008*.*
EndQueFiles
GetQuedFiles
else
Dialog PressAKey
INSTALL found enough space to install the minimum files essential
to running Clip-Art Window Shopper, but there was not enough room
to load any thumbnail files for previewing clip-art libraries.
We strongly recommend clearing some additional space (350K, or
more if possible) from your InstallationDrive drive, to ensure
full functionality and satisfactory performance from 'Shopper'.
You will not need to run INSTALL again after clearing this
space; 'Shopper' will utilize it automatically.
EndDialog
EndIf
ChangeDirectoryTo [InstallationDirectory]
SetCompletionStatusTo Finished
;;Find out which version of Windows they use.
GoToXY @xy(40,8)
GetMenuChoice
Windows 2.1 or 2.11
; Select which version of Windows you will use with 'Shopper'.
Windows 386
; Select which version of Windows you will use with 'Shopper'.
Windows 3.0
; Select which version of Windows you will use with 'Shopper'.
EndGetMenuChoice
InCase Choice is
= 1: [String9] := WIN
[Number9] := 1
;; [DIR2] := C:\WIN
= 2: [String9] := WIN386
[Number9] := 2
;; [DIR2] := C:\WIN386
= 3: [String9] := WIN
[Number9] := 3
;; [DIR2] := C:\WIN30
EndInCase
If [Number9] = 3 ;; Windows 3.0
Dialog
.c *** INSTALLATION COMPLETE ***
Clip-Art Window Shopper(TM) has been successfully installed!
Please add 'Shopper' to your Accessories group box in MS Windows.
In the Windows Program Manager, select the Accessories group box,
and choose 'New...' from the 'File' menu to add a Program Item.
Enter 'Clip-Art Window Shopper' in the Description field, and
'[InstallationDirectory]\SHOPPER' in the Command Line field.
You should also have the directory where you installed Windows in
your path. For an explanation of the path and how to set it, see
your MS-DOS or Windows manual.
EndDialog
else ;; Windows 2.x or 386
Dialog
.c *** INSTALLATION COMPLETE ***
Clip-Art Window Shopper(TM) has been successfully installed!
Please add [InstallationDirectory] to the 'PATH=' statement in your
AUTOEXEC.BAT file. Otherwise you will only be able to start
'Shopper' when the current directory is [InstallationDirectory].
You should also have the directory where you installed Windows in
your path. For an explanation of the path and how to set it, see
your MS-DOS or Windows manual.
EndDialog
EndIf
If [Number9] = 3 ;; Windows 3.0
[String1] := InstallationDrive
Dialog
.c STARTING CLIP-ART WINDOW SHOPPER
If your machine is in DOS, first start MS Windows:
1) At the DOS prompt, type '[String9]'.
To start Clip-Art Window Shopper when MS Windows is running:
1) bring up the Program Manager window.
2) select the Accessories group box.
3) double-click on the SHOPPER icon.
Or, you could select 'Run...' from the 'File' menu of either the Program
Manager or File Manager, and type 'shopper' into the 'Run:' edit box.
EndDialog
Dialog
.c STARTING CLIP-ART WINDOW SHOPPER (cont.)
You may also start 'Shopper' from DOS when you start Windows:
1) Set your current drive and directory to the drive and directory
containing SHOPPER.EXE by typing at the DOS prompt
'[String1]:' followed by 'CD [InstallationDirectory]'.
2) At the DOS prompt, type '[String9] SHOPPER'.
EndDialog
else
Dialog
.c STARTING CLIP-ART WINDOW SHOPPER
If your machine is in DOS, first start MS Windows:
1) At the DOS prompt, type '[String9]'.
To start Clip-Art Window Shopper when MS Windows is running:
1) bring up the main 'MS-DOS Executive' window.
2) change drives and directories to [InstallationDirectory],
the directory containing SHOPPER.EXE.
3) either double-click on the file SHOPPER.EXE, or select
'Run...' from the 'File' menu and type 'shopper' into
the 'Run:' edit box.
EndDialog
Dialog
.c STARTING CLIP-ART WINDOW SHOPPER (cont.)
You may also start 'Shopper' from DOS when you start Windows:
1) Set your current drive and directory to the drive and directory
containing SHOPPER.EXE by typing at the DOS prompt
'[String1]:' followed by 'CD [InstallationDirectory]'.
2) At the DOS prompt, type '[String9] SHOPPER'.
EndDialog
EndIf
Dialog
.c PREVIEWING CLIP ART
The following clip art library is available for immediate preview:
Art Right (tm) Volume 1.
Other libraries are on the additional diskettes; Clip-Art Window Shopper
will ask you to insert them when needed.
Please read the file [InstallationDirectory]\READ.ME
for late-breaking news that didn't make it into the manual.
EndDialog
SoLong
;;*****************************************************************************
;; PROCEDURES
Procedure CheckDrive
[Number5] := 0 ;; flag, set to 1 if drive tests invalid
[String2] := InstallationDrive
;; Check that a drive is acceptable. Does not test for adequate free space.
If DriveIsRAM [String2]
Dialog PressAKey
RAM drives are not suitable for Clip-Art Window Shopper installation.
RAM drives lose their files when the PC is turned off or rebooted.
Please choose a hard drive for this installation.
EndDialog
[Number5] := 1
EndIf
If DriveIsRemoveable InstallationDrive
;; Check removable drives closely.
If DriveIsBernoulli InstallationDrive
Do RemovableDialog
else
[Number2] := TotalSpaceOnDrive InstallationDrive
If [Number2] < 1500000 ;; smaller than 1.5 meg is a floppy drive
Dialog
Floppy drives are not suitable for Clip-Art Window Shopper
installation. Floppy drives are too slow to give acceptable
performance.
Please choose a hard drive for this installation.
EndDialog
[Number5] := 1
else ;; larger than 1.5 meg may be alright
Do RemovableDialog
Endif
Endif
Endif
EndProcedure
Procedure RemovableDialog
Dialog [YesOrNo1]
Removable media like Bernoulli boxes may be too slow to give
acceptable performance. Hard drives are usually much faster.
Do you want to change your selection to a hard drive?
EndDialog
If [YesOrNo1] = Y
[Number5] := 1
Endif
EndProcedure
EndScript