# PutPixel32(chunky:r3:PTR TO chunky,x:r4:LONG,y:r5:LONG,colour:r6:LONG)

	.text
	.global	_PutPixel32

_PutPixel32:
	mr.	r7,r3
	beq	.finish
	mr.	r4,r4
	blt	.finish
	mr.	r5,r5
	blt	.finish
	lwz	r8,0(r7)
	cmpw	r4,r8
	bge	.finish
	lwz	r0,4(r7)
	cmpw	r5,r0
	bge	.finish

	lwz	r7,8(r7)
	mullw	r5,r5,r8
	add	r5,r5,r4
	slwi	r5,r5,2
	stwx	r6,r7,r5
.finish:	blr

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