xdef	_CtrlE

_CtrlE	move.l	a6,(a7)+
	moveq	#0,d0
	moveq	#0,d1
	movea.l	$4.w,a6
	jsr	-306(a6)		; SetSignal()
	btst	#14,d0
	beq.s	.no
	moveq	#0,d0
	move.l	#16384,d1
	jsr	-306(a6)		; SetSignal()
.yes	moveq	#-1,d0
	move.l	(a7)+,a6
	rts
.no	moveq	#0,d0
	move.l	(a7)+,a6
	rts