anchor.diff:              | "else" when reader.NodeType = XmlNodeType.EndElement -> builderAppend <| "\n}"
               | "transition" -> builderAppend <| "\nDispatcher.BeginInvoke(new Action( () => NavigationService.Navigate(new Uri(\"/" + (tryGetAttribute name "form-id") + ".xaml\", UriKind.Relative))));"
               | "login-request" -> 
  -                builderAppend <| ("\nHttpWebRequest myRequest = (HttpWebRequest)HttpWebRequest.Create(\"" + (tryGetAttribute name "url") + "\");
  -myRequest.Method = \"POST\";
  -myRequest.ContentType = \"application/x-www-form-urlencoded\";
  +                builderAppend <| ("\nHttpWebRequest loginRequest = (HttpWebRequest)HttpWebRequest.Create(\"" + (tryGetAttribute name "url") + "\");
  +loginRequest.Method = \"POST\";
  +loginRequest.ContentType = \"application/x-www-form-urlencoded\";
   login = " + tryGetAttribute name "login-id" + ".Text;
   password = " + tryGetAttribute name "password-id" + ".Text;
  -myRequest.BeginGetRequestStream(new AsyncCallback(GetRequestStreamCallback), myRequest);")
  +loginRequest.BeginGetRequestStream(new AsyncCallback(LoginRequestStreamCallback), loginRequest);")
                   append currentAdditionsBuilder <| "\nprivate string login = \"\";
   private string password = \"\";
  -private void GetRequestStreamCallback(IAsyncResult callbackResult)
  -{
  -    HttpWebRequest myRequest = (HttpWebRequest)callbackResult.AsyncState;
  -    Stream postStream = myRequest.EndGetRequestStream(callbackResult);
  -
  -    string postData = \"login=\" + login + \"&password=\" + password;
  +private void LoginRequestStreamCallback(IAsyncResult callbackResult)
  +{
  +    HttpWebRequest loginRequest = (HttpWebRequest)callbackResult.AsyncState;
  +    Stream postStream = loginRequest.EndGetRequestStream(callbackResult);
  +
  +    string postData = \"login?login=\" + login + \"&password=\" + password;
       byte[] byteArray = Encoding.UTF8.GetBytes(postData);
   
       postStream.Write(byteArray, 0, byteArray.Length);
       postStream.Close();
    
  -    myRequest.BeginGetResponse(new AsyncCallback(GetResponsetStreamCallback), myRequest);
  +    loginRequest.BeginGetResponse(new AsyncCallback(LoginResponsetStreamCallback), loginRequest);
   }"
   
               | "save-session" -> 
                   append currentAdditionsBuilder <| "\nprivate string sessionId;"
                   builderAppend <| "\nint semicolonPos = result.IndexOf(';');
   sessionId = result.Substring(semicolonPos + 1, result.Length - semicolonPos - 1);"
  -            | "patients-request" -> builderAppend <| "\nWebClient data = new WebClient();
  -data.DownloadStringCompleted += new DownloadStringCompletedEventHandler(getResponse);
  -data.DownloadStringAsync(new Uri(\"" + (tryGetAttribute name "url") + "\"));"
  +            | "patients-request" -> 
  +                builderAppend <| "\nHttpWebRequest patientsRequest = (HttpWebRequest)HttpWebRequest.Create(\"" + (tryGetAttribute name "url") + "\");
  +patientsRequest.Method = \"POST\";
  +patientsRequest.ContentType = \"application/x-www-form-urlencoded\";
  +patientsRequest.BeginGetRequestStream(new AsyncCallback(PatientsRequestStreamCallback), patientsRequest);"
  +                append currentAdditionsBuilder <| "\nprivate void PatientsRequestStreamCallback(IAsyncResult callbackResult)
  +{
  +    HttpWebRequest patientsRequest = (HttpWebRequest)callbackResult.AsyncState;
  +    Stream postStream = patientsRequest.EndGetRequestStream(callbackResult);
  +
  +    string postData = \"coordinates\";
  +    byte[] byteArray = Encoding.UTF8.GetBytes(postData);
  +
  +    postStream.Write(byteArray, 0, byteArray.Length);
  +    postStream.Close();
  + 
  +    patientsRequest.BeginGetResponse(new AsyncCallback(PatientsResponsetStreamCallback), patientsRequest);
  +}"
               // разбор строки patients и выставление пациентов на карте
               | "showmap" ->
                   builderAppend <| "\nint count = 0;
  
positive.code: loginFailed = false;\n}" + (triggers.Item((fileName, "onLoginResponse")) :?> string) + "\n}"
  
                      if triggers.Contains((fileName, "onPatientsResponse")) then
                          appendAdditions <| "\nprivate string patients;"
                          appendAdditions <| "\nprivate void getResponse(object sender, DownloadStringCompletedEventArgs e)
  {
  patients = e.Result;" + (triggers.Item((fileName, "onPatientsResponse")) :?> string) + "\n}"
  
                      if triggers.Contains((fileName, "onShow")) then
                          appendConstructor <| (triggers.Item((fileName, "onShow")) :?> string)
  
              | "LinearLayout" when reader.NodeType <> XmlNodeType.EndElement -> 
  
negative.code:                     if triggers.Contains((fileName, "onLoginResponse")) then
                          if triggersAdditions.Contains((fileName, "onLoginResponse")) then
                              appendAdditions <| (triggersAdditions.Item((fileName, "onLoginResponse")) :?> string)
                          appendAdditions <| "\nprivate void LoginResponsetStreamCallback(IAsyncResult callbackResult)
  {
  HttpWebRequest request = (HttpWebRequest)callbackResult.AsyncState;
  HttpWebResponse response = (HttpWebResponse)request.EndGetResponse(callbackResult);
  