Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,42,49)
{
 Width=468
 Height=441
 Name="VK"
 Caption="Вконтакте"
 Position=1
}
Add(Edit,9089818,196,49)
{
 Left=10
 Top=10
 Width=165
 Text=""
}
Add(Edit,2480487,259,49)
{
 Left=185
 Top=10
 Width=190
 Text=""
}
Add(Button,8431870,126,224)
{
 Left=390
 Top=10
 TabOrder=-1
 Caption="Войти"
 link(onClick,14840059:doStart,[])
}
Add(HTTPClient,13653845,238,224)
{
 URL="https://vk.com/"
 CookieManager="VK"
 link(onFinish,12173446:doSearch,[])
}
Add(Thread,14840059,182,224)
{
 Delay=0
 FastStop=0
 link(onExec,13653845:doLoadString,[])
}
Add(CookieManager,3226367,42,161)
{
 Name="VK"
}
Add(RichEdit,11120101,259,476)
{
 Left=5
 Top=65
 Width=440
 Height=335
 ScrollBars=2
}
Add(BlockFind,12173446,287,231)
{
 IncludeBlock=1
 StartBlock="<form method="POST" name="login" id="quick_login_form" action="https://login.vk.com/?act=login">"
 EndBlock="</form>"
 link(onSearch,5991828:doEvent1,[])
}
Add(BlockFind,5641264,378,203)
{
 IncludeBlock=1
 StartBlock="name="ip_h" value=""
 EndBlock="""
 link(onSearch,8057132:doValue,[])
}
Add(Hub,5991828,336,231)
{
 link(onEvent1,5641264:doSearch,[(364,237)(364,209)])
 link(onEvent2,14088092:doSearch,[(364,244)(364,272)])
}
Add(BlockFind,14088092,378,266)
{
 IncludeBlock=1
 StartBlock="name="lg_h" value=""
 EndBlock="""
 link(onSearch,12699118:doValue,[])
}
Add(Memory,8057132,434,203)
{
}
Add(Memory,12699118,434,266)
{
 link(onData,3764876:doEvent1,[])
}
Add(LineBreak,1992179,434,308)
{
 Caption="lg_h"
 Type=1
 link(Data,12699118:Value,[])
 Primary=[7374460,98,-126]
}
Add(LineBreak,9349991,434,245)
{
 Caption="ip_h"
 Type=1
 link(Data,8057132:Value,[])
 Primary=[15788358,91,-77]
}
Add(FormatStr,1796193,525,266)
{
 DataCount=6
 Mask="act=login&role=al_frame&expire=&captcha_sid=%5&captcha_key=%6&_origin=https://vk.com&ip_h=%1&lg_h=%2&email=%3&pass=%4"
 link(onFString,12073324:onDecode,[])
 link(Str1,15788358:Var,[])
 link(Str2,7374460:Var,[])
 link(Str3,149865:Var,[])
 link(Str4,3404568:Var,[])
 link(Str5,3189139:Var,[])
 link(Str6,2266572:Var,[])
}
Add(LineBreak,8222163,196,91)
{
 Caption="Login"
 Type=1
 link(Data,9089818:Text,[])
 Primary=[149865,343,105]
}
Add(LineBreak,4793759,259,91)
{
 Caption="Pass"
 Type=1
 link(Data,2480487:Text,[])
 Primary=[3404568,287,119]
}
Add(HTTPClient,6894500,693,266)
{
 URL="https://login.vk.com/?act=login"
 Method=1
 EncType=1
 CookieManager="VK"
 Point(PostData)
 link(onFinish,14906009:doEvent1,[])
 link(PostData,133703:Value,[(713,254)(678,254)(678,310)(643,310)])
}
Add(Memory,133703,637,266)
{
 link(onData,6894500:doLoadString,[])
}
Add(ChildForm,10237630,798,224)
{
 link(onEvent1,6538856:In,[])
}
BEGIN_SDK
  Add(EditMulti,3432722,21,21)
  {
   EventCount=1
   WorkCount=1
   VarCount=2
   Width=664
   Height=396
   link(doWork1,15654814:doSearch,[(65,27)(65,118)])
   link(Var1,2859805:Value,[(27,191)(146,191)])
   link(Var2,3970101:Text,[(34,368)(195,368)])
  }
  Add(MainForm,13764019,504,315)
  {
   Left=35
   Top=105
   Width=154
   Height=120
   Visible=1
   Caption="Каптча"
   BorderStyle=3
   ShiftLeft=150
   ShiftTop=200
   FormFastening="parent.VK"
   Point(doVisible)
  }
  Add(Image,11678326,550,126)
  {
   Left=5
   Top=5
   Width=130
   Height=50
   Ctl3D=0
   Point(onDblClick)
  }
  Add(HTTPClient,2492170,252,112)
  {
   CookieManager="parent.VK"
   link(onHeadersAvail,790357:doClear,[(294,118)(294,76)])
   link(onFinish,1870456:doEvent1,[])
  }
  Add(Convertor,11554152,348,119)
  {
   Mode=12
   link(onResult,13972839:doCopy,[])
  }
  Add(StreamCopy,13972839,397,119)
  {
   Count=-1
   link(Dest,16397487:Var2,[])
  }
  Add(MemoryStream,790357,397,63)
  {
   Point(doPosition)
  }
  Add(Hub,7846593,460,133)
  {
   OutCount=4
   link(onEvent1,790357:doPosition,[(485,139)(485,114)(382,114)(382,83)])
   link(onEvent2,11060859:doLoadFromStream,[])
   link(onEvent3,11060859:doBitmap,[])
   link(onEvent4,9713406:In,[(486,160)(486,174)])
  }
  Add(GetDataEx,16397487,397,99)
  {
   link(Data,790357:Stream,[])
  }
  Add(Hub,1870456,301,119)
  {
   link(onEvent1,11554152:doConvert,[])
   link(onEvent2,7846593:doEvent1,[(334,132)(334,161)(442,161)(442,139)])
  }
  Add(Jpeg,11060859,497,126)
  {
   Point(doLoadFromStream)
   Point(doBitmap)
   Point(Stream)
   link(onBitmap,11678326:doLoad,[])
   link(Stream,16397487:Var3,[(503,104)])
  }
  Add(ChanelToIndex,12911926,455,343)
  {
   link(onIndex,13764019:doVisible,[])
  }
  Add(LineBreak,8175305,399,357)
  {
   link(Out,12911926:doWork2,[(442,363)(442,356)])
   Primary=[9713406,98,-189]
  }
  Add(Edit,3970101,189,224)
  {
   Left=5
   Top=65
   Width=70
   Text=""
  }
  Add(Button,16290214,357,294)
  {
   Left=85
   Top=65
   TabOrder=-1
   Caption="Войти"
   link(onClick,6785816:doEvent1,[])
  }
  Add(BlockFind,15654814,84,112)
  {
   IncludeBlock=1
   StartBlock="parent.onLoginCaptcha('"
   EndBlock="'"
   link(onSearch,2859805:doValue,[])
  }
  Add(StrCat,3592319,196,112)
  {
   Str1="https://vk.com/captcha.php?sid="
   link(onStrCat,2492170:doLoadString,[])
  }
  Add(Memory,2859805,140,112)
  {
   link(onData,3592319:doStrCat,[])
  }
  Add(Hub,6785816,406,294)
  {
   link(onEvent1,12911926:doWork1,[(438,300)(438,349)])
   link(onEvent2,3432722:onEvent1,[(641,307)(641,27)])
  }
