You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
56 lines
1.1 KiB
ArmAsm
56 lines
1.1 KiB
ArmAsm
12 years ago
|
.include "mmu.inc"
|
||
|
|
|
||
|
|
.export _rb_enable, _rb_disable, _rb_map_device, _rb_set_window
|
||
|
|
|
||
|
|
|
||
|
|
.segment "CODE"
|
||
|
|
|
||
|
|
;------------------------------------------
|
||
|
|
; void __inline__ rb_enable(void);
|
||
|
|
;------------------------------------------
|
||
|
|
_rb_enable:
|
||
|
|
mmu $02
|
||
|
|
rts
|
||
|
|
|
||
|
|
|
||
|
|
;------------------------------------------
|
||
|
|
; void __inline__ rb_disable(void);
|
||
|
|
;------------------------------------------
|
||
|
|
_rb_disable:
|
||
|
|
mmu $82
|
||
|
|
rts
|
||
|
|
|
||
|
|
|
||
|
|
;------------------------------------------
|
||
|
|
; void __fastcall__ rb_set_window(void* address);
|
||
|
|
;------------------------------------------
|
||
|
|
_rb_set_window:
|
||
|
|
;switch to native 16bit
|
||
|
|
clc
|
||
|
|
.byte $FB ; XCE
|
||
|
|
.byte $C2, $30 ; REP #$30
|
||
|
|
|
||
|
|
; init redstone window at $0300
|
||
|
|
;.byte $A9, $00, $03 ; LDA #$0300
|
||
|
|
.byte $EB ; XBA
|
||
|
|
stx $55
|
||
|
|
ora $55
|
||
|
|
.byte $EB ; XBA
|
||
|
|
mmu $01
|
||
|
|
|
||
|
|
;switch to emulated 8bit
|
||
|
|
.byte $E2, $30 ; SEP #$30
|
||
|
|
sec
|
||
|
|
.byte $FB ; XCE
|
||
|
|
rts
|
||
|
|
|
||
|
|
|
||
|
|
;------------------------------------------
|
||
|
|
; void __fastcall__ rb_map_device(unsigned char id);
|
||
|
|
;------------------------------------------
|
||
|
|
_rb_map_device:
|
||
|
|
mmu $00
|
||
|
|
rts
|
||
|
|
|
||
|
|
|