Lisp needed for Move objects with specific distance

[Grrr]

BIGAL,

Even better idea is instead of sorting that list (in my prev suggestion) is to use assoc list:

(if 
 (setq p
   (cdr 
     (assoc
       TheTextCont
       '(  ("1" 25. 166. 0.)
           ("2" 25. 45. 0.)
           ("3" 217.5 166. 0.) 
           ("4" 217.5 45. 0.) 
       )
     )
   )
 )  
 (command "_.move" nthSS "" "_non" BBoxLowerLeftPt "_non" p)
)

[KishanG]

I need to move object from one place to another place. Initial place can be selected by user using getpoint but for final point user will have to enter coordinates...