mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-24 00:44:23 +00:00
42 lines
498 B
ArmAsm
42 lines
498 B
ArmAsm
.text
|
|
.globl _bios
|
|
.globl _biosinit
|
|
.globl _cbios
|
|
.globl _dskia
|
|
.globl _dskic
|
|
.globl _setimask
|
|
*
|
|
*
|
|
*
|
|
*
|
|
_bios: link a6,#0
|
|
move.l d2,-(a7)
|
|
move.l d1,-(a7)
|
|
move.w d0,-(a7)
|
|
move #$2000,sr
|
|
lea _dskia,a0
|
|
move.l a0,$3fc
|
|
jsr _cbios
|
|
unlk a6
|
|
rts
|
|
*
|
|
_dskia: link a6,#0
|
|
movem.l d0-d7/a0-a5,-(a7)
|
|
jsr _dskic
|
|
movem.l (a7)+,d0-d7/a0-a5
|
|
unlk a6
|
|
rte
|
|
*
|
|
_setimask: move sr,d0
|
|
lsr #8,d0
|
|
and.l #7,d0
|
|
move sr,d1
|
|
ror.w #8,d1
|
|
and.w #$fff8,d1
|
|
add.w 4(a7),d1
|
|
ror.w #8,d1
|
|
move d1,sr
|
|
rts
|
|
*
|
|
.end
|