sashaoli писал(а): опять же платный API google можно и бесплатно (неофициально). Add(BlockFind,3966386,448,175) { IncludeBlock=1 StartBlock=""trans":"" EndBlock="","orig":"" link(onSearch,2093333:doStrCat,[]) link(onEndSearch,3774539:doReplace,[(489,188)(489,237)]) } Add(HTTP_Get,590158,301,168) { Wait=0 Method=1 link(onDownload,9170275:doConvert,[]) } Add(FormatStr,4524766,252,168) { DataCount=1 Mask="http://translate.googleapis.com/translate_a/t?anno=4&client=te&text=%1&hl=en&tl=ru" link(onFString,590158:doDownload,[]) } Add(Charset,161191,210,168) { Type=12 link(onCharset,4524766:doString,[]) link(Text,11467722:Text,[]) } Add(StreamConvertor,9170275,357,175) { Mode=6 link(onResult,13935996:doCharset,[]) } Add(Charset,13935996,399,175) { Type=7 link(onCharset,3966386:doSearch,[]) } Add(Replace,3774539,504,231) { SubStr="\r\n" DestStr=" " link(onReplace,10275973:doReplace,[]) link(Str,2171953:Var2,[]) } Add(Memo,4979642,602,210) { Left=5 Top=220 Width=745 Height=225 ScrollBars=3 } Add(Button,14364226,154,168) { Left=5 Top=5 Width=145 Caption="Перевести" link(onClick,161191:doCharset,[]) } Add(Memo,11467722,210,98) { Left=5 Top=30 Width=745 Height=185 Strings=#21:The license agreement|0:|75:1. The program HiAsm (further referred as "Software product") is created by|41:Dilma (further referred as the "Author").|88:The present license agreement is to acknowledge the ownership of all the rights on this |28:"Software product" by Dilma.|0:|68:2. The "Software product" made by "Author" is intended for designing|52:programs without knowledge of programming languages.|0:|68:3. The program is distributed by a principle " AS IS ", which means,|82:that the "Author" does not bear any responsibility on correct or wrong use of the |91:program. You install the program solely under your own responsibility. The "Author" is not |91:responsible for any failures after installation of the program. You install the program at |84:own risk, although, it has been made utmost by the "Author" to prevent any damages, |20:failures and losses.|0:|74:4. The program is distributed by a principle "Freeware", which means, that|41:the program is absolutely free-of-charge.|0:|66:5. Installing and using HiasM signifies acceptance of these terms |30:and conditions of the license.|0:|70:6. If you do not agree with the terms of this license you must remove |67:HiasM files from your storage devices and cease to use the product.|0:|54:On all questions and offers related to the program, or|54:its drawbacks, it is requested to inform the "Author".|0:|29:Webpage: http://www.hiasm.com|21:E-mail: hiasm@mail.ru|0:|37:The "Author": Dilma - dilma@hiasm.com|0:|26:Thank you for using HiasM!| ScrollBars=3 } Add(Replace,10275973,553,231) { SubStr=""" DestStr=""" link(onReplace,4979642:doText,[]) } Add(StrCat,2093333,511,175) { Point(doClear) link(Str1,2171953:Var1,[(517,163)(505,163)(505,219)]) } Add(GetDataEx,2171953,504,214) { Angle=1 link(Data,2093333:Result,[(517,219)]) }
|