seriously fix music player in title screen (#3358)

This commit is contained in:
ManDude
2024-02-02 12:24:57 +00:00
committed by GitHub
parent b1b5cbb143
commit bc32e635ee
3 changed files with 11 additions and 2 deletions
+7 -1
View File
@@ -661,7 +661,13 @@
(when (or (zero? unlock-func)
(not unlock-func)
(unlock-func))
(logior! (-> obj cheats-unlocked) (-> cheat flag)))))))
(logior! (-> obj cheats-unlocked) (-> cheat flag)))))
(case (-> cheat can-toggle)
((#f)
(when (logtest? (-> obj cheats-unlocked) (-> cheat flag))
(logior! (-> obj cheats) (-> cheat flag)))
)
)))
0)
@@ -1623,7 +1623,7 @@
(defmethod draw-option ((this menu-unlocked-menu-option) (arg0 progress) (arg1 font-context) (arg2 int) (arg3 symbol))
(let ((secrets (memcard-unlocked-secrets? #t))
(cheats (-> *pc-settings* cheats-unlocked))
(cheats (-> *pc-settings* cheats))
(alpha (* 2.0 (- 0.5 (-> arg0 menu-transition))))
)
(if (< alpha 0.0)
+3
View File
@@ -342,6 +342,9 @@
(set! (-> *progress-state-pc* music-player-selected) #f)
(set! (-> (the-as menu-music-player-option (-> *music-player-options* options 0)) excitement) 0)
(set! (-> obj current-options) *music-player-options*)
(when (aif (level-get *level* 'title) (= (-> it status) 'active))
(remove-setting *setting-control* (handle->process (-> *game-info* controller 0)) 'music-volume)
)
)
(('resolutions)
(set! (-> (the-as menu-resolution-option (-> *resolutions-options* options 0)) selected-index) -1)