_resvalid	.equ		$426
_resvector	.equ		$42A
RESMAGIC	.equ		$31415926

		.text

installres:
		move.l	_resvalid,oldvalid
		move.l	_resvector,oldvector
		move.l	#myresvec,_resvector
		move.l	#RESMAGIC,_resvalid
		rts
myresvec:
		;
		; Insert user code here
		;

		move.l	oldvector,_resvector
		move.l	oldvalid,_resvalid
		jmp	(a6)

		.bss

oldvector:   	.ds.l		1
oldvalid:    	.ds.l		1

		.end

