;*********************************************************************
;* This is a simpler installation script to show you how you can
;* get a lot of user interface with not much effort. This script file
;* was created with the help of Winster, the utility included in the 
;* registered user Universal INSTALL package. 
;*********************************************************************
;
ClearScreen
Backplane Green on Magenta =
BuildWindow
  StartRow =3
  StartColumn =6
  ShadowType =Big
  WindowColor =Gray
  Border =Red
  TopTitle =Sample Installation
  BottomTitle =Press ENTER to continue...
  Text Center Black =This "sample" installation doesn't 
  Text Center Black =really install anything, but
  Text Center Black =it does show you how easy
  Text Center Black =it is to create a
  Text Center Black =professional look!
EndWindow
BuildWindow
  StartRow =16
  StartColumn =center
  ShadowType =Big
  WindowColor =Gray
  Text Center Blue =This script showcases the "FindDisk" command, which can 
  Text Center Blue =be useful for locating a previous version of your software
  Text Center Blue =or getting the drive letter of a network drive, for example.
EndWindow
Wait =Enter,Esc
On (Esc) Jump =Quit
; -----------------------
;  Ask for Volume Label
; -----------------------
ClearPlane
BuildWindow
  StartRow =6
  StartColumn =center
  ShadowType =Big
  WindowColor =White
  Border =Blue
  RowMargin =4
  ColumnMargin =21
EndWindow
BuildWindow
  StartRow =Window+1
  StartColumn =Window+2
  WindowColor =Cyan
  ShadowType =Small
  RowMargin =0
  ColumnMargin =2
  Text 1,1 Black =Please enter 
  Text 1,2 Black =the volume 
  Text 1,3 Black =label of
  Text 1,4 Black =a disk to 
  Text 1,5 Black =search for:
EndWindow
BuildWindow
  StartRow =Window+3
  StartColumn =Window+24
  WindowColor =Blue
  ShadowType =Small
  RowMargin =0
  ColumnMargin =0
  Text 1,1 White =             
EndWindow
Input
  StartRow = Window+3
  StartColumn =Window+26
  Action =Enter, Esc
  TextColor =White on blue
  Default =GOODSOFT
  Width =11
EndInput
On (Esc) Jump =Quit
; ------------------
;  Search for Disk
; ------------------
ClearPlane
BuildWindow
  StartRow =3
  StartColumn =Center
  ShadowType =None
  WindowColor =Magenta
  Text Center White =Depending on your system, this may take up to a few minutes.
EndWindow
BuildWindow
  StartRow =8
  StartColumn =Center
  WindowColor =Green
  ShadowType =Big
  Text 1,1 White =INSTALL is now searching
  Text 1,2 White =for this disk: $INPUTRESULT
  Text 1,3 White =
  Text 1,4 White =This is an example of using script
  Text 1,5 White =variables to gather user input and
  Text 1,6 White =use it in an installation.
EndWindow
FindDisk =$INPUTRESULT
BuildWindow
  StartRow =20
  StartColumn =Center
  WindowColor =Gray
  ColumnMargin =1
  Text Center Black =Found! Press ENTER to continue...
EndWindow
Wait =Enter
; -----------------
;  Display results
; -----------------
ClearPlane
BuildWindow
  StartRow =Center
  StartColumn =Center
  ShadowType =Big
  WindowColor =Red
  Text Center White =The disk is located in drive $FINDRESULT !
  Text Center White =
  Text Center White =Press ESC to quit.
EndWindow
Wait =ESC
; ------
;  Quit 
; ------
[Quit]
ClearScreen
Text Gray on Black 1,2  =Thank you for trying out Universal INSTALL!
Text Gray on Black 1,4  =
Text Gray on Black 1,5  = The GoodSoft Co.
Text Gray on Black 1,6  = 1630 30th Street, Suite 235
Text Gray on Black 1,7  = Boulder, CO 80301 U.S.A
Text Gray on Black 1,8  =
