From 7512a8eb3c1b8c4d5b2bea8c48ab7db63f068d87 Mon Sep 17 00:00:00 2001 From: hellerve Date: Sat, 20 May 2017 11:04:42 -0400 Subject: [PATCH] use at least an offset of 5 --- shinu.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/shinu.lisp b/shinu.lisp index 828e91d..82d368a 100755 --- 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