4 ms·
Sorry for bad formatting and not compile checking the code, but this is an improvement imo: checkCurTile b = do case b of Chip -> liftIO $ pla
by codygman 12y ago
Sorry for bad formatting and not compile checking the code, but this is an improvement imo:
checkCurTile b = do
case b of
Chip -> liftIO $ playSound (soundDir ++ "collect_chip.wav") False
Gate -> liftIO $ playSound (soundDir ++ "door.wav") False
(KeyYellow _) -> yellowKeyCount += 1
(KeyBlue _) -> blueKeyCount += 1
tileAt Current .= (Empty def)