17 lines
303 B
Plaintext
17 lines
303 B
Plaintext
|
initialize: ; go into super user mode
|
||
|
|
clr.l -(a7)
|
||
|
|
move.w #32,-(a7)
|
||
|
|
trap #1
|
||
|
|
addq.l #6,a7
|
||
|
|
move.l d0,oldstack
|
||
|
|
rts
|
||
|
|
|
||
|
|
restore: ; go back into user mode
|
||
|
|
move.l oldstack,-(a7)
|
||
|
|
move.w #32,-(a7)
|
||
|
|
trap #1
|
||
|
|
addq.l #6,a7
|
||
|
|
rts
|
||
|
|
|
||
|
|
oldstack dc.l 0
|