mirror of
https://github.com/a2-4am/pitch-dark.git
synced 2025-02-14 12:31:02 +00:00
.
This commit is contained in:
parent
2759460897
commit
453ee52849
@ -17,7 +17,7 @@
|
||||
;~7400...... - program data (approximate)
|
||||
;
|
||||
|
||||
kPitchDarkBinaryAddress = $3F4D
|
||||
kPitchDarkBinaryAddress = $3F41
|
||||
|
||||
kGameInfoBuffer = $0800 ; used by LoadGameInfo
|
||||
kProDOSFileBuffer = $1C00 ; 1K buffer for ProDOS MLI calls
|
||||
|
@ -14,8 +14,8 @@
|
||||
|
||||
*=kPitchDarkBinaryAddress
|
||||
|
||||
jsr QuitUnless128KAnd65C02; check minimum hardware requirements
|
||||
!source "src/pitchdark.init.a"
|
||||
|
||||
jsr LoadGameInfo ; get current game description and game-specific options
|
||||
jsr WGInit ; initialize WeeGUI
|
||||
ldx #WGEnableMouse ; enable mouse support
|
||||
|
@ -1,3 +1,14 @@
|
||||
;------------------------------------------------------------------------------
|
||||
; check machine requirements (128K with 65C02) and quit to ProDOS if not met
|
||||
;------------------------------------------------------------------------------
|
||||
lda MACHID
|
||||
and #$30
|
||||
cmp #$30 ; 128K?
|
||||
beq + ; yes, continue
|
||||
- jmp QuitToProDOS
|
||||
+ inc ; 65C02-only INC instruction will clear Z flag
|
||||
beq - ; if Z flag is still set, this is not a 65C02
|
||||
|
||||
;------------------------------------------------------------------------------
|
||||
; disconnect ProDOS /RAM disk in S3,D2
|
||||
; (does not affect other RAM disks like RAMWorks or RAMFactor)
|
||||
|
@ -9,7 +9,6 @@
|
||||
; - SaveFile
|
||||
; - SetPrefix
|
||||
; - GetFileInfo
|
||||
; - QuitToProDOS
|
||||
;
|
||||
|
||||
; MLI command codes
|
||||
@ -390,14 +389,6 @@ _setprefix
|
||||
ldy #PC_SETPREFIX
|
||||
jmp mli
|
||||
|
||||
QuitUnless128KAnd65C02
|
||||
lda MACHID
|
||||
and #$30
|
||||
cmp #$30 ; 128K?
|
||||
bne QuitToProDOS
|
||||
+ inc ; 65C02-only INC instruction will clear Z flag
|
||||
bne mliexit ; if Z flag is clear, this is a 65C02 (good)
|
||||
; if Z flag is set, this is not a 65C02 (bad) and execution falls through here
|
||||
QuitToProDOS
|
||||
lda #CMD_QUIT
|
||||
ldy #PC_QUIT
|
||||
|
Loading…
x
Reference in New Issue
Block a user