Call variable from another function.

[T2L]

I created (sample) a code like this and obviously is not working: can someone explain.

 

 
(defun test1 (/ x) <----- declare variable x
(setq x (.....)) <------- set variable
)
(defun c:test2 ()
(test1)
(setq x (.....)) <------- call variable again from test1
)

 

Also, can you post example (simple one...easy to comprehend) of how to pass argument back and forth between function.

[Lee Mac]

You will need to localise the sub-function variable inside the main-function.

 

i.e.

 

(defun c:test2 (/ x)

; Better practice to put it here

(defun test1 () <----- declare variable x
(setq x (.....)) <------- set variable
)

(test1)
(setq x (.....)) <------- call variable again from test1
)

[Lee Mac]

Simple example:

 

(defun c:test (/ num)

   (defun getnum ()
   (setq num (getreal "\nChoose a Number: "))
   ) ;_  end defun

   (getnum)

   (alert (rtos num))
   (princ)
) ;_  end defun