how to move a selected 3d mesh to a other place with one mouse click

Do something like this:

dx#=(object\destX-object\x)
dy#=(object\destY-object\y)
dz#=(object\destZ-object\z)

;Distance to destination

dist#=sqr(dx*dx+dy*dy+dz*dz)

object\dx#=( dx#/dist# ) * object\Speed#
object\dy#=( dy#/dist# ) * object\Speed#
object\dz#=( dz#/dist# ) * object\Speed#

;move object

object\x=object\x+object\dx
object\y=object\y+object\dy
object\z=object\z+object\dz

PositionEntity object\Entity,object\x,object\y,object\z

Hope it makes sense :)