Call commands on Land Desktop 2008

[BlackAlnet]

How could i call a command of the Auto Cad Land Desktop 2008 with a lisp??? Is that a way? i need the command "Station Label", but i can't fix how to call that on a lisp. someone know?

[Lee Mac]

I have never used Land Desktop 2008, but I do have a few questions regarding your request:

 

• Is "Station Label" a Land Desktop in-built command, or a custom LISP?
  
• Are you trying to call a Land Desktop command within AutoCAD?
  
• Does (command "Station Label") not work?

Lee

[BlackAlnet]

I'm using "AutoCad Civil 3D Land Desktop Companion 2008", who have specific commands to terrain fill and cut, and many other civil things.

 

Then, i need to call that command, on a lisp.

 

 

http://picasaweb.google.com.br/albertounreal/Autocad#5350654237131758482

 

 

Edit: No Lee, it doesnt work....

[Lee Mac]

What is the command line call for this command?

 

i.e, what appears at the command line when you click on the toolbar menu command?

[alanjt]

go through the menufile (land.cui) and find that exact pulldown (you can do it from the cui editor). from there you can select the actual 'button' in the pulldown and it will give you the info to begin with.

you can then combine them in a routine. i can't believe i acutally found some of my shortcuts from ldd (i'm c3d now), but these should give you an idea.

 

;disassociate labels (static, dynamic, etc.)
(defun c:DL (/)
(cr_mnl)
(command "_aec_civil_nonassocautolabel")
(princ)
);defun


;delete labels (static, dynamic, etc.)
(defun c:NL (/)
(cr_mnl)
(command "_AEC_CIVIL_NOLABELS" )
(princ)
);defun


;add static labels
(defun c:ASL (/)
(cr_mnl)
(command "_aec_civil_autolabel")
(princ)
);defun

;labels settings
(defun c:LSET (/)
(cr_mnl)
(command "_aec_civil_draft")
(princ)
);defun


;import points
(defun c:IPT (/)
(cr_mnl)
(cg:points:import)
(princ)
);defun


;export points
(defun c:XPT (/)
(cr_mnl)
(cg:points:export)
(princ)
);defun


;zoom to point
(defun c:ZP (/)
(cr_mnl)
(progn (cg_zoompt)(princ))
(princ)
);defun


;edit points
(defun c:EPT (/)
(cr_mnl)
(load2 "CG" "editpnts")
(princ)
);defun


;list points
(defun c:LPT (/)
(cr_mnl)
(load2 "CG" "dispnts")
(princ)
);defun


;create breaklines (by point) in Terrain Model Explorer
(defun c:BK (/)
(cr_mnl)
(AECTREEMGREVENT3)
(princ)
);defun


;terrain model explorer
(defun c:TME (/)
(dt_mnl)
(command "_sfcmgr")
(princ)
);defun


;import 3D lines (Terrain)
(defun c:I3L (/)
(dt_mnl)
(dt_tinas3dlines)
(princ)
);defun


;delete 3D lines (Terrain)
(defun c:D3L (/)
(dt_mnl)
(dt_srfdeleteline)
(princ)
);defun


;delete 3D point (Terrain)
(defun c:D3P (/)
(dt_mnl)
(dt_srfdeletept)
(princ)
);defun


;contour style manager
(defun c:CSM (/)
(dt_mnl)
(command "_dtx_ctrprops")
(princ)
);defun


;add contour labels
(defun c:ACL (/)
(dt_mnl)
(command "_dtx_group_interior_labels")
(princ)
);defun


;create contours
(defun c:CRC (/)
(dt_mnl)
(dt_contour_objs)
(princ)
);defun

 

no promises any of these will work, they are from ldd 2006

[BlackAlnet]

Command:
Alignment Name: Int1ramo4 100400  Number: 33     Descr: Ramo 4 - Rotatoria lado 
esquerdo
Starting Station: 2008000.000  Ending Station: 2008185.354
Select point:
Enter leader points
Next point:

 

That. If i want to call te command again, i can tip "LDD", but "LDD" call only the last "Land Desktop" command...

 

Edit: alanjt, i'll try it.

[Lee Mac]

Ok, I think Alan's idea is better, run with that for the minute

[BlackAlnet]

It works like MAGIC. Many thanks man, now, i have much work to do, hehe. I need to extract that station information, but, i can do this.

 

You helped me a lot, many thanks, i'm so glad!!

 

to "Station Label", i need:

 

(defun c:stl (/)
 (ad_mnl)
 (f:adcmds 22)
 )

[Lee Mac]

Glad you got it sorted BlackAlnet - Alan is smarter than he looks...

[BlackAlnet]

 

I like that forum. You, Lee, always help me. thank you.

 

Now, time to go home, good night. And thanks again.!!

[alanjt]

yeah, land desktop is written in a bunch of subroutines. the reason "LDD" shows up when a command is executed is, after each button is compiled, a ";LDD" is placed at the end. this way it is the only thing displayed. looks a lot better than the commandline being overgrown with parens and odd coding.

 

glad it's working for you now