Win screen implemented, nuke disabled

SlithyMatt · SlithyMatt · commit 32ca5e2e6b5c · 2019-12-17T00:30:17.000-05:00
diff --git a/build_test.sh b/build_test.sh
@@ -7,3 +7,4 @@ cl65 --cpu 65C02 -o startscreen_browse.prg -l startscreen_browse.list startscree
 cl65 --cpu 65C02 -o joystick_test.prg -l joystick_test.list joystick_test.asm
 cl65 --cpu 65C02 -o fireball_test.prg -l fireball_test.list fireball_test.asm
 cl65 --cpu 65C02 -o bomb_test.prg -l bomb_test.list bomb_test.asm
+cl65 --cpu 65C02 -o ws_test.prg -l ws_test.list ws_test.asm
diff --git a/game.asm b/game.asm
@@ -13,6 +13,7 @@ GAME_INC = 1
 .include "skull.asm"
 .include "fireball.asm"
 .include "bomb.asm"
+.include "winscreen.asm"
 
 init_game:
    lda #0
@@ -43,7 +44,7 @@ game_tick:        ; called after every VSYNC detected (60 Hz)
    jsr skull_tick
    jsr fireball_tick
    jsr bomb_tick
-   ; TODO add other tick handlers
+   jsr winscreen_tick
 @return:
    rts
 
diff --git a/globals.asm b/globals.asm
@@ -2,7 +2,7 @@
 GLOBALS_INC = 1
 
 ; ---------- Build Options ----------
-NUKE_ENABLED   = 1
+NUKE_ENABLED   = 0
 
 ; ------------ Constants ------------
 
@@ -87,6 +87,7 @@ num_fireballs:    .byte 0
 regenerate_req:   .byte 0
 move_req:         .byte 0
 refresh_req:      .byte 0
+winscreen_req:    .byte 0
 move_x:           .byte 0
 move_y:           .byte 0
 start_prompt:     .byte 1
diff --git a/levels.asm b/levels.asm
@@ -2,10 +2,12 @@
 LEVELS_INC = 1
 
 .include "x16.inc"
+.include "tiles.inc"
 .include "globals.asm"
 .include "timer.asm"
 .include "skull.asm"
 .include "bomb.asm"
+.include "wallstub.asm"
 
 LEVEL_X  = 10
 LEVEL_Y  = 0
diff --git a/player.asm b/player.asm
@@ -911,8 +911,15 @@ next_level:
    rts
 @level_up:
    SUPERIMPOSE "complete!", 5, 9
+   lda level
+   cmp #48
+   beq @win
    SET_TIMER 30, @update_level
    jmp timer_done
+@win:
+   lda #1
+   sta winscreen_req
+   jmp timer_done
 @update_level:
    SUPERIMPOSE_RESTORE
    jsr clear_bars
diff --git a/sprites_tiles.ods b/sprites_tiles.ods
diff --git a/tilemap.txt b/tilemap.txt
@@ -145,19 +145,19 @@
 #
 # Start Screen: B800                                                                                 End Screen: B828
 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 ba00 bb00 bc00 bd00 be00 bf00 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 c000 c100 c200 c300 c400 c500 0000 0000 0000 0000 0000 0000 6000 6100 6200 6300 6400 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 c600 c700 c800 c900 ca00 cb00 0000 0000 6500 6600 0000 6700 6800 6900 6a00 6b00 6c00 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 cc00 cd00 ce00 cf00 d000 d100 0000 6d00 6e00 6f00 7000 7100 7200 7300 7400 7500 7600 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 0000 0000 0000 0000 0000 0000 0000 0000 7700 7800 7900 7a00 7b00 7c00 7d00 7e00 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 0000 0000 0000 0000 0000 7f00 8000 8100 8200 8300 8400 8500 8600 8700 8800 8900 8a00 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 0000 0000 0000 0000 0000 8b00 8c00 8d00 8e00 8f00 9000 9100 9200 9300 9400 9400 9600 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 1b00 1c00 1d00 1e00 0000 0000 0000 0000 9700 9800 9900 9a00 9b00 9c00 9d00 9e00 9f00 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
