for MEGA65 disabled FAST/SLOW commands in native mode
This commit is contained in:
1 parent
3b0f38e6b2
commit
5c5c14f76a
11 files changed
+62
-48
No files matched your search
@@ -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
|
||||
|
||||
|
||||
@@ -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
|
||||
|
||||
|
||||
@@ -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
|
||||
Reference in new issue
Block a user