anchor.diff:      let sensor = model.ObjectSensor
       let buttons = new ButtonPad()
   
  -    buttons.Start()
  -    sensor.Start()
  -
  -    Trik.Helpers.SendToShell """v4l2-ctl -d "/dev/video2" --set-ctrl white_balance_temperature_auto=1"""
  -    model.LedStripe.SetPower deepPink
  +    model.LedStripe.SetPower (75, 20, 20)
   
       let sensorOutput = sensor.ToObservable()
       
  
positive.code: 
      use timerSetterDisposable = Observable.Interval(System.TimeSpan.FromSeconds 40.0) 
                                  |> Observable.subscribe (fun _ -> sensor.Detect())
  
      exit.WaitOne() |> ignore
      0
  
negative.code: let maxAngleY = 60
  let scaleConstX = 10
  let scaleConstY = 20
  let RGBdepth = 100.
  let minMass = 5
  
  let red = (100, 0, 0)
  let green = (0, 100, 0)
  let blue = (0, 0, 100)
  let black = (0, 0, 0)
  let white = (100, 100, 100)
  let brown = (65, 17, 17)
  let orange = (100, 65, 0)
  let yellow = (100, 100, 0)
  let teal = (0, 50, 50)
  let purple = (63, 13, 94)
  let pink = (100, 75, 80)
  let colors = 
      [red; green; blue; (*white;*) (*black;*) brown; orange; yellow; teal; purple; pink]
  
  let scale var mA sC  = (Trik.Helpers.limit (-mA) mA var) / sC
  
  