Topic: BCOUNT - DYNAMIC BLOCKS

[CADEC70]

I can count my blocks if I did it individually. How do you count your blocks if it's a dynamic block?

[ronjonp]

Here's half the answer from one of the 'tards...

Code: [Select]

      (if names
(progn
  (setq names (acad_strlsort names)
names (reverse names)
  )
  (mapcar '(lambda (x)
     (mapcar '(lambda (y)
(if (= (vla-get-effectivename y) x)
  (setq lst (cons y lst))
)
      )
     ss
     )
     (if lst
       (setq str (strcat "\n"
x
" ........... "
(itoa (length lst))
str
)
     lst nil
       )
     )
   )
  names
  )
  (princ str)
)
      )
    )
    (princ "\nNo blocks...")
  )
  (princ)
)

[CADEC70]

Sorry I'm not sure about your post..
how does this work
please explain..thanks

[Josh Nieman]

*refrains from making a comment about the intelligence of the poster not knowing what to do with a simple lsp routine*

*edit*
oops.

[ronjonp]

Sorry I'm not sure about your post..
how does this work
please explain..thanks

Like my post above states...it's only half of a working routine. After your stupid CTB\STB comment...I'm more motivated to poke fun at you rather than offer help.

[MP]

Okay, warm enough, let's not fan this one anymore.

[ronjonp]

Okay, warm enough, let's not fan this one anymore.

Done.  :kewl:

[MP]

Thanks Ron. 

[CADEC70]

ctb stb is just my rant..thats why i post it on the 'rant' post...to vent. But dont take it personal. i can't believe that somebody would react like that. unbelievable!

[Josh Nieman]

ctb stb is just my rant..thats why i post it on the 'rant' post...to vent. But dont take it personal. i can't believe that somebody would react like that. unbelievable!

guess it must just be the retard in us all.

[deegeecees]

Timah!

[Guest]

ctb stb is just my rant..thats why i post it on the 'rant' post...to vent. But dont take it personal. i can't believe that somebody would react like that. unbelievable!

guess it must just be the retard in us all.

"Wiggle worm! Wiggle worm! Wiggle worm!"

(I hope somebody get's this)

[CADEC70]

truth hurts

[Josh Nieman]

truth hurts

and you're asking -us- for free help while going on like this?

 

[ronjonp]

*gunshot*

"MY FOOT!"