anchor.diff:  result = httpWebStreamReader.ReadToEnd();
   }
   
  -bool loginSuccessful = false;
  -if (!(result.Equals(\"fail\")))
  -{
  -loginSuccessful = true;\n}" + (triggers.Item((fileName, "onLoginResponse")) :?> string) + "\n}"
  +bool serverResponseSuccess = false;
  +bool serverResponseFail = true;
  +if (result.Equals(\"fail\"))
  +{
  +serverResponseSuccess = false;
  +serverResponseFail = true;
  +}
  +else
  +{
  +serverResponseSuccess = true;
  +serverResponseFail = false;\n}" + (triggers.Item((fileName, "onLoginResponse")) :?> string) + "\n}"
   
                       if triggers.Contains((fileName, "onPatientsResponse")) then
                           appendAdditions <| "\nprivate string patients;"
  
positive.code:                     if triggers.Contains((fileName, "onLoginResponse")) then
                          appendAdditions <| "\nprivate string seesionId;"
                          appendAdditions <| loginRequest.ToString()
                          appendAdditions <| "\nprivate void GetResponsetStreamCallback(IAsyncResult callbackResult)
  {
  HttpWebRequest request = (HttpWebRequest)callbackResult.AsyncState;
  
negative.code:                 appendXaml <| "\n" + depthTab + "<TextBox x:Name=\"" + reader.GetAttribute("id") + "\" IsReadOnly=\"False\" MinWidth=\"250\" HorizontalAlignment=\"Center\" FontSize=\"" + textSize + "\"/>"
              | "Button" -> 
                  let name = reader.GetAttribute("id")
                  let textSize = getNumber(reader.GetAttribute("textSize"))
                  if actions.Contains(name) then
                      let click = name + "Click"
                      appendXaml <| "\n" + depthTab + "<Button Name=\"" + name + "\" HorizontalAlignment=\"Center\" Click=\"" + click + "\" FontSize=\"" + textSize + "\" Content=\"" + reader.GetAttribute("text") + "\"> </Button>"
                      appendAdditions <| "\nprivate void " + click + "(object sender, RoutedEventArgs e)\n{"
                      appendAdditions <| (actions.Item(name) :?> string)
                      appendAdditions <| "\n}"
                  else 
                      appendXaml <| "\n" + depthTab + "<Button Name=\"" + name + "\" HorizontalAlignment=\"Center\" FontSize=\"" + textSize + "\" Content=\"" + reader.GetAttribute("text") + "\"> </Button>"
              | "ImageView" -> 
                  let url = reader.GetAttribute("src") 
                  let fileName = "image" + string imageCounter + url.Substring(url.Length - 4, 4)
  