From c8df7084f4cffcb7db348b288f734c2be0645bbc Mon Sep 17 00:00:00 2001
From: tildearrow <me@tildearrow.org>
Date: Thu, 20 Apr 2023 04:16:56 -0500
Subject: [PATCH] VGM export: write Hz when appropriate

---
 src/engine/vgmOps.cpp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/engine/vgmOps.cpp b/src/engine/vgmOps.cpp
index 01833d26f..1960b9a3b 100644
--- a/src/engine/vgmOps.cpp
+++ b/src/engine/vgmOps.cpp
@@ -1068,6 +1068,7 @@ SafeWriter* DivEngine::saveVGM(bool* sysToExport, bool loop, int version, bool p
 
   bool trailing=false;
   bool beenOneLoopAlready=false;
+  bool mayWriteRate=(fmod(curSubSong->hz,1.0)<0.00001 || fmod(curSubSong->hz,1.0)>0.99999);
   int countDown=MAX(0,trailingTicks)+1;
 
   for (int i=0; i<DIV_MAX_CHANS; i++) {
@@ -2359,6 +2360,9 @@ SafeWriter* DivEngine::saveVGM(bool* sysToExport, bool loop, int version, bool p
     w->writeI(0);
     w->writeI(0);
   }
+  if (mayWriteRate) {
+    w->writeI(round(curSubSong->hz));
+  }
   w->seek(0x34,SEEK_SET);
   w->writeI(songOff-0x34);
   if (version>=0x170) {