diff --git a/src/dhgr.tk/gg/sean.pla b/src/dhgr.tk/gg/sean.pla index 12f0351d..109cf4ef 100644 --- a/src/dhgr.tk/gg/sean.pla +++ b/src/dhgr.tk/gg/sean.pla @@ -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