anchor.diff:  //                                |> Observable.subscribe (fun _ -> (*printfn "Usual Detect by timer";*) sensor.Detect())
       exit.WaitOne() |> ignore
       0
  +
  
positive.code: let minMass = 5
  let deepPink = (255, 20, 147)
  
  let mutable turnH = 0
  
  let angleRotate x = (Trik.Helpers.limit (-maxAngle) maxAngle x) / 10
  
  let changePos del = 
      match del with  
          | x when x > 10 && x < 90 && turnH < 90 -> turnH <- turnH + angleRotate x 
          | x when x < - 10 && x > -90 && turnH > -90 -> turnH <- turnH + angleRotate x  
          | _ -> ()
  
  let conversion (x : DetectTarget) = 
      let (r, g, b) = HSVtoRGB(float x.Hue, (float x.Saturation) / 100.0, (float x.Value) / 100.0)
  
negative.code: 
      use ledstripeDisposable = colorStream.Subscribe model.LedStripe
  
      let powerSetterDisposable = 
               model.ObjectSensor.ToObservable()  
               |> Observable.choose (fun o -> o.TryGetLocation)
               |> Observable.filter (fun l -> l.Mass > 5) 
               |> Observable.scan (fun acc l -> updatePosition l.X acc) 0
               |> Observable.subscribe (fun x -> model.Servo.["E1"].SetPower -x)
  
      use downButtonDispose = buttons.ToObservable() 
                              |> Observable.filter (fun x -> ButtonEventCode.Down = x.Button) 
  