call RxFuncAdd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs' call SysLoadFuncs /* based upon work from Dmitriy Kuminov */ parse arg aFile " Package:" Package name = filespec('N', aFile) ext = translate(right(name, 4)) search_path = "" select when (ext == '.DLL') then do config_sys = SysBootDrive()'\CONFIG.SYS' do while lines(config_sys) line = strip(linein(config_sys)) if (left(line, 8) == 'LIBPATH=') then do search_path = substr(line, 9) leave end end call lineout config_sys search_path = SysQueryExtLibPath('B')';'search_path';'SysQueryExtLibPath('E') end when (ext == '.EXE') then search_path = value('PATH',, 'OS2ENVIRONMENT') when (ext == '.HLP') then search_path = value('BOOKSHELF',, 'OS2ENVIRONMENT') otherwise search_path = '' end if (search_path \= '') then do ok = value('CHKREQ_SEARCH_PATH', search_path, 'OS2ENVIRONMENT') real_file = SysSearchPath('CHKREQ_SEARCH_PATH', name) ok = value('CHKREQ_SEARCH_PATH', '', 'OS2ENVIRONMENT') end else real_file = "" /* generate the message string to return */ if real_file <> "" then MsgStr = ""; else MsgStr = 'REQUIRES="' || strip(Package) || '"' return MsgStr call RxFuncAdd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs' call SysLoadFuncs langs = "EN,FR,DE,NL,ES,PT,IT,CS,JA,RU,ZH,KO" lang = translate(left(strip(value("LANG",,"OS2ENVIRONMENT")),2)) if pos(lang,langs) = 0 then lang = 'EN' rc =WirexxPutEnv('prog','Lucide') /*Make sure you change the help file object name when adding a new translation*/ select when lang = 'FR' then do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','LisezMoi') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Veuillez prendre connaissance et accepter l''accord de licence suivant.') rc =WirexxPutEnv('target','Veuillez sélectionner le dossier de destination') rc =WirexxPutEnv('re_install','Si vous effectuez une mise à jour de SearchPlus, le dossier d''installation par défaut sera celui actuellement utilisé par l''ancienne version.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','~J''accepte') rc =WirexxPutEnv('next','~Suivant') rc =WirexxPutEnv('nextText','Select "Suivant" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'DE' then do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','Lies mich!') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Bitte lesen Sie den folgenden Text und akzeptieren Sie die Lizenzvereinbarung.') rc =WirexxPutEnv('target','Wählen Sie bitte das Zielverzeichnis.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Installieren') rc =WirexxPutEnv('license','St~imme zu') rc =WirexxPutEnv('next','W~eiter') rc =WirexxPutEnv('nextText','Zum Fortfahren "Weiter" auswählen.') rc =WirexxPutEnv('cancelText','Zum Abbrechen "Cancel" auswählen.') rc =WirexxPutEnv('installText','Bitte "Installieren" auswählen, um die Installation des Archivs zu starten.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'NL' then do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License'). rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp'). end when lang = 'ES' Then Do /* Translate */ rc =WirexxPutEnv('title','Herramienta de captura de pantalla Gotcha!') rc =WirexxPutEnv('uguide','Ayuda de Gotcha!') rc =WirexxPutEnv('licensetxt','Licencia') rc =WirexxPutEnv('readmetitle','Léame') rc =WirexxPutEnv('welcome','Este paquete instalará la herramienta de captura de pantalla Gotcha! en su sistema.') rc =WirexxPutEnv('accept','Por favor, lea y acepte el siguiente acuerdo de licencia (GPL).') rc =WirexxPutEnv('target','Por favor, seleccione el directorio de destino.') rc =WirexxPutEnv('re_install','Si está actualizando Gotcha!, el directorio de instalación por omisión será el directorio actual.') rc =WirexxPutEnv('install','~Instalar') rc =WirexxPutEnv('license','~Acepto') rc =WirexxPutEnv('next','~Siguiente') rc =WirexxPutEnv('nextText','Seleccione «Siguiente» para continuar.') rc =WirexxPutEnv('cancelText','Seleccione «Cancelar» para abortar la instalación.') rc =WirexxPutEnv('installText','Pulse «Instalar» para iniciar la instalación de este archivo.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_es') rc =WirexxPutEnv('uguidefile','gotcha_es.hlp') end when lang = 'PT' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'IT' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'CS' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'JA' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'RU' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'KO' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end when lang = 'ZH' Then Do /* Translate */ rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') rc =WirexxPutEnv('installText','Press "Install" in order to start installation of this archive.') /* End Translate */ /* Update us if this translation is added */ rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') end otherwise do rc =WirexxPutEnv('title','Gotcha Screen Capture Utility') rc =WirexxPutEnv('uguide','Gotcha Help') rc =WirexxPutEnv('licensetxt','License') rc =WirexxPutEnv('readmefile','Readme_en') rc =WirexxPutEnv('uguidefile','gotcha_en.hlp') rc =WirexxPutEnv('readmetitle','ReadMe') rc =WirexxPutEnv('welcome','This package will install the Gotcha! Screen Capture Utility on your system.') rc =WirexxPutEnv('accept','Please read and accept the following license-agreement (GPL).') rc =WirexxPutEnv('target','Please select a target directory.') rc =WirexxPutEnv('re_install','If you are updating Gotcha, the default installation directory will be the current install directory.') rc =WirexxPutEnv('install','~Install') rc =WirexxPutEnv('license','I ~accept') rc =WirexxPutEnv('next','~Next') rc =WirexxPutEnv('nextText','Select "Next" to continue.') rc =WirexxPutEnv('cancelText','Select "Cancel" to abort installation.') end end return '' Parse Arg subject . Return WirexxGetEnv(subject) Gotcha! "GOTCHA!" =("get_env next") =("get_env welcome") =("get_env nexttext") =("get_env readmefile") =("get_env license") =("get_env accept") COPYING =("get_env install") =("get_env target") =("get_env installtext") =("get_env canceltext") =("get_env re_install")