Some bug and issue fixing

This commit is contained in:
David Schmenk committed 2026-07-14 16:22:35 -07:00
1 parent 2dd62b713a
commit b577dd7274
1 file changed
+33 -12
+33 -12
View File
@@ -159,9 +159,9 @@ const SFX_STEAL = 5
const SFX_SIGN = 6
byte sfxBump = 10, 12, 14, 16, 18, 20, 0
byte sfxPickup = 4, 5, 6, 7, 8, 9, 10, 0
byte sfxJackpot = 5, 10, 15, 20, 15, 10 // Run into score2 sfx
byte sfxScore2 = 5, 10, 15, 20, 15, 10 // Run into score sfx
byte sfxScore = 5, 10, 15, 5, 10, 15, 0
byte sfxJackpot = 7, 12, 17, 22, 7, 12, 17 // Run into score2 sfx
byte sfxScore2 = 6, 11, 16, 21, 6, 11, 16 // Run into score sfx
byte sfxScore = 5, 10, 15, 20, 5, 10, 15, 0
byte sfxSteal = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0
byte sfxSign = 10, 9, 8, 7, 6, 5, 0
var sfxList = @sfxBump, @sfxPickup, @sfxJackpot, @sfxScore2, @sfxScore, @sfxSteal, @sfxSign
@@ -203,10 +203,6 @@ struc t_leaders
var bestscore
end
char leaderBoard = 'W', 'O', 'Z'
var = 300
char = 'W', 'O', 'Z'
var = 275
char = 'W', 'O', 'Z'
var = 250
char = 'W', 'O', 'Z'
var = 240
@@ -219,9 +215,13 @@ var = 210
char = 'W', 'O', 'Z'
var = 200
char = 'W', 'O', 'Z'
var = 150
var = 190
char = 'W', 'O', 'Z'
var = 100
var = 180
char = 'W', 'O', 'Z'
var = 170
char = 'W', 'O', 'Z'
var = 160
char leaderFile = "LEADERBOARD"
//
// This fixes the Virtual ][ bug with outstanding Mockingboard interrupts
@@ -502,8 +502,6 @@ def drawLeaderBoard#0
dhgrClearBl7(0, 0, SCR_WIDTH7, SCR_HEIGHT)
dcgrColor(CLR_WHITE)
dcgrBoldStr(CLR_BLACK, 70-20, 10, "Top Scores")
dcgrPixMap(20, 20, SPRITE_WIDTH, SPRITE_HEIGHT, spriteList + (WOZ*4+HORDE_BASE)*SPRITE_SIZE)
dcgrPixMap(110, 20, SPRITE_WIDTH, SPRITE_HEIGHT, spriteList + (WOZ*4+HORDE_BASE)*SPRITE_SIZE)
leader = @leaderBoard
dcgrColor(CLR_WHITE)
for i = 1 to 10
@@ -1177,6 +1175,14 @@ def playGG#0
//
doEvents
loop
//
// Mkae sure Sean is sitting
//
dhgrMemBl7(SEAN_X*TILE_WIDTH7, SEAN_Y, TILE_WIDTH7, TILE_HEIGHT, tileList+(TILE_SEAN1-1)*TILE_SIZE, TILE_SPAN)
dhgrMemBl7((SEAN_X+1)*TILE_WIDTH7, SEAN_Y, TILE_WIDTH7, TILE_HEIGHT, tileList+(TILE_SEAN2-1)*TILE_SIZE, TILE_SPAN)
//
// Ending animation
//
if quit
drawMessage("Quitter!")
else
@@ -1331,8 +1337,23 @@ end
// Menu Interface
//
def scores#0
res[TILE_SIZE] wozTile
byte y, yDir
drawLeaderBoard
waitButtonKey
dhgrSurfMem(OP_SRC, TILE_HEIGHT, @wozTile, TILE_SPAN)
dcgrColor(CLR_DRKBLUE)
dhgrClearBl7(0, 0, TILE_WIDTH7, TILE_HEIGHT)
dcgrPixMap(0, 2, SPRITE_WIDTH, SPRITE_HEIGHT, spriteList + (HORDE_BASE + WOZ*4)*SPRITE_SIZE)
dhgrSurfScr(OP_SRC)
y = 20
yDir = 1
repeat
dhgrMemBl7(2 * TILE_WIDTH7, y, TILE_WIDTH7, TILE_HEIGHT, @wozTile, TILE_SPAN)
dhgrMemBl7(7 * TILE_WIDTH7, y, TILE_WIDTH7, TILE_HEIGHT, @wozTile, TILE_SPAN)
y = y + yDir
if y < 10 or y > 130; yDir = -yDir; fin
until getButtonKey
drawMenu
end
def info#0