帶反應香蕉和SDL的完全點擊/ KeyPress事件

Question

據我所知，一個完整的點擊事件是一個按鈕，並且沒有鼠標移動。 SDL僅向我提供Button Up和Down事件。

請問reactive-banana有什麼方法可以表達「關鍵然後鍵入」？順便說一句，如果我想要一個事件說「鍵仍然關閉」，我必須啓用SDL的enableKeyRepeat，以便再次觸發keyDown事件。如何在FRP中正確表達？

Answer 1

我想嘗試這樣的事：

定義了效用函數（未經測試）：

successive :: (a -> a -> Maybe b) -> Event t a -> Event t b 
successive f e = filterJust (b <@> e) 
    where b = stepper (const Nothing) (f <$> e) 

，然後使用類似

successive (\previous current -> if previous == buttonDown && current == buttonUp 
            then Just() 
            else Nothing) 
      buttonEvents 

（僞代碼，因爲我不熟悉SDL）。

這應該起作用，因爲在事件發生後行爲會部分地更新。