-

+; "...\\\";
.(" !") .


:





:      |   |   | 


: 07.04.11.

(* , - - . "." "cookies" , ("traditiowikiUserName", "traditiowikiUserID" "traditiowikiToken"), , . *)
+;

  "...\\\",
  "...\\\",
  "...\\\",
  "...\\\",
  "...\\\",
  "...\\\",
  "...\\\",
  "...\\\",
  ;


  : .;

  : 400H ;

  : .;
  : ;

  : ;

  ,
  , , , ,
  , , , , : ;

  , : 400H ;

  , : 200H ;

  : 80H ;

;

  : .;
  : .;

  .();
  (" (", );
  .10(., 2, ); .(, );
  .(, ".");
  .10(., 2, ); .(, );
  .(, ".");
  .10(., 2, ); .(, );
  .(, " ");
  .10(., 2, ); .(, );
  .(, ":");
  .10(., 2, ); .(, );
  .(, ").");
;

(-, -: );

  = 1000H;

  : .;
  : .;
  , : ;
  : ;
  : ;

  := .5(, .(""), 0, 0, 0, 0);
  := .6(, , .(), 0, 0, 0, 0);
  := .();
 
    := .4(, , .(), , .());
    .(, , )
  = 0;
  .();
  := .1(, );
  := .1(, )
;

_(-, -, -: ): ;

  = 1000H;

  , , , , : ;
  : .;
  : .;
  : 400H ;
  : 400H ;
  , : ;

  := .5(, .(""), 0, 0, 0, 0);
  := .8(, , .(), 80, 0, 0, 3, 0, 1);
  := .8(, , .("GET"), .(), 0, 0, 0, 400000H+80000H, 1);
  ("Cookie: ", ); .(, );
  := .4(, , .(), (), 20000000H);
  := .5(, , 0, 0, 0, 0);
  := (); := 0;
  := .5(, , 43, .(), .(), .());
  := .(";", , 0);
  # -1
    [] := 0X;
    .(, "; ");
    .(, );
 
   
  ;
  := .();
 
    := .4(, , .(), , .());
    .(, , )
  = 0;
  .();
  := .1(, );
  := .1(, );
  := .1(, );
 
_;

(-, -: ; -: .; : ; -: );

  = 1000H;

  , , , , : ;
  : .;
  : .;
  : 400H ;

  := .5(, .(""), 0, 0, 0, 0);
  := .8(, , .(), 80, 0, 0, 3, 0, 1);
  := .8(, , .("POST"), .(), 0, 0, 0, 480000H, 1);
  ("Accept: */*", );
  := .4(, , .(), (), 20000000H);
  ("Content-Type: multipart/form-data; boundary=----------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh", );
  := .4(, , .(), (), 20000000H);
  ("Accept-Language: ru-ru,ru;q=0.8,en-us;q=0.5,en;q=0.3", );
  := .4(, , .(), (), 20000000H);
  ("Accept-Charset: windows-1251,utf-8;q=0.7,*;q=0.7", );
  := .4(, , .(), (), 20000000H);
  ("Cookie: ", ); .(, );
  := .4(, , .(), (), 20000000H);
  := .5(, , 0, 0, .(), );
  := .();
 
    := .4(, , .(), , .());
    .(, , )
  = 0;
  .();
  := .1(, );
  := .1(, );
  := .1(, )
;

(-, -:; :):;
(* <> <>, <> Windows.
 * <>. <> <>, -1. *)

  ,:;
  : ;
  : .;
  : ;

  := .();
  # 0 .(, ) ;
  (, ()); .(, ^);
  :=(); :=0;
  ( < ) ( .())
    .(, , 1);
    = []
      ()
   
      :=0
    ;
    ()
  ;
  #
    :=-1
  ;
  .();
  -
;

(): ;

  : .;
  , : ;
  : ;
  : ;
  wpSection:       80H ;
  wpStarttime:       80H ;
  wpEdittime:       80H ;
  wpScrolltop:       80H ;
  wpAutoSummary:    80H ;
  oldid:       80H ;
  wpEditToken:       80H ;
  : 400H ;

