diff options
| author | Joris | 2015-12-30 13:35:01 +0100 |
|---|---|---|
| committer | Joris | 2015-12-30 13:35:01 +0100 |
| commit | 2258ef984fefde41711d4c883baf582b7e581155 (patch) | |
| tree | a15cdae0c8a77a628ee49959037a1000687f3a2c /src/Model/Level.elm | |
| parent | 1cf6bc1ad9209e4f3f2fcbc129f2577e74e94c99 (diff) | |
Make the player bigger with each point
Diffstat (limited to 'src/Model/Level.elm')
| -rw-r--r-- | src/Model/Level.elm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/Model/Level.elm b/src/Model/Level.elm index 3fc4258..d058d53 100644 --- a/src/Model/Level.elm +++ b/src/Model/Level.elm @@ -1,7 +1,9 @@ module Model.Level ( currentLevel + , currentLevelScore , currentLevelNumber , progressiveColor + , levelScoreDuration ) where import Time exposing (Time) @@ -14,13 +16,17 @@ import Model.Point exposing (pointSpeed) import Utils.Physics exposing (getMove, getWaveMove) levelScoreDuration : Int -levelScoreDuration = 15 +levelScoreDuration = 20 type alias Level = { color : Color , move : Vec2 -> Vec2 -> Time -> Vec2 } +currentLevelScore : Int -> Int +currentLevelScore currentScore = + currentScore - (currentLevelNumber currentScore - 1) * levelScoreDuration + currentLevelNumber : Int -> Int currentLevelNumber currentScore = min |