nearest cube

I have studied the forums for some simple code for this but cannot really find a good example for what I need. Theres some pretty clever stuff there but maybe too much for my simple requirements.

I am NOT looking to do waypoint code so dont need anything too scaleable.

Suppose I have six cubes placed around my level.

When a trigger action occurs I want to move my player to the nearest cube. Its as simple as that. Only needs to calculate on X and Z axis. Y is not important.

Any examples would be great. Thanks in advance.

Just do an EntityDistance on each cube and choose the nearest.

P.S. There are quicker ways of doing this, but as it's only 6 cubes, it's not really worth bothering with.

Any ideas on the easiest way to choose the nearest. I assume theres some maths I can use.

No maths needed. Just have a variable that holds the nearest cube found so far, then check each cube's distance, in turn. If it's less than the current nearest, make it the nearest one found.

What about something like this? Press keys 1 to 6.

Type CUBE
 Field ent,x#,y#,z#
End Type

;setup scene
Graphics3D 640,480,0,2
SetBuffer BackBuffer()
camera=CreateCamera()
PositionEntity camera,0,20,0
light=CreateLight()
RotateEntity light,90,0,0

For id=1 To 7
 temp.CUBE=New CUBE
 temp\ent=CreateCube()
 temp\x#=Rand(-20,20)
 temp\z#=Rand(-20,20)
 PositionEntity temp\ent,temp\x#,EntityY(temp\ent),temp\z#
Next

player.CUBE=Last cube
player\x#=0
player\z#=0
PositionEntity player\ent,player\x#,EntityY(player\ent),player\z#

;main
While Not KeyDown(1)

 do=0
 If KeyDown(2) Then do=1 
 If KeyDown(3) Then do=2
 If KeyDown(4) Then do=3
 If KeyDown(5) Then do=4
 If KeyDown(6) Then do=5
 If KeyDown(7) Then do=6

 PointEntity camera,player\ent

 If do=1
  temp.CUBE=First cube
  PointEntity player\ent,temp\ent
  MoveEntity player\ent,0,0,0.1
 ElseIf do=2
  temp.CUBE=First cube
  temp.CUBE=After temp
  PointEntity player\ent,temp\ent
  MoveEntity player\ent,0,0,0.1
 ElseIf do=3
  temp.CUBE=First cube
  For id=1 To 2 : temp.CUBE=After temp : Next
  PointEntity player\ent,temp\ent
  MoveEntity player\ent,0,0,0.1
 ElseIf do=4
  temp.CUBE=First cube
  For id=1 To 3 : temp.CUBE=After temp : Next
  PointEntity player\ent,temp\ent
  MoveEntity player\ent,0,0,0.1
 ElseIf do=5
  temp.CUBE=First cube
  For id=1 To 4 : temp.CUBE=After temp : Next
  PointEntity player\ent,temp\ent
  MoveEntity player\ent,0,0,0.1
 ElseIf do=6
  temp.CUBE=First cube
  For id=1 To 5 : temp.CUBE=After temp : Next
  PointEntity player\ent,temp\ent
  MoveEntity player\ent,0,0,0.1
 EndIf

 RenderWorld

 Flip
Wend

guys thanks for the help. I think I should be able to sort it now.