if est multi facteur?

[Invité ingoenius]

La question est commend ecrire cela el autolisp?

 

Pax = 0

Nom = nomdubloc

 

si le Nom = Ecole_6 alors setq Pax 3

si le Nom = Tab_4 alors setq Pax 4

si le Nom = Ecole_8 alors setq Pax 4

si le Nom = Tab_p alors setq Pax 7

si le Nom = Ecole_12 alors setq Pax 5

sinon setq Pax 0

 

 

 

[Bred]

Salut,

 

(setq Pax
      (cond
 ((= Nom Ecole_6) 3)
 ((= Nom Tab_4) 4)
 ((= Nom Ecole_8) 4)
 ((= Nom Tab_p) 7)
 ((= Nom = Ecole_12) 5)
 (t 0))
     )

[Tramber]

(setq Pax(cond((= Nom "Ecole_6")3)
      ((= Nom "Tab_4")4)
      .....
      (T 0)))

[Patrick_35]

Bonjour

 

On peut remplacer

 

((= Nom Tab_4) 4)
((= Nom Ecole_8) 4)

 

par

 ((member Nom '(Tab_4 Ecole_8)) 4)

 

@+

[Invité ingoenius]

Merci,

en fait j'avais dejà commance avec les "cond", mais je connaissais pas le (T 0) pour finir

ça y est je peut preparer mon week-end tranquille maintenant ;-)

[bseb67]

Salut,

 

le (T 0) c'est l'équivalent de default en c.

 

Lorsque l'on fait un cond pour être propre il faut tester les cas voulu

et mettre au final un (t ...) pour soit attraper un cas inconnu, soit valider (pour mon cas)

les étapes précédentes.