empathicqubit/cc65
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Normalized coding style.

Browse source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@5498 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
ol.sc 2012-02-08 15:54:44 +00:00
parent d30ecfbd0e
commit 9aac71b74a
76 changed files with 297 additions and 373 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
libsrc/geos-common/disk/blkalloc.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/calcblksfree.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

1
libsrc/geos-common/disk/freeblock.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/getblock.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/getdirhead.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/getptrcurdknm.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

18
libsrc/geos-common/disk/gettrse.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -6,12 +5,13 @@
.export gettrse .export gettrse
.importzp ptr4 .importzp ptr4
gettrse: gettrse:
sta ptr4 sta ptr4
stx ptr4+1 stx ptr4+1
ldy #1 ldy #1
lda (ptr4),y lda (ptr4),y
tax tax
dey dey
lda (ptr4),y lda (ptr4),y
rts rts

1
libsrc/geos-common/disk/nxtblkalloc.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/opendisk.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/putblock.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/putdirhead.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/disk/setnextfree.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

14
libsrc/geos-common/dlgbox/Makefile
View file

@ -7,11 +7,11 @@
C_OBJS += messagebox.o C_OBJS += messagebox.o
S_OBJS += dodlgbox.o \ S_OBJS += dbget2lines.o \
rstrfrmdialogue.o \
dbget2lines.o \
dlgboxyesno.o \
dlgboxokcancel.o \
dlgboxok.o \
dlgboxgetstring.o \ dlgboxgetstring.o \
dlgboxfileselect.o dlgboxfileselect.o \
dlgboxok.o \
dlgboxokcancel.o \
dlgboxyesno.o \
dodlgbox.o \
rstrfrmdialogue.o

37
libsrc/geos-common/dlgbox/dbget2lines.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -11,27 +10,27 @@
.code .code
DB_get2lines: DB_get2lines:
sta ptr4 ; fetch line 2 sta ptr4 ; fetch line 2
stx ptr4+1 stx ptr4+1
jsr popax jsr popax
sta ptr3 ; fetch line 1 sta ptr3 ; fetch line 1
stx ptr3+1 stx ptr3+1
ldx #ptr3 ldx #ptr3
jsr checknull jsr checknull
ldx #ptr4 ldx #ptr4
jmp checknull jmp checknull
checknull: checknull:
lda $0,x lda $0,x
ora $1,x ora $1,x
bne cn_end bne cn_end
lda #<nullstring lda #<nullstring
sta $0,x sta $0,x
lda #>nullstring lda #>nullstring
sta $1,x sta $1,x
cn_end: rts cn_end: rts
.rodata .rodata
nullstring: nullstring:
.byte 0 .byte 0

62
libsrc/geos-common/dlgbox/dlgboxfileselect.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -18,42 +17,45 @@
.code .code
_DlgBoxFileSelect: _DlgBoxFileSelect:
sta tmp_r5
sta tmp_r5 stx tmp_r5+1
stx tmp_r5+1 jsr popa
jsr popa sta tmp_r7L
sta tmp_r7L jsr popax
jsr popax sta tmp_r10
sta tmp_r10 stx tmp_r10+1
stx tmp_r10+1
DB_FS_reload: DB_FS_reload:
MoveW tmp_r5, r5 MoveW tmp_r5, r5
MoveW tmp_r10, r10 MoveW tmp_r10, r10
MoveB tmp_r7L, r7L MoveB tmp_r7L, r7L
lda #<paramStrFileSelect lda #<paramStrFileSelect
ldx #>paramStrFileSelect ldx #>paramStrFileSelect
jsr _DoDlgBox jsr _DoDlgBox
cmp #DISK cmp #DISK
bne DB_FS_Fin bne DB_FS_Fin
jsr OpenDisk jsr OpenDisk
txa txa
beq DB_FS_reload beq DB_FS_reload
DB_FS_Fin: rts DB_FS_Fin:
rts
.rodata .rodata
paramStrFileSelect: paramStrFileSelect:
.byte DEF_DB_POS | 1 .byte DEF_DB_POS | 1
.byte DBGETFILES, 4, 4 .byte DBGETFILES, 4, 4
.byte OPEN, DBI_X_2, DBI_Y_0+16 .byte OPEN, DBI_X_2, DBI_Y_0+16
.byte DISK, DBI_X_2, DBI_Y_0+32+1 .byte DISK, DBI_X_2, DBI_Y_0+32+1
.byte CANCEL, DBI_X_2, DBI_Y_0+64+3 .byte CANCEL, DBI_X_2, DBI_Y_0+64+3
.byte NULL .byte NULL
.bss .bss
tmp_r5: .res 2 tmp_r5:
tmp_r7L: .res 1 .res 2
tmp_r10: .res 2 tmp_r7L:
.res 1
tmp_r10:
.res 2