END_SDK
Add(StyleXP,1482088,42,105)
{
}
Add(Hub,14906009,742,273)
{
 link(onEvent1,10237630:doWork1,[(777,279)(777,230)])
 link(onEvent2,8762953:doSearch,[(777,286)(777,321)])
}
Add(LineBreak,7969504,805,266)
{
 Caption="Captca"
 Type=1
 link(Data,10237630:Var2,[])
 Primary=[2266572,-245,-28]
}
Add(LineBreak,2442135,798,280)
{
 Caption="Ssid"
 Type=1
 link(Data,10237630:Var1,[])
 Primary=[3189139,-245,-56]
}
Add(Hub,3764876,497,266)
{
 InCount=2
 OutCount=1
 link(onEvent1,1796193:doString,[])
}
Add(LineBreak,14380156,420,329)
{
 Caption="Каптча"
 link(Out,3764876:doEvent2,[(483,335)(483,279)])
 Primary=[6538856,427,-105]
}
Add(BlockFind,8762953,798,315)
{
 IncludeBlock=1
 StartBlock="parent.onLoginDone('"
 EndBlock="'"
 link(onSearch,64190:doStrCat,[])
}
Add(StrCat,64190,847,315)
{
 Str1="https://vk.com"
 link(onStrCat,15226573:doLoadString,[])
}
Add(HTTPClient,15226573,896,315)
{
 CookieManager="VK"
 link(onFinish,2121118:In,[])
}
Add(Hub,85994,203,455)
{
 link(onEvent1,348291:doSearch,[(238,461)(238,433)])
 link(onEvent2,11120101:doAdd,[(238,468)(238,482)])
}
Add(LineBreak,16047004,126,455)
{
 Caption="Страница"
 link(Out,85994:doEvent1,[])
 Primary=[2121118,819,-133]
}
Add(BlockFind,348291,259,427)
{
 IncludeBlock=1
 StartBlock="<h2 class="page_name">"
 EndBlock="</h2>"
 link(onSearch,14935656:doText,[])
}
Add(Label,14935656,315,427)
{
 Left=10
 Top=40
 Width=4
 Height=4
 Font=[MS Sans Serif,12,1,0,1]
 Caption=""
}
Add(MultiElementEx,12073324,588,266)
{
 @Hint=#27:Decoder Unicod (\uXXXX) 1.3
 @Color=11184810
 link(onResult,133703:doValue,[])
}
BEGIN_SDK
  Add(EditMultiEx,7291704,21,21)
  {
   WorkCount=#36:onDecode=Декодировать входные данные|
   EventCount=#42:onResult=Выдаёт результат операции в поток|
   DataCount=#39:Text=Определяет текст для декодирования|
   Width=1077
   Height=305
   link(onDecode,1138751:doEvent1,[(47,27)(47,88)])
  }
  Add(Str_Enum,1905308,140,110)
  {
   Delimiter=""
   link(onEnum,7328343:doCase,[])
   link(onEndEnum,2341893:In,[])
   link(String,7291704:Text,[(146,66)(27,66)])
  }
  Add(IndexToChanel,3639663,305,110)
  {
   Point(Data)
   Point(Index)
   link(onEvent1,7018223:doWork2,[])
   link(onEvent2,5006024:doCase,[])
   link(Data,9845510:getVar,[])
   link(Index,10490059:Value,[])
  }
  Add(CharArray,2661129,947,42)
  {
   link(onGetStr,10477837:doEvent1,[])
  }
  Add(ArrayRW,13770070,947,96)
  {
   link(Array,2661129:Array,[])
  }
  Add(Case,7328343,235,110)
  {
   Value=String(\)
   DataOnTrue=Integer(1)
   link(onNextCase,3639663:doEvent,[])
   link(onTrue,11623204:doWork3,[(285,123)])
  }
  Add(Case,5006024,351,117)
  {
   Value=String(u)
   DataOnTrue=Integer(1)
   link(onNextCase,16079249:doEvent,[])
   link(onTrue,1686965:doValue,[(401,130)(401,63)])
  }
  Add(Memory,10490059,312,50)
  {
   Default=Integer(0)
  }
  Add(Memory,1686965,427,57)
  {
   Default=Integer(0)
  }
  Add(Hub,14470588,858,117)
  {
   OutCount=3
   link(onEvent1,11623204:doWork1,[(882,123)(882,41)(285,41)])
   link(onEvent2,11100288:doData,[])
   link(onEvent3,5759759:doWork2,[])
  }
  Add(HubEx,11623204,281,50)
  {
   link(onEvent,10490059:doValue,[])
  }
  Add(DoData,11100288,889,124)
  {
   Data=String(\)
   link(onEventData,2376014:doWork2,[])
  }
  Add(HubEx,7018223,929,110)
  {
   link(onEvent,13770070:doAdd,[])
  }
  Add(HubEx,2376014,929,124)
  {
   Angle=3
   link(onEvent,7018223:doWork3,[])
  }
  Add(IndexToChanel,16079249,427,117)
  {
   Point(Index)
   link(onEvent1,14470588:doEvent1,[])
   link(onEvent2,6602952:doEvent1,[(467,130)(467,137)])
   link(Index,1686965:Value,[])
  }
  Add(Counter,3591153,504,171)
  {
   Max=3
   Default=-1
   link(onNext,13235648:doCase,[])
  }
  Add(Hub,6602952,474,131)
  {
   link(onEvent1,14656065:doNext,[])
   link(onEvent2,3591153:doNext,[(496,144)(496,177)])
  }
  Add(Case,13235648,549,171)
  {
   Value=Integer(3)
   DataOnTrue=Integer(0)
   link(onTrue,1266722:doEvent1,[])
  }
  Add(IndexToChanel,10872657,585,131)
  {
   Count=4
   Point(Data)
   link(onEvent1,7605540:doValue,[(708,137)(708,130)])
   link(onEvent2,2888098:doValue,[(708,144)(708,166)])
   link(onEvent3,6472466:doValue,[(697,151)(697,179)])
   link(onEvent4,15047183:doStrCat,[(684,158)(684,224)])
   link(Data,8629829:getVar,[])
  }
  Add(Counter,14656065,537,131)
  {
   Max=3
   Default=-1
   link(onNext,10872657:doEvent,[])
  }
  Add(Memory,2888098,820,160)
  {
  }
  Add(Memory,7605540,799,124)
  {
  }
  Add(Memory,6472466,750,173)
  {
  }
  Add(StrCat,13303406,799,218)
  {
   link(Str1,7605540:Value,[])
   link(Str2,2888098:Value,[(812,205)(826,205)])
  }
  Add(StrCat,15047183,750,218)
  {
   link(onStrCat,13303406:doStrCat,[])
   link(Str1,6472466:Value,[])
  }
  Add(StrCat,16311383,777,267)
  {
   link(onStrCat,7643679:doConvert,[])
   link(Str1,15047183:Result,[(783,259)(756,259)])
   link(Str2,13303406:Result,[(790,259)(805,259)])
  }
  Add(LineBreakEx,1817374,209,57)
  {
   Caption="def"
   Type=1
   link(OnEvent,15337042:doEvent1,[])
  }
  Add(Hub,15337042,257,57)
  {
   link(onEvent1,10490059:doClear,[])
   link(onEvent2,1686965:doClear,[])
  }
  Add(LineBreakEx,1962425,625,192)
  {
   Caption="def"
  }
  Add(LineBreakEx,6577383,147,153)
  {
   Caption="s"
   Type=3
   link(_Data,1905308:Part,[])
  }
  Add(LineBreakEx,9845510,305,86)
  {
   Caption="s"
   Type=2
  }
  Add(Hub,1266722,593,178)
  {
   link(onEvent1,16311383:doStrCat,[(674,184)(674,273)])
   link(onEvent2,1962425:doWork,[(616,191)(616,198)])
  }
  Add(LineBreakEx,8629829,585,95)
  {
   Caption="s"
   Type=2
  }
  Add(StreamConvertor,7643679,829,267)
  {
   Mode=3
   link(onResult,12362191:doCharset,[])
  }
  Add(Charset,12362191,873,267)
  {
   Type=9
   link(onCharset,5759759:doWork3,[(933,273)])
  }
  Add(LineBreak,12702350,896,42)
  {
   Caption="end"
   link(Out,2661129:doGetStr,[(938,48)(938,55)])
   Primary=[2341893,-707,75]
  }
  Add(HubEx,5759759,929,131)
  {
   Angle=3
   link(onEvent,2376014:doWork3,[])
  }
  Add(Hub,1138751,66,82)
  {
   OutCount=3
   link(onEvent1,16645260:doWork,[(89,88)(89,80)])
   link(onEvent2,7617810:doWork,[])
   link(onEvent3,1905308:doEnum,[(90,102)(90,116)])
  }
  Add(LineBreakEx,16645260,98,74)
  {
   Caption="def"
  }
  Add(LineBreakEx,8140191,891,64)
  {
   Caption="sclr"
   Type=1
   link(OnEvent,2661129:doClear,[(937,70)(937,62)])
  }
  Add(LineBreakEx,7617810,97,89)
  {
   Caption="sclr"
  }
  Add(Hub,10477837,992,49)
  {
   link(onEvent1,6009960:doWork,[(1016,55)(1016,41)])
   link(onEvent2,7291704:onResult,[(1017,62)(1017,71)(1081,71)(1081,27)])
  }
  Add(LineBreakEx,6009960,1026,35)
  {
   Caption="sclr"
  }
  Add(Icon,5086957,42,280)
  {
   @Hint=#5:#main|
   Icon=[ZIP360B000078DAED54310EC2300C3412132C9D906062644562CA4FF84066BE80E0019598F848676FAC944E280F6004D405A69004449BC48156820151576ED4AB958BEBBB02B4D4351880BA0F61D805E801C048A5826002775CC7A5034DFC7C6C6429B94AE6635E9DBCD7195CD838C9218A7D2C8CD9CF66D56788EDF39995D97888E71DA6F7307BB93CC903677EEF643FEC0D8F08F0D4E8879A8F87C581F970623EA2D1FB4F7BD5F56642E884D3BA34FA7EE1514F73DCF14C1CD6ADD19878ED8F502F21BFBA3CE6FCC2E9B92A8FA8C663BC2A0BBE6FF03C67C8BFCC23FCEFF7711EE29F529B87D27252609466ADF73574DDC4BF859412CB796A47789864789C211E66199E9611BA3597718AD7D51AF3AC8FF96E8AF956E71EF3748FE7C5DCABD779037BB438B7]
  }
END_SDK