Updated engine for custom zone sprites and tiles, reverted example

Author: SlithyMatt

engine/globals.asm

@@ -106,6 +106,9 @@ VRAM_TILEMAP   = $09600 ; 64x32 (40x30 visible)
 VRAM_TILES     = $0A800 ; 704 4bpp 8x8 tiles
 VRAM_SPRITES   = $10000 ; 499 4bpp 16x16 frames
 
+VRAM_TILES_UPPER     = VRAM_TILES + (256*32)
+VRAM_SPRITES_UPPER   = VRAM_SPRITES + (256*128)
+
 LEVEL_BITMAP_OFFSET        = 8*320/2
 VRAM_LEVEL_BITMAP          = VRAM_BITMAP + LEVEL_BITMAP_OFFSET
 LEVEL_BITMAP_SIZE          = 200*320/2

engine/zone.asm

@@ -7,10 +7,13 @@ ZONE_INC = 1
 .include "state.asm"
 .include "bin2dec.asm"
 .include "level.asm"
+.include "mouse.asm"
 
-__zone_filename: .asciiz "000L0_00.BIN"
+__zone_filename:     .asciiz "000L0B00.BIN"
+__zone_tiles_fn:     .asciiz "000TILES.BIN"
+__zone_sprites_fn:   .asciiz "000SPRTS.BIN"
 __zone_bank: .byte 0
-ZONE_FN_LENGTH = __zone_bank - __zone_filename - 1
+ZONE_FN_LENGTH = __zone_tiles_fn - __zone_filename - 1
 
 __zone_num_string: .byte 0,0,0
 
@@ -73,12 +76,53 @@ load_zone:
    ldx #DISK_DEVICE
    ldy #0
    jsr SETLFS                 ; SetFileParams(LogNum=1,DevNum=DISK_DEVICE,SA=0)
-   lda #<(__zone_filename)    ; overwrite zone number in filename
+   lda #<(__zone_filename)    ; overwrite zone number in filenames
    sta ZP_PTR_2
    lda #>(__zone_filename)
    sta ZP_PTR_2+1
    lda zone
    jsr byte2ascii
+   lda #<(__zone_tiles_fn)
+   sta ZP_PTR_2
+   lda #>(__zone_tiles_fn)
+   sta ZP_PTR_2+1
+   lda zone
+   jsr byte2ascii
+   lda #<(__zone_sprites_fn)
+   sta ZP_PTR_2
+   lda #>(__zone_sprites_fn)
+   sta ZP_PTR_2+1
+   lda zone
+   jsr byte2ascii
+   ; load custom tiles
+   lda #ZONE_FN_LENGTH
+   ldx #<__zone_tiles_fn
+   ldy #>__zone_tiles_fn
+   jsr SETNAM                 ; SetFileName(__zone_tiles_fn)
+   lda __zone_bank
+   sta RAM_BANK
+   jsr reset_bank
+   lda #^VRAM_TILES_UPPER
+   clc
+   adc #2
+   ldx #<VRAM_TILES_UPPER
+   ldy #>VRAM_TILES_UPPER
+   jsr LOAD                   ; LoadFile(Verify=VRAM_TILES_UPPER.bank+2,Address=VRAM_TILES_UPPER.addr)
+   ; load custom sprites
+   lda #ZONE_FN_LENGTH
+   ldx #<__zone_sprites_fn
+   ldy #>__zone_sprites_fn
+   jsr SETNAM                 ; SetFileName(__zone_sprites_fn)
+   lda __zone_bank
+   sta RAM_BANK
+   jsr reset_bank
+   lda #^VRAM_SPRITES_UPPER
+   clc
+   adc #2
+   ldx #<VRAM_SPRITES_UPPER
+   ldy #>VRAM_SPRITES_UPPER
+   jsr LOAD                   ; LoadFile(Verify=VRAM_SPRITES_UPPER.bank+2,Address=VRAM_SPRITES_UPPER.addr)
+   jsr init_mouse
    ldx #0
 @level_loop:
    lda #<__zone_num_string    ; overwrite level number in filename

example/mygame.xci

@@ -6,7 +6,7 @@ tiles_hex mygame_tiles.hex
 sprites_hex mygame_sprites.hex
 menu_xci mygame_menu.xci
 title_screen mygame_start.xci
-init_cursor 256 # sprite frame index
+init_cursor 0 # sprite frame index
 zone mygame_zone0.xci # the first zone defined will be loaded first,
                       # with its first level the start of the game
 zone mygame_zone1.xci

example/mygame_menu.xci

@@ -1,7 +1,7 @@
 # Menu bar definition
 menu_bg 1 # background color = white
 menu_fg 0 # foreground color = black
-menu_lc 256
+menu_lc 2H
 menu_sp 1
 menu_rc 2
 menu_div 4