Author Topic: resetting variable..  (Read 2012 times)

0 Members and 1 Guest are viewing this topic.

Andrea

  • Water Moccasin
  • Posts: 2372
resetting variable..
« on: November 16, 2005, 05:05:19 PM »
i'm looking a way to reset some variables...

eg:
Code: [Select]
(defun c:test ()
(setq
var1 2
var2 "hello"
var3 33.4
var4 "0"
var5 (getvar "clayer")
)
(resetall)
)

(defun resetall ()
(if (= (getvar "clayer") "0")
(reset var1 to var5 at 1)
)
)


is this possible ?
Keep smile...

Jürg Menzi

  • Swamp Rat
  • Posts: 599
  • Oberegg, Switzerland
Re: resetting variable..
« Reply #1 on: November 17, 2005, 02:19:11 AM »
i'm looking a way to reset some variables...
Something like this?
Code: [Select]
(setq VarLst '(Var1 Var2 Var3 Var4 Var5))
(mapcar '(lambda (l) (set l nil)) VarLst)
« Last Edit: November 17, 2005, 04:07:54 AM by Jürg Menzi »
A computer's human touch is its unscrupulousness!
MENZI ENGINEERING GmbH
Current A2k16... A2k24 - Start R2.18

Andrea

  • Water Moccasin
  • Posts: 2372
Re: resetting variable..
« Reply #2 on: November 17, 2005, 10:03:22 PM »
i'm looking a way to reset some variables...
Something like this?
Code: [Select]
(setq VarLst '(Var1 Var2 Var3 Var4 Var5))
(mapcar '(lambda (l) (set l nil)) VarLst)

yes Jürg Menzi ..
short and sweet....
 :ugly:
thanks...
Keep smile...