simple fix for credits overflow

This commit is contained in:
2024-10-20 18:40:14 -05:00
parent fc296cb27c
commit 9802fbd2aa

View File

@@ -1106,6 +1106,14 @@
(+= textY threeColSize creditMargin))
(otherwise)))
// Squish overflowing texts inward:
(doFor text creditsText
(when (< text.x 0)
(text.setGraphicSize (- text.width (- text.x)))
(set text.x 0))
(when (> (+ text.x text.width) FlxG.width)
(text.setGraphicSize (- text.width (- (+ text.x text.width) FlxG.width)))))
(let [pixelsToScroll
(+ textY .height (last creditsText))
idealTimeLimit