copy SHR filename to a safe place before blanking

fixes https://github.com/a2-4am/4cade/issues/443
This commit is contained in:
4am 2021-12-19 21:00:18 -05:00
parent 4fa4a2f611
commit 5e1952573d

View File

@ -41,6 +41,8 @@ SHRSlideshow
; graphics mode reset to display hi-res screen, which is blank ; graphics mode reset to display hi-res screen, which is blank
;------------------------------------------------------------------------------ ;------------------------------------------------------------------------------
SHRSingle SHRSingle
jsr SetPath
+LDADDR gPathname
+ST16 IndexedSHRFilename +ST16 IndexedSHRFilename
lda MachineStatus ; only show SHR on IIgs or if we have a VidHD card lda MachineStatus ; only show SHR on IIgs or if we have a VidHD card
and #SUPPORTS_SHR and #SUPPORTS_SHR