anchor.diff:                  tempStack.Push(reader.GetAttribute("control-id"))
               | "action" when reader.NodeType = XmlNodeType.EndElement ->
                   // ключ - id контрола, значение - код, который нужно выполнить
  -                actions.Add(tempStack.Pop() :?> string, currentBuilder.ToString())
  +                let controlName = tempStack.Pop() :?> string
  +                actions.Add(controlName, currentBuilder.ToString())
                   currentBuilder.Clear() |> ignore
               | "trigger" when reader.NodeType <> XmlNodeType.EndElement ->
                   tempStack.Push(reader.GetAttribute("event"))
                   tempStack.Push(reader.GetAttribute("form-id"))
               | "trigger" when reader.NodeType = XmlNodeType.EndElement ->
                   // ключ - пара, в которой 1 элемент - имя формы, 2 элемент - событие, занчение - код, который нужно выполнить
  -                triggers.Add((tempStack.Pop() :?> string, tempStack.Pop() :?> string), currentBuilder.ToString())
  +                let formName = tempStack.Pop() :?> string
  +                triggers.Add((formName, tempStack.Pop() :?> string), currentBuilder.ToString())
                   currentBuilder.Clear() |> ignore
               | "if" when reader.NodeType <> XmlNodeType.EndElement -> builderAppend <| "\nif (" + reader.GetAttribute("condition") + ")"
               | "then" when reader.NodeType <> XmlNodeType.EndElement -> builderAppend <| "\n{"
  
positive.code:                 let name = getName(reader.GetAttribute("id"))
                  appendXaml <| "\n" + depthTab + "<phone:WebBrowser x:Name=\"" + name + "\" IsScriptEnabled=\"True\" Height=\"763\" Width=\"475\" />"
                  appendConstructor <| "\n" + name + ".Navigate(new Uri(\"" + reader.GetAttribute("url") + "\", UriKind.RelativeOrAbsolute));"
              | _ -> ()
  
          with | :? XmlException as e ->
  
negative.code:     xmlns:phone=\"clr-namespace:Microsoft.Phone.Controls;assembly=Microsoft.Phone\"
      xmlns:shell=\"clr-namespace:Microsoft.Phone.Shell;assembly=Microsoft.Phone\"
      xmlns:d=\"http://schemas.microsoft.com/expression/blend/2008\"
      xmlns:mc=\"http://schemas.openxmlformats.org/markup-compatibility/2006\"" + xmlns.ToString() + "
      mc:Ignorable=\"d\" d:DesignWidth=\"480\" d:DesignHeight=\"768\"
      FontFamily=\"{StaticResource PhoneFontFamilyNormal}\"
      FontSize=\"{StaticResource PhoneFontSizeNormal}\"
  