home *** CD-ROM | disk | FTP | other *** search
- alias bold echo "*E[1m" NOLINE
- alias ital echo "*E[3m" NOLINE
- alias norm echo "*E[0m"
-
- echo " "
- echo " STAR TECK GENIES INSTALLATION / DE-INSTALLATION"
- echo " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
- echo " "
- echo " This procedure will automatically copy the Star Teck Genies to your;"
- echo " REXX: directory."
- echo " If this is not were you've installed your Professional Draw Genies"
- echo " then stop this installation now! (see manual installation instructions)"
- echo " This procedure also copies these associated files;"
- echo " GridSet.STk, ScaleList.STk and ZoomList.STk to your SYS:S directory."
- echo " "
- echo " 48,640 bytes ( 95 blocks) of free space is needed for Genie installation."
- echo " 3,072 bytes ( 6 blocks) for "SYS:S" directory installation."
- echo " 51,712 bytes (101 blocks) TOTAL"
- echo " "
- echo " If you would like to install genies, choose Yes"
- echo " If you would rather quit this proceedure or de-install genies, choose No"
- ask " [y/N] ?"
- if not warn
- echo " Would you like to De-install Star Teck Genies?"
- ask " [y/N] ?"
- if warn
- SKIP deinstall
- else
- echo "Goodbye..."
- endcli > nil:
- endif
- endif
-
- echo " "
-
-
- bold
- echo " Installing Star Teck Genies"
- norm
- echo " "
- ital
- copy GENIES/EmbossEngrave.pdrx to REXX:
- echo "copy GENIES/EmbossEngrave.pdrx to REXX:"
- copy GENIES/GridSet.pdrx to REXX:
- echo "copy GENIES/GridSet.pdrx to REXX:"
- copy GENIES/PieChart.pdrx to REXX:
- echo "copy GENIES/PieChart.pdrx to REXX:"
- copy GENIES/ScalePercent.pdrx to REXX:
- echo "copy GENIES/ScalePercent.pdrx to REXX:"
- copy GENIES/SelectByAttribute.pdrx to REXX:
- echo "copy GENIES/SelectByAttribute.pdrx to REXX:"
- copy GENIES/Star.pdrx to REXX:
- echo "copy GENIES/Star.pdrx to REXX:"
- copy GENIES/ZoomWindow.pdrx to REXX:
- echo "copy GENIES/ZoomWindow.pdrx to REXX:"
-
- copy GENIES/S/GridSet.STk SYS:S
- echo "copy GENIES/S/GridSet.STk SYS:S"
- copy GENIES/S/ScaleList.STk SYS:S
- echo "copy GENIES/S/ScaleList.STk SYS:S"
- copy GENIES/S/ZoomList.STk SYS:S
- echo "copy GENIES/S/ZoomList.STk SYS:S"
-
- norm
- bold
- echo ""
- echo ""
-
- echo " Would you also like to be able to run these genies from the tool menu?"
- norm
-
- echo ""
- echo " GridSet by double clicking on the ADD POINTS TOOL"
- echo " ScalePercent by double clicking on the CUT POINTS TOOL"
- echo " Zoom Window by double clicking on the FREEHAND TOOL"
- echo ""
- echo " This procedure is HIGHLY RECOMMENDED for optimum production!"
- echo ""
- echo " You will need 11,264 bytes (22 blocks) of free space for installation."
- echo ""
- ask " Would you like this done for you [y/N] ?"
-
- if warn
- ital
- copy REXX:GridSet.pdrx to REXX:_PD_TOOLS_ADDP.pdrx
- echo "copy REXX:GridSet.pdrx to REXX:_PD_TOOLS_ADDP.pdrx"
- copy REXX:ScalePercent.pdrx to REXX:_PD_TOOLS_CUTP.pdrx
- echo "copy REXX:ScalePercent.pdrx to REXX:_PD_TOOLS_CUTP.pdrx"
- copy REXX:ZoomWindow.pdrx to REXX:_PD_TOOLS_FREE.pdrx
- echo "copy REXX:ZoomWindow.pdrx to REXX:_PD_TOOLS_FREE.pdrx"
- endif
-
-
-
-
-
- norm
-
-
- if GE WARN
- bold
- echo " Sorry there were errors during the Installation!"
- echo " see manual installation instructions."
- norm
- endcli >NIL:
-
- endif
-
- echo ""
- echo ""
- echo " "
- echo " "
- bold
- echo " Genie installation Completed!"
- norm
- echo " "
- echo " "
- echo " Star Teck Genies"
- echo " are now ready for your productive use"
- echo " Be sure to mail in your shareware dues (real affordable)."
- echo " Your comments would be appreciated."
- echo " "
- echo " "
- echo " "
- echo " ENJOY!"
- echo " "
-
- ask " Press RETURN to proceed..."
-
- endcli >NIL:
-
-
- lab deinstall
-
- ital
- if exists rexx:EmbossEngrave.pdrx
- del rexx:EmbossEngrave.pdrx
- endif
-
- if exists rexx:GridSet.pdrx
- del rexx:GridSet.pdrx
- endif
-
- if exists rexx:PieChart.pdrx
- del rexx:PieChart.pdrx
- endif
-
- if exists rexx:ScalePercent.pdrx
- del rexx:ScalePercent.pdrx
- endif
-
- if exists rexx:SelectByAttribute.pdrx
- del rexx:SelectByAttribute.pdrx
- endif
-
- if exists rexx:Star.pdrx
- del rexx:Star.pdrx
- endif
-
- if exists rexx:ZoomWindow.pdrx
- del rexx:ZoomWindow.pdrx
- endif
-
-
- if exists s:GridSet.STk
- del s:GridSet.STk
- endif
-
- if exists s:ScaleList.STk
- del s:ScaleList.STk
- endif
-
- if exists s:ZoomList.STk
- del s:ZoomList.STk
- endif
-
- echo ""
-
- norm
- ask " Did you install the tool genies [y/N] ?"
- if not warn
-
- else
- ital
- if exists rexx:_PD_TOOLS_ADDP.pdrx
- del rexx:_PD_TOOLS_ADDP.pdrx
- endif
-
- if exists rexx:_PD_TOOLS_CUTP.pdrx
- del rexx:_PD_TOOLS_CUTP.pdrx
- endif
-
- if exists rexx:_PD_TOOLS_FREE.pdrx
- del rexx:_PD_TOOLS_FREE.pdrx
- endif
- endif
-
-
- echo ""
- echo ""
- echo " "
- echo " "
- norm
- bold
- echo ""
- echo ""
- echo ""
- echo " Genie De-installation Completed!"
- norm
- ital
- echo ""
- echo ""
- echo " Please pass a copy of this archive to friends."
- norm
- echo ""
- echo ""
- echo " Press RETURN to proceed..."
- echo ""
- echo ""
- echo ""
- echo ""
- ask ""
- endcli >nil:
-