Fix command line seed bug loading PCM sound

This commit is contained in:
David Schmenk committed 2026-02-28 09:55:01 -08:00
1 parent 6d36cf7e45
commit b69be5e492
3 files changed
+5 -5

No files matched your search

+5 -5
View File
@@ -470,11 +470,6 @@ else
conio:textmode(40)
hgrMode(hgrPage1)
lz4Read("MAZE.SPLASH.LZ4", $2000, $4000, heapmark, heapmark + heapavail - 256)
ref = fileio:open("MAZE.PCM")
pcmlen = fileio:read(ref, heapmark, heapavail)
fileio:close(ref)
pcm = heapalloc(pcmlen)
pcmpage = pcmlen / 256
seq = musicRead("MAZE.SEQ")
musicPlay(seq, FALSE)
musicGetKey(0, NULL)
@@ -501,6 +496,11 @@ else
loop
if toupper(getc) == 'Q'; conio:textmode(0); return; fin
fin
ref = fileio:open("MAZE.PCM")
pcmlen = fileio:read(ref, heapmark, heapavail)
fileio:close(ref)
pcm = heapalloc(pcmlen)
pcmpage = pcmlen / 256
conio:textmode(40)
conio:viewport(0, 20, 40, 4)
hgrMode(hgrPage1)