34
libsrc/geos-common/dlgbox/dlgboxgetstring.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -17,23 +16,24 @@
.code .code
_DlgBoxGetString: _DlgBoxGetString:
jsr DB_get2lines jsr DB_get2lines
jsr popa jsr popa
sta DB_strlen sta DB_strlen
jsr popax jsr popax
sta ptr2 sta ptr2
stx ptr2+1 stx ptr2+1
lda #<paramStrGetString lda #<paramStrGetString
ldx #>paramStrGetString ldx #>paramStrGetString
jmp _DoDlgBox jmp _DoDlgBox
.data .data
paramStrGetString: paramStrGetString:
.byte DEF_DB_POS | 1 .byte DEF_DB_POS | 1
.byte DBVARSTR, TXT_LN_X, TXT_LN_1_Y, ptr3 .byte DBVARSTR, TXT_LN_X, TXT_LN_1_Y, ptr3
.byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr4 .byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr4
.byte DBGETSTRING, TXT_LN_X, TXT_LN_3_Y, ptr2 .byte DBGETSTRING, TXT_LN_X, TXT_LN_3_Y, ptr2
DB_strlen: .byte 17 DB_strlen:
.byte CANCEL, DBI_X_2, DBI_Y_2 .byte 17
.byte NULL .byte CANCEL, DBI_X_2, DBI_Y_2
.byte NULL

19
libsrc/geos-common/dlgbox/dlgboxok.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -16,16 +15,16 @@
.code .code
_DlgBoxOk: _DlgBoxOk:
jsr DB_get2lines jsr DB_get2lines
lda #<paramStrOk lda #<paramStrOk
ldx #>paramStrOk ldx #>paramStrOk
jmp _DoDlgBox jmp _DoDlgBox
.rodata .rodata
paramStrOk: paramStrOk:
.byte DEF_DB_POS | 1 .byte DEF_DB_POS | 1
.byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3 .byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3
.byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4 .byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4
.byte OK, DBI_X_0, DBI_Y_2 .byte OK, DBI_X_0, DBI_Y_2
.byte NULL .byte NULL

21
libsrc/geos-common/dlgbox/dlgboxokcancel.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -16,17 +15,17 @@
.code .code
_DlgBoxOkCancel: _DlgBoxOkCancel:
jsr DB_get2lines jsr DB_get2lines
lda #<paramStrOkCancel lda #<paramStrOkCancel
ldx #>paramStrOkCancel ldx #>paramStrOkCancel
jmp _DoDlgBox jmp _DoDlgBox
.rodata .rodata
paramStrOkCancel: paramStrOkCancel:
.byte DEF_DB_POS | 1 .byte DEF_DB_POS | 1
.byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3 .byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3
.byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4 .byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4
.byte OK, DBI_X_0, DBI_Y_2 .byte OK, DBI_X_0, DBI_Y_2
.byte CANCEL, DBI_X_2, DBI_Y_2 .byte CANCEL, DBI_X_2, DBI_Y_2
.byte NULL .byte NULL

