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")