Browse Source

BIGGER MAPS.

Ryan Rix 2 years ago
parent
commit
09da6a2bfe
1 changed files with 6 additions and 3 deletions
  1. 6 3
      src/rl/core.clj

+ 6 - 3
src/rl/core.clj

@@ -5,13 +5,16 @@
 (defn add-room [level]
   (tl/with-room
     level
-    (+ 3 (rand-int 2))
-    (+ 3 (rand-int 2))))
+    (+ 5 (rand-int 10))
+    (+ 5 (rand-int 10))))
 
 (defn -main
   "I don't do a whole lot ... yet."
   [& args]
-  (tl/print-level (-> (tl/level-struct 10 10)
+  (tl/print-level (-> (tl/level-struct 60 60)
+                      add-room
+                      add-room
+                      add-room
                       add-room
                       add-room
                       add-room)))