.
This commit is contained in:
4am 2018-03-07 14:53:07 -05:00
commit 0dd1f8f563
2 changed files with 18 additions and 2 deletions

View File

@ -5,6 +5,13 @@
*=$2000
!to "build/GRUE.SYSTEM",plain
lda $BF98 ; machine identification byte
and #$30
cmp #$30 ; 128K?
bne QuitToProDOS ; no, quit to ProDOS
!byte $1a ; 65C02 INC, clear Z flag if supported
beq QuitToProDOS ; not a 65C02
- jsr $bf00
op_c7
!byte $c7
@ -39,6 +46,13 @@ op_c7
bne -
jmp $1000
QuitToProDOS
jsr $bf00
!byte $65
!word quit_parms
quit_parms
!byte 4
c5_parms
!byte 2
!byte 0

View File

@ -27,8 +27,10 @@ Start
and #$30
cmp #$30 ; 128K?
beq + ; yes, continue
jmp QuitToProDOS
+ jsr DisconnectRAM32 ; disconnect /RAM in S3,D2 so we can use DHGR
- jmp QuitToProDOS
+ !byte $1a ; 65C02 INC, clear Z flag if supported
beq - ; not a 65C02
jsr DisconnectRAM32 ; disconnect /RAM in S3,D2 so we can use DHGR
bit $C010
jsr LoadFile ; load WEEGUI binary at $4000
!word .weeguiFilename