mirror of
https://github.com/dschmenk/PLASMA.git
synced 2026-04-27 03:18:02 +00:00
Fix case of 'V' flag
This commit is contained in:
1 parent
b69be5e492
commit
7a6af7f897
3 files changed
+9
-3
No files matched your search
@@ -459,20 +459,24 @@ def atoi(strptr)#1
|
||||
return num * sign
|
||||
end
|
||||
|
||||
def randomize#0
|
||||
conio:rnd()
|
||||
end
|
||||
|
||||
arg = argNext(argFirst)
|
||||
if ^arg and ^(arg + 1) == 'V'
|
||||
if ^arg and toupper(^(arg + 1)) == 'V'
|
||||
viewFlag = FALSE
|
||||
arg = argNext(arg)
|
||||
fin
|
||||
if ^arg
|
||||
*rndnum = atoi(arg)
|
||||
seed = atoi(arg)
|
||||
else
|
||||
conio:textmode(40)
|
||||
hgrMode(hgrPage1)
|
||||
lz4Read("MAZE.SPLASH.LZ4", $2000, $4000, heapmark, heapmark + heapavail - 256)
|
||||
seq = musicRead("MAZE.SEQ")
|
||||
musicPlay(seq, FALSE)
|
||||
musicGetKey(0, NULL)
|
||||
musicGetKey(8, @randomize)
|
||||
heaprelease(seq)
|
||||
hgrMode(hgrOff)
|
||||
conio:gotoxy(1, 1)
|
||||
@@ -495,6 +499,7 @@ else
|
||||
conio:rnd()
|
||||
loop
|
||||
if toupper(getc) == 'Q'; conio:textmode(0); return; fin
|
||||
seed = *rndnum
|
||||
fin
|
||||
ref = fileio:open("MAZE.PCM")
|
||||
pcmlen = fileio:read(ref, heapmark, heapavail)
|
||||
@@ -506,6 +511,7 @@ conio:viewport(0, 20, 40, 4)
|
||||
hgrMode(hgrPage1)
|
||||
hgrDrawBuf(hgrPage1)
|
||||
tileDrawBuf(hgrPage1)
|
||||
*rndnum = seed
|
||||
repeat
|
||||
seed = *rndnum
|
||||
moveCnt = 0
|
||||
|
||||
Reference in new issue
Block a user