; d0 x0
; d1 y0
; d2 w
; d3 h
; d4 colour

	xdef	_Ellipse

_Ellipse	movem.l	a0-a1/a6,-(a7)
	tst.l	_stdrast
	beq.s	.norast
	move.l	_stdrast,a1
	move.l	_GfxBase,a6
	tst.l	d4
	bge.s	.goon
	move.l	coloura,d4
.goon	movem.l	d0-d1,-(a7)
	move.l	d4,d0
	jsr	-342(a6)		; SetAPen()
	movem.l	(a7)+,d0-d1
	jsr	-180(a6)		; DrawEllipse()
.norast	movem.l	(a7)+,a0-a1/a6
	rts

	xref	coloura
	xref	_GfxBase
	xref	_stdrast