Thanks for the help. I think it's getting too late for me to think about this (i'm in NH). I tried to do what you said but I don't think I get it. I'll take another look in the morning. Here's my code in case you'd like to take a look:
Code:
.inesprg 1 ; /////INES Header/////
.ineschr 1
.inesmap 0
.inesmir 1
; ////////////////////////Bank 1: PRG ROM - Interrupt Table/////////////////////////////
.bank 1
.org $FFFA
.dw VBlank_Routine ; address to execute on VBlank
.dw Start
.dw 0
; ////////////////////////Bank 0: PRG ROM - Program Code////////////////////////////////
.bank 0
.org $0000 ; /////Variables/////
VBlankOrNo: .db 0
BKGset: .db 0
; /////Sprite DMA/////
.org $0300 ; OAM copy location
Sprite1_Y: .db 0 ; sprite #1's Y value
Sprite1_T: .db 0 ; sprite #1's tile number
Sprite1_S: .db 0 ; sprite #1's special byte
Sprite1_X: .db 0 ; sprite #1's X value
UnusedSprites: .db 0
.org $8000 ; program code location
Start: ; /////Screen Setup/////
sei ; just some stuff that's standard to do at reset
cld
ldx #$FF
txs
lda #00 ; set every variable to zero
sta Sprite1_Y
sta Sprite1_T
sta Sprite1_S
sta Sprite1_X
sta VBlankOrNo
sta BKGset
sta UnusedSprites
lda #$FF ; clear OAM with $FFs (except for Sprite1_* variables)
ldx #0
ClearSprites:
sta UnusedSprites, x
inx
cpx #252
bne ClearSprites
lda #0
sta $2000
sta $2001 ; turn the PPU off
wait1: ; wait (why?)
lda $2002
bpl wait1
wait2:
lda $2002
bpl wait2
lda #50 ; set initial sprite position to 50,50
sta Sprite1_Y
sta Sprite1_X
lda #0
sta Sprite1_S ; set initial sprite color
lda #1
sta Sprite1_T
; /////32-Color Palette/////
lda #$3F ; $2006 = PPU memory address
sta $2006 ; $3F00-$3F10 = image palette location (the first half of the 32 colors)
lda #$00 ; $3F10-$3F20 = sprite palette location (the second half of the 32 colors)
sta $2006
ldx #$00
loadpal: ; load 32-color pallete
lda tilepal, x
sta $2007 ; $2007 = PPU memory data
inx
cpx #32
bne loadpal
; /////Background/////
lda #$20
sta $2006 ; $2020-$23C0 = name table 0 (32x25 tiles)
sta $2006
ldx #$00
loadNames: ; load background name table (bkg12.map)
lda ourMap, x
inx
sta $2007 ; $2007 = PPU memory data
cpx #4*32
bne loadNames
; /////Screen Setup/////
lda #%10001000 ; screen pattern table = $0000, sprite pattern table = $1000, name table = $2000
sta $2000
lda #%00011110 ; BG = black, show sprites, screen on, don't clip anything, color display
sta $2001
; ------------------------Controller Loop Begin-------------------------------
infinite:
;WaitOutOfVblank:
; lda $2002
; bmi WaitOutOfVblank
;WaitVblank:
; lda $2002
; bpl WaitVblank
WaitForVBlank: ; /////VBlank/////
lda VBlankOrNo
cmp #1 ; check if A = 1 (VBlank)
bne WaitForVBlank ; if A = 0 loop
dec VBlankOrNo ; decrease VBlankOrNo by 1 (A = 0)
lda #3 ; /////Sprite Info Load/////
sta $4014 ; $4014 = sprite DMA register (transfers
; /////Controller Setup/////
lda #$01 ; reset pad #1
sta $4016 ; $4016 = joypad #1 (1 = reset, 0 = clear)
lda #$00
sta $4016
VBlank_Routine: ; /////VBlank Routine/////
inc VBlankOrNo ; at VBlank add 1 to VBlankOrNo (1 if VBlank, 0 if not)
; /////Test Button Status/////
lda $4016 ; read A status
and #1 ; if the low-order bit is equal to 1, the button is pressed
bne AKEYdown ; branch to AKEYdown if
lda $4016 ; read B status
lda $4016 ; read SELECT status
lda $4016 ; read START status
lda $4016 ; read UP status
and #1 ; check if UP is pressed
bne UPKEYdown ; branch to UPKEYdown if pressed
lda $4016 ; read DOWN status
and #1 ; check if DOWN is pressed
bne DOWNKEYdown ; branch to DOWNKEYdown if pressed
lda $4016 ; read LEFT status
and #1 ; check if LEFT is pressed
bne LEFTKEYdown ; branch to LEFTKEYdown if pressed
lda $4016 ; read RIGHT status
and #1 ; check if RIGHT is pressed
bne RIGHTKEYdown ; branch to RIGHTKEYdown if pressed
jmp NOTHINGdown
; /////Button Press Actions/////
AKEYdown: ; code executed when A is pressed
lda #$00 ; turn the screen off
sta $2001
lda #$20 ; reset to beginning of name table
sta $2006
sta $2006
lda BKGset ; check which background is loaded
cmp #0
bne BG1
ldx #$00
loadNames2: ; switch to background 2 (1 is loaded originally)
lda ourMap2, x
inx
sta $2007
cpx #4*32
bne loadNames2
lda #1
sta BKGset
lda #%00011110 ; turn the screen back on
sta $2001
jmp NOTHINGdown
BG1:
ldx #$00
loadNames3: ; switch to background 1
lda ourMap, x
inx
sta $2007
cpx #4*32
bne loadNames3
lda #0
sta BKGset
lda #%00011110 ; turn the screen back on
sta $2001
jmp NOTHINGdown
UPKEYdown: ; code executed when UP is pressed
lda Sprite1_Y
clc
sbc #1 ; subtract 1 from Sprite1_Y
sta Sprite1_Y
jmp NOTHINGdown
DOWNKEYdown: ; code executed when DOWN is pressed
lda Sprite1_Y
clc
adc #1 ; add 1 to Sprite1_Y
sta Sprite1_Y
jmp NOTHINGdown
LEFTKEYdown: ; code executed when LEFT is pressed
lda Sprite1_S
and #%10111111
sta Sprite1_S
lda Sprite1_X
clc
sbc #1 ; subtract 1 from Sprite1_X
sta Sprite1_X
jmp NOTHINGdown
RIGHTKEYdown: ; code executed when RIGHT is pressed
lda Sprite1_S
ora #%01000000
sta Sprite1_S
lda Sprite1_X
clc
adc #1 ; add 1 to Sprite1_X
sta Sprite1_X
; return from interrupt
NOTHINGdown:
rti
jmp infinite
; ------------------------Controller Loop End---------------------------------
; /////Include Binary Files/////
tilepal: .incbin "our.pal" ; include pallete and label its location "tilepal"
ourMap2:.db 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2
.db 17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
ourMap: .db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2
.db 17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18,17,18
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
.db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
; .incbin "map20.map" ; include map files and label its location "ourMap"
; ourMap2: .incbin "bkg21.map"
; ////////////////////////Bank 2: CHR ROM - Sprite/Background Data//////////////////////
.bank 2
.org $0000
.incbin "bkg1.bkg"
.org $1000
.incbin "our.spr"