в корне не верно. Делается так:
count = CountCollisions(player)
For n = 1 to count
nx# = nx# + CollisionNX(player,n)
ny# = ny# + CollisionNY(player,n)
nz# = nz# + CollisionNZ(player,n)
Next
nx = nx / count
ny = ny / count
nz = nz / count
AlignToVector Player, nx, ny, nz, 2