keen: activate yorps

2024-04-06 00:22:29 -04:00 · 2024-04-06 00:22:29 -04:00 · 5dbbd383ff
parent 4e64d7e9b9
commit 5dbbd383ff
3 changed files with 28 additions and 2 deletions
--- a/games/keen/draw_tilemap.s
+++ b/games/keen/draw_tilemap.s
@ -159,4 +159,30 @@ cptl3_smc:
 	cmp	#TILEMAP_Y_COPY_SIZE
 	bne	cp_tilemap_outer_loop

+done_tilemap_subset:
+
+	; activate yorps
+
+	ldx	#0
+
+	clc
+	lda	TILEMAP_X
+	adc	#22
+	sta	INL
+activate_yorp_loop:
+
+	; if TILEMAP_X+22>YORP_X
+
+	lda	INL
+	cmp	enemy_data_tilex,X
+	bcc	next_yorp
+
+	lda	#1
+	sta	enemy_data_out,X
+
+next_yorp:
+	inx
+	cpx	#NUM_ENEMIES
+	bne	activate_yorp_loop
+
 	rts
--- a/games/keen/level1.s
+++ b/games/keen/level1.s
@ -232,7 +232,7 @@ level_end_animation:
 skip_end_sound:


-	lda	#100
+	lda	#50
 	jsr	WAIT

 	dec	YPOS
--- a/games/keen/level1_enemies.s
+++ b/games/keen/level1_enemies.s
@ -1,4 +1,4 @@
-NUM_ENEMIES = 4
+NUM_ENEMIES = 8


 	;=======================