Kolchak,

Не все так легко как ты пытаешься


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,1022,350)
{
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,14180527,434,308)
{
Caption="lg_h"
Type=1
link(Data,12699118:Value,[])
Primary=[7374460,98,-126]
}
Add(LineBreak,6322455,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\r\nrole=al_frame\r\nexpire=\r\ncaptcha_sid=%5\r\ncaptcha_key=%6\r\n_origin=https://vk.com\r\nip_h=%1\r\nlg_h=%2\r\nemail=%3\r\npass=%4"
Point(FString)
link(onFString,6894500:doLoadString,[])
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,4723284,196,91)
{
Caption="Login"
Type=1
link(Data,9089818:Text,[])
Primary=[149865,343,105]
}
Add(LineBreak,12614792,259,91)
{
Caption="Pass"
Type=1
link(Data,2480487:Text,[])
Primary=[3404568,287,119]
}
Add(HTTPClient,6894500,595,266)
{
URL="https://login.vk.com/?act=login"
Method=1
EncType=1
CookieManager="VK"
Point(PostData)
link(onFinish,14906009:doEvent1,[])
link(PostData,1796193:FString,[(615,254)(636,254)(636,311)(531,311)])
}
Add(ChildForm,10237630,700,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,5282041,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,3432722nEvent1,[(641,307)(641,27)])
}
END_SDK
Add(StyleXP,1482088,42,105)
{
}
Add(Hub,14906009,644,273)
{
link(onEvent1,10237630:doWork1,[(679,279)(679,230)])
link(onEvent2,8762953:doSearch,[(679,286)(679,321)])
}
Add(LineBreak,14998004,707,266)
{
Caption="Captca"
Type=1
link(Data,10237630:Var2,[])
Primary=[2266572,-147,-28]
}
Add(LineBreak,13106093,700,280)
{
Caption="Ssid"
Type=1
link(Data,10237630:Var1,[])
Primary=[3189139,-147,-56]
}
Add(Hub,3764876,497,266)
{
InCount=2
OutCount=1
link(onEvent1,1796193:doString,[])
}
Add(LineBreak,11158637,420,329)
{
Caption="Каптча"
link(Out,3764876:doEvent2,[(483,335)(483,279)])
Primary=[6538856,329,-105]
}
Add(BlockFind,8762953,700,315)
{
IncludeBlock=1
StartBlock="parent.onLoginDone('"
EndBlock="'"
link(onSearch,64190:doStrCat,[])
}
Add(StrCat,64190,749,315)
{
Str1="https://vk.com"
link(onStrCat,16135652:doEvent1,[])
}
Add(HTTPClient,15226573,917,315)
{
CookieManager="VK"
link(URL,64190:Result,[(923,295)(788,295)(788,358)(755,358)])
link(onFinish,85994:doEvent1,[])
}
Add(Hub,85994,966,322)
{
link(onEvent1,348291:doSearch,[(1001,328)(1001,300)])
link(onEvent2,11120101:doAdd,[(1001,335)(1001,356)])
}
Add(BlockFind,348291,1022,294)
{
IncludeBlock=1
StartBlock="<title>"
EndBlock="</title>"
link(onSearch,14935656:doText,[])
}
Add(Label,14935656,1078,294)
{
Left=10
Top=40
Width=4
Height=4
Font=[MS Sans Serif,12,1,0,1]
Caption=""
}
Add(Timer,7206592,833,336)
{
Interval=600000
Enable=1
link(onTimer,3306859:doEvent2,[(877,342)(877,328)])
}
Add(Hub,3306859,889,315)
{
InCount=2
OutCount=1
link(onEvent1,15226573:doLoadString,[])
}
Add(Hub,16135652,798,315)
{
link(onEvent1,3306859:doEvent1,[])
link(onEvent2,7206592:doTimer,[(822,328)(822,342)])
}