;;
;; Install script for Topper v1.1
;;
;; To run this script, execute it from CLI   
;; This script needs OS version 3.0 or later.
;;

C:VERSION >NIL: graphics.library 39
IF NOT WARN

  REQUESTCHOICE TITLE "Topper Installation..." BODY "Copy Topper to your C: directory ?" GADGETS " Copy | Cancel " >env:topper

  IF $topper EQ "1"
    COPY Topper c:
  ELSE
    QUIT
    ENDIF

  REQUESTCHOICE TITLE "Topper Installation..." BODY "Copy Ratings.txt and NoTopper.txt*Nto your XENOLINK:Text/Topper directory ?*N(This will create a directory with this name.)" GADGETS " Copy | Cancel " >env:topper

  IF $topper EQ "1"
    IF NOT EXISTS XENOLINK:Text/Topper
      MAKEDIR XENOLINK:Text/Topper
      ENDIF
    COPY Ratings.txt NoTopper.txt XENOLINK:Text/Topper/
  ELSE
    QUIT
    ENDIF

  REQUESTCHOICE TITLE "Topper Installation..." BODY "Select which Form set to install:" GADGETS " 1 | 2 | 3 " >env:topper
  
  IF $topper EQ "1"
    COPY Forms1/T#?F.#? XENOLINK:Text/Topper/
    ENDIF
  IF $topper EQ "2"
    COPY Forms2/T#?F.#? XENOLINK:Text/Topper/
    ENDIF
  IF $topper EQ "0"
    COPY Forms3/T#?F.#? XENOLINK:Text/Topper/
    ENDIF

  DELETE env:topper >NIL:
  ECHO "*N*E[1mInstallation Complete*E[0m*N"

ELSE

  ECHO "This script requires OS 3.0 or later."

  ENDIF