Вверх ↑
Разработчик
Ответов: 26170
Рейтинг: 2127
#1: 2016-03-01 00:08:44 ЛС | профиль | цитата
А если так попробовать?

Add(MultiElementEx,7652017,336,385)
{
 @Hint=#31:Модуль MultiThreads_Checker_1.1|
 Mode=1
 link(OnResult,16344680:doEvent1,[])
 link(get_ip_port,8737633:GetData,[])
 AddHint(72,-27,184,13,@Hint)
}
BEGIN_SDK
  Add(EditMultiEx,9746293,21,14)
  {
   WorkCount=#5:##add|0:|
   EventCount=#8:OnResult|0:|
   VarCount=#7:##count|0:|
   DataCount=#11:get_ip_port|0:|
   Width=797
   Height=410
   VOffset=7
   HOffset=140
   Point(##add)
   Point(##count)
   link(##add,12468508:doWork1,[(137,27)])
  }
  Add(LineBreakEx,8666620,742,21)
  {
   Caption="Result"
   Type=1
   link(OnEvent,9746293:OnResult,[])
  }
  Add(LineBreakEx,6281593,679,322)
  {
   Caption="Result"
  }
  Add(DoData,3700032,161,119)
  {
   link(onEventData,8921393:doCase,[])
   link(Data,9746293:get_ip_port,[])
  }
  Add(FormatStr,4957244,567,287)
  {
   DataCount=3
   Mask="%1,%2,%3"
   Point(FString)
   link(Str1,3831849:Var,[])
   link(Str3,12563769:Value,[])
  }
  Add(StrList,2159738,637,35)
  {
   Strings=#9:http://=;|10:https://=;|6:www.=;|3:/=;|
  }
  Add(MultiReplace,117603,630,119)
  {
   link(onResult,16357934:In,[])
   link(Text,16081067:Var3,[(636,110)(622,110)(622,159)])
   link(ReplaceList,13927829:Var2,[])
  }
  Add(LineBreakEx,1917053,679,343)
  {
   @Color=11206655
   Caption="CheckNext"
  }
  Add(StrMask,9654815,259,119)
  {
   Mask="http*"
   link(onFalse,7516542:doStrCat,[])
   link(onTrue,7695048:doWork3,[(354,132)])
  }
  Add(StrCat,7516542,308,119)
  {
   Str1="http://"
   link(onStrCat,7695048:doWork2,[])
  }
  Add(HubEx,7695048,350,119)
  {
   link(onEvent,16482908:doValue,[])
  }
  Add(GetDataEx,16081067,455,154)
  {
   link(Data,16482908:Value,[])
  }
  Add(HTTP_Get,9729894,364,196)
  {
   link(onDownload,1605886:doConvert,[])
   link(onStop,10541705:doData,[(403,223)(403,258)(494,258)(494,342)])
  }
  Add(StrCat,10781118,308,196)
  {
   Str1="http://bar-navig.yandex.ru/u?ver=2&show=32&url="
   link(onStrCat,9729894:doDownload,[])
   link(Str2,16081067:Var1,[(321,159)])
  }
  Add(Convertor,1605886,413,203)
  {
   Mode=11
   link(onResult,15115652:doSearch,[])
  }
  Add(BlockFind,10626003,245,287)
  {
   IncludeBlock=1
   StartBlock="<yaca url=""
   EndBlock=""/>"
   Point(onNotFind)
   link(onSearch,1983570:doMultiReplace,[])
  }
  Add(MultiReplace,1983570,294,287)
  {
   link(onResult,15176407:doExec,[])
   link(ReplaceList,834122:Var,[])
  }
  Add(DoData,13501458,441,287)
  {
   Data=String(Нет)
   link(onEventData,11141711:doWork2,[])
  }
  Add(DoData,12805414,441,329)
  {
   Data=String(Да)
   link(onEventData,11141711:doWork3,[(487,335)])
  }
  Add(BlockFind,15115652,462,203)
  {
   IncludeBlock=1
   StartBlock="value=""
   EndBlock=""/>"
   Point(onNotFind)
   link(onSearch,12563769:doValue,[])
   link(onEndSearch,10626003:doSearch,[(501,216)(501,251)(235,251)(235,293)])
  }
  Add(Memory,12563769,581,203)
  {
   @Hint=#15:Состояние хоста|
  }
  Add(RE_Search,15176407,343,287)
  {
   ModifierR=1
   Point(Matches)
   link(onMatch,13501458:doData,[])
   link(onNotFound,12805414:doData,[(431,300)(431,335)])
   link(SourceStr,1983570:Result,[(349,279)(333,279)(333,331)(300,331)])
   link(Expression,13863573:Var,[])
  }
  Add(HubEx,11141711,483,287)
  {
   link(onEvent,4957244:doString,[])
  }
  Add(LineBreak,9066112,217,196)
  {
   Caption="Start Yandex"
   link(Out,10781118:doStrCat,[])
   Primary=[16357934,469,-77]
  }
  Add(LineBreak,5985864,574,105)
  {
   Caption="http"
   Type=1
   link(Data,13927829:Var1,[(580,89)])
   Primary=[834122,-273,154]
  }
  Add(LineBreak,14820568,630,168)
  {
   Caption="Domain"
   Type=1
   link(Data,117603:Result,[])
   Primary=[13863573,-280,91]
  }
  Add(LineBreak,15584220,455,168)
  {
   Caption="http"
   Type=1
   link(Data,16081067:Var2,[])
   Primary=[3831849,112,84]
  }
  Add(LineBreakEx,13264522,42,119)
  {
   @Color=11206655
   Caption="CheckNext"
   Type=1
   link(OnEvent,12468508:doWork2,[])
  }
  Add(HubEx,12468508,133,119)
  {
   link(onEvent,3700032:doData,[])
  }
  Add(DoData,10541705,567,336)
  {
   link(onEventData,8271393:doEvent1,[])
   link(Data,4957244:FString,[])
  }
  Add(Hub,8271393,616,336)
  {
   link(onEvent1,6281593:doWork,[(641,342)(641,328)])
   link(onEvent2,1917053:doWork,[])
  }
  Add(Case,8921393,210,119)
  {
   Value=String()
   link(onNextCase,9654815:doCompare,[])
  }
  Add(Memory,16482908,455,119)
  {
   @Hint=#15:Состояние хоста|
   link(onData,117603:doMultiReplace,[])
  }
  Add(GetDataEx,13927829,637,84)
  {
   link(Data,2159738:Text,[])
  }
END_SDK
Add(MainForm,11326563,259,168)
{
 Width=327
 Height=480
 Caption=""
 BorderStyle=1
 Position=1
}
Add(Button,13777211,210,385)
{
 Left=115
 Top=45
 Width=185
 Height=30
 Caption="Проверить"
 link(onClick,11304990:doFor,[])
}
Add(Edit,12430023,280,336)
{
 Left=10
 Top=50
 Text="5"
}
Add(Label,6950492,259,252)
{
 Left=65
 Top=55
 Width=47
 Height=17
 Caption="Потоков"
}
Add(For,11304990,273,385)
{
 IncludeEnd=1
 link(onEvent,7652017:##add,[])
 link(End,12430023:Text,[])
}
Add(TCP_Server,5234581,259,210)
{
 Port=5
}
Add(EventFromData,8737633,336,231)
{
 link(onEvent,10645816:doData,[])
}
Add(Timer,6989260,119,168)
{
 Interval=100
 link(onTimer,3105876:doData,[])
}
Add(FormatStr,13623212,210,168)
{
 DataCount=1
 Mask="Чекер 1.1; Акт.модулей: %1;"
 link(onFString,11326563:doCaption,[])
}
Add(LineBreakEx,5700589,336,427)
{
 Caption="CountMTCheck"
 Type=3
 link(_Data,7652017:##count,[])
}
Add(LineBreakEx,14012912,161,140)
{
 Caption="CountMTCheck"
 Type=2
}
Add(ChangeMon,3105876,161,168)
{
 link(onData,13623212:doString,[])
 link(Data,14012912:getVar,[])
}
Add(StrList,3673357,469,189)
{
 Strings=#12:parfumeco.ru|13:stockihome.ru|12:k-magic38.ru|19:http://the-sever.ru|12:divasalon.su|12:apk-group.ru|15:tktechnology.ru|17:tktechnologija.ru|14:elektrostil.su|14:novinkaomsk.ru|22:nasha-mebel-kotovsk.ru|15:zooplaneta55.ru|18:grillandveggies.ru|11:mingryaz.ru|14:tsm-kuzbass.ru|11:ekopro74.ru|9:kct-nn.ru|18:technology-info.ru|12:soundmaxi.ru|12:zaptorg74.ru|11:eat-meat.ru|15:mimaki-kazan.ru|13:falke-shop.ru|11:perm-zuk.ru|14:zuki-moscow.ru|13:tourismrus.ru|8:ekt46.ru|10:t-proff.ru|
 Point(doGetString)
 Point(onGetString)
 Point(IdxToSelect)
 link(onGetString,8737633:doData,[(514,202)(514,302)(329,302)(329,237)])
}
Add(InfoTip,14774,315,168)
{
 Info=#27:Список ip:port для проверки|
 Width=218
 Height=151
}
Add(Hub,6078942,427,231)
{
 link(onEvent1,3673357:doGetString,[])
 link(onEvent2,3673357:doDelete,[(458,244)(458,209)])
}
Add(DoData,10645816,385,231)
{
 Data=Integer(0)
 link(onEventData,6078942:doEvent1,[])
}
Add(Edit,9371808,574,385)
{
 Left=10
 Top=15
 Width=290
 Text=""
 Alignment=2
}
Add(Hub,16344680,525,385)
{
 link(onEvent1,9371808:doText,[])
 link(onEvent2,9855146:doAdd,[(549,398)(549,433)])
}
Add(Memo,9855146,574,427)
{
 Left=10
 Top=80
 Width=290
 Height=355
 ScrollBars=2
}

карма: 22

0