(-: );

  : ;
  : ;

  (, ()); .(, ^);
  := 0;
  ( < (^)) ([] # 0)
    [] := [];
    (); ()
 
;
(-: .; : );

  : ;

  := 0;
  <
    [] := [];
    (); ()
 
;
(-: );

  : .;
  : .;

  := .();
  .()
    .(, , 1);
    [] := ;
    ()
  ;
  .()
;

(+, -: ): ;

  := .(, ^, );
  (); < 0 [] = '"'; ();
  := 0;
  [] # '"'
    [] := []; (); ();
    ( >= (^)) ( >= ())
  ;
  [] := 0X;
 
;


  ("/w/index.php?title=", ); .(, ); .(, "&action=edit");
  _("traditio.ru", , "_.")
   
  ;
  ('<div class="mw-newarticletext">', "_.", 0) = -1
    .(" !^");
  ;
  := .("_.");
  = ;
  (, 10000H); (, 10000H);
  .(, ^, (^));
  := 0 (^)-1 [] := ([]) ;
  := ;
  .();
  := 0;
  (wpSection, '" name="wpSection') ;
  (wpStarttime, '" name="wpStarttime') ;
  (wpEdittime, '" name="wpEdittime') ;
  (wpScrolltop, '" name="wpScrolltop') ;
  (wpAutoSummary, '" name="wpAutoSummary') ;
  (oldid, '" name="oldid') ;
  (wpEditToken, '" name="wpEditToken') ;
  := 0;
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpSection"#000D#000A#000D#000A');
  (wpSection); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpStarttime"#000D#000A#000D#000A');
  (wpStarttime); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpEdittime"#000D#000A#000D#000A');
  (wpEdittime); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpScrolltop"#000D#000A#000D#000A');
  (wpScrolltop); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpAutoSummary"#000D#000A#000D#000A');
  (wpAutoSummary); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="oldid"#000D#000A#000D#000A');
  (oldid); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpTextbox1"#000D#000A#000D#000A');
  ("_."); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpSummary"#000D#000A#000D#000A');
  ("#98D0#81D1#82D1#BED0#87D1#BDD0#B8D0#BAD0#203A", 18); (); (); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpSave"#000D#000A#000D#000A');
  (" ", 34); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000AContent-Disposition: form-data; name="wpEditToken"#000D#000A#000D#000A');
  (wpEditToken); ("#000D#000A");
  ('------------0evg4uAg4uXr6Oru6SDw8/Hx6u7pIO3g9ujoISEh#000D#000A');
  ("traditio.ru", , ^, , "_.");
  := .("_.");
  := .("_.");
  .(" .^");
;

URL(+: );

  : ;
  : .;
  : ;
  : ;

  (, ());
  .(, ^);
  (, ()*3);
  := 0 ()-1
    .16([], 2, );
    [*3] := "%";
    [*3+1] := [0];
    [*3+2] := [1]
  ;
  (^, )
URL;

(): ;

  , , : ;
  : .;
  : .;
  : .;
  : 4 ;
  : ;

  := ('name="wpTextbox1">', "_.", 0);
  = -1 ;
  := ('</textarea>', "_.", );
  = -1 ;
  (, 18);
  := .("_.");
  := .("_.");
  .(, );
  [0] := 26H; [1] := 6CH; [2] := 74H; [3] := 3BH;
  := 3CH;
  := 0;
  .() <
    .(, , 1);
    > 0
      .(, ) = []
        = ()-1
          .(, , 1);
          := 0
       
          ()
       
     
        := 0 -1 .(, [], 1) ;
        .(, , 1);
        := 0
     
   
      .(, ) = [0] ()
        .(, , 1)
     
   
  ;
  .();
  .();
  := .("_.");
 
;


  .(" .^^");
  := .("Wininet");
  := .(, "InternetOpenW");
  := .(, "InternetOpenUrlW");
  := .(, "InternetReadFile");
  := .(, "InternetCloseHandle");
  := .(, "InternetConnectW");
  := .(, "HttpOpenRequestW");
  := .(, "HttpAddRequestHeadersW");
  := .(, "HttpSendRequestW");
  := .(, "HttpQueryInfoW");
  := .(".");
  .(, );
  .()
    (, );
    .(, );
    .(' "'); .(); .('". ...');
    URL();
    ("http://ru.wikipedia.org/wiki/", ); .(, );
    ("http://ru.wikipedia.org/w/index.php?title=", );
    .(, ); .(, "&action=edit");
    (, "_.");
    ;
    () := .("_."); .(" !^")
      (, 1000H+.("_."));
      ()
        := .("_."); := .("_."); .(" !^")
      ;
      :=
   
  ;
  .();
  .();
  .("^ .^^ ,^ ^ .^");
  .(-1)

.
    .