home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga Shareware Floppies / ma19.dms / ma19.adf / Zainstaluj < prev    next >
Text File  |  1994-04-18  |  4KB  |  94 lines
  1. ;
  2. ; Instaluj $VER:Instaluj 37.4 (18.4.94)
  3. ; Copyright (C) 1994 Rafaî Wiosna
  4. ;
  5.  
  6. (if (> (* 37 65536) (getversion "exec.library" (resident)))
  7.     (abort "Programy z tego dysku wymagajâ conajmniej Kickstartu 2.04!")
  8. )
  9.  
  10.  
  11. (message "\n"
  12.          "Magazyn AMIGA\n"
  13.          "-------------\n"
  14.          "\n"
  15.          "Dyskietka Shareware #19"
  16.          "\n\n"
  17.          "W dowolnym momencie instalacji moûesz jâ zaniechaê naciskajâc "
  18.          "gadûet 'Abort Install'.\n\n"
  19.          "A teraz naciônij gadûet 'Proceed'."
  20. )
  21.  
  22. (message "\n"
  23.          "UWAGA!\n"
  24.          "------\n"
  25.          "\n"
  26.          "Do uûytkowania pakietu MagicWB zalecany jest twardy dysk. "
  27.          "Inaczej instalacja mija sië z celem -- 'kolorowe' ikony "
  28.          "bëdâ dostëpne tylko w niewielkim stopniu, a instalacjë "
  29.          "trzeba bëdzie przeprowadzaê dla kaûdego dysku z osobna i "
  30.          "na dodatek rëcznie."
  31. )
  32.  
  33. (set installwhat
  34.     (askoptions
  35.         (prompt "\nWybierz pakiet(y), który(e) chcesz zainstalowaê:\n")
  36.         (help "MagicWB 1.2p -- pakiet pozwalajâcy na 'upiëkszenie' ôrodowiska "
  37.               "Workbencha poprzez zastâpienie starych ikon nowymi, 8-kolorowymi "
  38.               "oraz podîoûenie pod nue gustownego tîa.\n"
  39.               "NickPrefs -- pakiet preferencji, których brakuje w systemach 2.0, "
  40.               "2.1 oraz w czëôci 3.0.")
  41.         (choices "Pakiet 'MagicWB 1.2p'"
  42.                  "Pakiet 'NickPrefs'"
  43.         )
  44.     )
  45. )
  46.  
  47. (message "\n\nTeraz program instalacyjny rozpakuje wybrany pakiet(y). "
  48.          "Do tego celu potrzebne jest ok. 1 MB wolnego miejsca na "
  49.          "twardym dysku lub w pamiëci. Gdy instalator zapyta o to "
  50.          "gdzie zamierzasz zainstalowaê wybrane pakiet(y) wkaû "
  51.          "DYSK lub URZÂDZENIE potwierdzajâc wybór naciôniëciem "
  52.          "gadûety 'Proceed'. Instalator stworzy w wybranym miejscu "
  53.          "osobny katalog dla pakietu(ów).\n\n"
  54. )
  55.  
  56. (if (in installwhat 0)
  57.         ((set mwb_dir (askdir
  58.                         (prompt "Gdzie mam rozpakowaê pakiet 'MagicWB 1.2p'?\n"
  59.                                 "UWAGA! Wybierz tylko URZÂDZENIE (np. RAM DISK: "
  60.                                 "lub SYS:, inaczej pakiet NIE ROZPAKUJE SIË). Zostanie tam utworzony osobny katalog.")
  61.                                 (help @askdir-help)
  62.                                 (default "SYS:")
  63.                          )
  64.          )
  65.          (set lxarg (cat ">con:////Rozpakowujë_MagicWB/INACTIVE x MAshareware_19:magicwb.lha #? \"" mwb_dir "\""))
  66.          (run "MAshareware_19:lha" lxarg)
  67.          (message "\n\nMagicWB 1.2p zostaî rozpakowany.\n\n"
  68.                   "Aby go w peîni zainstalowaê, po zakoïczeniu obecnie"
  69.                   " wykonywanego programu uruchom ikonë Install w katalogu '"
  70.                   mwb_dir
  71.                   "\\MagicWB1.2p'")
  72.          )
  73. )
  74.  
  75. (if (in installwhat 1)
  76.         ((set npr_dir (askdir
  77.                         (prompt "Gdzie mam rozpakowaê pakiet 'NickPrefs'?\n"
  78.                                 "UWAGA! Wybierz KATALOG, a nie urzâdzenie! "
  79.                                 "(Inaczej pakiet NIE ROZPAKUJE SIË!) "
  80.                                 "Zostanie utworzony podkatalog.")
  81.                                 (help @askdir-help)
  82.                                 (default "SYS:Prefs")
  83.                       )
  84.           )
  85.          (set lxarg (cat ">con:////Rozpakowujë_NickPrefs/INACTIVE x MAshareware_19:nickprefs.lha #? \"" npr_dir"/\""))
  86.          (run "MAshareware_19:lha" lxarg)
  87.          (message "\n\nPakiet NickPrefs zostaî rozpakowany.\n\n"
  88.                   "Po zakoïczeniu obecnie wykonywanego programu "
  89.                   "uruchom kaûdâ z preferencji z katalogu '"
  90.                   npr_dir
  91.                   "\\NickPrefs' i zapisz ustawienia klikajâc na opcjë 'Save'.")
  92.          )
  93. )
  94.