Implement level to gravity delay
This commit is contained in:
parent
34d82d9451
commit
f2327fc3c5
1 changed files with 1 additions and 1 deletions
|
@ -48,7 +48,7 @@ playGame lvl = do
|
|||
customMain (V.mkVty V.defaultConfig) (Just chan) app initialGame
|
||||
|
||||
levelToDelay :: Int -> Int
|
||||
levelToDelay n = 1000000 -- floor $ fromIntegral $ 72500 * 0.85 ^ n + n
|
||||
levelToDelay n = floor $ 400000 * 0.85 ^ (2 * n) -- n + (fromIntegral n)
|
||||
|
||||
-- Handling events
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue