Type Question.

something like this?

For block1.block=Each block
	For block2.block=Each block
		If block1<>block2 Then ; make sure that we're not checking the collision of a block with itself
			;CHECK COLLISION between block1\model and block2\model
			
			;If collided then
			;	handle1=block1\model
			;	handle2=block2\model
                        ;Endif
		EndIf
	Next
Next