From 2bd46a29e4bb0689cd123aa023dfac7a471e8fb6 Mon Sep 17 00:00:00 2001
From: Kistaro Windrider <kistaro@gmail.com>
Date: Sun, 18 Feb 2024 12:23:14 -0800
Subject: [PATCH] zonk bleeps

---
 vacation.p8 | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/vacation.p8 b/vacation.p8
index 9d8e93d..a663a2b 100644
--- a/vacation.p8
+++ b/vacation.p8
@@ -843,9 +843,11 @@ function zonk_mode:update()
    if not item then
     if (not self.file or #self.file == 0) self:next_file()
     self.playing_text=false
+    psound(8,8,2)
    else
     self.txt_frame:push(item)
     self.twt = wt*self.cmul
+    psound(8,0,4,self.txf>4)
    end
   end
  else
@@ -855,13 +857,16 @@ function zonk_mode:update()
    self.wtmr = nil
   end
   if self.twt <= 0 then
-   if (btnp(1)) self.confirmed=true
+   local justc=false
+   if (btnp(1) and not self.confirmed) self.confirmed,justc=true,true
    if not self.nextpage and self.confirmed and self.brth:matches(self.bwt, self.alwaysmatched) then
     self.nextpage = true
     self.txt_frame.go = true
     self.fpfrm = self.exf
     self.alwaysmatched=true
+    psound(8, justc and 16 or 18, 8, true)
    end
+   if (justc and not self.nextpage) psound(8,16,2)
   else
    self.twt -= 1
   end