anchor.diff:                  lastTouchY <- touchY
   
               | MotionEventActions.Up ->
  -                inputEvents.Add (KeyReleased ('w'))
  +                inputEvents.Enqueue (KeyReleased ('w'))
   
               | _ -> ()
   
  
positive.code: 
          this.Window.SetFlags (WindowManagerFlags.KeepScreenOn, WindowManagerFlags.KeepScreenOn)
  
          let glView = new GameView (this :> Context)
  
          let a = new Button (this)
          a.Text <- "YOOOPAC"
  
negative.code:                 | MotionEventActions.Move ->
                      let xrel = touchX - lastTouchX
                      let yrel = touchY - lastTouchY
                      inputEvents.Enqueue (MouseMoved (0, 0, int xrel, int yrel))
  
                  | _ -> ()
          )
  