Cách đơn giản để chờ và sau đó phát hiện các phím bấm trong Haskell là gì?

Question

Tôi khá mới với Haskell, vì vậy tôi đang tìm một cách đơn giản để phát hiện các phím bấm, thay vì sử dụng getLine.

Nếu có ai biết bất kỳ thư viện nào hoặc một số mẹo để thực hiện việc này, điều đó thật tuyệt vời!

Và nếu có một nơi tốt hơn để hỏi điều này, hãy hướng dẫn tôi ở đó, tôi sẽ đánh giá cao điều đó.

Answer 1

Nếu bạn không muốn chặn bạn có thể sử dụng hReady để phát hiện xem một chìa khóa đã được ép được nêu ra. Điều này rất hữu ích cho các trò chơi mà bạn muốn chương trình chạy và nhận một lần nhấn phím bất cứ khi nào nó xảy ra mà không tạm dừng trò chơi.

Dưới đây là một chức năng thuận tiện tôi sử dụng cho việc này:

ifReadyDo :: Handle -> IO a -> IO (Maybe a) 
ifReadyDo hnd x = hReady hnd >>= f 
    where f True = x >>= return . Just 
     f _ = return Nothing 

Mà có thể được sử dụng như thế này:

stdin `ifReadyDo` getChar 

Trả về một Maybe đó là Just nếu một phím được nhấn và Nothing khác.

Answer 2

import System.IO 

main :: IO() 
main = do 
    hSetBuffering stdin NoBuffering 
    x <- getChar 
    putStrLn ("You pressed: " ++ [x]) 

Tôi không biết khi nào điều này được đảm bảo hoạt động. Đặt thiết bị đầu cuối vào chế độ "thô" là quá trình phụ thuộc vào hệ thống. Nhưng nó hoạt động với tôi với GHC 6.12.1 trên Linux.

Answer 3

Bạn có thể sử dụng getChar thay vì getLine. Điều này có lẽ không phải là những gì bạn đang tìm kiếm, nhưng đó là cách đơn giản nhất.

pressKey :: IO() 
pressKey = do x <- getChar 
       return x 

Nhưng thậm chí còn có cách đơn giản hơn. Chỉ cần viết getchar:

pressKey :: IO() 
pressKey = getChar >> putStr "I am a String" 

pressKey = putStrLn "Hi" >> getChar >> putStrLn "Bye"