home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / on-line / simpleftp / install < prev    next >
Encoding:
Text File  |  2000-05-07  |  1.3 KB  |  51 lines
  1. ; OS3.5 Detection script
  2. ; Written by Rick Hodger <rick@thehub.u-net.com>
  3. ; Freely distributable, just make sure you leave the credits here :)
  4. ;
  5. ; USAGE: Make two scripts, one called 'InstallOS3.5' (which has all your extra 3.5 gubbins) and another
  6. ;        called 'InstallOS3.x' which is a standard script.  Throw this one is 'Install' and it'll do
  7. ;        all the OS3.5 detection/redirection for you.
  8. ;
  9. ; $VER: v1.3 (7.5.00)
  10.  
  11. (user 2)
  12.  
  13. (set #ask-install-os35 "\nDetected AmigaOS 3.5 (workbench.library v44)\n\nDo you want to use the enhanced OS3.5 installation?")
  14.  
  15. (procedure install-normal
  16.   (
  17.     (run "C:Installer InstallOS3.x APPNAME SimpleFTP DEFUSER EXPERT MINUSER EXPERT LOGFILE RAM:SimpleFTP.log")
  18.   )
  19. )
  20. (procedure install-enhanced
  21.   (
  22.     (run "C:Installer InstallOS3.5 APPNAME SimpleFTP DEFUSER EXPERT MINUSER EXPERT LOGFILE RAM:SimpleFTP.log")
  23.   )
  24. )
  25.  
  26. (welcome
  27.   (set #wbversion 0)
  28.   (set ask 0)
  29.   (set #wbversion (getversion "workbench.library" (resident)))
  30.   (set #wbversion (/ #wbversion 65536) )
  31.   (if (= #wbversion 44)
  32.     (
  33.       (set ask
  34.         (askbool
  35.           (prompt  #ask-install-os35)
  36.           (help    "Read the manual!")
  37.           (choices "Yes" "No")
  38.         )
  39.       )
  40.     )
  41.   )
  42.   ;
  43.   (if (= ask 1) (
  44.     (install-enhanced)
  45.   ))
  46.   (if (= ask 0) (
  47.     (install-normal)
  48.   ))
  49.   (exit (quiet))
  50. )
  51.