mirror of
https://github.com/cc65/cc65.git
synced 2024-11-15 11:05:56 +00:00
Added DTV detection code by Marco van den Heuvel.
git-svn-id: svn://svn.cc65.org/cc65/trunk@4580 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
aa6a507991
commit
e65f966d25
@ -5,10 +5,12 @@
|
||||
; Ullrich von Bassewitz, 2005-11-27
|
||||
;
|
||||
|
||||
|
||||
.include "zeropage.inc"
|
||||
|
||||
.include "em-kernel.inc"
|
||||
.include "em-error.inc"
|
||||
.import _get_ostype
|
||||
|
||||
|
||||
.macpack generic
|
||||
@ -71,8 +73,26 @@ curpage: .word $0000 ; Page
|
||||
;
|
||||
|
||||
INSTALL:
|
||||
lda #$01
|
||||
sta $d03f ; Enable extended register access
|
||||
|
||||
; Check for a DTV
|
||||
|
||||
ldx #1
|
||||
stx $d03f
|
||||
ldx $d040
|
||||
cpx $d000
|
||||
bne @present
|
||||
inc $d000
|
||||
cpx $d040
|
||||
beq @present
|
||||
dec $d000
|
||||
|
||||
; DTV not found
|
||||
|
||||
lda #<EM_ERR_NO_DEVICE
|
||||
ldx #>EM_ERR_NO_DEVICE
|
||||
rts
|
||||
|
||||
@present:
|
||||
ldx #$FF
|
||||
stx curpage+1 ; Invalidate curpage
|
||||
inx ; X = 0
|
||||
|
Loading…
Reference in New Issue
Block a user