aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoris Guyonvarch2015-03-05 00:49:33 +0100
committerJoris Guyonvarch2015-03-05 01:00:44 +0100
commit2fe50fd2ebb1815a330b20e599f756fa393de81b (patch)
tree34585f3badb89e6f2a558e49c37f8cddf9714cf4
parent4b1f05234aa2485ef1333dd38e0751dd6e9f765d (diff)
downloadcatchvoid-2fe50fd2ebb1815a330b20e599f756fa393de81b.tar.gz
catchvoid-2fe50fd2ebb1815a330b20e599f756fa393de81b.tar.bz2
catchvoid-2fe50fd2ebb1815a330b20e599f756fa393de81b.zip
Change game parameters
-rw-r--r--src/Cloud.elm2
-rw-r--r--src/Physics.elm2
-rw-r--r--src/Player.elm4
-rw-r--r--src/Point.elm2
4 files changed, 5 insertions, 5 deletions
diff --git a/src/Cloud.elm b/src/Cloud.elm
index 0916bf6..45a1dcb 100644
--- a/src/Cloud.elm
+++ b/src/Cloud.elm
@@ -15,7 +15,7 @@ type alias Cloud =
initCloud : Cloud
initCloud =
- let spawn = 100
+ let spawn = 600
in { points config =
case config of
White -> []
diff --git a/src/Physics.elm b/src/Physics.elm
index b59b3e1..2d2d627 100644
--- a/src/Physics.elm
+++ b/src/Physics.elm
@@ -23,7 +23,7 @@ getMove speed dir =
}
getAcc : Vec2 -> Vec2 -> Vec2
-getAcc move speed = (move `div` 800) `sub` (speed `div` 1000)
+getAcc move speed = (move `div` 300) `sub` (speed `div` 300)
getNewPos : Float -> Vec2 -> Vec2 -> Vec2 -> Vec2
getNewPos dt acc speed pos =
diff --git a/src/Player.elm b/src/Player.elm
index 2be7229..d1c10e0 100644
--- a/src/Player.elm
+++ b/src/Player.elm
@@ -10,7 +10,7 @@ type alias Player =
}
playerSize : Float
-playerSize = 10
+playerSize = 15
playerSpeed : Float -> Float
-playerSpeed dt = dt / 400
+playerSpeed dt = dt / 200
diff --git a/src/Point.elm b/src/Point.elm
index a27916c..e66a5f7 100644
--- a/src/Point.elm
+++ b/src/Point.elm
@@ -15,7 +15,7 @@ pointMove {initTime, initPos, initDest, move} time =
move initTime initPos initDest time
pointSize : Float
-pointSize = 5
+pointSize = 10
pointSpeed : Float -> Float
pointSpeed dt = dt / 20