From 20af7436bb2cfed3ee27b1bb761e031d35905b3c Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Fri, 10 Oct 2014 16:08:01 -0400
Subject: don't place an apple on the snake body

---
 main.s | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/main.s b/main.s
index 8d908fa..705a9f1 100644
--- a/main.s
+++ b/main.s
@@ -540,6 +540,14 @@ new_apple: ; {{{
   CLC
   ADC #$3D
   STA apple.y
+
+  LDA apple.x
+  STA body_test_x
+  LDA apple.y
+  STA body_test_y
+  JSR test_body_collision
+  CMP #$01
+  BEQ new_apple
   RTS ; }}}
 draw_sprite_at_head: ; {{{
   LDA #$20
-- 
cgit v1.2.3-54-g00ecf