game: add text language to debug menu (#1696)

This commit is contained in:
Hat Kid
2022-07-22 11:03:39 +02:00
committed by GitHub
parent ea304937f1
commit acd2ac20f4
@@ -4377,6 +4377,14 @@
)
)
(defun dm-text-language ((blang int) (msg debug-menu-msg))
(let ((lang (the pc-subtitle-lang (/ blang 8))))
(when (= msg (debug-menu-msg press))
(set! (-> *pc-settings* text-language) lang))
(= (-> *pc-settings* text-language) lang)
)
)
(defun dm-subtitle-setting ((setting symbol) (msg debug-menu-msg))
(when (= msg (debug-menu-msg press))
(set! (-> *pc-settings* subtitle-speaker?) setting))
@@ -4649,6 +4657,15 @@
(flag "spanish" 3 dm-subtitle-language)
(flag "uk-english" 6 dm-subtitle-language)
)
(menu "Text language"
(flag "english" 0 dm-text-language)
(flag "french" 1 dm-text-language)
(flag "german" 2 dm-text-language)
(flag "spanish" 3 dm-text-language)
(flag "italian" 4 dm-text-language)
(flag "japanese" 5 dm-text-language)
(flag "uk-english" 6 dm-text-language)
)
(flag "Discord RPC" #t ,(dm-lambda-boolean-flag (-> *pc-settings* discord-rpc?)))
(menu "PS2 settings"
;(flag "PS2 Load speed" #f ,(dm-lambda-boolean-flag (-> *pc-settings* ps2-read-speed?)))