home *** CD-ROM | disk | FTP | other *** search
/ Mikrobitti Virtuaalilehti 1997 / mbvirt1997d.iso / ohjelmat / htmlgrad.lha / HTMLGrad / Install < prev    next >
Encoding:
Text File  |  1997-08-08  |  3.0 KB  |  117 lines
  1. ;*****************************************************************************************************************************
  2. ;*                                                                                                                           *
  3. ;*                                                                                                                           *
  4. ;*                                             HTMLGrad 1.0 Install Script                                                   *
  5. ;*                                                                                                                           *
  6. ;*                                             Written by Alvaro Thompson                                                    *
  7. ;*                                                                                                                           *
  8. ;*                                                                                                                           *
  9. ;*                                                                                                                           *
  10. ;*****************************************************************************************************************************
  11.  
  12.  
  13. (set #info
  14.  (cat "\nWelcome to the HTMLGrad 1.0 Installing Script"
  15.       "\n\nThis program is written by Gareth Williams and"
  16.       "\nAlvaro Thompson ⌐1997 All Rights Reserved"
  17.  )
  18. )
  19.  
  20. (set #asl
  21.  (cat "I am now going to install the asl.library")
  22. )
  23.  
  24. (set #reqtools
  25.  (cat "I am now going to install the reqtools.library")
  26. )  
  27.  
  28. (set #where
  29.  (cat "Where would you like HTMLGrad to be installed?\n(A drawer will be created)")
  30. )
  31.  
  32. (set #shareware
  33.  (cat "\nHTMLGrad 1.0 is *SHAREWARE*"
  34.       "\n\nThis means that the program is partly disabled and"
  35.       "\nhas loads of very annoying pop-up requesters"
  36.       "\n\nPlease consider registering"
  37.  )
  38. )       
  39.  
  40. ;******************************************* Start the installing sequence **************************************************
  41.  
  42. (message #info)      
  43.  
  44.  
  45. (set destination
  46.  (askdir
  47.   (prompt #where)
  48.   (help @askdir-help)
  49.   (default "Sys:")
  50.  )
  51. )  
  52.  
  53. (set trgt (tackon destination "HTMLGrad"))
  54.  
  55. (makedir (tackon destination "HTMLGrad"))
  56. (makedir (tackon trgt "Examples"))
  57. (makedir (tackon trgt "Docs"))
  58.  
  59. (copyfiles
  60.  (source "Icons/")
  61.  (dest destination)
  62.  (all)
  63. )
  64.  
  65. (copylib
  66.  (prompt #asl)
  67.  (source "Libs/asl.library")
  68.  (dest "LIBS:")
  69.  (help @copylibs-help)
  70. ) 
  71.  
  72. (copylib
  73.  (prompt #reqtools)
  74.  (source "Libs/reqtools.library")
  75.  (dest "LIBS:")
  76.  (help @copylibs-help)
  77. ) 
  78.  
  79. (copyfiles
  80.  (source "Fonts/")
  81.  (dest "FONTS:")
  82.  (help @copyfiles-help)
  83.  (all)
  84. )
  85.  
  86. (copyfiles
  87.  (source "Docs/")
  88.  (dest (tackon trgt "Docs/"))
  89.  (all)
  90. )
  91.  
  92. (copyfiles
  93.  (source "Examples/")
  94.  (dest (tackon trgt "Examples/"))
  95.  (all)
  96. )
  97.  
  98. (copyfiles
  99.  (source "bin/")   
  100.  (dest trgt)
  101.  (all)
  102. )
  103.  
  104. (textfile
  105.  (dest "ENVARC:HTMLGrad")
  106.  (append trgt)
  107. ) 
  108.  
  109. (copyfiles
  110.  (source "ENVARC:HTMLGrad")
  111.  (dest "ENV:")
  112. )
  113.  
  114. (set @default-dest trgt)
  115.  
  116. (message #shareware)
  117.