1
0
mirror of https://frontier.innolan.net/github/AmigaExamples.git synced 2026-01-13 06:08:55 +00:00

splash reload

This commit is contained in:
alpine9000
2016-05-26 14:25:29 +10:00
parent 3878f9dcde
commit 558c6188b6
3 changed files with 12 additions and 1 deletions

View File

@ -85,6 +85,7 @@ MainMenu:
bra InitialiseNewGame
Reset:
move.w #1,splashInvalid
move.w #0,stopScrollingPending
move.w #PANEL_LIVES_X,d0
lea livesCounterShortText,a1

View File

@ -19,6 +19,8 @@ MENU_BOTTOM_OFFSET equ (playBottomColor-playTopColor)
ShowMenu:
lea CUSTOM,a6
jsr ReloadSplashScreen
jsr WaitVerticalBlank
;; set up default palette
include "out/menu-palette.s"

View File

@ -1,16 +1,22 @@
include "includes.i"
xdef ShowSplash
xdef ReloadSplashScreen
xdef splash
xdef splashInvalid
SPLASH_COLOR_DEPTH equ 5
SPLASH_SCREEN_WIDTH_BYTES equ 40
ReloadSplashScreen:
cmp.w #0,splashInvalid
beq .skip
move.w #0,splashInvalid
move.l #endDiskSplash-diskSplash,d0
move.l #splash,a0
move.l #diskSplash,a1
jsr LoadDiskData
.skip:
rts
ShowSplash:
@ -79,6 +85,8 @@ splashCopperListBplPtr:
dc.w BPL6PTH,0
dc.l $fffffffe
splashInvalid:
dc.w 1
section .bss
splash: