# FillChunky(chunky:r3:PTR TO chunky,colour:r4:LONG)

	.text
	.global	_FillChunky

_FillChunky:
	andi.	r4,r4,0xff
	slwi	r5,r4,8
	ori	r4,r4,r5
	slwi	r5,r4,16
	ori	r4,r4,r5		# we have $cocococo in r4

	mfctr	r9

	lwz	r5,4(r3)
	lwz	r0,0(r3)
	mullw	r5,r5,r0
	srwi	r5,r5,2
	mtctr	r5

	lwz	r3,8(r3)
	subi	r3,r3,4

.loop:	stwu	r4,4(r3)
	bdnz	.loop
	mtctr	r9
	blr

	.type	_FillChunky,@function
	.size	_FillChunky,$-_FillChunky