mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-10-01 21:55:17 +00:00
58 lines
1.0 KiB
ArmAsm
58 lines
1.0 KiB
ArmAsm
|
;====================
|
||
|
; Hardware Detect
|
||
|
|
||
|
; simplified version for disk2
|
||
|
|
||
|
hardware_detect:
|
||
|
|
||
|
;=======================
|
||
|
; Hardware Detect Model
|
||
|
;=======================
|
||
|
; Yes Michaelangel007 I will eventually update linux_logo 6502
|
||
|
|
||
|
jsr detect_appleii_model
|
||
|
|
||
|
lda APPLEII_MODEL
|
||
|
cmp 'g'
|
||
|
bne not_iigs
|
||
|
|
||
|
is_a_iigs:
|
||
|
; set background color to black instead of blue
|
||
|
lda NEWVIDEO
|
||
|
and #%00011111 ; bit 7 = 0 -> IIgs Apple II-compat video modes
|
||
|
; bit 6 = 0 -> IIgs 128K memory map same as IIe
|
||
|
; bit 5 = 0 -> IIgs DHGR is color, not mono
|
||
|
; bits 0-4 unchanged
|
||
|
sta NEWVIDEO
|
||
|
lda #$F0
|
||
|
sta TBCOLOR ; white text on black background
|
||
|
lda #$00
|
||
|
sta CLOCKCTL ; black border
|
||
|
sta CLOCKCTL ; set twice for VidHD
|
||
|
|
||
|
not_iigs:
|
||
|
|
||
|
|
||
|
;======================
|
||
|
; detect mockingboard
|
||
|
|
||
|
lda #0
|
||
|
sta SOUND_STATUS
|
||
|
|
||
|
PT3_ENABLE_APPLE_IIC = 1
|
||
|
|
||
|
jsr mockingboard_detect
|
||
|
bcc mockingboard_notfound
|
||
|
|
||
|
mockingboard_found:
|
||
|
|
||
|
lda SOUND_STATUS
|
||
|
ora #SOUND_MOCKINGBOARD
|
||
|
sta SOUND_STATUS
|
||
|
|
||
|
mockingboard_notfound:
|
||
|
|
||
|
rts
|
||
|
|
||
|
.include "pt3_lib_mockingboard.inc"
|