1
0
mirror of https://github.com/cc65/cc65.git synced 2025-03-03 09:32:33 +00:00

removed special mouse memory handling, it's now done by the mouse routines'

constructor


git-svn-id: svn://svn.cc65.org/cc65/trunk@536 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cpg 2000-12-03 21:40:07 +00:00
parent 86e8c03001
commit a619c0055f

View File

@ -9,11 +9,6 @@
; This must be the *first* file on the linker command line
;
RESERVE_MOUSE_MEMORY = 1 ; for P/M
.ifdef RESERVE_MOUSE_MEMORY
.export mouse_pm0
.endif
.export _exit
.import getargs, argc, argv
.import initlib, donelib
@ -100,11 +95,22 @@ L1: lda sp,x
jsr getmemtop ; adjust for graphics mode to use
sta sp
; sta sp
sta APPMHI
stx sp+1 ; Set argument stack ptr
; stx sp+1 ; Set argument stack ptr
stx APPMHI+1
; Call module constructors
jsr initlib
; setup sp
lda APPMHI
sta sp
lda APPMHI+1
sta sp+1
; set left margin to 0
lda LMARGN
@ -118,10 +124,6 @@ L1: lda sp,x
stx old_shflok
sta SHFLOK
; Call module constructors
jsr initlib
; Initialize conio stuff
lda #$FF
@ -214,27 +216,11 @@ L2: lda zpsave,x
sbc grmemusage+1,y
tax
pla
.ifdef RESERVE_MOUSE_MEMORY
adj_mouse:
txa ; get upper byte of address
and #%11111000 ; make 2k aligned
sec
sbc #%00001000 ; reserve 2k
tax
adc #3 ; add 4 (C = 1)
sta mouse_pm0
lda #0
.endif
rts
ignore: lda MEMTOP
ldx MEMTOP+1
.ifdef RESERVE_MOUSE_MEMORY
bne adj_mouse
.else
rts
.endif
.endproc
@ -300,9 +286,6 @@ spsave: .res 1
appmsav: .res 1
old_shflok: .res 1
old_lmargin: .res 1
.ifdef RESERVE_MOUSE_MEMORY
mouse_pm0: .res 1
.endif
.segment "AUTOSTRT"
.word $02E0