use at least an offset of 5

2017-05-20 11:04:42 -04:00
parent c4da66c15c
commit 7512a8eb3c
1 changed files with 1 additions and 1 deletions
--- a/shinu.lisp
+++ b/shinu.lisp
@@ -31,7 +31,7 @@
      (let ((snk (snek*))
            (va (list 0 0))
            (vb (list 0 0))
-            (p1 (list (random 100) i))
+            (p1 (list (+ 5 (random 95)) i))
            (p2 (list (random (- *size* 100)) i)))

        (loop for k from 1 to itt do