Add(FormatStr,3785653,350,147)
{
 Mask="https://summa-propisyu.ru/?summ=%1&vat=20&val=0&sep=0"
 link(onFString,9550395:doDownload,[])
}
Add(HTTP_Get,9550395,406,147)
{
 link(onDownload,1835547:doConvert,[])
}
Add(StreamConvertor,1835547,455,154)
{
 Mode=4
 link(onResult,12127749:doCharset,[])
}
Add(Charset,12127749,504,154)
{
 Type=7
 link(onCharset,12467002:doSearch,[])
}
Add(BlockFind,12467002,546,154)
{
 IncludeBlock=1
 StartBlock="<textarea rows=1 onkeyup="fix(this);" class="form-control txt" style="overflow: hidden" id=result"
 EndBlock="</textarea>"
 link(onSearch,734951:doSplit,[])
 link(onEndSearch,8074815:doGetString,[(585,167)(585,188)])
}
Add(MainForm,15784998,511,77)
{
 Width=213
 Height=23
 Caption=""
 BorderStyle=0
 TaskBar=1
 Point(onClose)
 link(onCreate,635155:doEvent1,[])
}
Add(Math,8542805,294,147)
{
 OpType=35
 Op2=0.01
 link(onResult,3785653:doString,[])
}
Add(StrPart,734951,595,154)
{
 Char=">"
 link(onSplit,8074815:doAdd,[])
}
Add(ClipboardHook,7345800,175,133)
{
 link(onChange,11435432:doEvent1,[])
}
Add(InlineCode,16063517,252,147)
{
 WorkPoints=#6:doTest|
 EventPoints=#5:onRes|
 Code=#15:unit HiAsmUnit;|13:// Author Tad|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|4:    |24:     onRes  : THI_Event;|51:     PROCEDURE doTest(var _Data:TData; Index:Word);|0:|5: end;|0:|14:implementation|0:|29:PROCEDURE THiAsmClass.doTest;|16:var s,ss:string;|16:    i,j:integer;|5:BEGIN|9:  ss:='';|21:  s:=toString(_Data);|7:  j:=0;|26:  for i:=1 to Length(s) do|8:   begin|34:    if s[i] in ['0'..'9','.'] then|10:     begin|14:	 ss:=ss+s[i];|6:	 end |5:	else|7:	 begin|19:	  if s[i]=',' then|14:	   ss:=ss+'.'|7:	  else|9:	   begin|10:	    j:=1;|11:	    break;|9:	   end; |9:     end;|9:   end;  |36:  if j=0 then _hi_onEvent(onRes,ss);|4:END;|0:|0:|4:end.|
 link(onRes,8542805:doOperation,[])
}
Add(StrList,8074815,658,154)
{
 Point(doGetString)
 Point(IdxToSelect)
 Point(onGetString)
 link(IdxToSelect,3171560:Index,[])
 link(onGetString,12348247:doModify,[])
}
Add(Hub,11435432,217,133)
{
 link(onEvent1,8074815:doClear,[(641,139)(641,167)])
 link(onEvent2,16063517:doTest,[(242,146)(242,153)])
}
Add(ComboBox,3171560,658,70)
{
 Left=1
 Top=1
 Width=190
 Height=21
 Strings=#13:Пр руб Пр коп|13:Пр руб Пр коп|13:Пр руб Цф коп|20:Пр руб Пр коп+НДС Цф|24:Пр руб Пр коп+НДС Цф(Пр)|28:Цф(Пр руб Пр коп)+НДС Цф(Пр)|28:Цф(Пр руб Пр коп)+НДС Цф(Пр)|35:Цф(Пр руб Цф коп)+НДС Цф(Пр Цф коп)|34:Цф(Пр руб Цф коп)+НДС Цф(Пр)Цф коп|17:Цф(Пр руб) Цф коп|35:Цф(Пр руб) Цф коп+НДС Цф(Пр)Цф коп)|
 Point(doSelect)
 Point(Index)
}
Add(DoData,279599,609,98)
{
 Data=Integer(0)
 link(onEventData,3171560:doSelect,[])
}
Add(StrCase,12348247,707,161)
{
 Type=3
 link(onModify,7345800:doSetText,[(746,167)(746,202)(165,202)(165,139)])
}
Add(If_else,14005120,455,98)
{
 Op2=Integer(2)
 link(onTrue,15784998:doClose,[])
}
Add(Image,3919875,609,56)
{
 Width=213
 Height=23
 Picture=[ZIPB639000078DAEDDAC10D82301480619C4237D0094CBC7A77269DCA059CC179B021C698405B830F7AF9FED88B70FC52CA0BE7CBFDD40D1DD33AA4F54C6B9BD6A6DB0DFFDFDED7BF7B48B3DA5FFBFF7FFC893FF127CDF3F7A9AA6D7C277F0AF35725C89F96F5572038790F7F8A39FF9509E6AEF2A7B0F78F1CB2024DFE14F9FE3BA656DE17F953F0FC2597F98BD6F03749D0FC4FEBF9FB7D28C39F16F767FF53E3E7AFF39F1ABC7F543742FEB4ECFCA54C903F85F92BEC733982FC29C65FF5A8C79FD6F0E7FB17B57CFEFAFE548DE72FFC893FF157F5F7021C5D0E1F]
 Point(doSendToBack)
 Point(onMouseDown)
 link(onMouseDown,14005120:doCompare,[(648,69)(648,48)(445,48)(445,104)])
}
Add(Hub,635155,553,91)
{
 link(onEvent1,3919875:doSendToBack,[(578,97)(578,76)])
 link(onEvent2,279599:doData,[])
}