1. Home
  2. AutoCAD discussions
  3. Array numbers, lisp?

Array numbers, lisp?

Hello,

I need line of numbers starting from 1 to 50: is there a way to do this with array so that the numbers grow automatically and I don´t have to edit each one separately?

thanks, P

Reply to
Pekka P
Loading thread data ...

There are a bunch of these around. This one seems to work:

------------------------------------ ; NUMBERS.LSP

; Increments numbers while the user randomly places them around the screen.

(defun C:NUMBERS (/ A B C D E)

(setvar "CMDECHO" 0) (setq A (getint "\nEnter first number of series: ")) (setq B (getint "\nEnter last number of series: ")) (setq C (getreal "\nEnter text height: ")) (setq D (getreal "\nText rotation : "))

(if (= D nil) (setq D 0) )

(while ( Hello,

Reply to
Michael Bulatovich

Thanks!

Reply to
Pekka P

Take a penny, give a penny! ; )

Reply to
Michael Bulatovich

PolyTech Forum website is not affiliated with any of the manufacturers or service providers discussed here. All logos and trade names are the property of their respective owners.