Classement

Salut, Exemple d'utilisation d'une variable globale pour conserver la dernière valeur entrée par l'utilisateur et la re-proposer au prochain lancement de la routine : ;; Si la variable n'existe pas, lui attribuer une valeur par défaut (if (not *largeur*) (setq *largeur* 10.0) ) ;; Si l'utilisateur entre une valeur pour larg, la variable globale *largeur* ;; prend cette nouvelle valeur et sera proposée au prochain lancement ;; S'il fait Entrée, larg prendra la valeur de *largeur* (if (setq larg (getdist (strcat "\nSpécifiez la largeur (rtos *largeur*) ">: " ) ) ) (setq *largeur* larg) (setq larg *largeur*) )