home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 4: Phase Four / 17Bit_Phase_Four.iso / files / 3237.dms / 3237.adf / Install-Fonts < prev    next >
Encoding:
Text File  |  1993-10-01  |  3.8 KB  |  86 lines

  1. ;Installer Script v1.0 by Clive Gardner 02/10/93
  2. ;Installer Script v1.1 by Clive Gardner 24/07/94
  3.  
  4. (set cp "CG_Collection_8:CGFonts/")
  5. (set @default-dest "")
  6.  
  7. (complete 0)
  8. (set opts
  9.     (askoptions
  10.         (prompt
  11.             "Compugraphic Collection Font Installer\n"
  12.             "Please select the fonts you would like copied "
  13.             "from the list below.")
  14.             (choices "Borzoi Reader Bold" "Caraway Bold" "Carrick Caps"                      "Crackling Fire" "Futura Cond-Thin"                      "Futura ExtraBold-Thin" "Kastellar Open Face"                      "Kathlita" "Showboat" "Tempus Bold" "Tintoretto"                      "Upsilon" "Wedgie")
  15.             (default 0)
  16. (help "\nOn this screen you can select which fonts you would like to be copied to the directory you will specify in a moment. You can select any number of the listed Compugraphic type fonts. Obviously please keep in mind how much space you have available. Each font will take up approx. 60K of disk space. To select a font simply click on the check box beside it. When selected it will display a tick. When you have completed your selection please click on the PROCEED button.")
  17.                )
  18.          )
  19. (complete 10)
  20. (set path
  21. (askdir
  22. (prompt ("Please set the directory into which you would like your chosen fonts to be installed. This will normally be your CGFonts: directory")
  23. (help ("\nYou must now set the directory where you would like your selected Compugraphic fonts installed. You should have a floppy or hard-disk directory which contains your fonts. This will normally be called CGFonts if you are using ProPage or Pagesetter, or intellifont if you are using Wordworth. For more details consult your program manual.\n\nYou must select the path using the file requester, but DO NOT select a file, simply click PROCEED when the requester displays your chosen directory.")
  24. (default "RAM DISK:")
  25. )
  26. )
  27. )
  28. )
  29. (Complete 15)
  30. (message "The location you selected for your chosen Compugraphic fonts to be copied to was:\n\n"path)
  31.  
  32. (If (BITAND opts 1)
  33. (Copyfiles (Source cp) (dest path) (Pattern "Borzoi_Reader-Bold.#?"))
  34. )
  35. (complete 20)
  36. (If (BITAND opts 2)
  37. (Copyfiles (Source cp) (dest path) (Pattern "CarawayBold.#?"))
  38. )
  39. (complete 25)
  40. (If (BITAND opts 4)
  41. (Copyfiles (Source cp) (dest path) (Pattern "CarrickCaps.#?"))
  42. )
  43. (complete 30)
  44. (If (BITAND opts 8)
  45. (Copyfiles (Source cp) (dest path) (Pattern "CracklingFire.#?"))
  46. )
  47. (complete 35)
  48. (If (BITAND opts 16)
  49. (Copyfiles (Source cp) (dest path) (Pattern "Futura-Cond-Thin.#?"))
  50. )
  51. (complete 40)
  52. (If (BITAND opts 32)
  53. (Copyfiles (Source cp) (dest path) (Pattern "FuturaCondExtrBold-Thin.#?"))
  54. )
  55. (complete 45)
  56. (If (BITAND opts 64)
  57. (Copyfiles (Source cp) (dest path) (Pattern "KastellarOpenFace.#?"))
  58. )
  59. (complete 50)
  60. (If (BITAND opts 128)
  61. (Copyfiles (Source cp) (dest path) (pattern "Kathlita.#?"))
  62. )
  63. (complete 55)
  64. (If (BITAND opts 256)
  65. (Copyfiles (source cp) (dest path) (pattern "Showboat.#?"))
  66. )
  67. (complete 60)
  68. (If (BITAND opts 512)
  69. (Copyfiles (source cp) (dest path) (pattern "TempusBold.#?"))
  70. )
  71. (complete 65)
  72. (If (BITAND opts 1024)
  73. (Copyfiles (source cp) (dest path) (pattern "Tintoretto.#?"))
  74. )
  75. (complete 70)
  76. (If (BITAND opts 2048)
  77. (Copyfiles (source cp) (dest path) (pattern "Upsilon.#?"))
  78. )
  79. (complete 75)
  80. (If (BITAND opts 4096)
  81. (Copyfiles (source cp) (dest path) (pattern "Wedgie.#?"))
  82. )
  83. (Complete 80)
  84. (Message "Copying of your selected fonts has now been completed.\n\nIMPORTANT:\n\nIf you own Professional Page 2.1 (and above) or PageSetter 3 please boot from your program disk or hard disk and run the CG_Update program included on this disk once the installer has finished.\n\nIf you own Wordworth 2.0 (and above) please boot from your program disk or hard disk and run the AGFA Install program included on one of your original AGFA Fonts disks once the installer has finished.")
  85. (Complete 100)
  86.