home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Exec 5 / CD_Magazyn_EXEC_nr_5.iso / Gry / PaybackUpdate1.lha / PaybackUpdate1 / UpdatePayback-Slovak < prev    next >
Text File  |  2001-03-15  |  1KB  |  47 lines
  1. ; $VER: Payback Update Version 1.2 (23 February 2001)
  2. ; © James Daniels/Apex Designs
  3.  
  4. (set #installdrawer (cat "Prosím vyber adresár, kde je Payback nainîtalovaný."))
  5.  
  6. (set #installdrawer-help (cat "Vyber adresár, ktorý obsahuje plnú verziu Paybacku. Tú, ktorú chceî zmodernizovaï."))
  7.  
  8. (set #notfound (cat "\nTento adresár neobsahuje správne nainîtalovaný Payback.\nVyber iný adresár."))
  9.  
  10. (set #install-all (cat "Modernizujem súbory..."))
  11.  
  12. (set #finished-message (cat "\nPayback bol úspeîne zmodernizovaný."))
  13.  
  14. (set destdir "RAM:")
  15.  
  16. (while (= (exists (tackon destdir "Payback.exe")) 0)
  17.   (
  18.     (set destdir
  19.       (askdir
  20.         (prompt #installdrawer)
  21.         (help #installdrawer-help)
  22.         (default "RAM:")
  23.         (disk)
  24.       )
  25.     )
  26.  
  27.     (if (= (exists (tackon destdir "Payback.exe")) 0)
  28.       (message #notfound)
  29.     )
  30.   )
  31. )
  32.  
  33. (complete 10)
  34.  
  35. (copyfiles
  36.     (prompt #install-all)
  37.     (source "Files/")
  38.     (pattern "#?")
  39.     (dest destdir)
  40. )
  41.  
  42. (complete 100)
  43.  
  44. (message #finished-message)
  45.  
  46. (set @default-dest destdir)
  47.