+0000 ba00 bb00 bc00 bd00 be00 bf00 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0400 0000 0000 0000 0400 0000 0000 0508 0100 050C 0000 0000 0400 0000 0000 0000 0400 0000 0000  0460 0000 0000 0000 0000 0000 0000 0000 0460 0000 0260 0760 026C 0000 0460 0000 0000 0000 0000 0460  0000 0558 055C 0000
+0000 c000 c100 c200 c300 c400 c500 0000 0000 0000 0000 0000 0000 6000 6100 6200 6300 6400 0000 0000  0000 0300 0000 0000 0000 0300 0000 0508 0504 0000 0500 050C 0000 0300 0000 0000 0000 0300 0000 0000  0360 0000 0000 0000 0000 0000 0000 0000 0360 0000 0000 0360 0000 0000 0360 0000 0000 0000 0000 0360  0000 0850 085C 0000
+0000 c600 c700 c800 c900 ca00 cb00 0000 0000 6500 6600 0000 6700 6800 6900 6a00 6b00 6c00 0000 0000  0000 0500 050C 0000 0508 0504 0000 0300 0000 0000 0000 0300 0000 0300 0000 0000 0000 0300 0000 0000  0360 0000 0000 0000 0000 0000 0000 0000 0360 0000 0000 0360 0000 0000 0860 056C 0000 0000 0000 0360  0000 0850 085C 0000
+0000 cc00 cd00 ce00 cf00 d000 d100 0000 6d00 6e00 6f00 7000 7100 7200 7300 7400 7500 7600 0000 0000  0000 0000 0300 0000 0300 0000 0000 0300 0000 0000 0000 0300 0000 0300 0000 0000 0000 0300 0000 0000  0560 056C 0000 0000 0460 0000 0000 0568 0564 0000 0000 0360 0000 0000 0360 0560 056C 0000 0000 0360  0000 0850 0554 0000
+0000 0000 0000 0000 0000 0000 0000 0000 0000 7700 7800 7900 7a00 7b00 7c00 7d00 7e00 0000 0000 0000  0000 0000 0500 0700 0504 0000 0000 0300 0000 0000 0000 0300 0000 0300 0000 0000 0000 0300 0000 0000  0000 0360 0000 0568 076C 056C 0000 0360 0000 0000 0000 0360 0000 0000 0360 0000 0560 056C 0000 0360  0000 0350 0000 0000
+0000 0000 0000 0000 0000 0000 7f00 8000 8100 8200 8300 8400 8500 8600 8700 8800 8900 8a00 0000 0000  0000 0000 0000 0300 0000 0000 0000 0300 0000 0000 0000 0300 0000 0300 0000 0000 0000 0300 0000 0000  0000 0360 0000 0360 0000 0360 0000 0360 0000 0000 0000 0360 0000 0000 0360 0000 0000 0560 056C 0360  0000 045C 0000 0000
+0000 0000 0000 0000 0000 0000 8b00 8c00 8d00 8e00 8f00 9000 9100 9200 9300 9400 9400 9600 0000 0000  0000 0000 0000 0300 0000 0000 0000 0500 050C 0000 0508 0504 0000 0500 050C 0000 0508 0504 0000 0000  0000 0560 0760 0564 0000 0560 0760 0564 0000 0000 0000 0360 0000 0000 0360 0000 0000 0000 0560 086C  0000 0000 0000 0000
+0000 1b00 1c00 1d00 1e00 0000 0000 0000 0000 9700 9800 9900 9a00 9b00 9c00 9d00 9e00 9f00 0000 0000  0000 0000 0000 040C 0000 0000 0000 0000 0500 0100 0504 0000 0000 0000 0500 0100 0504 0000 0000 0000  0000 0000 046C 0000 0000 0000 046C 0000 0000 0000 0260 076C 026C 0000 046C 0000 0000 0000 0000 046C  0000 9500 0000 0000
 0000 0000 0000 0000 0000 0000 0000 0000 a000 a100 a200 a300 a400 a500 a600 a700 a800 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 0000 0000 0000 0000 0000 a900 aa00 ab00 ac00 ad00 ae00 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 0000 0000 0000 0000 0000 af00 b000 b100 0000 b200 b300 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 b400 b500 b600 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
-0000 5b00 5c00 5d00 5e00 5f00 0000 0000 0000 0000 b700 b800 b900 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
+0000 0000 0000 0000 0000 0000 a900 aa00 ab00 ac00 ad00 ae00 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 ba00 bb00 bc00  bd00 be00 bf00 0000
+0000 0000 0000 0000 0000 0000 af00 b000 b100 0000 b200 b300 0000 0000 0000 0000 0000 0000 0000 0000  0000 1900 0000 1F00 0000 D300 0000 9500 0000 1A00 0000 D200 0000 2000 0000 1900 0000 1F00 0000 D300  0000 9500 0000 1A00 0000 D200 0000 2000 0000 1900 0000 1F00 0000 D300 0000 0000 0000 c000 c100 c200  c300 c400 c500 0000
+0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 b400 b500 b600 0000 0000 0000 0000 0000 0000 0000  0000 0000 1A00 0000 D200 0000 2000 0000 1900 0000 1F00 0000 D300 0000 9500 0000 1A00 0000 D200 0000  2000 0000 1900 0000 1F00 0000 D300 0000 9500 0000 1A00 0000 D200 0000 0000 1000 0000 c600 c700 c800  c900 ca00 cb00 0000
+0000 5b00 5c00 5d00 5e00 5f00 0000 0000 0000 0000 b700 b800 b900 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 cc00 cd00 ce00  cf00 d000 d100 0000
 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
 # Spare
 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000  0000 0000 0000 0000
