How to princ .....

Discussion in 'AutoCAD' started by Adesu, Jan 20, 2005.

  1. Adesu

    Adesu Guest

    How to "princ en" with result parallel to down not serial to right,thanks

    _$ (setq ss (ssget "_X" '((0 . "TEXT"))))
    (setq idx 0)
    (setq cnt 0)
    (setq n (sslength ss))
    (repeat n
    (setq e (ssname ss cnt))
    (setq en (entget e))
    (princ en)
    (setq cnt (1+ cnt )))
    <Selection set: 86>
    0
    0
    14
    I want like this

    ((-1 . <Entity name: 147f9f0>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9e8>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9e0>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9d8>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9d0>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9c8>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9c0>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9b8>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9b0>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9a8>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f9a0>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f998>) .......blah...blah...blah... (73 . 0))
    ((-1 . <Entity name: 147f990>) .......blah...blah...blah... (73 . 0))
    (((-1 . <Entity name: 147f988>) .......blah...blah...blah... (73 . 0))
    _$

    not like this

    ((-1 . <Entity name: 147f9f0>) .......blah...blah...blah... (73 . 0)) ((-1 .
    <Entity name: 147f9f0>) .......blah...blah...blah... (73 . 0)) ((-1 .
    <Entity name: 147f9f0>) .......blah...blah...blah... (73 . 0)) ((-1 .
    <Entity name: 147f9f0>) .......blah...blah...blah... (73 .
    0))........................
     
    Adesu, Jan 20, 2005
    #1
  2. Adesu

    Jeff Mishler Guest

    Like so:
    (repeat n
    (setq e (ssname ss cnt))
    (setq en (entget e))
    (princ "\n")
    (princ en)
    (setq cnt (1+ cnt )))
     
    Jeff Mishler, Jan 20, 2005
    #2
  3. Adesu

    Joe Burke Guest

    Hi Jeff and Ade,

    Splitting hairs... this does the same thing.

    (repeat n
    (setq e (ssname ss cnt))
    (setq en (entget e))
    (print en)
    (setq cnt (1+ cnt )))

    Joe Burke
     
    Joe Burke, Jan 20, 2005
    #3
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.
Similar Threads

  1. Why would "prompt" be better than "princ"?

  2. more values in princ

  3. What is the function of (princ count)

  4. Easy question... about princ

  5. How to princ boole

  6. How to toggle how an item is mirrored in virtuoso layout

  7. how to find/save PCELL CREATION TIME ? / How to solve this ?**URGENT**

Loading...