for MEGA65 disabled FAST/SLOW commands in native mode

This commit is contained in:
FeralChild64 committed 2020-10-10 16:21:41 +02:00
1 parent 3b0f38e6b2
commit 5c5c14f76a
11 files changed
+62 -48

No files matched your search

-2
View File
@@ -9,8 +9,6 @@
;; #ALIAS# CHROUT = KERNAL_0.proxy_K1_CHROUT
;; #ALIAS# STOP = KERNAL_0.STOP
;; #ALIAS# M65_SLOW = KERNAL_0.M65_SLOW
;; #ALIAS# M65_FAST = KERNAL_0.M65_FAST
;; #ALIAS# M65_MODEGET = KERNAL_0.M65_MODEGET
;; #ALIAS# M65_SETWIN_XY = KERNAL_0.M65_SETWIN_XY
;; #ALIAS# M65_SETWIN_WH = KERNAL_0.M65_SETWIN_WH
@@ -14,12 +14,6 @@ M65_JMODEGET:
M65_JISMODESET:
jsr M65_MODESET
M65_JSLOW:
jsr M65_SLOW
M65_JFAST:
jsr M65_FAST
M65_JSELDEV:
jsr SELDEV
+9 -6
View File
@@ -25,13 +25,15 @@ m65_mode64:
jsr viciv_shutdown
jsr vicii_init
; Reenable interrupts
; Switch CPU speed back to normal
lda #$40
sta CPU_D6510
; Reenable interrupts and quit
cli
; Switch CPU speed back to slow and quit
jmp M65_SLOW
rts
m65_mode65:
@@ -42,7 +44,8 @@ m65_mode65:
; Switch CPU speed to fast
jsr M65_FAST
lda #$41
sta CPU_D6510
; Set the magic string to mark native mode
-16
View File
@@ -1,16 +0,0 @@
;; #LAYOUT# M65 KERNAL_0 #TAKE
;; #LAYOUT# * * #IGNORE
M65_SLOW: ; set CPU speed to 1 MHz
lda #$40
+skip_2_bytes_trash_nvz
; FALLTROUGH
M65_FAST: ; set CPU speed to 40 MHz
lda #$41
sta CPU_D6510
rts