	.globl hot_key_
hot_key_:
	clr.l	-(a7)
	move.w	$0020,-(a7)
	trap 	$1
	addq.w	$6,a7
	clr.l	0x000420
	clr.l	0x000426
	jmp	0xfc0000
