Removed (pretty inconsistently used) tab chars from source code base.
This commit is contained in:
@@ -8,37 +8,37 @@
|
||||
; void gotoy (unsigned char y);
|
||||
; void gotoxy (unsigned char x, unsigned char y);
|
||||
|
||||
.export _gotox, _gotoy, _gotoxy, fixcursor
|
||||
.import popa
|
||||
.importzp cursor_x, cursor_y, cursor_c, cursor_r
|
||||
.export _gotox, _gotoy, _gotoxy, fixcursor
|
||||
.import popa
|
||||
.importzp cursor_x, cursor_y, cursor_c, cursor_r
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_gotox:
|
||||
sta cursor_c
|
||||
jmp fixcursor
|
||||
sta cursor_c
|
||||
jmp fixcursor
|
||||
|
||||
_gotoy:
|
||||
sta cursor_r
|
||||
jmp fixcursor
|
||||
sta cursor_r
|
||||
jmp fixcursor
|
||||
|
||||
_gotoxy:
|
||||
sta cursor_r
|
||||
jsr popa
|
||||
sta cursor_c
|
||||
sta cursor_r
|
||||
jsr popa
|
||||
sta cursor_c
|
||||
|
||||
; convert 8x8 x/y coordinates to GEOS hires
|
||||
fixcursor:
|
||||
lda cursor_c
|
||||
sta cursor_x
|
||||
lda #0
|
||||
sta cursor_x+1
|
||||
ldx #cursor_x
|
||||
ldy #3
|
||||
jsr DShiftLeft
|
||||
lda cursor_r
|
||||
asl a
|
||||
asl a
|
||||
asl a
|
||||
sta cursor_y
|
||||
rts
|
||||
lda cursor_c
|
||||
sta cursor_x
|
||||
lda #0
|
||||
sta cursor_x+1
|
||||
ldx #cursor_x
|
||||
ldy #3
|
||||
jsr DShiftLeft
|
||||
lda cursor_r
|
||||
asl a
|
||||
asl a
|
||||
asl a
|
||||
sta cursor_y
|
||||
rts
|
||||
|
||||
Reference in New Issue
Block a user