bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

fixed bugs

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@1865 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
izydorst
2002-12-31 16:37:53 +00:00
parent 0264d31e7c
commit 960b042496
1 changed files with 17 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
libsrc/geos/devel/geos-tgi.s
View File

@@ -2,10 +2,6 @@
; Graphics driver for the 320x200x2 or 640x200x2 mode on GEOS 64/128 ; Graphics driver for the 320x200x2 or 640x200x2 mode on GEOS 64/128
; Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl> ; Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl>
; 28-31.12.2002 ; 28-31.12.2002
;
; - not tested OutText
; - not tested on VDC
; - erratic Circle when needs to clip
.include "zeropage.inc" .include "zeropage.inc"
@@ -425,10 +421,9 @@ SETDRAWPAGE:
SETCOLOR: SETCOLOR:
tax tax
beq @L1 beq @L1
inx lda #1
@L1: stx BITMASK @L1: sta BITMASK
txa ; need to have either 0 or 1 jmp SetPattern ; need to have either 0 or 1
jmp SetPattern
; ------------------------------------------------------------------------ ; ------------------------------------------------------------------------
; SETPALETTE: Set the palette (not available with all drivers/hardware). ; SETPALETTE: Set the palette (not available with all drivers/hardware).
@@ -515,25 +510,25 @@ SETPIXELCLIP:
bmi @finito ; y<0 bmi @finito ; y<0
lda X1+1 lda X1+1
bmi @finito ; x<0 bmi @finito ; x<0
lda xres
ldx xres+1
sta ADDR
stx ADDR+1
ldx #ADDR
lda X1 lda X1
ldy X1+1 ldx X1+1
jsr icmp ; if (xres<x1)
bcs @cont ; !(xres<x1)
@finito:rts
@cont: lda yres
ldx yres+1
sta ADDR sta ADDR
stx ADDR+1 stx ADDR+1
ldx #ADDR ldx #ADDR
lda xres
ldy xres+1
jsr icmp ; ( x < xres ) ...
bcs @finito
lda Y1 lda Y1
ldy Y1+1 ldx Y1+1
jsr icmp ; if (yres<y1) sta ADDR
bcc @finito stx ADDR+1
ldx #ADDR
lda yres
ldy yres+1
jsr icmp ; ... && ( y < yres )
bcc SETPIXEL
@finito:rts
SETPIXEL: SETPIXEL:
lda X1 lda X1