home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #1 / monster.zip / monster / CLIPPER / LNGMUL.ZIP / LNGMULTI.CH < prev    next >
Text File  |  1994-02-09  |  3KB  |  69 lines
  1. *------------------------------------------------------------------------
  2. *-LngMulti.ch
  3. *------------------------------------------------------------------------
  4.  
  5. /*
  6.   ██████████████████████ LngMulti Version 1.1 ██████████████████████████
  7.   │                                                                    │░
  8.   │┌┬┬┬┬┬┬┬┬┬┐ File       : LngMult.ch                                 │░
  9.   │├┼┼┼┼ ┼┼┼┼┤ Description: #INCLUDE this file for multilingual support│░
  10.   │├┼┼┼ █ ┼┼┼┤                                                         │░
  11.   │├┼┼  █  ┼┼┤ Author     : Marc Gagnon Copyright (c) 1993-1994        │░
  12.   │├┼   █   ┼┤              All rights reserved (CIS 71175,437)        │░
  13.   │├    ■    ┤                                                         │░
  14.   │└┴┴┴┴┴┴┴┴┴┘ Licence    : Freeware (use and distribute freely,       │░
  15.   │                         provided that credits and copyright        │░
  16.   │                         notices always appear in this file.        │░
  17.   │                                                                    │░
  18.   └────────────────────────────────────────────────────────────────────┘░
  19.     ░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░
  20. */
  21.  
  22. *-Set the default language when none is defined
  23. *------------------------------------------------------------------------
  24.   #IFNDEF FRENCH
  25.     #IFNDEF ENGLISH
  26.       #IFNDEF SPANISH
  27.          #INCLUDE "LngDef.ch"
  28.       #ENDIF
  29.     #ENDIF
  30.   #ENDIF
  31.  
  32.  
  33. *-Language support sections
  34. *------------------------------------------------------------------------
  35.  
  36. *-Check if French is defined
  37.   #IFNDEF FRENCH
  38. *-     If not remove all french expressions
  39.        #xTRANSLATE IN FRENCH <xExpr> =>
  40.   #ELSE
  41. *-     Redefine french expressions as being the expressions to keep
  42.        #UNDEF  FRENCH
  43.        #DEFINE FRENCH _LNGMULTI_
  44.   #ENDIF
  45.  
  46.  
  47. *-Check if English is defined
  48.   #IFNDEF ENGLISH
  49. *-     If not remove all English expressions
  50.        #xTRANSLATE IN ENGLISH <xExpr> =>
  51.   #ELSE
  52. *-     Redefine English expressions as being the expressions to keep
  53.        #UNDEF  ENGLISH
  54.        #DEFINE ENGLISH _LNGMULTI_
  55.   #ENDIF
  56.  
  57. *-Check if Spanish is defined
  58.   #IFNDEF SPANISH
  59. *-     If not remove all Spanish expressions
  60.        #xTRANSLATE IN SPANISH <xExpr> =>
  61.   #ELSE
  62. *-     Redefine Spanish expressions as being the expressions to keep
  63.        #UNDEF  SPANISH
  64.        #DEFINE SPANISH _LNGMULTI_
  65.   #ENDIF
  66.  
  67. *-Keep only the expressions from the selected language (strip the key words)
  68.   #xTRANSLATE IN _LNGMULTI_ <xExpr> => <xExpr>
  69.