home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga Shareware Floppies / ma36.dms / ma36.adf / PolFont / Install_SPPF next >
Text File  |  1995-05-17  |  1KB  |  42 lines
  1. ;Skrypt instalacyjny SetPatchPolFont
  2. ;wersja 1.1
  3.  
  4. FAILAT 21
  5. VERSION >NIL: workbench.library
  6. IF WARN
  7.     COPY SetPatchPolFont13 c:
  8.     ECHO >Ram:SPPF "SetPatchPolFont13"
  9.     TYPE >>Ram:SPPF S:startup-sequence
  10.     COPY Ram:SPPF S:startup-sequence
  11.     DELETE >NIL: Ram:SPPF
  12.     ECHO "SetPatchPolFont zainstalowany"
  13. ELSE
  14.     IF NOT EXISTS "C:RequestChoice"
  15.         IF EXIST "RequestChoice"
  16.             COPY RequestChoice C:
  17.             ECHO "Komenda *"RequestChoice*" zainstalowana w katalogu *"C:*""
  18.         ENDIF
  19.     ENDIF
  20.     REQUESTCHOICE >ENV:SPPF SetPatchPolFont "Wybierz rozkîad klawiatury" "USA-PL|GB-PL|D-PL|USA-D-PL|PL|Zakoïcz"
  21.     IF NOT $SPPF EQ 0
  22.         IF $SPPF EQ 1
  23.             echo >>S:User-startup "SetPatchPolFont >NIL: USAPL"
  24.         ENDIF
  25.         IF $SPPF EQ 2
  26.             echo >>S:User-startup "SetPatchPolFont >NIL: GBPL"
  27.         ENDIF
  28.         IF $SPPF EQ 3
  29.             echo >>S:User-startup "SetPatchPolFont >NIL: DPL"
  30.         ENDIF
  31.         IF $SPPF EQ 4
  32.             echo >>S:User-startup "SetPatchPolFont >NIL: USADPL"
  33.         ENDIF
  34.         IF $SPPF EQ 5
  35.             echo >>S:User-startup "SetPatchPolFont >NIL: PL"
  36.         ENDIF
  37.         COPY SetPatchPolFont C:
  38.         ECHO "SetPatchPolFont zainstalowany"
  39.     ENDIF
  40.     UNSETENV SPPF
  41. ENDIF
  42.