-function translate_form_intertran($message) {
- translate_new_form('http://www.tranexp.com:2000/InterTran');
- echo '<INPUT TYPE="hidden" NAME="topframe" VALUE="yes">'.
- '<INPUT TYPE="hidden" NAME="type" VALUE="text">'.
- "<input type=\"hidden\" name=\"text\" value=\"$message\">";
-
- $left = '<SELECT name="from">' .
- translate_lang_opt('pt_BR', '', 'pob', _("Brazilian Portuguese")).
- translate_lang_opt('', '', 'bul', _("Bulgarian") . ' (CP 1251)').
- translate_lang_opt('', '', 'cro', _("Croatian") . ' (CP 1250)').
- translate_lang_opt('cs', '', 'che', _("Czech") . ' (CP 1250)').
- translate_lang_opt('', '', 'dan', _("Danish")).
- translate_lang_opt('nl', '', 'dut', _("Dutch")).
- translate_lang_opt('en', '!en', 'eng', _("English")).
- translate_lang_opt('', '', 'spe', _("European Spanish")).
- translate_lang_opt('', '', 'fin', _("Finnish")).
- translate_lang_opt('fr', '', 'fre', _("French")).
- translate_lang_opt('de', '', 'ger', _("German")).
- translate_lang_opt('', '', 'grk', _("Greek")).
- translate_lang_opt('', '', 'hun', _("Hungarian") . ' (CP 1250)').
- translate_lang_opt('', '', 'ice', _("Icelandic")).
- translate_lang_opt('it', '', 'ita', _("Italian")).
- translate_lang_opt('', '', 'jpn', _("Japanese") . ' (Shift JIS)').
- translate_lang_opt('', '', 'spl', _("Latin American Spanish")).
- translate_lang_opt('no*', '', 'nor', _("Norwegian")).
- translate_lang_opt('pl', '', 'pol', _("Polish") . ' (ISO 8859-2)').
- translate_lang_opt('', '', 'poe', _("Portuguese")).
- translate_lang_opt('', '', 'rom', _("Romanian") . ' (CP 1250)').
- translate_lang_opt('ru', '', 'rus', _("Russian") . ' (CP 1251)').
- translate_lang_opt('', '', 'sel', _("Serbian") . ' (CP 1250)').
- translate_lang_opt('', '', 'slo', _("Slovenian") . ' (CP 1250)').
- translate_lang_opt('es', '', 'spa', _("Spanish")).
- translate_lang_opt('sv', '', 'swe', _("Swedish")).
- translate_lang_opt('', '', 'wel', _("Welsh")).
- '</SELECT>';
-
- $right = '<SELECT name="to">'.
- translate_lang_opt('', 'pt_BR', 'pob', _("Brazilian Portuguese")).
- translate_lang_opt('', '', 'bul', _("Bulgarian") . ' (CP 1251)').
- translate_lang_opt('', '', 'cro', _("Croatian") . ' (CP 1250)').
- translate_lang_opt('', 'cs', 'che', _("Czech") . ' (CP 1250)').
- translate_lang_opt('', '', 'dan', _("Danish")).
- translate_lang_opt('', 'nl', 'dut', _("Dutch")).
- translate_lang_opt('!en', 'en', 'eng', _("English")).
- translate_lang_opt('', '', 'spe', _("European Spanish")).
- translate_lang_opt('', '', 'fin', _("Finnish")).
- translate_lang_opt('', 'fr', 'fre', _("French")).
- translate_lang_opt('', 'de', 'ger', _("German")).
- translate_lang_opt('', '', 'grk', _("Greek")).
- translate_lang_opt('', '', 'hun', _("Hungarian") . ' (CP 1250)').
- translate_lang_opt('', '', 'ice', _("Icelandic")).
- translate_lang_opt('', 'it', 'ita', _("Italian")).
- translate_lang_opt('', '', 'jpn', _("Japanese") . ' (Shift JIS)').
- translate_lang_opt('', '', 'spl', _("Latin American Spanish")).
- translate_lang_opt('', 'no*', 'nor', _("Norwegian")).
- translate_lang_opt('', 'pl', 'pol', _("Polish") . ' (ISO 8859-2)').
- translate_lang_opt('', '', 'poe', _("Portuguese")).
- translate_lang_opt('', '', 'rom', _("Romanian") . ' (CP 1250)').
- translate_lang_opt('', 'ru', 'rus', _("Russian") . ' (CP 1251)').
- translate_lang_opt('', '', 'sel', _("Serbian") . ' (CP 1250)').
- translate_lang_opt('', '', 'slo', _("Slovenian") . ' (CP 1250)').
- translate_lang_opt('', 'es', 'spa', _("Spanish")).
- translate_lang_opt('', 'sv', 'swe', _("Swedish")).
- translate_lang_opt('', '', 'wel', _("Welsh")).
- '</SELECT>';
- printf( _("%s to %s"), $left, $right );
- echo 'InterTran: <input type=submit value="' . _("Translate") . '">';
-
- translate_table_end();
-}
-
-function translate_form_gpltrans($message) {
- translate_new_form('http://www.translator.cx/cgi-bin/gplTrans');
- echo '<select name="toenglish">';
- translate_lang_opt('en', '!en', 'no', 'From English');
- translate_lang_opt('!en', 'en', 'yes', 'To English');
- echo '</select><select name="language">'.
- translate_lang_opt('nl', 'nl', 'dutch_dict', _("Dutch")).
- translate_lang_opt('fr', 'fr', 'french_dict', _("French")).
- translate_lang_opt('de', 'de', 'german_dict', _("German")).
- translate_lang_opt('', '', 'indonesian_dict', _("Indonesian")).
- translate_lang_opt('it', 'it', 'italian_dict', _("Italian")).
- translate_lang_opt('', '', 'latin_dict', _("Latin")).
- translate_lang_opt('pt', 'pt', 'portuguese_dict', _("Portuguese")).
- translate_lang_opt('es', 'es', 'spanish_dict', _("Spanish")).
- '</select>'.
- "<input type=hidden name=text value=\"$message\">".
- 'GPLTrans: <input type="submit" value="' . _("Translate") . '">';
-
- translate_table_end();