diff --git a/winscreen.asm b/winscreen.asm
@@ -0,0 +1,80 @@
+.ifndef WINSCREEN_INC
+WINSCREEN_INC = 1
+
+.include "x16.inc"
+.include "globals.asm"
+.include "levels.asm"
+
+WS_MAX_SCROLL = 704
+
+__ws_scroll:  .word 320
+__ws_reqd:    .byte 0
+
+winscreen_tick:
+   lda winscreen_req
+   bne @start
+   jmp @return
+@start:
+   lda __ws_reqd
+   bne @check_scroll
+   inc __ws_reqd
+   lda #PLAYER_idx
+   jsr sprite_disable
+   jsr bomb_clear
+   jsr fruit_clear
+   stz VERA_ctrl
+   VERA_SET_ADDR VRAM_layer1, 1
+   lda #$61                      ; 4bpp tiles
+   sta VERA_data0
+   lda #$31                      ; 64x32 map of 16x16 tiles
+   sta VERA_data0
+   lda #((VRAM_STARTSCRN >> 2) & $FF)
+   sta VERA_data0
+   lda #((VRAM_STARTSCRN >> 10) & $FF)
+   sta VERA_data0
+   lda #((VRAM_TILES >> 2) & $FF)
+   sta VERA_data0
+   lda #((VRAM_TILES >> 10) & $FF)
+   sta VERA_data0
+   lda __ws_scroll               ; initial scroll position on screen
+   sta VERA_data0
+   lda __ws_scroll+1
+   sta VERA_data0
+   lda #0
+   sta VERA_data0
+   sta VERA_data0
+   lda #7                        ; blackout background
+   jsr set_bg_palette
+   jmp @return
+@check_scroll:
+   clc
+   lda __ws_scroll
+   adc #1
+   sta __ws_scroll
+   lda __ws_scroll+1
+   adc #0
+   sta __ws_scroll+1
+   lda __ws_scroll
+   cmp #<WS_MAX_SCROLL
+   bne @scroll
+   lda __ws_scroll+1
+   cmp #>WS_MAX_SCROLL
+   bne @scroll
+   stz winscreen_req
+   jmp @return
+@scroll:
+   stz VERA_ctrl
+   lda #<(VRAM_layer1+6)
+   sta VERA_addr_low
+   lda #>VRAM_layer1
+   sta VERA_addr_high
+   lda #(^VRAM_layer1 | $10)
+   sta VERA_addr_bank
+   lda __ws_scroll
+   sta VERA_data0
+   lda __ws_scroll+1
+   sta VERA_data0
+@return:
+   rts
+
+.endif
diff --git a/ws_test.asm b/ws_test.asm
@@ -0,0 +1,88 @@
+.include "x16.inc"
+
+.org $080D
+.segment "STARTUP"
+.segment "INIT"
+.segment "ONCE"
+.segment "CODE"
+   jmp start
+
+.include "filenames.asm"
+.include "loadvram.asm"
+.include "globals.asm"
+.include "timer.asm"
+.include "winscreen.asm"
+
+vsync_trig: .byte 0
+
+def_irq: .word $0000
+
+init_irq:
+   lda IRQVec
+   sta def_irq
+   lda IRQVec+1
+   sta def_irq+1
+   lda #<handle_irq
+   sta IRQVec
+   lda #>handle_irq
+   sta IRQVec+1
+   rts
+
+handle_irq:
+   ; check for VSYNC
+   lda VERA_irq
+   and #$01
+   beq @done_vsync
+   sta vsync_trig
+@done_vsync:
+   jmp (def_irq)
+
+
+start:
+
+   VERA_SET_ADDR VRAM_hscale, 1  ; set display to 2x scale
+   lda #64
+   sta VERA_data0
+   sta VERA_data0
+
+   lda #>(VRAM_TILEMAP>>4)
+   ldx #<(VRAM_TILEMAP>>4)
+   ldy #<tilemap_fn
+   jsr loadvram
+
+   lda #>(VRAM_TILES>>4)
+   ldx #<(VRAM_TILES>>4)
+   ldy #<tiles_fn
+   jsr loadvram
+
+   lda #>(VRAM_palette>>4)
+   ldx #<(VRAM_palette>>4)
+   ldy #<palette_fn
+   jsr loadvram
+
+   ; Setup interrupts
+   jsr init_irq
+
+   ; request winscreen
+   lda #1
+   sta winscreen_req
+
+mainloop:
+   wai
+   lda vsync_trig
+   beq mainloop
+
+   ; VSYNC has occurred, handle
+   inc frame_num
+   lda frame_num
+   cmp #60
+   bne @do_tick
+   stz frame_num
+
+@do_tick:
+   jsr winscreen_tick
+
+   stz vsync_trig
+   bra mainloop  ; loop forever
+
+   brk
