home *** CD-ROM | disk | FTP | other *** search
/ Spanish Scene 4 / SpanishScene4.iso / Programas / DavidBarbion_Ind / backclock_V232c.lha / BackClock / Install next >
Text File  |  1999-06-16  |  4KB  |  152 lines
  1. ;/* install script version 1.4
  2. ; * $VER: BCInstall 1.4 (16-06-99)
  3. ; */
  4.  
  5.  
  6. (set #inst_text "BackClock Installation on Hard Disk")
  7. (set #prog "backclock")
  8. (set #rtlib  "rtracker.library")
  9. (set @appname "BackClock")
  10. (set #gosrc      1)
  11. (set #gobootup   1)
  12. (set #defpathprefs "sys:prefs/")
  13. (set #libs_src "libs")
  14. (set #libs_dst "libs:")
  15.  
  16. (set #destdir_prompt "Where do you want to install BackClock\nA drawer will be created.")
  17. (set #destdirprefs   "Where do you want to install BackClock preferences.")
  18.  
  19. (set #destdir (askdir
  20.     (prompt #destdir_prompt)
  21.     (help @askdir-help)
  22.     (default "Work:")
  23.   )
  24. )
  25.  
  26. (set @default-dest (tackon #destdir "BackClock"))
  27. (if (not (exists (@default-dest)))
  28.   (makedir @default-dest (infos))
  29. )
  30.  
  31. (copylib
  32.   (prompt  "Updating rtracker.library")
  33.   (source  (tackon #libs_src #rtlib))
  34.   (dest    #libs_dst)
  35.   (help    @copylib-help)
  36.   (confirm expert)
  37. )
  38.  
  39.  
  40. (if (>= @user-level 1)
  41.   (set #gobootup
  42.     (askbool
  43.       (prompt "Do you want to run BackClock each startup ?")
  44.       (help   "If you answer yes, then BackClock will be copied to SYS:WBStartup.")
  45.     )
  46.   )
  47. )
  48.  
  49. (set #sourcepath @default-dest)
  50.  
  51. (if (>= @user-level 1)
  52.   (set #defpathprefs (askdir
  53.     (prompt #destdirprefs)
  54.     (help   "Please choose where to place the preferences utility.")
  55.     (default #defpathprefs)
  56.     )
  57.   )
  58. )
  59. (if (>= @user-level 1)
  60.   (if (askbool
  61.         (prompt "Do you want to install sources ?")
  62.         (help   "This will install the sources of the program in the directory sources./")
  63.       )
  64.       (
  65.         ;install sources
  66.         (set #gosrc 1)
  67.         (if (= 2 @user-level)
  68.           (
  69.             (set #sourcepath (askdir
  70.                 (prompt "Where do you want to install sources codes ?\nA drawer called sources will be created there.")
  71.                 (help   "You have to choose where the sources be placed.")
  72.                 (default @default-dest)
  73.               )
  74.             )
  75.           )
  76.         )
  77.       )
  78.       ; don't install sources
  79.       (set #gosrc 0)
  80.   )
  81. )
  82. (set #catalog
  83.   (askchoice
  84.     (prompt "Select your desired guide file")
  85.     (help   "If you know english then choose english\nIf you know german then choose german")
  86.     (choices "English" "German")
  87.     (default 0)
  88.   )
  89. )
  90.  
  91. (if (= 1 #gosrc)
  92.   ((if (not (exists (tackon #sourcepath "sources")))
  93.                (makedir (tackon #sourcepath "sources"))
  94.             )
  95.   )
  96. )
  97.  
  98. (copyfiles
  99.   (prompt "Copying Main file")
  100.   (help   "Copy the executable and the icon of the main file in the path you choosed")
  101.   (source "bin/")
  102.   (dest   @default-dest)
  103.   (all)
  104. )
  105. (copyfiles
  106.   (prompt "Copying preferences program")
  107.   (help   "Copy the preferences executable and the icon file in the path you choosed")
  108.   (source "prefs/")
  109.   (dest   #defpathprefs)
  110.   (all)
  111. )
  112. (if (= #catalog 0)
  113.   (copyfiles
  114.     (prompt "Cpying documentation")
  115.     (help   "Copy the documentation in the path you choosed")
  116.     (source "docs/backclockE.guide")
  117.     (newname "backclock.guide")
  118.     (dest   @default-dest)
  119.     (infos)
  120.   )
  121. )
  122. (if (= #catalog 1)
  123.   (copyfiles
  124.     (prompt "Cpying documentation")
  125.     (help   "Copy the documentation in the path you choosed")
  126.     (source "docs/backclockD.guide")
  127.     (newname "backclock.guide")
  128.     (dest   @default-dest)
  129.     (infos)
  130.   )
  131. )
  132. (if (= 1 #gobootup)
  133.   (copyfiles
  134.     (prompt "Copying to WBStartup")
  135.     (help   "Copy the executable file to wbstartup\nThis will run BackClock each reboot.")
  136.     (source "bin/backclock")
  137.     (dest   "SYS:WBstartup/")
  138.     (infos)
  139.   )
  140. )
  141.  
  142. (if (= 1 #gosrc)
  143.   (copyfiles
  144.     (prompt "Copying sources")
  145.     (help   "Copy the sources in C in the the path you choosed")
  146.     (source "sources/")
  147.     (dest   (tackon #sourcepath "sources"))
  148.     (all)
  149.   )
  150. )
  151.  
  152.