From 0f8e9963ed8219df36c266d1d9a34df2e101bdb8 Mon Sep 17 00:00:00 2001
From: Vince Weaver <vince@deater.net>
Date: Wed, 23 Mar 2022 21:49:58 -0400
Subject: [PATCH] lemm: support speeding up release

---
 games/lemm/init_level.s      | 4 ++++
 games/lemm/keyboard.s        | 9 ++++++++-
 games/lemm/release_lemming.s | 1 +
 3 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/games/lemm/init_level.s b/games/lemm/init_level.s
index 7b3a4ea3..31ba8e4f 100644
--- a/games/lemm/init_level.s
+++ b/games/lemm/init_level.s
@@ -2,6 +2,10 @@
 	; reset level vars
 	;====================
 init_level:
+
+	lda	#$f			; default release speed
+	sta	release_lemming_speed+1
+
 	lda	#0
 	sta	LEVEL_OVER
 	sta	DOOR_OPEN
diff --git a/games/lemm/keyboard.s b/games/lemm/keyboard.s
index 451c086b..95b23fa9 100644
--- a/games/lemm/keyboard.s
+++ b/games/lemm/keyboard.s
@@ -306,7 +306,14 @@ job_button:
 	;============================
 	;============================
 plus_minus_buttons:
-	; TODO
+
+	lda	release_lemming_speed+1
+	cmp	#1
+	beq	done_plus_adjust
+
+	lsr	release_lemming_speed+1	; make release faster
+
+done_plus_adjust:
 	jmp	done_menu
 
 	;============================
diff --git a/games/lemm/release_lemming.s b/games/lemm/release_lemming.s
index efca32d1..c42ec2a1 100644
--- a/games/lemm/release_lemming.s
+++ b/games/lemm/release_lemming.s
@@ -30,6 +30,7 @@ release_lemming:
 
 	; only release every X frames
 	lda	FRAMEL
+release_lemming_speed:
 	and	#$f
 	bne	done_release_lemmings