Make(delphi)
ver(4.05 build 186)
Add(MultiElementEx,7652017,693,518)
{
 @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=1168
   Height=375
   VOffset=7
   HOffset=140
   Point(##add)
   Point(##count)
   link(##add,12468508:doWork1,[(137,27)])
  }
  Add(LineBreakEx,8666620,1106,21)
  {
   Caption="Result"
   Type=1
   link(OnEvent,9746293:OnResult,[])
  }
  Add(LineBreakEx,6281593,1085,182)
  {
   Caption="Result"
  }
  Add(DoData,3700032,161,119)
  {
   link(onEventData,8921393:doCase,[])
   link(Data,9746293:get_ip_port,[])
  }
  Add(LineBreakEx,1917053,518,273)
  {
   @Color=11206655
   Caption="CheckNext"
  }
  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(Case,8921393,210,119)
  {
   Value=String()
   link(onNextCase,7511906:doValue,[])
  }
  Add(HTTP_Get,3095523,350,175)
  {
   Wait=0
   link(onDownload,7245430:doConvert,[])
  }
  Add(Convertor,7245430,406,182)
  {
   Mode=11
   link(onResult,13165058:doEvent1,[(443,188)(443,272)])
  }
  Add(FormatStr,16441318,287,175)
  {
   Mask="https://www.virustotal.com/vtapi/v2/ip-address/report?ip=%1&apikey=98bb2c1ead6f769a495f1bee478e38646ba190a57f5bd34d6d4cbb1eea3399f2"
   link(onFString,3095523:doDownload,[])
   link(Str1,15663974:Var2,[])
  }
  Add(BlockFind,216573,462,182)
  {
   IncludeBlock=1
   StartBlock=""hostname": ""
   EndBlock="""
   Point(onNotFind)
   link(onSearch,1984736:doValue,[(510,188)(510,97)])
  }
  Add(Host,9516772,532,182)
  {
   link(onIPByHost,2973611:doExec,[(580,195)(580,188)])
   link(HostName,9497138:Var2,[(545,170)(531,170)])
  }
  Add(RE_Search,2973611,595,182)
  {
   link(onMatch,440720:doData,[])
   link(Expression,15663974:Var3,[(608,166)])
  }
  Add(Memory,1984736,525,91)
  {
   @Hint=#15:Состояние хоста|
   Default=String(2)
   link(onData,9516772:doIPByHost,[(569,97)(569,164)(520,164)(520,195)])
  }
  Add(DoData,440720,693,182)
  {
   link(onEventData,6281593:doWork,[])
   link(Data,9497138:Var3,[(699,138)])
  }
  Add(GetDataEx,9497138,525,133)
  {
   link(Data,1984736:Value,[])
  }
  Add(Memory,7511906,287,119)
  {
   @Hint=#15:Состояние хоста|
   Default=String(2)
   link(onData,16441318:doString,[(331,125)(331,153)(275,153)(275,181)])
  }
  Add(GetDataEx,15663974,287,161)
  {
   link(Data,7511906:Value,[])
  }
  Add(Hub,13165058,448,266)
  {
   link(onEvent1,216573:doSearch,[(474,272)(474,230)(450,230)(450,188)])
   link(onEvent2,1917053:doWork,[])
  }
END_SDK
Add(MainForm,11326563,616,301)
{
 Width=327
 Height=480
 Caption=""
 BorderStyle=1
 Position=1
}
Add(Button,13777211,567,518)
{
 Left=115
 Top=45
 Width=185
 Height=30
 Caption="Проверить"
 link(onClick,11304990:doFor,[])
}
Add(Edit,12430023,637,469)
{
 Left=10
 Top=50
 Text="5"
}
Add(Label,6950492,616,385)
{
 Left=65
 Top=55
 Width=47
 Height=17
 Caption="Потоков"
}
Add(For,11304990,630,518)
{
 IncludeEnd=1
 link(onEvent,7652017:##add,[])
 link(End,12430023:Text,[])
}
Add(TCP_Server,5234581,616,343)
{
 Port=5
}
Add(EventFromData,8737633,693,364)
{
 link(onEvent,10645816:doData,[])
}
Add(Timer,6989260,476,301)
{
 Interval=100
 link(onTimer,3105876:doData,[])
}
Add(FormatStr,13623212,567,301)
{
 DataCount=1
 Mask="Чекер 1.1; Акт.модулей: %1;"
 link(onFString,11326563:doCaption,[])
}
Add(LineBreakEx,5700589,693,574)
{
 Caption="CountMTCheck"
 Type=3
 link(_Data,7652017:##count,[])
}
Add(LineBreakEx,14012912,518,273)
{
 Caption="CountMTCheck"
 Type=2
}
Add(ChangeMon,3105876,518,301)
{
 link(onData,13623212:doString,[])
 link(Data,14012912:getVar,[])
}
Add(StrList,3673357,826,322)
{
 Strings=#13:185.48.56.162|14:178.248.237.68|14:198.11.132.250|14:95.165.129.227|12:141.8.192.44|14:104.25.219.116|13:104.25.224.95|14:95.163.111.139|12:213.85.62.73|10:5.9.42.112|13:188.40.96.198|
 Point(doGetString)
 Point(onGetString)
 Point(IdxToSelect)
 link(onGetString,8737633:doData,[(871,335)(871,435)(686,435)(686,370)])
}
Add(InfoTip,14774,672,301)
{
 Info=#27:Список ip:port для проверки|
 Width=218
 Height=151
}
Add(Hub,6078942,784,364)
{
 link(onEvent1,3673357:doGetString,[])
 link(onEvent2,3673357:doDelete,[(815,377)(815,342)])
}
Add(DoData,10645816,742,364)
{
 Data=Integer(0)
 link(onEventData,6078942:doEvent1,[])
}
Add(Edit,9371808,931,518)
{
 Left=10
 Top=15
 Width=290
 Text=""
 Alignment=2
}
Add(Hub,16344680,882,518)
{
 link(onEvent1,9371808:doText,[])
 link(onEvent2,9855146:doAdd,[(906,531)(906,566)])
}
Add(Memo,9855146,931,560)
{
 Left=10
 Top=80
 Width=290
 Height=355
 ScrollBars=2
}

Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,231,147)
{
 Width=377
 Height=545
 Position=1
}
Add(Edit,6659157,729,83)
{
 Left=5
 Top=5
 Width=245
 Text="223.202.62.195"
}
Add(Button,8131849,476,273)
{
 Left=255
 Top=5
 Width=105
 Caption="Start"
 link(onClick,5937559:doString,[(583,279)(583,293)])
}
Add(Memo,11540097,1260,399)
{
 Top=30
 Width=360
 Height=398
 ScrollBars=2
}
Add(StyleXP,12069785,42,77)
{
}
Add(HTTP_Get,13966554,721,287)
{
 Wait=0
 link(onDownload,15779580:doConvert,[])
}
Add(Convertor,15779580,777,294)
{
 Mode=11
 link(onResult,4519761:doSearch,[])
}
Add(FormatStr,5937559,658,287)
{
 Mask="https://www.virustotal.com/vtapi/v2/ip-address/report?ip=%1&apikey=98bb2c1ead6f769a495f1bee478e38646ba190a57f5bd34d6d4cbb1eea3399f2"
 link(onFString,13966554:doDownload,[])
 link(Str1,7761360:Var2,[(664,201)(735,201)])
}
Add(BlockFind,4519761,833,294)
{
 IncludeBlock=1
 StartBlock=""hostname": ""
 EndBlock="""
 Point(onNotFind)
 link(onSearch,6295477:doValue,[(881,300)(881,209)])
}
Add(Host,6725858,903,294)
{
 link(onIPByHost,16077092:doExec,[(943,307)(943,300)])
 link(HostName,1173027:Var2,[(916,282)(902,282)])
}
Add(RE_Search,16077092,952,294)
{
 link(onMatch,846248:doData,[])
 link(Expression,7761360:Var3,[(965,152)])
}
Add(Memory,6295477,896,203)
{
 @Hint=#15:Состояние хоста|
 Default=String(2)
 link(onData,6725858:doIPByHost,[(940,209)(940,276)(891,276)(891,307)])
}
Add(GetDataEx,7761360,729,147)
{
 link(Data,6659157:Text,[])
}
Add(DoData,846248,1001,294)
{
 link(onEventData,14861093:doWork1,[(1185,300)])
 link(Data,1173027:Var3,[(1007,250)])
}
Add(GetDataEx,1173027,896,245)
{
 link(Data,6295477:Value,[])
}
Add(Button,4627591,1192,510)
{
 Top=429
 Width=360
 Height=35
 Caption="Clear"
 link(onClick,11540097:doClear,[(1242,516)(1242,412)])
}
Add(SearchInFile,8359713,196,448)
{
 FileName="ip.txt"
 Text="."
 Point(onEnd)
 Point(doStop)
 link(onSearch,7511906:doValue,[(334,461)(334,419)])
}
Add(Button,1838155,119,448)
{
 Top=465
 Width=180
 Height=40
 Caption="Start"
 link(onClick,8359713:doSearch,[])
}
Add(Button,5630535,123,487)
{
 Left=180
 Top=465
 Width=180
 Height=40
 Caption="Stop"
 link(onClick,8359713:doStop,[(175,493)(175,461)])
}
Add(HTTP_Get,3095523,504,483)
{
 Wait=0
 link(onDownload,7245430:doConvert,[])
}
Add(Convertor,7245430,560,490)
{
 Mode=11
 link(onResult,216573:doSearch,[])
}
Add(FormatStr,16441318,441,483)
{
 Mask="https://www.virustotal.com/vtapi/v2/ip-address/report?ip=%1&apikey=98bb2c1ead6f769a495f1bee478e38646ba190a57f5bd34d6d4cbb1eea3399f2"
 link(onFString,3095523:doDownload,[])
 link(Str1,15663974:Var2,[])
}
Add(BlockFind,216573,616,490)
{
 IncludeBlock=1
 StartBlock=""hostname": ""
 EndBlock="""
 Point(onNotFind)
 link(onSearch,1984736:doValue,[(664,496)(664,405)])
}
Add(Host,9516772,686,490)
{
 link(onIPByHost,2973611:doExec,[(726,503)(726,496)])
 link(HostName,9497138:Var2,[(699,478)(685,478)])
}
Add(RE_Search,2973611,735,490)
{
 link(onMatch,440720:doData,[])
 link(Expression,15663974:Var3,[(748,474)])
}
Add(Memory,1984736,679,399)
{
 @Hint=#15:Состояние хоста|
 Default=String(2)
 link(onData,9516772:doIPByHost,[(723,405)(723,454)(674,454)(674,503)])
}
Add(DoData,440720,791,490)
{
 link(onEventData,14861093:doWork2,[(995,496)(995,370)])
 link(Data,9497138:Var3,[(797,446)])
}
Add(GetDataEx,9497138,679,441)
{
 link(Data,1984736:Value,[])
}
Add(Memory,7511906,441,413)
{
 @Hint=#15:Состояние хоста|
 Default=String(2)
 link(onData,16441318:doString,[(485,419)(485,461)(429,461)(429,489)])
}
Add(GetDataEx,15663974,441,469)
{
 link(Data,7511906:Value,[])
}
Add(HubEx,14861093,1181,364)
{
 Angle=1
 link(onEvent,11540097:doAdd,[(1185,405)])
}

185.48.56.162
178.248.237.68
198.11.132.250
95.165.129.227
141.8.192.44
104.25.219.116
104.25.224.95
95.163.111.139
213.85.62.73
5.9.42.112
188.40.96.198