Create Custom Line Table

[Roy_043]

(defun roy-surveysort-i-2 (lst)
 (vl-sort-i
   (mapcar
     '(lambda (str / sub)
       (list
         (setq sub (strcase (vl-string-trim "()[]0123456789" str)))
         (read (substr (vl-string-trim "()[]" str) (1+ (strlen sub))))
         (cond ((= "(" (substr str 1 1)) 1) ((= "[" (substr str 1 1)) 2) (0))
       )
     )
     lst
   )
   '(lambda (subA subB)
     (if (= (car subA) (car subB))     ; Letter(s).
       (if (= (cadr subA) (cadr subB)) ; Number.
         (< (caddr subA) (caddr subB)) ; 1st bracket.
         (< (cadr subA) (cadr subB))
       )
       (< (car subA) (car subB))
     )
   )
 )
)

[Grrr]

What if there are "{}" type of brackets?

[Roy_043]

What if there are "{}" type of brackets?

The OP has not mentioned that these can occur.

[BIGAL]

Grr it should not matter just add to the defined characters even add if you want. "{}()[]0123456789"

[Grrr]

Grr it should not matter just add to the defined characters even add if you want. "{}()[]0123456789"

 

Oh right, thanks BigAl!

 

I've figured out that this might be a clever technique for labeling something (by avoiding squared/hexagonal/circular attributed block inside mleader/qleader).

Not related to the OP's task however.

[Squirltech]

Is a 'Line Table' a type of object native to Civil 3D? Or does it appear as a standard AutoCAD table and 'Line Table' describes the table content in this context?

 

The "line table" is a dynamic object in Civil3d that automatically updates when/if the bearing or distance of a line changes.

 

Drawing is attached.

 

TableTags.dwg

[Squirltech]

The OP has not mentioned that these can occur.

 

Not to say it's impossible but in my 15+ years of surveying, I have yet to come across { } for brackets.

[BIGAL]

Had a look at this if you do a dump of a table v's this table they are chalk & cheese you can get at a Table, I played with the table style and the option ascending descending and this set of alarm bells you may reset the order and then it will just redo it by itself. You may need to go with my suggestion and make a new table keeping old civ3d one.

 

Did you manage to get into the table ?

 

I found a real nice pick a cell in a table but it returns nothing when picking the civ3d table.

 

This is what I have similar for dump.

 

Select object: ((-1 . ) (0 . "AECC_PARCEL_SEGMENT_TABLE") (330 . ) (5 . "CD") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "VB-PARCL-TABL") (100 . "AeccDbEntity") (100 . "AeccDbScheduleTable") (100 . "AeccDbParcelSegmentTable"))