mirror of
https://github.com/cc65/cc65.git
synced 2024-09-21 18:47:31 +00:00
Normalized coding style.
git-svn-id: svn://svn.cc65.org/cc65/trunk@5497 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
ol.sc
parent
75dc65c217
commit
d30ecfbd0e
@ -10,7 +10,6 @@
|
||||
|
||||
void _afailed (char* file, unsigned line)
|
||||
{
|
||||
|
||||
ExitTurbo();
|
||||
|
||||
drawWindow.top = 0;
|
||||
|
||||
@ -6,6 +6,7 @@
|
||||
|
||||
.export copydata
|
||||
.import __DATA_LOAD__, __DATA_RUN__, __DATA_SIZE__
|
||||
|
||||
.include "geossym.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
@ -7,14 +7,14 @@
|
||||
|
||||
S_OBJS += _scrsize.o \
|
||||
cclear.o \
|
||||
chline.o \
|
||||
cvline.o \
|
||||
cgetc.o \
|
||||
chline.o \
|
||||
clrscr.o \
|
||||
color.o \
|
||||
cputc.o \
|
||||
cpputs.o \
|
||||
cputc.o \
|
||||
cursor.o \
|
||||
cvline.o \
|
||||
gotoxy.o \
|
||||
kbhit.o \
|
||||
revers.o \
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -7,14 +6,14 @@
|
||||
; 6.3.2001, 17.4.2003
|
||||
|
||||
|
||||
.include "geossym.inc"
|
||||
|
||||
.export xsize, ysize
|
||||
.export screensize
|
||||
.importzp cursor_r, cursor_c
|
||||
.importz cursor_r, cursor_c
|
||||
.import _cursor
|
||||
.constructor initscrsize
|
||||
|
||||
.include "geossym.inc"
|
||||
|
||||
.segment "INIT"
|
||||
|
||||
initscrsize:
|
||||
@ -46,5 +45,7 @@ screensize:
|
||||
|
||||
.bss
|
||||
|
||||
xsize: .res 1
|
||||
ysize: .res 1
|
||||
xsize:
|
||||
.res 1
|
||||
ysize:
|
||||
.res 1
|
||||
|
||||
@ -6,13 +6,13 @@
|
||||
; void cclearxy (unsigned char x, unsigned char y, unsigned char length);
|
||||
; void cclear (unsigned char length);
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
.export _cclearxy, _cclear
|
||||
.import popa, _gotoxy, fixcursor
|
||||
.importzp cursor_x, cursor_y, cursor_c
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_cclearxy:
|
||||
pha ; Save the length
|
||||
jsr popa ; Get y
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
|
||||
@ -6,13 +6,13 @@
|
||||
; void chlinexy (unsigned char x, unsigned char y, unsigned char length);
|
||||
; void chline (unsigned char length);
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
.export _chlinexy, _chline
|
||||
.import popa, _gotoxy, fixcursor
|
||||
.importzp cursor_x, cursor_y, cursor_c
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_chlinexy:
|
||||
pha ; Save the length
|
||||
jsr popa ; Get y
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -7,14 +6,13 @@
|
||||
; void clrscr (void);
|
||||
|
||||
.export _clrscr
|
||||
.import fixcursor
|
||||
.importzp cursor_c, cursor_r
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "const.inc"
|
||||
|
||||
.import fixcursor
|
||||
.importzp cursor_c, cursor_r
|
||||
|
||||
_clrscr:
|
||||
lda #ST_WR_FORE | ST_WR_BACK
|
||||
sta dispBufferOn
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -12,7 +11,6 @@
|
||||
; does not update cursor position
|
||||
|
||||
.export _cpputsxy, _cpputs
|
||||
|
||||
.import _gotoxy
|
||||
.import popa
|
||||
.importzp cursor_x, cursor_y
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -24,7 +23,6 @@
|
||||
; UPLINE = ?, KEY_UPARROW = GOTOY, ...
|
||||
|
||||
.export _cputcxy, _cputc, update_cursor
|
||||
|
||||
.import _gotoxy, fixcursor
|
||||
.import popa
|
||||
.import xsize,ysize
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -9,6 +8,7 @@
|
||||
.export _cursor
|
||||
.import update_cursor
|
||||
.importzp cursor_flag
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
@ -6,13 +6,13 @@
|
||||
; void cvlinexy (unsigned char x, unsigned char y, unsigned char length);
|
||||
; void cvline (unsigned char length);
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
.export _cvlinexy, _cvline
|
||||
.import popa, _gotoxy, fixcursor
|
||||
.importzp cursor_x, cursor_y, cursor_r
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_cvlinexy:
|
||||
pha ; Save the length
|
||||
jsr popa ; Get y
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -15,14 +14,17 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_gotox: sta cursor_c
|
||||
_gotox:
|
||||
sta cursor_c
|
||||
jmp fixcursor
|
||||
|
||||
_gotoy: sta cursor_r
|
||||
_gotoy:
|
||||
sta cursor_r
|
||||
inc cursor_r
|
||||
jmp fixcursor
|
||||
|
||||
_gotoxy: sta cursor_r
|
||||
_gotoxy:
|
||||
sta cursor_r
|
||||
inc cursor_r
|
||||
jsr popa
|
||||
sta cursor_c
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -10,13 +9,10 @@
|
||||
|
||||
.include "geossym.inc"
|
||||
|
||||
.proc _kbhit
|
||||
|
||||
_kbhit:
|
||||
ldx #0 ; High byte of result
|
||||
lda pressFlag
|
||||
rol ; Bit 7 is new key flag
|
||||
txa ; A = 0
|
||||
rol
|
||||
rts
|
||||
|
||||
.endproc
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
|
||||
@ -1,4 +1,3 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
;
|
||||
@ -12,10 +11,12 @@
|
||||
.export _wherex, _wherey
|
||||
.importzp cursor_c, cursor_r
|
||||
|
||||
_wherex: lda cursor_c
|
||||
_wherex:
|
||||
lda cursor_c
|
||||
ldx #0
|
||||
rts
|
||||
|
||||
_wherey: lda cursor_r
|
||||
_wherey:
|
||||
lda cursor_r
|
||||
ldx #0
|
||||
rts
|
||||
|
||||
Loading…
Reference in New Issue
Block a user