Added simple movement for sprite
This commit is contained in:
parent
a5d08f4284
commit
a2c37117dd
|
@ -1,4 +1,6 @@
|
|||
COLORSPRITE = apple.png
|
||||
COLORSPRITE = moldy_burger.png
|
||||
#COLORSPRITE = boxw_mag.png
|
||||
#COLORSPRITE = apple.png
|
||||
BWSPRITE = apple.png
|
||||
|
||||
all: bwtest.dsk colortest.dsk
|
||||
|
@ -9,7 +11,7 @@ bwtest.dsk: HiSprite.py bwtest.s $(BWSPRITE)
|
|||
atrcopy bwtest.dsk boot -b bwtest.xex --brun 6000 -f
|
||||
|
||||
colortest.dsk: HiSprite.py colortest.s $(COLORSPRITE)
|
||||
python HiSprite.py -a mac65 -p 6502 -s hgrcolor $(COLORSPRITE) -n colorsprite -t -c -r > colorsprite.s
|
||||
python HiSprite.py -a mac65 -p 6502 -s hgrcolor $(COLORSPRITE) -n colorsprite -t -c -r -m > colorsprite.s
|
||||
atasm -ocolortest.xex colortest.s -Lcolortest.var -gcolortest.lst
|
||||
atrcopy colortest.dsk boot -b colortest.xex --brun 6000 -f
|
||||
|
||||
|
|
41
colortest.s
41
colortest.s
|
@ -35,22 +35,55 @@ start
|
|||
jsr clrscr
|
||||
|
||||
ldx #0
|
||||
loop
|
||||
?1
|
||||
txa
|
||||
sta $2000,x
|
||||
inx
|
||||
bne loop
|
||||
bne ?1
|
||||
|
||||
draw
|
||||
lda #100
|
||||
sta PARAM1 ; y coord
|
||||
lda #100
|
||||
lda #0
|
||||
sta PARAM0 ; x coord
|
||||
|
||||
loop
|
||||
jsr COLORSPRITE
|
||||
|
||||
jsr wait
|
||||
inc PARAM0
|
||||
lda PARAM0
|
||||
cmp #100
|
||||
bcc checky
|
||||
lda #0
|
||||
sta PARAM0
|
||||
|
||||
checky
|
||||
inc PARAM1
|
||||
lda PARAM1
|
||||
cmp #100
|
||||
bcc loop
|
||||
lda #0
|
||||
sta PARAM1
|
||||
beq loop
|
||||
|
||||
wait
|
||||
jmp wait
|
||||
ldy #$06 ; Loop a bit
|
||||
wait_outer
|
||||
ldx #$ff
|
||||
wait_inner
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
dex
|
||||
bne wait_inner
|
||||
dey
|
||||
bne wait_outer
|
||||
rts
|
||||
|
||||
|
||||
clrscr
|
||||
|
|
Loading…
Reference in New Issue