21
libsrc/geos-common/dlgbox/dlgboxyesno.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -16,17 +15,17 @@
.code .code
_DlgBoxYesNo: _DlgBoxYesNo:
jsr DB_get2lines jsr DB_get2lines
lda #<paramStrYesNo lda #<paramStrYesNo
ldx #>paramStrYesNo ldx #>paramStrYesNo
jmp _DoDlgBox jmp _DoDlgBox
.rodata .rodata
paramStrYesNo: paramStrYesNo:
.byte DEF_DB_POS | 1 .byte DEF_DB_POS | 1
.byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3 .byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3
.byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4 .byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4
.byte YES, DBI_X_0, DBI_Y_2 .byte YES, DBI_X_0, DBI_Y_2
.byte NO, DBI_X_2, DBI_Y_2 .byte NO, DBI_X_2, DBI_Y_2
.byte NULL .byte NULL

13
libsrc/geos-common/dlgbox/dodlgbox.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -12,9 +11,9 @@
.include "geossym.inc" .include "geossym.inc"
_DoDlgBox: _DoDlgBox:
sta r0L sta r0L
stx r0H stx r0H
jsr DoDlgBox jsr DoDlgBox
ldx #0 ldx #0
lda r0L lda r0L
rts rts

3
libsrc/geos-common/dlgbox/rstrfrmdialogue.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -10,4 +9,4 @@
.include "jumptab.inc" .include "jumptab.inc"
_RstrFrmDialogue = RstrFrmDialogue _RstrFrmDialogue = RstrFrmDialogue

38
libsrc/geos-common/file/Makefile
View file

@ -5,28 +5,28 @@
#-------------------------------------------------------------------------- #--------------------------------------------------------------------------
# Object files # Object files
S_OBJS += get1stdirentry.o \ S_OBJS += appendrecord.o \
getnxtdirentry.o \
openrecordfile.o \
closerecordfile.o \ closerecordfile.o \
deletefile.o \
deleterecord.o \
findfile.o \
findftypes.o \
freefile.o \
get1stdirentry.o \
getfhdrinfo.o \
getfile.o \
getnxtdirentry.o \
insertrecord.o \
nextrecord.o \ nextrecord.o \
openrecordfile.o \
previousrecord.o \ previousrecord.o \
pointrecord.o \ pointrecord.o \
deleterecord.o \
insertrecord.o \
appendrecord.o \
readrecord.o \
writerecord.o \
updaterecordfile.o \
findfile.o \
getfhdrinfo.o \
readfile.o \
savefile.o \
freefile.o \
deletefile.o \
renamefile.o \
findftypes.o \
readbyte.o \ readbyte.o \
getfile.o \ readfile.o \
readrecord.o \
renamefile.o \
savefile.o \
sysremove.o \ sysremove.o \
sysrename.o sysrename.o \
writerecord.o \
updaterecordfile.o

1
libsrc/geos-common/file/appendrecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/closerecordfile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/deletefile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/deleterecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/findfile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

4
libsrc/geos-common/file/findftypes.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -35,4 +34,5 @@ _FindFTypes:
.bss .bss
tmpFileMax: .res 1 tmpFileMax:
.res 1

1
libsrc/geos-common/file/freefile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/get1stdirentry.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

1
libsrc/geos-common/file/getfhdrinfo.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/getfile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/getnxtdirentry.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

1
libsrc/geos-common/file/insertrecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/nextrecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/openrecordfile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/pointrecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/previousrecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/readbyte.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/readfile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/readrecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/renamefile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/savefile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/sysremove.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/sysrename.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/updaterecordfile.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

1
libsrc/geos-common/file/writerecord.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;

32
libsrc/geos-common/graph/Makefile
View file

