home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / GFX / Painting / PersonalPaint6.4_2.DMS / PersonalPaint6.4_2.adf / PP_Locale / PP_SetLang < prev   
Encoding:
Text File  |  1995-07-23  |  734 b   |  36 lines
  1. ; Cloanto Personal Paint Configuration Scripts
  2. ; Copyright © Cloanto Italia srl 1992-1995  All Rights Reserved
  3.  
  4. GetEnv >NIL: PPaintLanguage
  5. If WARN
  6.   If EXISTS PPAINTROOT:PP_Locale/PP_SETENV
  7.     Execute PPAINTROOT:PP_Locale/PP_SETENV
  8.   EndIf
  9.  
  10.   GetEnv >NIL: PPaintLanguage
  11.   If WARN
  12.     If $Language EQ "english"
  13.       SetEnv PPaintLanguage 0
  14.     EndIf
  15.     If $Language EQ "deutsch"
  16.       SetEnv PPaintLanguage 1
  17.     EndIf
  18.     If $Language EQ "français"
  19.       SetEnv PPaintLanguage 3
  20.     EndIf
  21.     If $Language EQ "dansk"
  22.       SetEnv PPaintLanguage 7
  23.     EndIf
  24.     If $Language EQ "italiano"
  25.       SetEnv PPaintLanguage 2
  26.     EndIf
  27.  
  28.     GetEnv >NIL: PPaintLanguage
  29.     If WARN
  30.       SetEnv PPaintLanguage 0
  31.     EndIf
  32.  
  33.   EndIf
  34.  
  35. EndIf
  36.