home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 52 / af052sub.adf / newlist.lha / NewList / Install-Newlist8 < prev    next >
Text File  |  1993-07-16  |  4KB  |  141 lines

  1. ; $VER: Newlist 8 (19-Jun-93) Installer Script for Newlist
  2. ;
  3. ; As you should know...Installer requires a stack of at least 10000.
  4. ; If it is less, it may crash (which it has done for me a few times.)
  5.  
  6. (set @user-level 1)
  7.  
  8. (if (exists "c:nl")                     ;Remove old newlist from resident list
  9.     (run "resident c:nl remove" )
  10. )
  11.  
  12. (if (exists "ENV:NEWLIST_LANG")         ;Remove old language file from memory
  13.     (run "newlist8 -K >nil:")
  14. )
  15.  
  16. (message "Installation of \"Newlist8\"\n\nThis install script will not only install\n Newlist8 but also languages,\nENV: variables, scripts, and other goodies.\n"
  17. (confirm)
  18. )
  19.  
  20. (set name
  21.    (askchoice
  22.       (prompt "Which Newlist8 version should I install?")
  23.       (help "Newlist8 - requires Motorola 68000 CPU (default).\nNewlist8.030 - requires Motorola 68030 or 68040!\n")
  24.       (choices "Newlist8" "Newlist8.030")
  25.       (default 0)
  26.    )
  27. )
  28.  
  29. (if (= name 0)
  30.    (set name "Newlist8")
  31.    (set name "NewList8.030")
  32. )
  33.  
  34. (copyfiles
  35.    (prompt "Copying " name " to your disk as 'nl'...")
  36.    (help @copyfiles-help)
  37.    (source name )
  38.    (dest "c:")
  39.    (newname "nl")
  40.    (infos)
  41.    (confirm)
  42.    (optional)
  43. )
  44.  
  45. (complete 20)
  46.  
  47. (message "\nYou must now install a language file.")
  48.  
  49. (if (exists "ENV:NEWLIST_LANG")
  50.    (message "\n\nENV:NEWLIST_LANG found!!\n\nIt is HIGHLY adviseable that you replace old languages for old newlist's with the new version.  If you do not then Newlist8 will not run properly.")
  51. )
  52.  
  53. (set name
  54.    (askfile
  55.       (prompt "Please select a language file.")
  56.       (help "\nNewlist8 requires a language file!")
  57.       (default "languages/NEWLIST_LANG.english")
  58.    )
  59. )
  60.    
  61.  
  62. (if 
  63.    (copyfiles
  64.       (prompt "Copying " name " to destination as 'NEWLIST_LANG'...")
  65.       (help "\nNewlist8 requires the language to be saved in\n either ENV:, ENVARC:, or locale:  The file will also be renamed to NEWLIST_LANG.")
  66.       (source name)
  67.       (newname "NEWLIST_LANG")
  68.       (dest "ENV:")
  69.       (confirm)
  70.       (optional)
  71.    )
  72.    (run "copy env:NEWLIST_LANG ENVARC:")
  73.    (message "\n Language installation skipped!\n\nNewlist REQUIRES a language file if you\nalready didn't know.")
  74. )
  75.  
  76. (complete 40)
  77.  
  78. (if 
  79.    (copyfiles
  80.       (prompt "Copying Newlist variables to ENV: and ENVARC:")
  81.       (help "\n These 4 variables allow a user to store his personal preferences.")
  82.       (source "env")
  83.       (dest "ENV:")
  84.       (pattern "~(#?.info)")
  85.       (confirm)
  86.       (optional)
  87.    )
  88.    (run "copy env/~(#?.info) ENVARC:")
  89. )
  90.  
  91. (complete 60)
  92.  
  93. (message "\n\nMiscellaneous things to add....\n\n'Aliases' - a bunch of useful aliases that use newlist's features\n'NewSpat' 'NewDpat' - a replacement for Commodore's s:spat and s:dpat that use nl")
  94.  
  95. (set name
  96.    (askoptions
  97.       (prompt "\n\nShall I install any of the following Extras (that take advantage of Newlist's power)??")
  98.       (help "'Aliases' - a bunch of useful aliases that use newlist's features (copied to s:shell-startup)\n\n'NewSpat' 'NewDpat' - a replacement for Commodore's s:spat and s:dpat that uses nl\n")
  99.       (choices "Aliases - Appended to S:Shell-startup" "NewSpat - Placed in S:" "NewDpat - Placed in S:")
  100.       (default 7)
  101.    )
  102. )
  103.  
  104.  
  105. (if (bitand 1 name)
  106.    (
  107.    (run "copy scripts/aliases s:Newlist_Aliases")
  108.    (run "echo \"execute s:Newlist_Aliases\" >> s:shell-startup")
  109.    )
  110. )
  111. (if (bitand 2 name)
  112.    (run "copy scripts/newspat#? s:")
  113. )
  114. (if (bitand 4 name)
  115.    (run "copy scripts/newdpat#? s:")
  116. )
  117.  
  118. (complete 80)
  119.  
  120. (set name
  121.    (askbool
  122.       (prompt "\n\nShall I append 'RESIDENT c:nl ADD' to your S:User-StartUp?")
  123.       (help  "Making newlist RESIDENT drastically speeds up loading and execution time at the expense of a few extra K of memory.")
  124.       (choices "Yes" "No")
  125.       (default 1)
  126.    )
  127. )
  128.  
  129. (if (= name 1)
  130.    (startup "Newlist8"
  131.       (prompt "\nAdding 'RESIDENT c:nl ADD' to s:User-StartUp")
  132.       (help "None available.")
  133.       (command "RESIDENT c:nl ADD")
  134.    )
  135. )
  136.  
  137. (complete 100)
  138.  
  139. (message "\n\nInstallation Complete!!\n\nTry out the following commands: \nnl -?\nnl -q\nnl -qs\nnl -qt\nnl -T3\nnl -z\nnl -UV\nfor further information please consult the doc 'Newlist.doc'." )
  140. (exit)
  141.