Removed initialization code to set the screen size and replaced it by a
separate module that contains a module constructor. In some cases, the code was even unnecessary, since the screen size is known in advance. git-svn-id: svn://svn.cc65.org/cc65/trunk@476 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -16,7 +16,7 @@ ATARIDEFS = -DNUMDRVS=4
|
||||
|
||||
C_OBJS =
|
||||
|
||||
S_OBJS = crt0.o kbhit.o conio.o clrscr.o cputc.o ctype.o chline.o cvline.o \
|
||||
S_OBJS = crt0.o _scrsize.o kbhit.o clrscr.o cputc.o ctype.o chline.o cvline.o \
|
||||
color.o gotoxy.o cclear.o revers.o readjoy.o break.o where.o write.o \
|
||||
gotox.o gotoy.o savevec.o rwcommon.o cgetc.o read.o getargs.o close.o \
|
||||
open.o oserror.o fdtable.o setcolor.o scroll.o mul40.o graphuse.o \
|
||||
|
||||
15
libsrc/atari/_scrsize.s
Normal file
15
libsrc/atari/_scrsize.s
Normal file
@@ -0,0 +1,15 @@
|
||||
;
|
||||
; Ullrich von Bassewitz, 26.10.2000
|
||||
;
|
||||
; Screen size variables
|
||||
;
|
||||
|
||||
.export xsize, ysize
|
||||
|
||||
.rodata
|
||||
|
||||
xsize: .byte 40
|
||||
ysize: .byte 24
|
||||
|
||||
|
||||
|
||||
@@ -1,20 +0,0 @@
|
||||
;
|
||||
; Christian Groessler
|
||||
;
|
||||
; Low level stuff for screen output/console input
|
||||
;
|
||||
|
||||
.export initconio
|
||||
.import xsize, ysize, plot
|
||||
|
||||
.include "atari.inc"
|
||||
|
||||
.code
|
||||
|
||||
initconio:
|
||||
ldx #40
|
||||
ldy #24
|
||||
stx xsize
|
||||
sty ysize
|
||||
rts
|
||||
|
||||
@@ -15,9 +15,9 @@ RESERVE_MOUSE_MEMORY = 1 ; for P/M
|
||||
.export mouse_pm0
|
||||
.endif
|
||||
.export _exit
|
||||
.import getargs, argc, argv
|
||||
.import getargs, argc, argv
|
||||
.import initlib, donelib
|
||||
.import initconio, zerobss, pushax
|
||||
.import zerobss, pushax
|
||||
.import _main,__filetab,getfd
|
||||
.import __CODE_LOAD__, __BSS_LOAD__
|
||||
.import __graphmode_used
|
||||
@@ -124,8 +124,6 @@ L1: lda sp,x
|
||||
|
||||
; Initialize conio stuff
|
||||
|
||||
jsr initconio
|
||||
|
||||
lda #$FF
|
||||
sta CH
|
||||
|
||||
|
||||
Reference in New Issue
Block a user