lag in camerapick()

use mousehit(1)???

I do it this way and it seems pretty fast with about 100 entitys to scan and pick from:

;
If MouseHit(1) = True Then
	hat=CameraPick(camera,x,y)
	If hat=0 Then Goto outme
		Select empty 
			Case empty
			xx=EntityX(entity)
			zz=EntityZ(entity) 
			Default 
			pp=0
		End Select
.outme
EndIf
;