@ -5,31 +5,31 @@
#-------------------------------------------------------------------------- #--------------------------------------------------------------------------
# Object files # Object files
S_OBJS += drawline.o \ S_OBJS += bitmapclip.o \
bitmapregs.o \
bitmapup.o \
bitotherclip.o \
drawline.o \
drawpoint.o \ drawpoint.o \
framerectangle.o \ framerectangle.o \
getcharwidth.o \
getintcharint.o \
graphicsstring.o \
hlineregs.o \ hlineregs.o \
horizontalline.o \ horizontalline.o \
imprintrectangle.o \ imprintrectangle.o \
initdrawwindow.o \
invertline.o \ invertline.o \
invertrectangle.o \ invertrectangle.o \
loadcharset.o \
pointregs.o \ pointregs.o \
recoverline.o \
recoverrectangle.o \
rectangle.o \
initdrawwindow.o \
setpattern.o \
testpoint.o \
verticalline.o \
put_char.o \ put_char.o \
putdecimal.o \ putdecimal.o \
putstring.o \ putstring.o \
recoverline.o \
recoverrectangle.o \
rectangle.o \
setpattern.o \
testpoint.o \
usesystemfont.o \ usesystemfont.o \
getcharwidth.o \ verticalline.o \
loadcharset.o \
bitmapup.o \
bitmapregs.o \
bitmapclip.o \
bitotherclip.o \
graphicsstring.o \
getintcharint.o

19
libsrc/geos-common/graph/bitmapclip.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -14,12 +13,12 @@
.include "geossym.inc" .include "geossym.inc"
_BitmapClip: _BitmapClip:
jsr BitmapRegs jsr BitmapRegs
jsr popax jsr popax
sta r12L sta r12L
stx r12H stx r12H
jsr popa jsr popa
sta r11H sta r11H
jsr popa jsr popa
sta r11L sta r11L
jmp BitmapClip jmp BitmapClip

22
libsrc/geos-common/graph/bitmapregs.s
View file

@ -1,22 +1,20 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
; 21.12.99 ; 21.12.99
.importzp ptr4 .importzp ptr4
.export BitmapRegs .export BitmapRegs
.include "geossym.inc" .include "geossym.inc"
BitmapRegs: ;a/x is a struct iconpic* BitmapRegs: ; a/x is a struct iconpic*
sta ptr4 sta ptr4
stx ptr4+1 stx ptr4+1
ldy #0 ldy #0
bmpLp: lda (ptr4),y bmpLp: lda (ptr4),y
sta r0L,y sta r0L,y
iny iny
cpy #6 cpy #6
bne bmpLp bne bmpLp
rts rts

6
libsrc/geos-common/graph/bitmapup.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -6,12 +5,11 @@
; void BitmapUp (struct iconpic *myGfx); ; void BitmapUp (struct iconpic *myGfx);
.import BitmapRegs .import BitmapRegs
.export _BitmapUp .export _BitmapUp
.include "jumptab.inc" .include "jumptab.inc"
_BitmapUp: _BitmapUp:
jsr BitmapRegs jsr BitmapRegs
jmp BitmapUp jmp BitmapUp

31
libsrc/geos-common/graph/bitotherclip.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -20,18 +19,18 @@
.include "geossym.inc" .include "geossym.inc"
_BitOtherClip: _BitOtherClip:
jsr BitOtherRegs jsr BitOtherRegs
jsr popax jsr popax
sta r12L sta r12L
stx r12H stx r12H
jsr popa jsr popa
sta r11H sta r11H
jsr popa jsr popa
sta r11L sta r11L
jsr popax jsr popax
sta r14L sta r14L
stx r14H stx r14H
jsr popax jsr popax
sta r13L sta r13L
stx r13H stx r13H
jmp BitOtherClip jmp BitOtherClip

27
libsrc/geos-common/graph/drawline.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -16,16 +15,16 @@
.include "geosmac.ca65.inc" .include "geosmac.ca65.inc"
_DrawLine: _DrawLine:
tay tay
PushW r2 PushW r2
tya tya
jsr _InitDrawWindow jsr _InitDrawWindow
MoveW r2, r11 MoveW r2, r11
PopW r2 PopW r2
jsr popa jsr popa
sta tmp1 sta tmp1
clc clc
bit tmp1 bit tmp1
bvc @1 bvc @1
sec sec
@1: jmp DrawLine @1: jmp DrawLine

