From c6f23eefc85f50730c5c0607e351443f042e143e Mon Sep 17 00:00:00 2001 From: mrdudz Date: Sun, 17 Apr 2022 16:06:22 +0200 Subject: [PATCH] remove dangling spaces --- libsrc/apple2/exec.s | 2 +- libsrc/apple2/iobuf.s | 2 +- libsrc/apple2/mcbdefault.s | 4 +- libsrc/apple2/mou/a2.stdmou.s | 16 +++--- libsrc/apple2/opendir.c | 2 +- libsrc/apple2/write.s | 2 +- libsrc/atari/break.s | 2 +- libsrc/atari/cclear.s | 2 +- libsrc/atari/ctype.s | 2 +- libsrc/atari/cvline.s | 2 +- libsrc/atari/diopncls.s | 2 +- libsrc/atari/dioqsize.s | 2 +- libsrc/atari/doesclrscr.s | 2 +- libsrc/atari/emd/atr130.s | 50 +++++++++---------- libsrc/atari/mcbtxtchar.s | 2 +- libsrc/atari/randomize.s | 2 +- libsrc/atari/revers.s | 2 +- libsrc/atari/shadow_ram_handlers.s | 6 +-- libsrc/atari/system_check.s | 2 +- libsrc/atari/xlmemchk.inc | 2 +- libsrc/atari5200/conioscreen.s | 2 +- libsrc/atari5200/cvline.s | 2 +- libsrc/atari5200/extra/conioscreen-20x12.s | 2 +- libsrc/atari5200/joy/atr5200std.s | 2 +- libsrc/atari5200/randomize.s | 2 +- libsrc/atari5200/y2k.inc | 14 +++--- libsrc/atari7800/crt0.s | 6 +-- libsrc/atari7800/joy/atari7800-stdjoy.s | 2 +- libsrc/atmos/cclear.s | 4 +- libsrc/atmos/ctype.s | 2 +- libsrc/c128/emd/c128-vdc.s | 18 +++---- libsrc/c64/sysuname.s | 2 +- libsrc/cbm/cbm_save.c | 4 +- libsrc/cbm/ctype.s | 2 +- libsrc/cbm/opendir.c | 2 +- libsrc/cbm610/revers.s | 2 +- libsrc/common/_heap.s | 2 +- libsrc/common/_heapmaxavail.s | 2 +- libsrc/common/_longminstr.c | 4 +- libsrc/common/_seterrno.s | 2 +- libsrc/common/abort.c | 2 +- libsrc/common/ctypemask.s | 2 +- libsrc/common/divt.s | 4 +- libsrc/common/doesclrscr.s | 2 +- libsrc/common/fread.s | 2 +- libsrc/common/free.s | 2 +- libsrc/common/fsetpos.c | 2 +- libsrc/common/fwrite.s | 2 +- libsrc/common/getcwd.s | 2 +- libsrc/common/ltoa.s | 6 +-- libsrc/common/memcpy.s | 2 +- libsrc/common/memset.s | 4 +- libsrc/common/mul20.s | 4 +- libsrc/common/mul40.s | 4 +- libsrc/common/putenv.s | 2 +- libsrc/common/raise.s | 6 +-- libsrc/common/rewind.c | 2 +- libsrc/common/strcspn.s | 2 +- libsrc/common/strncat.s | 6 +-- libsrc/common/strrchr.s | 4 +- libsrc/common/ungetc.s | 2 +- libsrc/common/vsprintf.s | 2 +- libsrc/conio/cputs.s | 2 +- libsrc/conio/scrsize.s | 4 +- libsrc/creativision/_scrsize.s | 6 +-- libsrc/creativision/boxchars.inc | 10 ++-- libsrc/dbg/asmtab.s | 2 +- libsrc/dbg/dbg.c | 6 +-- libsrc/dbg/dbgdasm.s | 2 +- libsrc/em/em_load.s | 2 +- libsrc/gamate/cputc.s | 14 +++--- libsrc/geos-apple/disk/exitturbo.s | 4 +- libsrc/geos-cbm/disk/changediskdevice.s | 2 +- libsrc/geos-cbm/disk/chkdkgeos.s | 2 +- libsrc/geos-cbm/disk/dio_cts.s | 16 +++--- libsrc/geos-cbm/disk/dio_openclose.s | 4 +- libsrc/geos-cbm/disk/dio_stc.s | 48 +++++++++--------- libsrc/geos-cbm/disk/enterturbo.s | 2 +- libsrc/geos-cbm/disk/exitturbo.s | 2 +- libsrc/geos-cbm/disk/findbambit.s | 2 +- libsrc/geos-cbm/disk/newdisk.s | 2 +- libsrc/geos-cbm/disk/purgeturbo.s | 2 +- libsrc/geos-cbm/disk/readblock.s | 2 +- libsrc/geos-cbm/disk/readbuff.s | 2 +- libsrc/geos-cbm/disk/verwriteblock.s | 2 +- libsrc/geos-cbm/disk/writeblock.s | 2 +- libsrc/geos-cbm/disk/writebuff.s | 2 +- libsrc/geos-cbm/emd/geos-vdc.s | 36 ++++++------- libsrc/geos-cbm/file/followchain.s | 2 +- libsrc/geos-cbm/graph/setnewmode.s | 2 +- libsrc/geos-cbm/system/setdevice.s | 2 +- libsrc/geos-cbm/tgi/geos-tgi.s | 6 +-- libsrc/geos-common/common/zerobss.s | 2 +- libsrc/geos-common/conio/_scrsize.s | 4 +- libsrc/geos-common/conio/cputc.s | 2 +- libsrc/geos-common/conio/cvline.s | 2 +- libsrc/geos-common/disk/blkalloc.s | 2 +- libsrc/geos-common/disk/calcblksfree.s | 2 +- libsrc/geos-common/disk/freeblock.s | 2 +- libsrc/geos-common/disk/getblock.s | 2 +- libsrc/geos-common/disk/getptrcurdknm.s | 4 +- libsrc/geos-common/disk/nxtblkalloc.s | 2 +- libsrc/geos-common/disk/opendisk.s | 2 +- libsrc/geos-common/disk/putblock.s | 2 +- libsrc/geos-common/disk/putdirhead.s | 2 +- libsrc/geos-common/disk/setnextfree.s | 2 +- libsrc/geos-common/dlgbox/rstrfrmdialogue.s | 2 +- libsrc/geos-common/drivers/fio_module.s | 8 +-- libsrc/geos-common/drivers/geos-stdmou.s | 2 +- libsrc/geos-common/file/appendrecord.s | 2 +- libsrc/geos-common/file/closerecordfile.s | 2 +- libsrc/geos-common/file/deletefile.s | 2 +- libsrc/geos-common/file/deleterecord.s | 2 +- libsrc/geos-common/file/findfile.s | 2 +- libsrc/geos-common/file/freefile.s | 2 +- libsrc/geos-common/file/getfhdrinfo.s | 2 +- libsrc/geos-common/file/getfile.s | 2 +- libsrc/geos-common/file/openrecordfile.s | 2 +- libsrc/geos-common/file/pointrecord.s | 2 +- libsrc/geos-common/file/readfile.s | 2 +- libsrc/geos-common/file/readrecord.s | 2 +- libsrc/geos-common/file/writerecord.s | 2 +- libsrc/geos-common/geosmac.inc | 4 +- libsrc/geos-common/graph/bitotherclip.s | 2 +- libsrc/geos-common/graph/framerectangle.s | 2 +- libsrc/geos-common/graph/imprintrectangle.s | 4 +- libsrc/geos-common/graph/invertline.s | 2 +- libsrc/geos-common/graph/invertrectangle.s | 2 +- libsrc/geos-common/graph/recoverline.s | 2 +- libsrc/geos-common/graph/recoverrectangle.s | 4 +- libsrc/geos-common/graph/rectangle.s | 2 +- libsrc/geos-common/graph/testpoint.s | 2 +- libsrc/geos-common/graph/verticalline.s | 4 +- .../geos-common/mousesprite/ismseinregion.s | 2 +- libsrc/geos-common/process/processblock.s | 4 +- libsrc/geos-common/process/processfreeze.s | 4 +- .../process/processinitrestartenable.s | 4 +- libsrc/joystick/joy_load.s | 2 +- libsrc/lynx/bllhdr.s | 2 +- libsrc/lynx/bootldr.s | 2 +- libsrc/lynx/cgetc.s | 2 +- libsrc/lynx/eeprom.s | 2 +- libsrc/lynx/eeprom46.s | 2 +- libsrc/lynx/eeprom66.s | 2 +- libsrc/lynx/eeprom86.s | 2 +- libsrc/lynx/exec.s | 2 +- libsrc/lynx/kbhit.s | 2 +- libsrc/lynx/lynx-cart.s | 6 +-- libsrc/mouse/mouse_load.s | 2 +- libsrc/mouse/mouse_move.s | 2 +- libsrc/nes/cclear.s | 2 +- libsrc/nes/chline.s | 2 +- libsrc/nes/gotoy.s | 2 +- libsrc/nes/ppubuf.s | 2 +- libsrc/nes/sysuname.s | 2 +- libsrc/osic1p/cclear.s | 2 +- libsrc/pce/cclear.s | 2 +- libsrc/plus4/randomize.s | 2 +- libsrc/runtime/add.s | 4 +- libsrc/runtime/aslax1.s | 2 +- libsrc/runtime/decsp1.s | 2 +- libsrc/runtime/incsp1.s | 2 +- libsrc/runtime/incsp3.s | 2 +- libsrc/runtime/incsp4.s | 2 +- libsrc/runtime/incsp5.s | 2 +- libsrc/runtime/incsp6.s | 2 +- libsrc/runtime/incsp7.s | 2 +- libsrc/runtime/land.s | 6 +-- libsrc/runtime/ldauisp.s | 2 +- libsrc/runtime/leave.s | 2 +- libsrc/runtime/leq.s | 2 +- libsrc/runtime/lmod.s | 2 +- libsrc/runtime/lmul.s | 6 +-- libsrc/runtime/lor.s | 6 +-- libsrc/runtime/lpop.s | 2 +- libsrc/runtime/lpush.s | 4 +- libsrc/runtime/lrsub.s | 2 +- libsrc/runtime/lsub.s | 2 +- libsrc/runtime/lsubeq.s | 10 ++-- libsrc/runtime/ltest.s | 2 +- libsrc/runtime/ludiv.s | 2 +- libsrc/runtime/lumod.s | 2 +- libsrc/runtime/lxor.s | 2 +- libsrc/runtime/mul.s | 4 +- libsrc/runtime/mulax3.s | 2 +- libsrc/runtime/or.s | 2 +- libsrc/runtime/pushaff.s | 2 +- libsrc/runtime/pushax.s | 2 +- libsrc/runtime/return0.s | 2 +- libsrc/runtime/return1.s | 2 +- libsrc/runtime/swap.s | 6 +-- libsrc/runtime/umod.s | 2 +- libsrc/runtime/umul16x16r32.s | 2 +- libsrc/sym1/read.s | 2 +- libsrc/sym1/write.s | 2 +- libsrc/telestrat/cclear.s | 4 +- libsrc/telestrat/chline.s | 4 +- libsrc/telestrat/clrscr.s | 8 +-- libsrc/telestrat/cputc.s | 12 ++--- libsrc/telestrat/gotoxy.s | 4 +- libsrc/telestrat/joy/telestrat.s | 12 ++--- libsrc/telestrat/orixhdr.s | 2 +- libsrc/telestrat/sound.s | 2 +- libsrc/telestrat/syschdir.s | 6 +-- libsrc/telestrat/sysmkdir.s | 8 +-- libsrc/telestrat/tgi/telestrat-228-200-3.s | 38 +++++++------- libsrc/telestrat/tgi/telestrat-240-200-2.s | 44 ++++++++-------- libsrc/tgi/tgi_gettextheight.s | 2 +- libsrc/tgi/tgi_imulround.s | 4 +- libsrc/tgi/tgi_lineto.s | 2 +- libsrc/tgi/tgi_outtext.s | 2 +- libsrc/tgi/tgidrv_line.inc | 2 +- 212 files changed, 432 insertions(+), 432 deletions(-) diff --git a/libsrc/apple2/exec.s b/libsrc/apple2/exec.s index 9212ecb8a..0ff4bc6f0 100644 --- a/libsrc/apple2/exec.s +++ b/libsrc/apple2/exec.s @@ -18,7 +18,7 @@ typerr: lda #$4A ; "Incompatible file format" ; Cleanup name oserr: jsr popname ; Preserves A - + ; Set __oserror jmp __mappederrno diff --git a/libsrc/apple2/iobuf.s b/libsrc/apple2/iobuf.s index 77433ce61..f5aacb74a 100644 --- a/libsrc/apple2/iobuf.s +++ b/libsrc/apple2/iobuf.s @@ -2,7 +2,7 @@ ; Oliver Schmidt, 10.9.2009 ; ; Default ProDOS 8 I/O buffer management -; +; .export iobuf_alloc, iobuf_free .import _posix_memalign, _free diff --git a/libsrc/apple2/mcbdefault.s b/libsrc/apple2/mcbdefault.s index c24c5df56..556a9d8fb 100644 --- a/libsrc/apple2/mcbdefault.s +++ b/libsrc/apple2/mcbdefault.s @@ -8,13 +8,13 @@ ; .export _mouse_def_callbacks - + .include "apple2.inc" ; ------------------------------------------------------------------------ .bss - + backup: .res 1 visible:.res 1 diff --git a/libsrc/apple2/mou/a2.stdmou.s b/libsrc/apple2/mou/a2.stdmou.s index c3d10f057..dfc69a942 100644 --- a/libsrc/apple2/mou/a2.stdmou.s +++ b/libsrc/apple2/mou/a2.stdmou.s @@ -152,7 +152,7 @@ next: inc ptr1+1 sta xparam+1 sta jump+2 - ; Disable interrupts now because setting the slot number makes + ; Disable interrupts now because setting the slot number makes ; the IRQ handler (maybe called due to some non-mouse IRQ) try ; calling the firmware which isn't correctly set up yet sei @@ -167,7 +167,7 @@ next: inc ptr1+1 asl asl sta yparam+1 - + ; The AppleMouse II Card needs the ROM switched in ; to be able to detect an Apple //e and use RDVBL bit $C082 @@ -175,7 +175,7 @@ next: inc ptr1+1 ; Reset mouse hardware ldx #INITMOUSE jsr firmware - + ; Switch in LC bank 2 for R/O bit $C080 @@ -236,12 +236,12 @@ UNINSTALL: SETBOX: sta ptr1 stx ptr1+1 - + ; Set x clamps ldx #$00 ldy #MOUSE_BOX::MINX jsr :+ - + ; Set y clamps ldx #$01 ldy #MOUSE_BOX::MINY @@ -257,7 +257,7 @@ SETBOX: sta pos1_lo iny lda (ptr1),y - sta box,y + sta box,y sta pos1_hi ; Skip one word @@ -267,11 +267,11 @@ SETBOX: ; Set high clamp iny lda (ptr1),y - sta box,y + sta box,y sta pos2_lo iny lda (ptr1),y - sta box,y + sta box,y sta pos2_hi txa diff --git a/libsrc/apple2/opendir.c b/libsrc/apple2/opendir.c index 040593118..1144d8511 100644 --- a/libsrc/apple2/opendir.c +++ b/libsrc/apple2/opendir.c @@ -57,7 +57,7 @@ extern char _cwd[FILENAME_MAX]; -DIR* __fastcall__ opendir (register const char* name) +DIR* __fastcall__ opendir (register const char* name) { register DIR* dir; diff --git a/libsrc/apple2/write.s b/libsrc/apple2/write.s index 21f4a45a4..d9dd73ca9 100644 --- a/libsrc/apple2/write.s +++ b/libsrc/apple2/write.s @@ -111,4 +111,4 @@ errno: jmp __directerrno ; Set __oserror oserr: jmp __mappederrno - + diff --git a/libsrc/atari/break.s b/libsrc/atari/break.s index 0cfba1c5a..ae4c8e007 100644 --- a/libsrc/atari/break.s +++ b/libsrc/atari/break.s @@ -63,7 +63,7 @@ L1: lda #BANK ; add to BANK address sta STACK+8 ; current page in bank ldx curbank - lda banks,x - sta STACK+2 ; set bank in stack - lda portb_save + lda banks,x + sta STACK+2 ; set bank in stack + lda portb_save sta STACK+10 ; set bank restore in stack sta STACK+18 ; set final restore too @@ -399,7 +399,7 @@ copyfrom_copy: bne @3 inc STACK+16 -@3: jmp copyfrom_copy ; copy another byte +@3: jmp copyfrom_copy ; copy another byte done: rts @@ -418,7 +418,7 @@ COPYTO: ldy #EM_COPY::OFFS lda (ptr3),y - sta STACK+15 ; offset goes into BANK low + sta STACK+15 ; offset goes into BANK low ldy #EM_COPY::PAGE lda (ptr3),y @@ -446,9 +446,9 @@ COPYTO: add #>BANK ; add to BANK address sta STACK+16 ; current page in bank ldx curbank - lda banks,x - sta STACK+10 ; set bank in stack - lda portb_save + lda banks,x + sta STACK+10 ; set bank in stack + lda portb_save sta STACK+2 ; set bank restore in stack sta STACK+18 ; set final restore too @@ -488,5 +488,5 @@ copyto_copy: bne @3 inc STACK+8 -@3: jmp copyto_copy ; copy another byte +@3: jmp copyto_copy ; copy another byte diff --git a/libsrc/atari/mcbtxtchar.s b/libsrc/atari/mcbtxtchar.s index 4ff79c651..95dd1651a 100644 --- a/libsrc/atari/mcbtxtchar.s +++ b/libsrc/atari/mcbtxtchar.s @@ -74,7 +74,7 @@ prep: jsr getcursor ; Get character at cursor position cmp #mouse_txt_char ; "mouse" character bne overwr ; no, probably program has overwritten it - lda backup ; + lda backup ; jmp setcursor ; Draw character overwr: sta backup rts diff --git a/libsrc/atari/randomize.s b/libsrc/atari/randomize.s index ed4400b55..915fee3bd 100644 --- a/libsrc/atari/randomize.s +++ b/libsrc/atari/randomize.s @@ -10,7 +10,7 @@ .include "atari.inc" -__randomize: +__randomize: ldx VCOUNT ; Use vertical line counter as high byte lda RTCLOK+2 ; Use clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/atari/revers.s b/libsrc/atari/revers.s index 719503940..23126a88f 100644 --- a/libsrc/atari/revers.s +++ b/libsrc/atari/revers.s @@ -4,7 +4,7 @@ ; unsigned char revers (unsigned char onoff); ; .include "atari.inc" - + .export _revers .export _revflag diff --git a/libsrc/atari/shadow_ram_handlers.s b/libsrc/atari/shadow_ram_handlers.s index a8ba611b6..eaea35195 100644 --- a/libsrc/atari/shadow_ram_handlers.s +++ b/libsrc/atari/shadow_ram_handlers.s @@ -737,9 +737,9 @@ fn_cont:jsr get_fn_len lda #0 sta ICBLH,x jsr chk_CIO_buf - pla + pla sta ICBLH,x - pla + pla sta ICBLL,x pla tay @@ -756,7 +756,7 @@ chk_CIO_buf: lda ICBAH,x cmp #$c0 bcc @cont -@ret: +@ret: .ifdef DEBUG jsr CIO_buf_noti .endif diff --git a/libsrc/atari/system_check.s b/libsrc/atari/system_check.s index df7c433a4..762fc954f 100644 --- a/libsrc/atari/system_check.s +++ b/libsrc/atari/system_check.s @@ -93,7 +93,7 @@ sdnobw: lda DOS+1 ; SD version ldy #31 ; offset for OSRMFLG lda (DOSVEC),y ; get OSRMFLG bne sdcrts1 - + sdcrts0:clc rts sdcrts1:sec diff --git a/libsrc/atari/xlmemchk.inc b/libsrc/atari/xlmemchk.inc index f8be1c137..ecb874799 100644 --- a/libsrc/atari/xlmemchk.inc +++ b/libsrc/atari/xlmemchk.inc @@ -7,7 +7,7 @@ ; It calculates the value to put into RAMTOP for a subsequent ; "GRAPHICS 0" call, and the lowest address which will be used ; by the screen memory afterwards. -; +; ; inputs: ; __STARTADDRESS__ - load address of the program ; outputs: diff --git a/libsrc/atari5200/conioscreen.s b/libsrc/atari5200/conioscreen.s index 1311e874c..8c78fd44f 100644 --- a/libsrc/atari5200/conioscreen.s +++ b/libsrc/atari5200/conioscreen.s @@ -74,7 +74,7 @@ conio_color: .res 1 dlist: .repeat 3 .byte DL_BLK8 .endrepeat - + .byte DL_CHR20x8x2 | DL_LMS .word SCREEN_BUF diff --git a/libsrc/atari5200/cvline.s b/libsrc/atari5200/cvline.s index 204d90382..b4b3f1a3e 100644 --- a/libsrc/atari5200/cvline.s +++ b/libsrc/atari5200/cvline.s @@ -5,7 +5,7 @@ ; void cvline (unsigned char length); ; .include "atari5200.inc" - + .export _cvlinexy, _cvline .import gotoxy, putchar .importzp tmp1 diff --git a/libsrc/atari5200/extra/conioscreen-20x12.s b/libsrc/atari5200/extra/conioscreen-20x12.s index e591bf05a..aeb11cb43 100644 --- a/libsrc/atari5200/extra/conioscreen-20x12.s +++ b/libsrc/atari5200/extra/conioscreen-20x12.s @@ -74,7 +74,7 @@ conio_color: .res 1 dlist: .repeat 3 .byte DL_BLK8 .endrepeat - + .byte DL_CHR20x16x2 | DL_LMS .word SCREEN_BUF diff --git a/libsrc/atari5200/joy/atr5200std.s b/libsrc/atari5200/joy/atr5200std.s index 989bc5ee0..fb7946bea 100644 --- a/libsrc/atari5200/joy/atr5200std.s +++ b/libsrc/atari5200/joy/atr5200std.s @@ -44,7 +44,7 @@ ; INSTALL: - lda #$04 ; enable POT input from the joystick ports, see section "GTIA" in + lda #$04 ; enable POT input from the joystick ports, see section "GTIA" in sta CONSOL ; http://www.atarimuseum.com/videogames/consoles/5200/conv_to_5200.html lda #JOY_ERR_OK ldx #0 diff --git a/libsrc/atari5200/randomize.s b/libsrc/atari5200/randomize.s index ef462827e..978ccf3f3 100644 --- a/libsrc/atari5200/randomize.s +++ b/libsrc/atari5200/randomize.s @@ -10,7 +10,7 @@ .include "atari5200.inc" -__randomize: +__randomize: ldx VCOUNT ; Use vertical line counter as high byte lda RTCLOK+1 ; Use clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/atari5200/y2k.inc b/libsrc/atari5200/y2k.inc index f8531451c..9f7917cd3 100644 --- a/libsrc/atari5200/y2k.inc +++ b/libsrc/atari5200/y2k.inc @@ -9,16 +9,16 @@ Y2K LDY #$00 ; Copy BIOS opening screen to RAM CPX #$E8 ; Is this a 4 port? BNE Y2K0 ; Jump if not LDA #$42 ; Yes, 4 port system -Y2K0 STA TEMPL -Y2K1 LDA (TEMPL),Y +Y2K0 STA TEMPL +Y2K1 LDA (TEMPL),Y STA $0600,Y - INY + INY BNE Y2K1 LDY #$50 INC TEMPH -Y2K2 LDA (TEMPL),Y +Y2K2 LDA (TEMPL),Y STA $0700,Y - DEY + DEY BPL Y2K2 LDA #$D4 ; Point to copyright string STA $0724 @@ -26,8 +26,8 @@ Y2K2 LDA (TEMPL),Y STA $0725 LDX #$0B ; Store NOP's @ end LDA #$EA -Y2K3 STA $0732,X - DEX +Y2K3 STA $0732,X + DEX BPL Y2K3 LDA #$60 ; Store RTS opcode @ end STA $0750 diff --git a/libsrc/atari7800/crt0.s b/libsrc/atari7800/crt0.s index cefe16730..e791179f3 100644 --- a/libsrc/atari7800/crt0.s +++ b/libsrc/atari7800/crt0.s @@ -19,7 +19,7 @@ start: sei ; Initialize 6502 cld lda #$07 ; Lock machine in 7800 mode - sta INPTCTRL + sta INPTCTRL lda #$7f ; DMA off sta CTRL ldx #0 ; OFFSET must always be 0 @@ -28,7 +28,7 @@ start: dex ; Stack pointer = $ff txs - ; Set up parameter stack + ; Set up parameter stack lda #<(__RAM3_START__ + __RAM3_SIZE__) sta sp lda #>(__RAM3_START__ + __RAM3_SIZE__) @@ -48,7 +48,7 @@ _exit: jsr donelib jmp start -NMIHandler: +NMIHandler: inc _zonecounter jmp IRQStub diff --git a/libsrc/atari7800/joy/atari7800-stdjoy.s b/libsrc/atari7800/joy/atari7800-stdjoy.s index cea6625a4..d76e1d105 100644 --- a/libsrc/atari7800/joy/atari7800-stdjoy.s +++ b/libsrc/atari7800/joy/atari7800-stdjoy.s @@ -85,7 +85,7 @@ COUNT: rts ; ------------------------------------------------------------------------ -; READ: Read a particular joystick passed in A for 2 fire buttons. +; READ: Read a particular joystick passed in A for 2 fire buttons. readbuttons: ; Y has joystick of interest 0/1 diff --git a/libsrc/atmos/cclear.s b/libsrc/atmos/cclear.s index 9d356a8ab..f6416363c 100644 --- a/libsrc/atmos/cclear.s +++ b/libsrc/atmos/cclear.s @@ -6,7 +6,7 @@ ; .export _cclearxy, _cclear - .import setscrptr + .import setscrptr .import rvs .import popax .importzp ptr2 @@ -25,7 +25,7 @@ _cclear: tax ; Is the length zero? beq @L9 ; Jump if done jsr setscrptr ; Set ptr2 to screen, won't use X - lda #' ' + lda #' ' ora rvs @L1: sta (ptr2),y ; Write one char iny ; Next char diff --git a/libsrc/atmos/ctype.s b/libsrc/atmos/ctype.s index 90a3baa6e..57ad8c1a3 100644 --- a/libsrc/atmos/ctype.s +++ b/libsrc/atmos/ctype.s @@ -119,7 +119,7 @@ __ctypeidx: ct_mix CT_NONE_IDX, CT_NONE_IDX ; 186/ba ___________, 187/bb ___________ ct_mix CT_NONE_IDX, CT_NONE_IDX ; 188/bc ___________, 189/bd ___________ ct_mix CT_NONE_IDX, CT_NONE_IDX ; 190/be ___________, 191/bf ___________ - + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 192/c0 ___________, 193/c1 ___________ ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 194/c2 ___________, 195/c3 ___________ ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 196/c4 ___________, 197/c5 ___________ diff --git a/libsrc/c128/emd/c128-vdc.s b/libsrc/c128/emd/c128-vdc.s index e294ddc18..accb82154 100644 --- a/libsrc/c128/emd/c128-vdc.s +++ b/libsrc/c128/emd/c128-vdc.s @@ -73,7 +73,7 @@ INSTALL: lda #$ff sta curpage sta curpage+1 - + ; do test for VDC presence here??? ldx #VDC_CSET ; determine size of RAM... jsr vdcgetreg @@ -97,29 +97,29 @@ INSTALL: jsr vdcputbyte ; restore original value of test byte ldx #0 ; prepare x with hi of default pagecount - + lda ptr1 ; do bytes match? cmp ptr1+1 bne @have64k lda ptr2 cmp ptr2+1 bne @have64k - + lda #64 ; assumes x = 0, here -> p.c = 64 bne @setpagecnt -@have64k: +@have64k: txa ; assumes x = 0, here inx ; so that a/x becomes 0/1 -> p.c. = 256 -@setpagecnt: +@setpagecnt: sta pagecount stx pagecount+1 txa - bne @keep64kBit - + bne @keep64kBit + ldx #VDC_CSET ; restore 16/64k flag - lda vdc_cset_save - jsr vdcputreg + lda vdc_cset_save + jsr vdcputreg @keep64kBit: lda #EM_ERR_OK diff --git a/libsrc/c64/sysuname.s b/libsrc/c64/sysuname.s index 2d185a1c8..1903986c9 100644 --- a/libsrc/c64/sysuname.s +++ b/libsrc/c64/sysuname.s @@ -12,7 +12,7 @@ ;-------------------------------------------------------------------------- ; Data. We define a fixed utsname struct here and just copy it. - + .rodata utsdata: diff --git a/libsrc/cbm/cbm_save.c b/libsrc/cbm/cbm_save.c index 7f774b1b6..2e22b89fc 100644 --- a/libsrc/cbm/cbm_save.c +++ b/libsrc/cbm/cbm_save.c @@ -12,9 +12,9 @@ /* saves a memory area from start to end-1 to a file. */ -unsigned char __fastcall__ cbm_save (const char* name, +unsigned char __fastcall__ cbm_save (const char* name, unsigned char device, - const void* data, + const void* data, unsigned int size) { cbm_k_setlfs(0, device, 0); diff --git a/libsrc/cbm/ctype.s b/libsrc/cbm/ctype.s index 7388f68b8..a66905fe7 100644 --- a/libsrc/cbm/ctype.s +++ b/libsrc/cbm/ctype.s @@ -13,7 +13,7 @@ .include "ctypetable.inc" .export __ctypeidx - + ; The tables are readonly, put them into the rodata segment .rodata diff --git a/libsrc/cbm/opendir.c b/libsrc/cbm/opendir.c index b39e6b77e..87b9ab73d 100644 --- a/libsrc/cbm/opendir.c +++ b/libsrc/cbm/opendir.c @@ -38,7 +38,7 @@ DIR* __fastcall__ opendir (register const char* name) d.fd = open (d.name, O_RDONLY); if (d.fd >= 0) { - /* Skip the load address */ + /* Skip the load address */ if (_dirread (&d, buf, sizeof (buf))) { /* Allocate memory for the DIR structure returned */ diff --git a/libsrc/cbm610/revers.s b/libsrc/cbm610/revers.s index eb44f0282..78b8a0591 100644 --- a/libsrc/cbm610/revers.s +++ b/libsrc/cbm610/revers.s @@ -9,7 +9,7 @@ .import RVS: zp .include "cbm610.inc" - + .proc _revers diff --git a/libsrc/common/_heap.s b/libsrc/common/_heap.s index e2470577a..4ec8c80cd 100644 --- a/libsrc/common/_heap.s +++ b/libsrc/common/_heap.s @@ -39,4 +39,4 @@ initheap: sta __heapend+1 rts - + diff --git a/libsrc/common/_heapmaxavail.s b/libsrc/common/_heapmaxavail.s index 4d44fadc1..19ae18b8d 100644 --- a/libsrc/common/_heapmaxavail.s +++ b/libsrc/common/_heapmaxavail.s @@ -6,7 +6,7 @@ ; size_t _heapmaxavail (void); ; ; - + .importzp ptr1, ptr2 .export __heapmaxavail diff --git a/libsrc/common/_longminstr.c b/libsrc/common/_longminstr.c index ffc35aa77..28a19f39b 100644 --- a/libsrc/common/_longminstr.c +++ b/libsrc/common/_longminstr.c @@ -1,9 +1,9 @@ /* ** Ullrich von Bassewitz, 2012-11-26 ** -** Minimum value of a long. Is used in ascii conversions, since this value +** Minimum value of a long. Is used in ascii conversions, since this value ** has no positive counterpart than can be represented in 32 bits. In C, -** since the compiler will convert to the correct character set for the +** since the compiler will convert to the correct character set for the ** target platform. */ diff --git a/libsrc/common/_seterrno.s b/libsrc/common/_seterrno.s index e35c0b342..79021143a 100644 --- a/libsrc/common/_seterrno.s +++ b/libsrc/common/_seterrno.s @@ -2,7 +2,7 @@ ; Ullrich von Bassewitz, 2004-05-13 ; ; __seterrno: Will set __errno to the value in A and return zero in A. Other -; registers aren't changed. The function is C callable, but +; registers aren't changed. The function is C callable, but ; currently only called from asm code. ; diff --git a/libsrc/common/abort.c b/libsrc/common/abort.c index 1dda559bb..1100d33a3 100644 --- a/libsrc/common/abort.c +++ b/libsrc/common/abort.c @@ -7,7 +7,7 @@ #include -#include +#include #include diff --git a/libsrc/common/ctypemask.s b/libsrc/common/ctypemask.s index b518a10c0..9238f24e9 100644 --- a/libsrc/common/ctypemask.s +++ b/libsrc/common/ctypemask.s @@ -9,7 +9,7 @@ ; ; ctypemask(int c) ; -; converts a character to test via the is*-functions to the matching ctype-masks +; converts a character to test via the is*-functions to the matching ctype-masks ; If c is out of the 8-bit range, the function returns with carry set and accu cleared. ; Return value is in accu and x has to be always clear when returning ; (makes calling code shorter)! diff --git a/libsrc/common/divt.s b/libsrc/common/divt.s index 914eb569d..7f2b4e1bb 100644 --- a/libsrc/common/divt.s +++ b/libsrc/common/divt.s @@ -18,10 +18,10 @@ .importzp sreg, ptr1, tmp1 _div: jsr tosdivax ; Division-operator does most of the work - + ldy sreg ; low byte remainder from sreg sta sreg ; store low byte quotient to sreg - + lda sreg+1 ; high byte remainder from sreg stx sreg+1 ; store high byte quotient to sreg diff --git a/libsrc/common/doesclrscr.s b/libsrc/common/doesclrscr.s index 49ce2fd12..14d9ab804 100644 --- a/libsrc/common/doesclrscr.s +++ b/libsrc/common/doesclrscr.s @@ -7,6 +7,6 @@ ; .export _doesclrscrafterexit - .import return0 + .import return0 _doesclrscrafterexit = return0 diff --git a/libsrc/common/fread.s b/libsrc/common/fread.s index 91d692985..c0733994e 100644 --- a/libsrc/common/fread.s +++ b/libsrc/common/fread.s @@ -161,7 +161,7 @@ bne @L8 ; Error in read. Set the stream error flag and bail out. errno has already -; been set by read(). On entry to label @L7, X must be zero. +; been set by read(). On entry to label @L7, X must be zero. inx ; X = 0 lda #_FERROR diff --git a/libsrc/common/free.s b/libsrc/common/free.s index 00b5e63f8..53796303c 100644 --- a/libsrc/common/free.s +++ b/libsrc/common/free.s @@ -274,7 +274,7 @@ _free: sta ptr2 ; } ; } ; -; +; ; On entry, ptr2 must contain a pointer to the block, which must be at least ; HEAP_MIN_BLOCKSIZE bytes in size, and ptr1 contains the total size of the ; block. diff --git a/libsrc/common/fsetpos.c b/libsrc/common/fsetpos.c index 14690f520..a0cf8d31f 100644 --- a/libsrc/common/fsetpos.c +++ b/libsrc/common/fsetpos.c @@ -21,4 +21,4 @@ int __fastcall__ fsetpos (FILE* f, const fpos_t *pos) return fseek (f, (fpos_t)*pos, SEEK_SET); } - + diff --git a/libsrc/common/fwrite.s b/libsrc/common/fwrite.s index dc0bad1b6..b0fa7ec42 100644 --- a/libsrc/common/fwrite.s +++ b/libsrc/common/fwrite.s @@ -19,7 +19,7 @@ ; ------------------------------------------------------------------------ ; Code - + .proc _fwrite ; Save file and place it into ptr1 diff --git a/libsrc/common/getcwd.s b/libsrc/common/getcwd.s index 4bfc0a5b6..9b856ea7c 100644 --- a/libsrc/common/getcwd.s +++ b/libsrc/common/getcwd.s @@ -53,7 +53,7 @@ overflow: lda #256 sta pagecount stx pagecount+1 -@endok: +@endok: pla sta $01 plp lda #EM_ERR_OK - rts - -test64k: + rts + +test64k: sta tmp1 sty ptr3 lda #0 @@ -186,14 +186,14 @@ MAP: sta curpage sta ptr1+1 ldy #0 sty ptr1 - + lda #window sta ptr2+1 - + jsr transferin - + lda #window rts @@ -299,7 +299,7 @@ COPYFROM: bne @L1 ; Copy the remainder of the page - + @L2: ldy #EM_COPY::COUNT lda (ptr3),y ; Get bytes in last page beq @L4 @@ -391,9 +391,9 @@ vdcgetreg: @L0: bit VDC_ADDR_REG bpl @L0 lda VDC_DATA_REG - rts + rts -vdcputbyte: +vdcputbyte: ldx #VDC_DATA vdcputreg: stx VDC_ADDR_REG diff --git a/libsrc/geos-cbm/file/followchain.s b/libsrc/geos-cbm/file/followchain.s index df20bcaac..9b882d59a 100644 --- a/libsrc/geos-cbm/file/followchain.s +++ b/libsrc/geos-cbm/file/followchain.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _FollowChain: sta r3L stx r3H diff --git a/libsrc/geos-cbm/graph/setnewmode.s b/libsrc/geos-cbm/graph/setnewmode.s index 1d63cf78e..56fc123f7 100644 --- a/libsrc/geos-cbm/graph/setnewmode.s +++ b/libsrc/geos-cbm/graph/setnewmode.s @@ -9,7 +9,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _SetNewMode: lda graphMode eor #$80 diff --git a/libsrc/geos-cbm/system/setdevice.s b/libsrc/geos-cbm/system/setdevice.s index 37a162303..a67c10228 100644 --- a/libsrc/geos-cbm/system/setdevice.s +++ b/libsrc/geos-cbm/system/setdevice.s @@ -8,5 +8,5 @@ .export _SetDevice .include "jumptab.inc" - + _SetDevice = SetDevice diff --git a/libsrc/geos-cbm/tgi/geos-tgi.s b/libsrc/geos-cbm/tgi/geos-tgi.s index 08927e6c1..c04742fb6 100644 --- a/libsrc/geos-cbm/tgi/geos-tgi.s +++ b/libsrc/geos-cbm/tgi/geos-tgi.s @@ -93,7 +93,7 @@ Y2 = ptr4 SCRBASE: .res 1 ; High byte of screen base (64k VDC only) -ERROR: +ERROR: .res 1 ; Error code PALETTE: .res 2 ; The current palette @@ -199,9 +199,9 @@ INSTALL: @endok: lda #0 sta SCRBASE ; draw page 0 as default - rts + rts -test64k: +test64k: sta tmp1 sty ptr3 lda #0 diff --git a/libsrc/geos-common/common/zerobss.s b/libsrc/geos-common/common/zerobss.s index 48fc5a89a..85d3e03eb 100644 --- a/libsrc/geos-common/common/zerobss.s +++ b/libsrc/geos-common/common/zerobss.s @@ -7,7 +7,7 @@ .export zerobss .import __BSS_RUN__, __BSS_SIZE__ - + .include "jumptab.inc" .include "geossym.inc" diff --git a/libsrc/geos-common/conio/_scrsize.s b/libsrc/geos-common/conio/_scrsize.s index 494182b9d..ffb17dec6 100644 --- a/libsrc/geos-common/conio/_scrsize.s +++ b/libsrc/geos-common/conio/_scrsize.s @@ -11,7 +11,7 @@ .importzp cursor_r, cursor_c .import _cursor .constructor initscrsize - + .include "geossym.inc" .segment "ONCE" @@ -38,7 +38,7 @@ L1: lda #40 ; 40 columns (more or less) .code -screensize: +screensize: ldx xsize ldy ysize rts diff --git a/libsrc/geos-common/conio/cputc.s b/libsrc/geos-common/conio/cputc.s index 014c2ed0b..af4194312 100644 --- a/libsrc/geos-common/conio/cputc.s +++ b/libsrc/geos-common/conio/cputc.s @@ -19,7 +19,7 @@ ; ESC_GRAPHICS, ESC_RULER, GOTOX, GOTOY, GOTOXY, NEWCARDSET, all 1..8 ; ; note that there are conflicts between control characters and keyboard: -; HOME = KEY_ENTER, KEY_HOME = REV_ON, +; HOME = KEY_ENTER, KEY_HOME = REV_ON, ; UPLINE = ?, KEY_UPARROW = GOTOY, ... .export _cputcxy, _cputc diff --git a/libsrc/geos-common/conio/cvline.s b/libsrc/geos-common/conio/cvline.s index c12b8764b..9aa3d3eee 100644 --- a/libsrc/geos-common/conio/cvline.s +++ b/libsrc/geos-common/conio/cvline.s @@ -18,7 +18,7 @@ _cvlinexy: jsr gotoxy ; Call this one, will pop params pla ; Restore the length -_cvline: +_cvline: cmp #0 ; Is the length zero? beq L9 ; Jump if done tax diff --git a/libsrc/geos-common/disk/blkalloc.s b/libsrc/geos-common/disk/blkalloc.s index 6bfcb312c..bace80098 100644 --- a/libsrc/geos-common/disk/blkalloc.s +++ b/libsrc/geos-common/disk/blkalloc.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _BlkAlloc: sta r2L stx r2H diff --git a/libsrc/geos-common/disk/calcblksfree.s b/libsrc/geos-common/disk/calcblksfree.s index 5d7b98aba..7e1bb4f52 100644 --- a/libsrc/geos-common/disk/calcblksfree.s +++ b/libsrc/geos-common/disk/calcblksfree.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _CalcBlksFree: lda #curDirHead diff --git a/libsrc/geos-common/disk/freeblock.s b/libsrc/geos-common/disk/freeblock.s index cd8b08d2f..da9a83f86 100644 --- a/libsrc/geos-common/disk/freeblock.s +++ b/libsrc/geos-common/disk/freeblock.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _FreeBlock: jsr gettrse sta r6L diff --git a/libsrc/geos-common/disk/getblock.s b/libsrc/geos-common/disk/getblock.s index cef7ece6f..bb1690827 100644 --- a/libsrc/geos-common/disk/getblock.s +++ b/libsrc/geos-common/disk/getblock.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _GetBlock: sta r4L stx r4H diff --git a/libsrc/geos-common/disk/getptrcurdknm.s b/libsrc/geos-common/disk/getptrcurdknm.s index 7a99225ef..d92e5d91e 100644 --- a/libsrc/geos-common/disk/getptrcurdknm.s +++ b/libsrc/geos-common/disk/getptrcurdknm.s @@ -12,8 +12,8 @@ .include "jumptab.inc" .include "geossym.inc" - -_GetPtrCurDkNm: + +_GetPtrCurDkNm: sta ptr3 stx ptr3+1 ldx #ptr4 diff --git a/libsrc/geos-common/disk/nxtblkalloc.s b/libsrc/geos-common/disk/nxtblkalloc.s index 7427f3de0..560eb0945 100644 --- a/libsrc/geos-common/disk/nxtblkalloc.s +++ b/libsrc/geos-common/disk/nxtblkalloc.s @@ -13,7 +13,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _NxtBlkAlloc: sta r2L stx r2H diff --git a/libsrc/geos-common/disk/opendisk.s b/libsrc/geos-common/disk/opendisk.s index 66bd24d30..9de5fb1d7 100644 --- a/libsrc/geos-common/disk/opendisk.s +++ b/libsrc/geos-common/disk/opendisk.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _OpenDisk: jsr OpenDisk jmp setoserror diff --git a/libsrc/geos-common/disk/putblock.s b/libsrc/geos-common/disk/putblock.s index df1af9f19..4c17274e1 100644 --- a/libsrc/geos-common/disk/putblock.s +++ b/libsrc/geos-common/disk/putblock.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _PutBlock: sta r4L stx r4H diff --git a/libsrc/geos-common/disk/putdirhead.s b/libsrc/geos-common/disk/putdirhead.s index 411b64307..afd7f9b39 100644 --- a/libsrc/geos-common/disk/putdirhead.s +++ b/libsrc/geos-common/disk/putdirhead.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _PutDirHead: jsr PutDirHead jmp setoserror diff --git a/libsrc/geos-common/disk/setnextfree.s b/libsrc/geos-common/disk/setnextfree.s index 410532cea..b24f16f6f 100644 --- a/libsrc/geos-common/disk/setnextfree.s +++ b/libsrc/geos-common/disk/setnextfree.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _SetNextFree: jsr gettrse sta r3L diff --git a/libsrc/geos-common/dlgbox/rstrfrmdialogue.s b/libsrc/geos-common/dlgbox/rstrfrmdialogue.s index efee17465..9119770a0 100644 --- a/libsrc/geos-common/dlgbox/rstrfrmdialogue.s +++ b/libsrc/geos-common/dlgbox/rstrfrmdialogue.s @@ -8,5 +8,5 @@ .export _RstrFrmDialogue .include "jumptab.inc" - + _RstrFrmDialogue = RstrFrmDialogue diff --git a/libsrc/geos-common/drivers/fio_module.s b/libsrc/geos-common/drivers/fio_module.s index 937ef292e..1314fc4c5 100644 --- a/libsrc/geos-common/drivers/fio_module.s +++ b/libsrc/geos-common/drivers/fio_module.s @@ -38,21 +38,21 @@ _open: jsr popax ; Get flags sta tmp1 jsr popptr1 ; Get name - + lda filedesc ; is there a file already open? bne @alreadyopen - + lda tmp1 ; check open mode and #(O_RDWR | O_CREAT) cmp #O_RDONLY ; only O_RDONLY is valid bne @badmode - + lda ptr1 ldx ptr1+1 jsr _FindFile ; try to find the file tax bne @oserror - + lda dirEntryBuf + OFF_DE_TR_SC ; tr&se for ReadByte (r1) sta f_track lda dirEntryBuf + OFF_DE_TR_SC + 1 diff --git a/libsrc/geos-common/drivers/geos-stdmou.s b/libsrc/geos-common/drivers/geos-stdmou.s index 7e544ba82..88bbc7df9 100644 --- a/libsrc/geos-common/drivers/geos-stdmou.s +++ b/libsrc/geos-common/drivers/geos-stdmou.s @@ -5,7 +5,7 @@ ; ; Driver for GEOS standard input device interface ; - + .export _mouse_init, _mouse_done .export _mouse_hide, _mouse_show .export _mouse_box diff --git a/libsrc/geos-common/file/appendrecord.s b/libsrc/geos-common/file/appendrecord.s index 2a7864a13..1ec1e8869 100644 --- a/libsrc/geos-common/file/appendrecord.s +++ b/libsrc/geos-common/file/appendrecord.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _AppendRecord: jsr AppendRecord diff --git a/libsrc/geos-common/file/closerecordfile.s b/libsrc/geos-common/file/closerecordfile.s index ee0778d7b..1c8b19b01 100644 --- a/libsrc/geos-common/file/closerecordfile.s +++ b/libsrc/geos-common/file/closerecordfile.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _CloseRecordFile: jsr CloseRecordFile jmp setoserror diff --git a/libsrc/geos-common/file/deletefile.s b/libsrc/geos-common/file/deletefile.s index 730569e55..b9d994142 100644 --- a/libsrc/geos-common/file/deletefile.s +++ b/libsrc/geos-common/file/deletefile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _DeleteFile: sta r0L stx r0H diff --git a/libsrc/geos-common/file/deleterecord.s b/libsrc/geos-common/file/deleterecord.s index 7ffe5d739..fac73f665 100644 --- a/libsrc/geos-common/file/deleterecord.s +++ b/libsrc/geos-common/file/deleterecord.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _DeleteRecord: jsr DeleteRecord jmp setoserror diff --git a/libsrc/geos-common/file/findfile.s b/libsrc/geos-common/file/findfile.s index 0f58e99e6..285e8d650 100644 --- a/libsrc/geos-common/file/findfile.s +++ b/libsrc/geos-common/file/findfile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _FindFile: sta r6L stx r6H diff --git a/libsrc/geos-common/file/freefile.s b/libsrc/geos-common/file/freefile.s index 791f3f31c..03a8b9d88 100644 --- a/libsrc/geos-common/file/freefile.s +++ b/libsrc/geos-common/file/freefile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _FreeFile: sta r9L stx r9H diff --git a/libsrc/geos-common/file/getfhdrinfo.s b/libsrc/geos-common/file/getfhdrinfo.s index a9a843e74..1503b1cf1 100644 --- a/libsrc/geos-common/file/getfhdrinfo.s +++ b/libsrc/geos-common/file/getfhdrinfo.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _GetFHdrInfo: sta r9L stx r9H diff --git a/libsrc/geos-common/file/getfile.s b/libsrc/geos-common/file/getfile.s index 9c8011542..24f87e859 100644 --- a/libsrc/geos-common/file/getfile.s +++ b/libsrc/geos-common/file/getfile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _GetFile: sta r3L stx r3H diff --git a/libsrc/geos-common/file/openrecordfile.s b/libsrc/geos-common/file/openrecordfile.s index cdab3dd6c..cba5d7c08 100644 --- a/libsrc/geos-common/file/openrecordfile.s +++ b/libsrc/geos-common/file/openrecordfile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _OpenRecordFile: sta r0L stx r0H diff --git a/libsrc/geos-common/file/pointrecord.s b/libsrc/geos-common/file/pointrecord.s index 82b88c4c6..29294737d 100644 --- a/libsrc/geos-common/file/pointrecord.s +++ b/libsrc/geos-common/file/pointrecord.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _PointRecord: jsr PointRecord jmp setoserror diff --git a/libsrc/geos-common/file/readfile.s b/libsrc/geos-common/file/readfile.s index 3b43cffd4..d8b941cde 100644 --- a/libsrc/geos-common/file/readfile.s +++ b/libsrc/geos-common/file/readfile.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _ReadFile: sta r2L stx r2H diff --git a/libsrc/geos-common/file/readrecord.s b/libsrc/geos-common/file/readrecord.s index dd464e0b1..be155c718 100644 --- a/libsrc/geos-common/file/readrecord.s +++ b/libsrc/geos-common/file/readrecord.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _ReadRecord: sta r2L stx r2H diff --git a/libsrc/geos-common/file/writerecord.s b/libsrc/geos-common/file/writerecord.s index e0d4c86d4..33b5fef31 100644 --- a/libsrc/geos-common/file/writerecord.s +++ b/libsrc/geos-common/file/writerecord.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _WriteRecord: sta r2L stx r2H diff --git a/libsrc/geos-common/geosmac.inc b/libsrc/geos-common/geosmac.inc index 5ce20ff7f..6398b7a0b 100644 --- a/libsrc/geos-common/geosmac.inc +++ b/libsrc/geos-common/geosmac.inc @@ -136,7 +136,7 @@ Skip: ;------------------------------------------------------------------------- .macro CmpW source, dest -.local Skip +.local Skip CmpB source+1, dest+1 bne Skip CmpB source+0, dest+0 @@ -203,7 +203,7 @@ Skip: .macro rmb bitNumber, dest pha - lda #(1 << bitNumber) ^ $ff + lda #(1 << bitNumber) ^ $ff and dest sta dest pla diff --git a/libsrc/geos-common/graph/bitotherclip.s b/libsrc/geos-common/graph/bitotherclip.s index ef849f6d7..020139da8 100644 --- a/libsrc/geos-common/graph/bitotherclip.s +++ b/libsrc/geos-common/graph/bitotherclip.s @@ -3,7 +3,7 @@ ; ; 21.12.99 -; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy, +; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy, ; struct iconpic *myGfx); ; both proc1, proc2 should be: char __fastcall something (void); diff --git a/libsrc/geos-common/graph/framerectangle.s b/libsrc/geos-common/graph/framerectangle.s index c5f9de04c..eb3ea8df6 100644 --- a/libsrc/geos-common/graph/framerectangle.s +++ b/libsrc/geos-common/graph/framerectangle.s @@ -8,5 +8,5 @@ .export _FrameRectangle .include "jumptab.inc" - + _FrameRectangle = FrameRectangle diff --git a/libsrc/geos-common/graph/imprintrectangle.s b/libsrc/geos-common/graph/imprintrectangle.s index fc327e9d3..08b28690d 100644 --- a/libsrc/geos-common/graph/imprintrectangle.s +++ b/libsrc/geos-common/graph/imprintrectangle.s @@ -4,10 +4,10 @@ ; 21.12.99 ; void ImprintRectangle (void); - + .export _ImprintRectangle .include "jumptab.inc" - + _ImprintRectangle = ImprintRectangle diff --git a/libsrc/geos-common/graph/invertline.s b/libsrc/geos-common/graph/invertline.s index baa4a6e5a..72fb87afb 100644 --- a/libsrc/geos-common/graph/invertline.s +++ b/libsrc/geos-common/graph/invertline.s @@ -9,7 +9,7 @@ .export _InvertLine .include "jumptab.inc" - + _InvertLine: jsr HLineRegs jmp InvertLine diff --git a/libsrc/geos-common/graph/invertrectangle.s b/libsrc/geos-common/graph/invertrectangle.s index 084187255..52750a8e9 100644 --- a/libsrc/geos-common/graph/invertrectangle.s +++ b/libsrc/geos-common/graph/invertrectangle.s @@ -6,7 +6,7 @@ ; void InvertRectangle (void); .export _InvertRectangle - + .include "jumptab.inc" _InvertRectangle = InvertRectangle diff --git a/libsrc/geos-common/graph/recoverline.s b/libsrc/geos-common/graph/recoverline.s index edc366114..8214242d3 100644 --- a/libsrc/geos-common/graph/recoverline.s +++ b/libsrc/geos-common/graph/recoverline.s @@ -7,7 +7,7 @@ .import HLineRegs .export _RecoverLine - + .include "jumptab.inc" _RecoverLine: diff --git a/libsrc/geos-common/graph/recoverrectangle.s b/libsrc/geos-common/graph/recoverrectangle.s index 009ca81eb..2e494fcbe 100644 --- a/libsrc/geos-common/graph/recoverrectangle.s +++ b/libsrc/geos-common/graph/recoverrectangle.s @@ -4,10 +4,10 @@ ; 29.10.99 ; void RecoverRectangle (void); - + .export _RecoverRectangle .include "jumptab.inc" - + _RecoverRectangle = RecoverRectangle diff --git a/libsrc/geos-common/graph/rectangle.s b/libsrc/geos-common/graph/rectangle.s index a9351c47e..6dc283024 100644 --- a/libsrc/geos-common/graph/rectangle.s +++ b/libsrc/geos-common/graph/rectangle.s @@ -6,7 +6,7 @@ ; void Rectangle (void); .export _Rectangle - + .include "jumptab.inc" _Rectangle = Rectangle diff --git a/libsrc/geos-common/graph/testpoint.s b/libsrc/geos-common/graph/testpoint.s index f2dfb7b5d..ad1dd3fee 100644 --- a/libsrc/geos-common/graph/testpoint.s +++ b/libsrc/geos-common/graph/testpoint.s @@ -10,7 +10,7 @@ .export _TestPoint .include "jumptab.inc" - + _TestPoint: jsr PointRegs jsr TestPoint diff --git a/libsrc/geos-common/graph/verticalline.s b/libsrc/geos-common/graph/verticalline.s index 01fb0b725..1ec89a9d7 100644 --- a/libsrc/geos-common/graph/verticalline.s +++ b/libsrc/geos-common/graph/verticalline.s @@ -5,12 +5,12 @@ ; void VerticalLine (char pattern, char ystart, char yend, int x); - .import popa + .import popa .export _VerticalLine .include "jumptab.inc" .include "geossym.inc" - + _VerticalLine: stx r4H sta r4L diff --git a/libsrc/geos-common/mousesprite/ismseinregion.s b/libsrc/geos-common/mousesprite/ismseinregion.s index 0617490c5..da14c9fe8 100644 --- a/libsrc/geos-common/mousesprite/ismseinregion.s +++ b/libsrc/geos-common/mousesprite/ismseinregion.s @@ -7,7 +7,7 @@ .import _InitDrawWindow .export _IsMseInRegion - + .include "jumptab.inc" _IsMseInRegion: diff --git a/libsrc/geos-common/process/processblock.s b/libsrc/geos-common/process/processblock.s index 84ead5993..17f07f28c 100644 --- a/libsrc/geos-common/process/processblock.s +++ b/libsrc/geos-common/process/processblock.s @@ -12,11 +12,11 @@ .export _UnblockProcess .include "jumptab.inc" - + _BlockProcess: tax jmp BlockProcess - + _UnblockProcess: tax jmp UnblockProcess diff --git a/libsrc/geos-common/process/processfreeze.s b/libsrc/geos-common/process/processfreeze.s index bda914bdc..e77bec2d7 100644 --- a/libsrc/geos-common/process/processfreeze.s +++ b/libsrc/geos-common/process/processfreeze.s @@ -10,11 +10,11 @@ .export _UnfreezeProcess .include "jumptab.inc" - + _FreezeProcess: tax jmp FreezeProcess - + _UnfreezeProcess: tax jmp UnfreezeProcess diff --git a/libsrc/geos-common/process/processinitrestartenable.s b/libsrc/geos-common/process/processinitrestartenable.s index 800c2dc5f..73f030d56 100644 --- a/libsrc/geos-common/process/processinitrestartenable.s +++ b/libsrc/geos-common/process/processinitrestartenable.s @@ -20,11 +20,11 @@ _InitProcesses: stx r0H jsr popa jmp InitProcesses - + _RestartProcess: tax jmp RestartProcess - + _EnableProcess: tax jmp EnableProcess diff --git a/libsrc/joystick/joy_load.s b/libsrc/joystick/joy_load.s index 7115f5d07..97ba7a0cd 100644 --- a/libsrc/joystick/joy_load.s +++ b/libsrc/joystick/joy_load.s @@ -87,7 +87,7 @@ ctrl: .addr _read ; Check the driver signature, install the driver. c is already on stack and ; will get removed by joy_install(). -; Res = joy_install (ctrl.module); +; Res = joy_install (ctrl.module); lda ctrl + MOD_CTRL::MODULE ldx ctrl + MOD_CTRL::MODULE+1 diff --git a/libsrc/lynx/bllhdr.s b/libsrc/lynx/bllhdr.s index 07ed06ffb..c34d7b53b 100644 --- a/libsrc/lynx/bllhdr.s +++ b/libsrc/lynx/bllhdr.s @@ -6,7 +6,7 @@ .import __BSS_LOAD__ .import __MAIN_START__ .export __BLLHDR__: absolute = 1 - + ; ------------------------------------------------------------------------ ; BLL header (BLL header) diff --git a/libsrc/lynx/bootldr.s b/libsrc/lynx/bootldr.s index c8b4ca402..ddc24faed 100644 --- a/libsrc/lynx/bootldr.s +++ b/libsrc/lynx/bootldr.s @@ -155,7 +155,7 @@ secreadbyte0: bne exit ;********************************** -; Select a block +; Select a block ;********************************** seclynxblock: pha diff --git a/libsrc/lynx/cgetc.s b/libsrc/lynx/cgetc.s index 362371ec3..d940b2b94 100644 --- a/libsrc/lynx/cgetc.s +++ b/libsrc/lynx/cgetc.s @@ -19,7 +19,7 @@ ; and Opt1 + Opt2 pressed '3'. ; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'. -_cgetc: +_cgetc: jsr _kbhit ; Check for char available beq _cgetc ora KBSTL diff --git a/libsrc/lynx/eeprom.s b/libsrc/lynx/eeprom.s index 978220cfd..fb0247e90 100644 --- a/libsrc/lynx/eeprom.s +++ b/libsrc/lynx/eeprom.s @@ -252,4 +252,4 @@ EEloop4: rts - + diff --git a/libsrc/lynx/eeprom46.s b/libsrc/lynx/eeprom46.s index 55d9037c0..2b2277e45 100644 --- a/libsrc/lynx/eeprom46.s +++ b/libsrc/lynx/eeprom46.s @@ -4,7 +4,7 @@ ; ; created : 11.05.95 ; last modified : -; +; ; 16.02.96 leaner (thanks to Harry) ; 12.03.96 test for busy after write and erase (well, Harry ;)) ) ; 22.08.97 ported to ra65 for use with cc65 diff --git a/libsrc/lynx/eeprom66.s b/libsrc/lynx/eeprom66.s index 680db8166..6511cf8af 100644 --- a/libsrc/lynx/eeprom66.s +++ b/libsrc/lynx/eeprom66.s @@ -4,7 +4,7 @@ ; ; created : 11.05.95 ; last modified : -; +; ; 16.02.96 leaner (thanks to Harry) ; 12.03.96 test for busy after write and erase (well, Harry ;)) ) ; 22.08.97 ported to ra65 for use with cc65 diff --git a/libsrc/lynx/eeprom86.s b/libsrc/lynx/eeprom86.s index f753b73c3..73b342fae 100644 --- a/libsrc/lynx/eeprom86.s +++ b/libsrc/lynx/eeprom86.s @@ -4,7 +4,7 @@ ; ; created : 11.05.95 ; last modified : -; +; ; 16.02.96 leaner (thanks to Harry) ; 12.03.96 test for busy after write and erase (well, Harry ;)) ) ; 22.08.97 ported to ra65 for use with cc65 diff --git a/libsrc/lynx/exec.s b/libsrc/lynx/exec.s index c0a630a72..307475f1d 100644 --- a/libsrc/lynx/exec.s +++ b/libsrc/lynx/exec.s @@ -6,7 +6,7 @@ ; ; lynx_exec is often used in compilation carts when you run small demos ; created with various (non-cc65) compilers. -; +; ; void lynx_exec(int fileno) ; .importzp _FileDestAddr diff --git a/libsrc/lynx/kbhit.s b/libsrc/lynx/kbhit.s index 90d9061cd..d5b3d1cde 100644 --- a/libsrc/lynx/kbhit.s +++ b/libsrc/lynx/kbhit.s @@ -30,7 +30,7 @@ KBNPR: .byte 0 .code _kbhit: lda KBEDG - bne L1 + bne L1 lda $FCB0 ; Read the Opt buttons and #$0c sta KBTMP diff --git a/libsrc/lynx/lynx-cart.s b/libsrc/lynx/lynx-cart.s index 86e907348..94edff677 100644 --- a/libsrc/lynx/lynx-cart.s +++ b/libsrc/lynx/lynx-cart.s @@ -6,7 +6,7 @@ ; ; Ported to cc65 (http://www.cc65.org) by ; Shawn Jefferson, June 2004 -; +; ; This version by Karri Kaksonen, December 2010 ; ; Helper stuff for the cartridge file functions. This version can deal @@ -16,7 +16,7 @@ .include "lynx.inc" .include "extzp.inc" .export lynxskip0, lynxread0 - .export lynxblock + .export lynxblock .import __BLOCKSIZE__ .code @@ -60,7 +60,7 @@ readbyte0: bne exit ;********************************** -; Select a block +; Select a block ;********************************** lynxblock: pha diff --git a/libsrc/mouse/mouse_load.s b/libsrc/mouse/mouse_load.s index 347250843..a3a3f284d 100644 --- a/libsrc/mouse/mouse_load.s +++ b/libsrc/mouse/mouse_load.s @@ -1,4 +1,4 @@ -; +; ; Ullrich von Bassewitz, 2006-06-05 ; ; unsigned char __fastcall__ mouse_load_driver (const struct mouse_callbacks* c, diff --git a/libsrc/mouse/mouse_move.s b/libsrc/mouse/mouse_move.s index b25716b37..4d809109c 100644 --- a/libsrc/mouse/mouse_move.s +++ b/libsrc/mouse/mouse_move.s @@ -10,7 +10,7 @@ ; .import incsp2 - .import ptr1: zp + .import ptr1: zp .include "mouse-kernel.inc" diff --git a/libsrc/nes/cclear.s b/libsrc/nes/cclear.s index 7a2413826..93f5c7c9a 100644 --- a/libsrc/nes/cclear.s +++ b/libsrc/nes/cclear.s @@ -17,7 +17,7 @@ _cclearxy: _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #$20 ; Blank - screen code jsr cputdirect ; Direct output dec tmp1 diff --git a/libsrc/nes/chline.s b/libsrc/nes/chline.s index d68a77df9..fff229575 100644 --- a/libsrc/nes/chline.s +++ b/libsrc/nes/chline.s @@ -10,7 +10,7 @@ .importzp tmp1 .include "nes.inc" - + _chlinexy: pha ; Save the length jsr gotoxy ; Call this one, will pop params diff --git a/libsrc/nes/gotoy.s b/libsrc/nes/gotoy.s index cfd913f2e..a36e77964 100644 --- a/libsrc/nes/gotoy.s +++ b/libsrc/nes/gotoy.s @@ -19,4 +19,4 @@ .endproc - + diff --git a/libsrc/nes/ppubuf.s b/libsrc/nes/ppubuf.s index 3708b93c1..f08fc1a71 100644 --- a/libsrc/nes/ppubuf.s +++ b/libsrc/nes/ppubuf.s @@ -101,7 +101,7 @@ @end: stx ringread sty ringcount - rts + rts .endproc diff --git a/libsrc/nes/sysuname.s b/libsrc/nes/sysuname.s index 2606d1a60..fcab503e1 100644 --- a/libsrc/nes/sysuname.s +++ b/libsrc/nes/sysuname.s @@ -35,5 +35,5 @@ utsdata: ; machine .asciiz "NES" - + diff --git a/libsrc/osic1p/cclear.s b/libsrc/osic1p/cclear.s index f7e9b2984..e399f14a9 100644 --- a/libsrc/osic1p/cclear.s +++ b/libsrc/osic1p/cclear.s @@ -20,7 +20,7 @@ _cclearxy: _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #' ' jsr cputdirect ; Direct output dec tmp1 diff --git a/libsrc/pce/cclear.s b/libsrc/pce/cclear.s index 14b9d0e8b..e6277eed0 100644 --- a/libsrc/pce/cclear.s +++ b/libsrc/pce/cclear.s @@ -17,7 +17,7 @@ _cclearxy: _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #$20 ; Blank - screen code jsr cputdirect ; Direct output dec tmp1 diff --git a/libsrc/plus4/randomize.s b/libsrc/plus4/randomize.s index 2a7f6a44b..796ad118b 100644 --- a/libsrc/plus4/randomize.s +++ b/libsrc/plus4/randomize.s @@ -11,7 +11,7 @@ .include "plus4.inc" -__randomize: +__randomize: ldx TED_VLINELO ; Use TED rasterline as high byte lda TIME+2 ; Use 60HZ clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/runtime/add.s b/libsrc/runtime/add.s index e644671c0..a4658cc13 100644 --- a/libsrc/runtime/add.s +++ b/libsrc/runtime/add.s @@ -33,13 +33,13 @@ hiadd: txa ; (19) inc sp+1 ; (-1+5) done: tya ; (36) -.else +.else ldy #0 ; (4) adc (sp),y ; (9) lo byte iny ; (11) sta tmp1 ; (14) save it - txa ; (16) + txa ; (16) adc (sp),y ; (21) hi byte tax ; (23) clc ; (25) diff --git a/libsrc/runtime/aslax1.s b/libsrc/runtime/aslax1.s index 14f0be3cc..97ac71c45 100644 --- a/libsrc/runtime/aslax1.s +++ b/libsrc/runtime/aslax1.s @@ -6,7 +6,7 @@ .export aslax1, shlax1 .importzp tmp1 - + aslax1: shlax1: stx tmp1 asl A diff --git a/libsrc/runtime/decsp1.s b/libsrc/runtime/decsp1.s index 5aa7fa204..3c673664a 100644 --- a/libsrc/runtime/decsp1.s +++ b/libsrc/runtime/decsp1.s @@ -20,4 +20,4 @@ - + diff --git a/libsrc/runtime/incsp1.s b/libsrc/runtime/incsp1.s index 43c92dc82..2272e200f 100644 --- a/libsrc/runtime/incsp1.s +++ b/libsrc/runtime/incsp1.s @@ -19,4 +19,4 @@ - + diff --git a/libsrc/runtime/incsp3.s b/libsrc/runtime/incsp3.s index 29067a55e..f54b13920 100644 --- a/libsrc/runtime/incsp3.s +++ b/libsrc/runtime/incsp3.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp4.s b/libsrc/runtime/incsp4.s index 51e9229bb..736438fce 100644 --- a/libsrc/runtime/incsp4.s +++ b/libsrc/runtime/incsp4.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp5.s b/libsrc/runtime/incsp5.s index 164c62524..55cf780d4 100644 --- a/libsrc/runtime/incsp5.s +++ b/libsrc/runtime/incsp5.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp6.s b/libsrc/runtime/incsp6.s index 1a393840e..94c536e7c 100644 --- a/libsrc/runtime/incsp6.s +++ b/libsrc/runtime/incsp6.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp7.s b/libsrc/runtime/incsp7.s index 8a5838137..be8784ecb 100644 --- a/libsrc/runtime/incsp7.s +++ b/libsrc/runtime/incsp7.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/land.s b/libsrc/runtime/land.s index 6ea4e5bcb..8e21ebb60 100644 --- a/libsrc/runtime/land.s +++ b/libsrc/runtime/land.s @@ -10,7 +10,7 @@ .importzp sp, sreg, tmp1 .macpack cpu - + tosand0ax: .if (.cpu .bitand ::CPU_ISET_65SC02) stz sreg @@ -19,7 +19,7 @@ tosand0ax: ldy #$00 sty sreg sty sreg+1 -.endif +.endif tosandeax: .if (.cpu .bitand ::CPU_ISET_65SC02) @@ -29,7 +29,7 @@ tosandeax: ldy #0 and (sp),y ; byte 0 iny -.endif +.endif sta tmp1 txa and (sp),y ; byte 1 diff --git a/libsrc/runtime/ldauisp.s b/libsrc/runtime/ldauisp.s index 1afcf2487..54f4d1bd1 100644 --- a/libsrc/runtime/ldauisp.s +++ b/libsrc/runtime/ldauisp.s @@ -21,4 +21,4 @@ ldauiysp: lda (ptr1),y rts - + diff --git a/libsrc/runtime/leave.s b/libsrc/runtime/leave.s index 4a9ff7994..95dcdec9d 100644 --- a/libsrc/runtime/leave.s +++ b/libsrc/runtime/leave.s @@ -1,4 +1,4 @@ -; +; ; Ullrich von Bassewitz, 06.08.1998 ; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; diff --git a/libsrc/runtime/leq.s b/libsrc/runtime/leq.s index 44316aa08..ac9894b53 100644 --- a/libsrc/runtime/leq.s +++ b/libsrc/runtime/leq.s @@ -7,7 +7,7 @@ .export toseqeax .import toslcmp, booleq -toseqeax: +toseqeax: jsr toslcmp ; Set flags jmp booleq ; Convert to boolean diff --git a/libsrc/runtime/lmod.s b/libsrc/runtime/lmod.s index caeb0c4f6..b8e796dea 100644 --- a/libsrc/runtime/lmod.s +++ b/libsrc/runtime/lmod.s @@ -23,7 +23,7 @@ tosmod0ax: sty sreg+1 .endif -tosmodeax: +tosmodeax: jsr poplsargs ; Get arguments from stack, adjust sign jsr udiv32 ; Do the division, remainder is in (ptr2:tmp3:tmp4) diff --git a/libsrc/runtime/lmul.s b/libsrc/runtime/lmul.s index d3c34637c..90d5f1e97 100644 --- a/libsrc/runtime/lmul.s +++ b/libsrc/runtime/lmul.s @@ -17,10 +17,10 @@ tosumul0ax: stz sreg stz sreg+1 .else - ldy #$00 + ldy #$00 sty sreg sty sreg+1 -.endif +.endif tosmuleax: tosumuleax: @@ -29,7 +29,7 @@ mul32: sta ptr1 .if (.cpu .bitand ::CPU_ISET_65SC02) lda (sp) ldy #1 -.else +.else ldy #0 lda (sp),y iny diff --git a/libsrc/runtime/lor.s b/libsrc/runtime/lor.s index 94ab3c890..f2204b981 100644 --- a/libsrc/runtime/lor.s +++ b/libsrc/runtime/lor.s @@ -8,7 +8,7 @@ .export tosor0ax, tosoreax .import addysp1 .importzp sp, sreg, tmp1 - + .macpack cpu tosor0ax: @@ -19,7 +19,7 @@ tosor0ax: ldy #$00 sty sreg sty sreg+1 -.endif +.endif tosoreax: .if (.cpu .bitand ::CPU_ISET_65SC02) @@ -29,7 +29,7 @@ tosoreax: ldy #0 ora (sp),y ; byte 0 iny -.endif +.endif sta tmp1 txa ora (sp),y ; byte 1 diff --git a/libsrc/runtime/lpop.s b/libsrc/runtime/lpop.s index ffff5ffc1..a90ea5fcb 100644 --- a/libsrc/runtime/lpop.s +++ b/libsrc/runtime/lpop.s @@ -22,7 +22,7 @@ popeax: ldy #3 tax .if (.cpu .bitand ::CPU_ISET_65SC02) lda (sp) -.else +.else dey lda (sp),y .endif diff --git a/libsrc/runtime/lpush.s b/libsrc/runtime/lpush.s index 4fed77f05..0bc67b523 100644 --- a/libsrc/runtime/lpush.s +++ b/libsrc/runtime/lpush.s @@ -41,9 +41,9 @@ pusheax: pla .if (.cpu .bitand ::CPU_ISET_65SC02) sta (sp) -.else +.else dey sta (sp),y -.endif +.endif rts diff --git a/libsrc/runtime/lrsub.s b/libsrc/runtime/lrsub.s index 928164f40..5e8d0b543 100644 --- a/libsrc/runtime/lrsub.s +++ b/libsrc/runtime/lrsub.s @@ -29,7 +29,7 @@ tosrsubeax: .if (.cpu .bitand ::CPU_ISET_65SC02) sbc (sp) ldy #1 -.else +.else ldy #0 sbc (sp),y ; byte 0 iny diff --git a/libsrc/runtime/lsub.s b/libsrc/runtime/lsub.s index 6f80491ca..4c50ded14 100644 --- a/libsrc/runtime/lsub.s +++ b/libsrc/runtime/lsub.s @@ -21,7 +21,7 @@ tossub0ax: ldy #$00 sty sreg sty sreg+1 -.endif +.endif tossubeax: sec diff --git a/libsrc/runtime/lsubeq.s b/libsrc/runtime/lsubeq.s index 5e3d25783..b16ab18e1 100644 --- a/libsrc/runtime/lsubeq.s +++ b/libsrc/runtime/lsubeq.s @@ -1,4 +1,4 @@ -; +; ; Ullrich von Bassewitz, 07.04.2000 ; Christian Krueger, 12-Mar-2017, added 65SC02 optimization ; @@ -22,19 +22,19 @@ lsubeqa: stx sreg+1 lsubeq: sty ptr1+1 ; Store high byte of address - + sec eor #$FF .if (.cpu .bitand ::CPU_ISET_65SC02) adc (ptr1) ; Subtract byte 0 sta (ptr1) - ldy #$01 ; Address byte 1 + ldy #$01 ; Address byte 1 .else ldy #$00 ; Address low byte adc (ptr1),y ; Subtract byte 0 sta (ptr1),y - iny ; Address byte 1 - .endif + iny ; Address byte 1 + .endif pha ; Save byte 0 of result for later txa eor #$FF diff --git a/libsrc/runtime/ltest.s b/libsrc/runtime/ltest.s index 6027b8dd4..d0caf2197 100644 --- a/libsrc/runtime/ltest.s +++ b/libsrc/runtime/ltest.s @@ -17,6 +17,6 @@ utsteax: beq L9 tya ldy #1 ; Force NE -L9: rts +L9: rts diff --git a/libsrc/runtime/ludiv.s b/libsrc/runtime/ludiv.s index 8a3126d72..e2e27371e 100644 --- a/libsrc/runtime/ludiv.s +++ b/libsrc/runtime/ludiv.s @@ -21,7 +21,7 @@ tosudiv0ax: sty sreg+1 .endif -tosudiveax: +tosudiveax: jsr getlop ; Get the paramameters jsr udiv32 ; Do the division lda ptr1 ; Result is in ptr1:sreg diff --git a/libsrc/runtime/lumod.s b/libsrc/runtime/lumod.s index 241801a90..09909c0c9 100644 --- a/libsrc/runtime/lumod.s +++ b/libsrc/runtime/lumod.s @@ -11,7 +11,7 @@ .macpack cpu -tosumod0ax: +tosumod0ax: .if (.cpu .bitand ::CPU_ISET_65SC02) stz sreg stz sreg+1 diff --git a/libsrc/runtime/lxor.s b/libsrc/runtime/lxor.s index 4ec9a4129..a92a59959 100644 --- a/libsrc/runtime/lxor.s +++ b/libsrc/runtime/lxor.s @@ -25,7 +25,7 @@ tosxoreax: .if (.cpu .bitand ::CPU_ISET_65SC02) eor (sp) ; byte 0 ldy #1 -.else +.else ldy #0 eor (sp),y ; byte 0 iny diff --git a/libsrc/runtime/mul.s b/libsrc/runtime/mul.s index 087e639fc..68cdea0c6 100644 --- a/libsrc/runtime/mul.s +++ b/libsrc/runtime/mul.s @@ -23,7 +23,7 @@ tosumulax: ; Do ptr4:ptr4+1 * ptr1:ptr1+1 --> AX - tya ; A = 0 + tya ; A = 0 ldy ptr1+1 ; check if lhs is 8 bit only beq @L4 ; -> we can do 8x16 after swap sta tmp1 @@ -36,7 +36,7 @@ tosumulax: clc adc ptr1 tax - lda ptr1+1 ; Hi byte of left op + lda ptr1+1 ; Hi byte of left op adc tmp1 sta tmp1 txa diff --git a/libsrc/runtime/mulax3.s b/libsrc/runtime/mulax3.s index 513ba723e..342379605 100644 --- a/libsrc/runtime/mulax3.s +++ b/libsrc/runtime/mulax3.s @@ -7,7 +7,7 @@ .export mulax3 .importzp ptr1 - + .proc mulax3 sta ptr1 diff --git a/libsrc/runtime/or.s b/libsrc/runtime/or.s index 1c2c4125e..735f30f61 100644 --- a/libsrc/runtime/or.s +++ b/libsrc/runtime/or.s @@ -21,7 +21,7 @@ tosorax: ldy #0 ora (sp),y iny -.endif +.endif sta tmp1 txa ora (sp),y diff --git a/libsrc/runtime/pushaff.s b/libsrc/runtime/pushaff.s index 08d988bb2..ae2142b0e 100644 --- a/libsrc/runtime/pushaff.s +++ b/libsrc/runtime/pushaff.s @@ -17,4 +17,4 @@ .endproc - + diff --git a/libsrc/runtime/pushax.s b/libsrc/runtime/pushax.s index cba313c2f..ac181b994 100644 --- a/libsrc/runtime/pushax.s +++ b/libsrc/runtime/pushax.s @@ -30,6 +30,6 @@ pusha0: ldx #0 pla ; (31) dey ; (33) sta (sp),y ; (38) - rts ; (44) + rts ; (44) .endproc diff --git a/libsrc/runtime/return0.s b/libsrc/runtime/return0.s index c061e013c..331f3334f 100644 --- a/libsrc/runtime/return0.s +++ b/libsrc/runtime/return0.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/return1.s b/libsrc/runtime/return1.s index 76153f3e1..e39cdf74e 100644 --- a/libsrc/runtime/return1.s +++ b/libsrc/runtime/return1.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/swap.s b/libsrc/runtime/swap.s index d4a74df5f..5358e08d3 100644 --- a/libsrc/runtime/swap.s +++ b/libsrc/runtime/swap.s @@ -23,13 +23,13 @@ swapstk: tay lda ptr4 sta (sp) - tya -.else + tya +.else dey lda (sp),y pha lda ptr4 sta (sp),y pla -.endif +.endif rts ; whew! diff --git a/libsrc/runtime/umod.s b/libsrc/runtime/umod.s index 5788d569e..205df59d7 100644 --- a/libsrc/runtime/umod.s +++ b/libsrc/runtime/umod.s @@ -25,4 +25,4 @@ tosumodax: ldx sreg+1 rts - + diff --git a/libsrc/runtime/umul16x16r32.s b/libsrc/runtime/umul16x16r32.s index cd2dae351..cfcf82d9e 100644 --- a/libsrc/runtime/umul16x16r32.s +++ b/libsrc/runtime/umul16x16r32.s @@ -12,7 +12,7 @@ ;--------------------------------------------------------------------------- ; 16x16 => 32 unsigned multiplication routine. Because the overhead for a -; 16x16 => 16 unsigned multiplication routine is small, we will tag it with +; 16x16 => 16 unsigned multiplication routine is small, we will tag it with ; the matching labels, as well. ; ; routine LHS RHS result result also in diff --git a/libsrc/sym1/read.s b/libsrc/sym1/read.s index c041664da..5f6a71144 100644 --- a/libsrc/sym1/read.s +++ b/libsrc/sym1/read.s @@ -48,6 +48,6 @@ putch: ldy #$00 ; Put char into return buffer done: lda ptr3 ldx ptr3+1 - rts ; Return count + rts ; Return count .endproc diff --git a/libsrc/sym1/write.s b/libsrc/sym1/write.s index dbe738468..008902e58 100644 --- a/libsrc/sym1/write.s +++ b/libsrc/sym1/write.s @@ -13,7 +13,7 @@ .proc _write - sta ptr3 + sta ptr3 stx ptr3+1 ; Count in ptr3 inx stx ptr2+1 ; Increment and store in ptr2 diff --git a/libsrc/telestrat/cclear.s b/libsrc/telestrat/cclear.s index b9fce4708..804381e89 100644 --- a/libsrc/telestrat/cclear.s +++ b/libsrc/telestrat/cclear.s @@ -6,9 +6,9 @@ ; .export _cclearxy, _cclear - .import update_adscr, display_conio + .import update_adscr, display_conio - .importzp tmp1 + .importzp tmp1 .import popax .include "telestrat.inc" diff --git a/libsrc/telestrat/chline.s b/libsrc/telestrat/chline.s index 91f3bdc9f..cd7628eca 100644 --- a/libsrc/telestrat/chline.s +++ b/libsrc/telestrat/chline.s @@ -4,7 +4,7 @@ ; .export _chlinexy, _chline - + .import rvs, display_conio, update_adscr .import popax @@ -22,7 +22,7 @@ _chlinexy: _chline: tax ; Is the length zero? beq @L9 ; Jump if done -@L1: +@L1: lda #'-' ; Horizontal line screen code ora rvs diff --git a/libsrc/telestrat/clrscr.s b/libsrc/telestrat/clrscr.s index c02c26647..749e40b8f 100644 --- a/libsrc/telestrat/clrscr.s +++ b/libsrc/telestrat/clrscr.s @@ -4,7 +4,7 @@ .export _clrscr .import OLD_CHARCOLOR, OLD_BGCOLOR, BGCOLOR, CHARCOLOR - + .include "telestrat.inc" .proc _clrscr @@ -35,13 +35,13 @@ ldx #$00 stx SCRY stx SCRX - + stx OLD_BGCOLOR ; Black stx BGCOLOR - + ldx #$07 ; White stx OLD_CHARCOLOR stx CHARCOLOR - + rts .endproc diff --git a/libsrc/telestrat/cputc.s b/libsrc/telestrat/cputc.s index 16b13f8cd..13714b32d 100644 --- a/libsrc/telestrat/cputc.s +++ b/libsrc/telestrat/cputc.s @@ -6,7 +6,7 @@ .export _cputc, _cputcxy, cputdirect, display_conio .export CHARCOLOR, OLD_CHARCOLOR, BGCOLOR, OLD_BGCOLOR - + .import update_adscr .import popax @@ -19,13 +19,13 @@ _cputcxy: sta SCRY ; Store Y stx SCRX ; Store X jsr update_adscr - pla + pla _cputc: cmp #$0D bne @not_CR ldy #$00 - sty SCRX + sty SCRX rts @not_CR: cmp #$0A @@ -80,10 +80,10 @@ do_not_change_color: sty SCRX inc SCRY - + jmp update_adscr - -@no_inc: + +@no_inc: sty SCRX rts .endproc diff --git a/libsrc/telestrat/gotoxy.s b/libsrc/telestrat/gotoxy.s index 3fbdc25e0..c0907a623 100644 --- a/libsrc/telestrat/gotoxy.s +++ b/libsrc/telestrat/gotoxy.s @@ -19,7 +19,7 @@ gotoxy: jsr popa ; Get Y ; In telemon, there is a position for the prompt, and another for the cursor. sta SCRY - + jsr popa sta SCRX @@ -48,6 +48,6 @@ skip: sta ADSCR dey bne loop -out: +out: rts .endproc diff --git a/libsrc/telestrat/joy/telestrat.s b/libsrc/telestrat/joy/telestrat.s index e4a6d94f2..0f5d28651 100644 --- a/libsrc/telestrat/joy/telestrat.s +++ b/libsrc/telestrat/joy/telestrat.s @@ -52,7 +52,7 @@ INSTALL: lda #%11000000 sta VIA2::DDRB sta VIA2::PRB - ; We could detect joysticks because with previous command bit0,1,2,3,4 should be set to 1 after + ; We could detect joysticks because with previous command bit0,1,2,3,4 should be set to 1 after ; But if some one press fire or press direction, we could reach others values which could break joystick detection. lda #JOY_ERR_OK @@ -83,7 +83,7 @@ COUNT: ; PB7 and PB6 select right or left port ; When PB7 and PB6 are high, it controls two CA3083 (2 NPN transistors array) bases. ; In that case, PB0 to PB4 are set to high (it means no action are pressed) -; When the user press something then bit will be set to 0. +; When the user press something then bit will be set to 0. ; Bit 0 is right ; Bit 1 is left ; Bit 2 is fire @@ -94,18 +94,18 @@ READ: lda VIA2::PRB and #%01111111 - ora #%01000000 + ora #%01000000 sta VIA2::PRB ; then read lda VIA2::PRB eor #%01011111 - + rts -right: +right: lda VIA2::PRB and #%10111111 ora #%10000000 - sta VIA2::PRB + sta VIA2::PRB ; then read lda VIA2::PRB diff --git a/libsrc/telestrat/orixhdr.s b/libsrc/telestrat/orixhdr.s index 58e93efbb..78d6c945a 100644 --- a/libsrc/telestrat/orixhdr.s +++ b/libsrc/telestrat/orixhdr.s @@ -24,7 +24,7 @@ .byte $01 ; Version of the header .byte $00,%00000000 ; 6502 only .byte $00,$00 ; Type of language - .byte $00,$00 ; OS version + .byte $00,$00 ; OS version .byte $00 ; Reserved .byte $00 ; Auto or not diff --git a/libsrc/telestrat/sound.s b/libsrc/telestrat/sound.s index 3718debd4..2a786a452 100644 --- a/libsrc/telestrat/sound.s +++ b/libsrc/telestrat/sound.s @@ -33,7 +33,7 @@ sound_bip_keyboard: rts .endproc -.proc _zap +.proc _zap BRK_TELEMON XZAP rts .endproc diff --git a/libsrc/telestrat/syschdir.s b/libsrc/telestrat/syschdir.s index 09763bdbb..6257880b8 100644 --- a/libsrc/telestrat/syschdir.s +++ b/libsrc/telestrat/syschdir.s @@ -11,7 +11,7 @@ .include "telestrat.inc" .include "zeropage.inc" - + __syschdir: ; Throw away all parameters except the name @@ -24,9 +24,9 @@ __syschdir: stx tmp1 ldy tmp1 - + ; Call telemon primitive - + BRK_TELEMON(XPUTCWD) jmp initcwd ; Update cwd diff --git a/libsrc/telestrat/sysmkdir.s b/libsrc/telestrat/sysmkdir.s index 26d97c4b0..259be8d7c 100644 --- a/libsrc/telestrat/sysmkdir.s +++ b/libsrc/telestrat/sysmkdir.s @@ -9,7 +9,7 @@ .include "telestrat.inc" .include "zeropage.inc" - + __sysmkdir: ; Throw away all parameters except the name @@ -19,11 +19,11 @@ __sysmkdir: ; Get name jsr popax - + ; Call telemon primitive - + BRK_TELEMON(XMKDIR) - + rts diff --git a/libsrc/telestrat/tgi/telestrat-228-200-3.s b/libsrc/telestrat/tgi/telestrat-228-200-3.s index 7eda27bc9..402e04e7e 100644 --- a/libsrc/telestrat/tgi/telestrat-228-200-3.s +++ b/libsrc/telestrat/tgi/telestrat-228-200-3.s @@ -107,7 +107,7 @@ INIT: ; Switch into graphics mode. BRK_TELEMON(XHIRES) - + ; Done, reset the error code. lda #TGI_ERR_OK @@ -255,18 +255,18 @@ GETDEFPALETTE: SETPIXEL: lda #$80 - + SETPIXELSETMODE: sta HRSFB lda X1 sta HRS1 lda Y1 sta HRS2 - - + + BRK_TELEMON(XCURSE) - + rts ; ------------------------------------------------------------------------ @@ -291,7 +291,7 @@ LINE: sta HRS1 lda Y1 sta HRS2 - + lda X2 sta HRS3 lda Y2 @@ -300,14 +300,14 @@ LINE: lda X1+1 sta HRS1+1 - lda Y1+1 + lda Y1+1 sta HRS2+1 lda X2+1 sta HRS3+1 - - lda Y2+1 - sta HRS4+1 + + lda Y2+1 + sta HRS4+1 lda #$FF sta HRSPAT @@ -315,12 +315,12 @@ LINE: BRK_TELEMON(XDRAWA) rts - - + + CIRCLE: ; not done yet rts - + ; ------------------------------------------------------------------------ ; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where ; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4, using the current drawing color. @@ -364,11 +364,11 @@ OUTTEXT: ; put hires cursor in X & Y lda #$00 jsr SETPIXELSETMODE - - + + ; count the length of the string ldy #$00 -loop: +loop: lda (ptr3),y beq out iny @@ -376,10 +376,10 @@ loop: out: ; XSCHAR routine from telemon needs to have the length of the string in X register ; copy Y register to X register. It could be optimized in 65C02 with TYX - tya + tya tax - + lda ptr3 ; XSCHAR needs in A and Y the address of the string - ldy ptr3+1 + ldy ptr3+1 BRK_TELEMON(XSCHAR) rts diff --git a/libsrc/telestrat/tgi/telestrat-240-200-2.s b/libsrc/telestrat/tgi/telestrat-240-200-2.s index 7a6bb8a4c..d619fc6f1 100644 --- a/libsrc/telestrat/tgi/telestrat-240-200-2.s +++ b/libsrc/telestrat/tgi/telestrat-240-200-2.s @@ -124,7 +124,7 @@ INIT: ; Switch into graphics mode BRK_TELEMON(XHIRES) - + ; Done, reset the error code lda #TGI_ERR_OK @@ -247,17 +247,17 @@ GETDEFPALETTE: ; SETPIXEL: - lda #$80 ; curset on -SETPIXELSETMODE: + lda #$80 ; curset on +SETPIXELSETMODE: sta HRSFB - + lda X1 sta HRS1 lda Y1 sta HRS2 - - - + + + BRK_TELEMON(XCURSE) rts @@ -289,19 +289,19 @@ LINE: sta HRS3 lda Y2 sta HRS4 - + lda X1+1 sta HRS1+1 - lda Y1+1 + lda Y1+1 sta HRS2+1 lda X2+1 sta HRS3+1 - - lda Y2+1 - sta HRS4+1 + + lda Y2+1 + sta HRS4+1 lda #$FF sta HRSPAT @@ -309,11 +309,11 @@ LINE: BRK_TELEMON(XDRAWA) rts - -CIRCLE: + +CIRCLE: ; not done yet - rts - + rts + ; ------------------------------------------------------------------------ ; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where ; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4 using the current drawing color. @@ -357,11 +357,11 @@ OUTTEXT: ; put hires cursor in X & Y lda #$00 jsr SETPIXELSETMODE - - + + ; count the length of the string ldy #$00 -loop: +loop: lda (ptr3),y beq out iny @@ -369,10 +369,10 @@ loop: out: ; XSCHAR routine from telemon needs to have the length of the string in X register ; copy Y register to X register. It could be optimized in 65C02 with TYX - tya + tya tax - + lda ptr3 ; XSCHAR needs in A and Y the address of the string - ldy ptr3+1 + ldy ptr3+1 BRK_TELEMON(XSCHAR) rts diff --git a/libsrc/tgi/tgi_gettextheight.s b/libsrc/tgi/tgi_gettextheight.s index 38df6a69a..bd05386c1 100644 --- a/libsrc/tgi/tgi_gettextheight.s +++ b/libsrc/tgi/tgi_gettextheight.s @@ -15,7 +15,7 @@ ; */ ; -.proc _tgi_gettextheight +.proc _tgi_gettextheight ldy _tgi_font bne @L2 ; Jump if vector font diff --git a/libsrc/tgi/tgi_imulround.s b/libsrc/tgi/tgi_imulround.s index 112f2930f..7b7f25b78 100644 --- a/libsrc/tgi/tgi_imulround.s +++ b/libsrc/tgi/tgi_imulround.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 2009-11-05 ; -; Helper function for graphics functions: Multiply two values, one being +; Helper function for graphics functions: Multiply two values, one being ; an 8.8 fixed point one, and return the rounded and scaled result. ; ; The module has two entry points: One is C callable and expects the @@ -60,4 +60,4 @@ tgi_imulround: tya rts - + diff --git a/libsrc/tgi/tgi_lineto.s b/libsrc/tgi/tgi_lineto.s index abe4b3f96..6934bfe2c 100644 --- a/libsrc/tgi/tgi_lineto.s +++ b/libsrc/tgi/tgi_lineto.s @@ -17,7 +17,7 @@ @L1: lda _tgi_curx,y sta tgi_clip_x1,y dey - bpl @L1 + bpl @L1 pla jsr tgi_linepop ; Pop x2/y2 jmp tgi_clippedline ; Call the line clipper diff --git a/libsrc/tgi/tgi_outtext.s b/libsrc/tgi/tgi_outtext.s index 079cea3af..e0a3c6d25 100644 --- a/libsrc/tgi/tgi_outtext.s +++ b/libsrc/tgi/tgi_outtext.s @@ -125,7 +125,7 @@ VectorFont: jsr MoveCursor ; Move the graphics cursor ; Next char in string - + inc text bne @L1 inc text+1 diff --git a/libsrc/tgi/tgidrv_line.inc b/libsrc/tgi/tgidrv_line.inc index e904b5117..5fd6b229e 100644 --- a/libsrc/tgi/tgidrv_line.inc +++ b/libsrc/tgi/tgidrv_line.inc @@ -269,7 +269,7 @@ abs: ; A/Y := abs (A/Y) cpy #$00 bpl :+ - + ; A/Y := neg (A/Y) neg: clc eor #$FF