From cd901c11b80939f352ac67847ae5dfc6fdab6baf Mon Sep 17 00:00:00 2001
From: Vince Weaver <vince@deater.net>
Date: Tue, 29 Sep 2020 15:22:40 -0400
Subject: [PATCH] monkey: better bar door entry

---
 monkey/hello.bas    | 2 +-
 monkey/monkey_bar.s | 6 ++++++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/monkey/hello.bas b/monkey/hello.bas
index d4b25fbf..9ea91b0a 100644
--- a/monkey/hello.bas
+++ b/monkey/hello.bas
@@ -1,5 +1,5 @@
 5 HOME
-10 PRINT "LOADING MONKEY V0.02"
+10 PRINT "LOADING MONKEY V0.03"
 20 PRINT:PRINT
 40 PRINT "CONTROLS: "
 42 PRINT "     MOVE CURSOR    : ARROWS OR WASD"
diff --git a/monkey/monkey_bar.s b/monkey/monkey_bar.s
index 959a089b..1d0f3eeb 100644
--- a/monkey/monkey_bar.s
+++ b/monkey/monkey_bar.s
@@ -127,6 +127,12 @@ bar_adjust_destination:
 	cmp	#14
 	bcs	bar_adjust_force_y
 
+	lda	CURSOR_X
+	cmp	#9
+	bcc	done_br_adjust
+	cmp	#14
+	bcs	done_br_adjust
+
 	lda	CURSOR_Y
 	cmp	#28
 	bcs	done_br_adjust