18
libsrc/geos-common/graph/drawpoint.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -6,7 +5,6 @@
; void DrawPoint (char mode, struct pixel *mypixel); ; void DrawPoint (char mode, struct pixel *mypixel);
.import PointRegs .import PointRegs
.import popa .import popa
.importzp tmp1 .importzp tmp1
@ -15,11 +13,11 @@
.include "jumptab.inc" .include "jumptab.inc"
_DrawPoint: _DrawPoint:
jsr PointRegs jsr PointRegs
jsr popa jsr popa
sta tmp1 sta tmp1
clc clc
bit tmp1 bit tmp1
bvc @1 bvc @1
sec sec
@1: jmp DrawPoint @1: jmp DrawPoint

3
libsrc/geos-common/graph/framerectangle.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -10,4 +9,4 @@
.include "jumptab.inc" .include "jumptab.inc"
_FrameRectangle = FrameRectangle _FrameRectangle = FrameRectangle

7
libsrc/geos-common/graph/getcharwidth.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -11,6 +10,6 @@
.include "jumptab.inc" .include "jumptab.inc"
_GetCharWidth: _GetCharWidth:
jsr GetCharWidth jsr GetCharWidth
ldx #0 ldx #0
rts rts

17
libsrc/geos-common/graph/getintcharint.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -10,12 +9,12 @@
.include "geossym.inc" .include "geossym.inc"
getintcharint: getintcharint:
sta r11L sta r11L
stx r11H stx r11H
jsr popa jsr popa
sta r1H sta r1H
jsr popax jsr popax
sta r0L sta r0L
stx r0H stx r0H
rts rts

7
libsrc/geos-common/graph/graphicsstring.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -12,6 +11,6 @@
.include "geossym.inc" .include "geossym.inc"
_GraphicsString: _GraphicsString:
sta r0L sta r0L
stx r0H stx r0H
jmp GraphicsString jmp GraphicsString

18
libsrc/geos-common/graph/hlineregs.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -6,17 +5,16 @@
.import popax, popa .import popax, popa
.export HLineRegs .export HLineRegs
.include "geossym.inc" .include "geossym.inc"
HLineRegs: HLineRegs:
stx r4H stx r4H
sta r4L sta r4L
jsr popax jsr popax
stx r3H stx r3H
sta r3L sta r3L
jsr popa jsr popa
sta r11L sta r11L
rts rts

8
libsrc/geos-common/graph/horizontalline.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -8,12 +7,11 @@
.import popa .import popa
.import HLineRegs .import HLineRegs
.export _HorizontalLine .export _HorizontalLine
.include "jumptab.inc" .include "jumptab.inc"
_HorizontalLine: _HorizontalLine:
jsr HLineRegs jsr HLineRegs
jsr popa jsr popa
jmp HorizontalLine jmp HorizontalLine

1
libsrc/geos-common/graph/imprintrectangle.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

22
libsrc/geos-common/graph/initdrawwindow.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -8,18 +7,17 @@
; void InitDrawWindow (struct window *myWindow); ; void InitDrawWindow (struct window *myWindow);
.importzp ptr4 .importzp ptr4
.export _InitDrawWindow .export _InitDrawWindow
.include "geossym.inc" .include "geossym.inc"
_InitDrawWindow: ;a/x is a struct window* _InitDrawWindow: ; a/x is a struct window*
sta ptr4 sta ptr4
stx ptr4+1 stx ptr4+1
ldy #0 ldy #0
copyWin: lda (ptr4),y copyWin:lda (ptr4),y
sta r2L,y sta r2L,y
iny iny
cpy #6 cpy #6
bne copyWin bne copyWin
rts rts

5
libsrc/geos-common/graph/invertline.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -12,5 +11,5 @@
.include "jumptab.inc" .include "jumptab.inc"
_InvertLine: _InvertLine:
jsr HLineRegs jsr HLineRegs
jmp InvertLine jmp InvertLine

1
libsrc/geos-common/graph/invertrectangle.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

7
libsrc/geos-common/graph/loadcharset.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -12,6 +11,6 @@
.include "geossym.inc" .include "geossym.inc"
_LoadCharSet: _LoadCharSet:
sta r0L sta r0L
stx r0H stx r0H
jmp LoadCharSet jmp LoadCharSet

28
libsrc/geos-common/graph/pointregs.s
View file

