home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / tools / system / installerfx / examples / fade with anim < prev    next >
Encoding:
Text File  |  1997-09-20  |  1.9 KB  |  120 lines
  1. ; InstallerFX script
  2. (if (= x 1) (welcome))
  3.  
  4. (onerror (CLEANUP))
  5.  
  6. ; Cleanup any temporary mess we created
  7. (procedure CLEANUP
  8.     ; Nothing to cleanup
  9.     (delete "t:Logopic")
  10.     (delete "t:Logopic.prefs")
  11.     (delete "t:InstallerAnim")
  12.     (delete "t:InstallerAnim.prefs")
  13.     (delete "t:Background")
  14.     (delete "t:Background.prefs")
  15. ) ; CLEANUP
  16.  
  17. (set @user-level 0)
  18.  
  19. ;(set Opt 3)
  20. ;(complete 0)
  21.  
  22. (copyfiles
  23.     (source "InstallerFX/Bluefade")
  24.     (dest "t:")
  25.     (newname "Background")
  26. )
  27.  
  28. (copyfiles
  29.     (source "InstallerFX/Background.prefs")
  30.     (dest "t:")
  31.     (newname "Background.prefs")
  32. )
  33.  
  34. (run "run InstallerFX/InstallerFX t:background")
  35.  
  36. (set @user-level 2)
  37.  
  38. ;Get directory to install test to:
  39. (set destdir 
  40.     (askdir 
  41.         (prompt "In which drawer should testfiles be installed?") 
  42.         (help @askdir-help)
  43.         (default ("t:"))
  44.     )
  45. )
  46.  
  47. (copyfiles
  48.     (source "InstallerFX/MagicSelector")
  49.     (dest "t:")
  50.     (newname "Logopic")
  51. )
  52.  
  53. (copyfiles
  54.     (source "InstallerFX/MagicSelectorAnim.prefs")
  55.     (dest "t:")
  56.     (newname "Logopic.prefs")
  57. )
  58.  
  59. (run "run InstallerFX/InstallerFX t:Logopic")
  60.  
  61. (copyfiles
  62.     (source "InstallerFX/TriumphLogo")
  63.     (dest "t:")
  64.     (newname "InstallerAnim")
  65. )
  66.  
  67. (copyfiles
  68.     (source "InstallerFX/fadewithanim.prefs")
  69.     (dest "t:")
  70.     (newname "InstallerAnim.prefs")
  71. )
  72.  
  73. (run "run InstallerFX/InstallerFX t:InstallerAnim")
  74.  
  75. (complete 10)
  76.  
  77. (set installfiles
  78.     (askoptions
  79.         (prompt "Which of the following optional programs/helpfile should be installed ?")
  80.         (help @askoptions-help)
  81.         (choices "InstallerFX")
  82.         (default Opt)
  83.     )
  84. )
  85.  
  86. (complete 50)
  87.  
  88. ;Copy program files to destination.
  89.  
  90. (if (BITAND installfiles 1)
  91. (copyfiles
  92.     (source "InstallerFX")
  93.     (dest destdir)
  94.     (all)
  95. )
  96. )
  97.  
  98. (set installfiles
  99.     (askoptions
  100.         (prompt "Which of the following optional programs/helpfile should be installed ?")
  101.         (help @askoptions-help)
  102.         (choices "InstallerFX")
  103.         (default Opt)
  104.     )
  105. )
  106.  
  107.  
  108. (if (BITAND installfiles 1)
  109. (copyfiles
  110.     (source "InstallerFX")
  111.     (dest destdir)
  112.     (all)
  113. )    
  114. )
  115.  
  116. (complete 100)
  117.  
  118. (CLEANUP)
  119. (exit)
  120.