Fix bug in cls

git-svn-id: svn://svn.cc65.org/cc65/trunk@5944 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
karri
2012-12-02 11:45:36 +00:00
parent c7f6e87e10
commit a7bd8bbc62

View File

@@ -260,19 +260,17 @@ CONTROL:
cmp #5 cmp #5
bne ControlSwap bne ControlSwap
lda ptr1 ; Activate/deactivate collission detection lda ptr1 ; Activate/deactivate collision detection
bne @L0 bne @L0
lda #%11000001 ; tgi_clear does not erase collision buffer lda #%00000001 ; tgi_clear does not erase collision buffer
sta cls_sprite sta cls_sprite
lda #%00100000 lda #%00100000
sta cls_sprite+2 sta cls_sprite+2
lda __sprsys lda __sprsys
ora #$20 ora #$20
bra @L1 bra @L1
@L0: @L0: lda #%00000000 ; tgi_clear erases collision buffer
lda #%11000000 ; tgi_clear erases collision buffer
sta cls_sprite sta cls_sprite
lda #%00000000
sta cls_sprite+2 sta cls_sprite+2
lda __sprsys lda __sprsys
and #$df and #$df
@@ -385,13 +383,13 @@ draw_sprite: ; Draw it in render buffer
.rodata .rodata
pixel_bitmap: pixel_bitmap:
.byte 2,%00010000, 0 ; A pixel bitmap .byte 3,%10000100,%00000000, $0 ; A pixel bitmap
.data .data
collindex: cls_coll:
.byte 0 .byte 0
cls_sprite: cls_sprite:
.byte %11000001 ; A pixel sprite .byte %00000001 ; A pixel sprite
.byte %10010000 .byte %00010000
.byte %00100000 .byte %00100000
.addr 0,pixel_bitmap .addr 0,pixel_bitmap
.word 0 .word 0
@@ -937,20 +935,20 @@ OUTTEXT:
.data .data
text_coll: text_coll:
.byte 0 .byte 0
text_sprite: text_sprite:
.byte $00,$90,$20 .byte $00,$90,$20
.addr 0, text_bitmap .addr 0, text_bitmap
text_x: text_x:
.word 0 .word 0
text_y: text_y:
.word 0 .word 0
text_sx: text_sx:
.word $100 .word $100
text_sy: text_sy:
.word $100 .word $100
text_c: text_c:
.byte 0 .byte 0
.rodata .rodata
; The Font ; The Font