1 files changed, 15 insertions(+), 11 deletions(-)

M src/main.tal

@@ 131,6 131,9 @@ BRK
 	[ #02 ] !~ ,&no-b JCN
 		;run JSR2 POP BRK
 		&no-b
+	[ #04 ] !~ ,&no-sel JCN
+		;start-game JSR2 POP BRK
+		&no-sel
 	#04 SFT
 	[ #04 ] !~ ,&no-left JCN
 		.table/selection LDZ #01 - #00 ;select JSR2 POP BRK 


@@ 318,7 321,7 @@ RTN
 		;draw-status JSR2
 		;dialogs/breaking ;draw-dialog JSR2
 		;play-breaking JSR2
-		POP RTN
+		RTN
 
 	&blocking ( value -- )
 		( durability ) .player/dp STZ


@@ 378,18 381,19 @@ RTN
 
 @flip-card ( table -- )
 
-	DUP .table + LDZ #36 = ,&skip JCN
-		#36 SWP .table + STZ
-		;draw-table JSR2
+	( already flipped )
+	DUP .table + LDZ #36 ! ,&continue JCN
+		#bb DEBUG
+		POP RTN
+		&continue
 
-		( TODO; End deck )
-	
-		( TODO: End room )
-		;count-table JSR2 #04 ! ,&no-room-complete JCN
-			#aa DEBUG
-			&no-room-complete
+	#36 SWP .table + STZ
+	;draw-table JSR2
 
-	&skip
+	( detect room end )
+	;count-table JSR2 #04 ! ,&no-room-complete JCN
+		#aa DEBUG
+		&no-room-complete
 
 RTN