about summary refs log tree commit diff
diff options
context:
space:
mode:
authorsternenseemann <git@lukasepple.de>2019-05-20 13:33:55 +0200
committersternenseemann <git@lukasepple.de>2019-05-20 13:33:55 +0200
commit0769eebe9fe09dfdf3924b3e8b3573d0afa975c6 (patch)
treefac834aa4c166c195079ba3b0a2dbb7b75b525bf
parentfa4c2aaaeeef1042b6ea7f602d5be17110187817 (diff)
add an asteroid/moon orbiting the starting planet
-rw-r--r--src/Main.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 042b7bc..17d1be5 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -100,6 +100,7 @@ updateWorld timeStep (State ctrl g world) = State ctrl
 initialWorld :: Fractional a => State a GlossState
 initialWorld = State (ControlState Map.empty) (GlossState (800, 800) (0, 0) True)
   [ Dynamic shipHitbox 0 10000 (V2 200 0) (V2 0 0) (V2 0 0) LocalMod
+  , Dynamic (centeredCircle 10) 0 5000 (V2 0 200) (V2 15 0) (V2 0 0) NoMod
   , Static (centeredCircle 80) 0 moonMass (V2 0 0)
 --  , Static (centeredCircle 40) 0 (0.5 * moonMass) (V2 250 120)
   ]