@ -1,25 +1,23 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
; 29.10.99 ; 29.10.99
.importzp ptr4 .importzp ptr4
.export PointRegs .export PointRegs
.include "geossym.inc" .include "geossym.inc"
PointRegs: ;a/x is a struct pixel* PointRegs: ; a/x is a struct pixel*
sta ptr4 sta ptr4
stx ptr4+1 stx ptr4+1
ldy #0 ldy #0
lda (ptr4),y lda (ptr4),y
sta r3L sta r3L
iny iny
lda (ptr4),y lda (ptr4),y
sta r3H sta r3H
iny iny
lda (ptr4),y lda (ptr4),y
sta r11L sta r11L
rts rts

13
libsrc/geos-common/graph/put_char.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -13,9 +12,9 @@
.include "geossym.inc" .include "geossym.inc"
_PutChar: _PutChar:
sta r11L sta r11L
stx r11H stx r11H
jsr popa jsr popa
sta r1H sta r1H
jsr popa jsr popa
jmp PutChar jmp PutChar

7
libsrc/geos-common/graph/putdecimal.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -13,6 +12,6 @@
.include "jumptab.inc" .include "jumptab.inc"
_PutDecimal: _PutDecimal:
jsr getintcharint jsr getintcharint
jsr popa jsr popa
jmp PutDecimal jmp PutDecimal

5
libsrc/geos-common/graph/putstring.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -13,5 +12,5 @@
.include "jumptab.inc" .include "jumptab.inc"
_PutString: _PutString:
jsr getintcharint jsr getintcharint
jmp PutString jmp PutString

6
libsrc/geos-common/graph/recoverline.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -7,12 +6,11 @@
; void RecoverLine (char y, int xstart, int xend); ; void RecoverLine (char y, int xstart, int xend);
.import HLineRegs .import HLineRegs
.export _RecoverLine .export _RecoverLine
.include "jumptab.inc" .include "jumptab.inc"
_RecoverLine: _RecoverLine:
jsr HLineRegs jsr HLineRegs
jmp RecoverLine jmp RecoverLine

1
libsrc/geos-common/graph/recoverrectangle.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;

3
libsrc/geos-common/graph/rectangle.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -10,4 +9,4 @@
.include "jumptab.inc" .include "jumptab.inc"
_Rectangle = Rectangle _Rectangle = Rectangle

3
libsrc/geos-common/graph/setpattern.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -10,4 +9,4 @@
.include "jumptab.inc" .include "jumptab.inc"
_SetPattern = SetPattern _SetPattern = SetPattern

11
libsrc/geos-common/graph/testpoint.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
@ -13,8 +12,8 @@
.include "jumptab.inc" .include "jumptab.inc"
_TestPoint: _TestPoint:
jsr PointRegs jsr PointRegs
jsr TestPoint jsr TestPoint
bcc goFalse bcc goFalse
jmp return1 jmp return1
goFalse: jmp return0 goFalse:jmp return0

3
libsrc/geos-common/graph/usesystemfont.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -10,4 +9,4 @@
.include "jumptab.inc" .include "jumptab.inc"
_UseSystemFont = UseSystemFont _UseSystemFont = UseSystemFont

20
libsrc/geos-common/graph/verticalline.s
View file

@ -1,4 +1,3 @@
; ;
; Maciej 'YTM/Alliance' Witkowiak ; Maciej 'YTM/Alliance' Witkowiak
; ;
@ -6,19 +5,18 @@
; void VerticalLine (char pattern, char ystart, char yend, int x); ; void VerticalLine (char pattern, char ystart, char yend, int x);
.import popa .import popa
.export _VerticalLine .export _VerticalLine
.include "jumptab.inc" .include "jumptab.inc"
.include "geossym.inc" .include "geossym.inc"
_VerticalLine: _VerticalLine:
stx r4H stx r4H
sta r4L sta r4L
jsr popa jsr popa
sta r3H sta r3H
jsr popa jsr popa
sta r3L sta r3L
jsr popa jsr popa
jmp VerticalLine jmp VerticalLine