From 1d1d2e25547c7240a2d13ad7a55ba522539fec95 Mon Sep 17 00:00:00 2001
From: Vince Weaver <vince@deater.net>
Date: Mon, 14 Jan 2019 00:34:45 -0500
Subject: [PATCH] ootw: can change direction

---
 ootw/ootw.s           | 35 ++++++++++++++++++++++++++++++++---
 ootw/ootw_sprites.inc |  4 ++--
 ootw/zp.inc           |  8 +++-----
 3 files changed, 37 insertions(+), 10 deletions(-)

diff --git a/ootw/ootw.s b/ootw/ootw.s
index a58d0b19..fbd30243 100644
--- a/ootw/ootw.s
+++ b/ootw/ootw.s
@@ -61,6 +61,9 @@ title_screen:
 	lda	#20
 	sta	ADV_X
 
+	lda	#1
+	sta	DIRECTION
+
 game_loop:
 
 	; check keyboard
@@ -73,14 +76,24 @@ game_loop:
 
 	; draw adventurer
 
-	lda	#>stand_right
+	lda	DIRECTION
+	beq	stand_left
+
+stand_right:
+	lda	#>adv_stand_right
 	sta	INH
-	lda	#<stand_right
+	lda	#<adv_stand_right
+	sta	INL
+	jmp	done_walking
+
+stand_left:
+	lda	#>adv_stand_left
+	sta	INH
+	lda	#<adv_stand_left
 	sta	INL
 
 done_walking:
 
-
         lda     ADV_X
         sta     XPOS
         lda     ADV_Y
@@ -136,18 +149,34 @@ check_left:
 	cmp	#$8		; left arrow
 	bne	check_right
 left:
+	lda	DIRECTION
+	bne	face_left
+
 	dec	ADV_X
 	jmp	done_keypress
 
+face_left:
+	lda	#0
+	sta	DIRECTION
+	jmp	done_keypress
+
 check_right:
 	cmp	#'D'
 	beq	right
 	cmp	#$15
 	bne	unknown
 right:
+	lda	DIRECTION
+	beq	face_right
+
 	inc	ADV_X
 	jmp	done_keypress
 
+face_right:
+	lda	#1
+	sta	DIRECTION
+	jmp	done_keypress
+
 unknown:
 done_keypress:
 	bit	KEYRESET	; clear the keyboard strobe		; 4
diff --git a/ootw/ootw_sprites.inc b/ootw/ootw_sprites.inc
index 46285555..b9f5f09e 100644
--- a/ootw/ootw_sprites.inc
+++ b/ootw/ootw_sprites.inc
@@ -1,4 +1,4 @@
-stand_right:
+adv_stand_right:
 	.byte $4,$8
 	.byte $aa,$9a,$9a,$aa
 	.byte $aa,$99,$bb,$aa
@@ -9,7 +9,7 @@ stand_right:
 	.byte $aa,$44,$aa,$aa
 	.byte $aa,$f4,$fa,$aa
 
-stand_left:
+adv_stand_left:
 	.byte $4,$8
 	.byte $aa,$9a,$9a,$aa
 	.byte $aa,$bb,$99,$aa
diff --git a/ootw/zp.inc b/ootw/zp.inc
index 1ddc942b..2958c88f 100644
--- a/ootw/zp.inc
+++ b/ootw/zp.inc
@@ -147,14 +147,12 @@ DISP_PAGE	= $ED
 DRAW_PAGE	= $EE
 OFFSET         = $EF
 
-				;FIRST		=	$F0
-
-ADV_X		=	$F1
-ADV_Y		=	$F2
-
+ADV_X		=	$F0
+ADV_Y		=	$F1
 SPRITETEMP	=	$F2
 XPOS		=	$F3
 YPOS		=	$F4
+DIRECTION	=	$F5
 TEMP		=	$FA
 TEMPY		=	$FB
 INL		=	$FC