Topic: Predefined values

[Pintech]

Can anyone tell what sould I do to have predefined values in a setq?

For example:
I create a:(setq a (getreal "base side:")

And I would like the autocad to show this:

base side: <5>

Is it possible?

I think is something like this but its not working:
(setq a (getreal "base side:" )
  (cond ((null a) (setq a 5))

is it correct?
Thanks

[Jeff_M]

Here's one way to do this:

Code: [Select]


(or *global_var* (setq *global_var* 5.0))
(and (setq tmp (getreal (strcat "\nEnter real number <" (rtos *global_var*) ">: ")))
     (setq *global_var* tmp)
      )


[Jürg Menzi]

Hi

If you wish to keep the last entered value, you can use this one:

Code: [Select]

(setq TmpStr (if Me:Var
              (strcat "\nEnter real number <" (rtos Me:Var) ">: ")
              "\nEnter real number: "
             )
      Me:Var (cond ((getreal TmpStr)) (Me:Var))
)

Cheers