;********************************************************************* ;* 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 =