some updates, sound library version 0.1.2

2026-04-23 14:09:07 +02:00
parent 65b98fd73c
commit a68db108b6
4 changed files with 14 additions and 5 deletions
@@ -567,9 +567,13 @@
             )
        (if (eq? volume-display 'block)
            (send volume-meter display 'none)
-            (send volume-meter display 'block))
-        (send el-vol-perc set-innerHTML!
-              (sprintf "%d%" (send player get-volume)))
+            (begin
+              (send volume-meter display 'block)
+              (send el-volume set!
+                    (sqrt (send player get-volume)))
+              (send el-vol-perc set-innerHTML!
+                    (sprintf "%d%" (send player get-volume))))
+            )
        )
      )