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