Auto Lisp. Visual Lisp
Résolu
khairou
-
bellil -
bellil -
bonjour a tous;
je sui utilisateur d'Autocad ,et j'aimerai-bien aprondre les longage de programation " Auto Lisp " et " Visual lisp " mais je ne trouve pas de documontation gratos. Alor HELP S.V.P.
MERCI.
je sui utilisateur d'Autocad ,et j'aimerai-bien aprondre les longage de programation " Auto Lisp " et " Visual lisp " mais je ne trouve pas de documontation gratos. Alor HELP S.V.P.
MERCI.
A voir également:
- Télécharger lisp autocad gratuit
- Telecharger ccleaner gratuit - Télécharger - Nettoyage
- Télécharger clavier arabe - Télécharger - Divers Web & Internet
- Telecharger photofiltre 7 gratuit - Télécharger - Retouche d'image
- Télécharger musique gratuitement sur pc - Télécharger - Conversion & Extraction
- Telecharger winrar gratuit - Télécharger - Compression & Décompression
25 réponses
salut A TOI DE DEVINER,
voilla, je sui tre curieux de savoir comment comencer, aussi et bien sur surtout ou trouver de la doc gratos.
il faut savoir que je ne connait rien en programation, sauf que je l4aime bocoup, et je veu l4aprendre.
merci.
voilla, je sui tre curieux de savoir comment comencer, aussi et bien sur surtout ou trouver de la doc gratos.
il faut savoir que je ne connait rien en programation, sauf que je l4aime bocoup, et je veu l4aprendre.
merci.
Salut
http://www.cadxp.com
c'est un forum comme celui-ci exclusivement destiné aux AutoCadiens, Catien .... et en français
A laisser votre OS en Administrateur
vous en perdez vos cheveux :p
http://www.cadxp.com
c'est un forum comme celui-ci exclusivement destiné aux AutoCadiens, Catien .... et en français
A laisser votre OS en Administrateur
vous en perdez vos cheveux :p
J'ai fais 2ans d'autolisp (version 12) et j'ai une */- 30 pages des détails des diverses fonctions.
Je pense que les syntaxe de base sont inchangées.
Je peux te faire des copies et te les envoyés sous formes d'imprimés.
Si çà te dis, tes coordonnées SVP....
A+.
Un Acadien doublé d'un Linuxien.
Je pense que les syntaxe de base sont inchangées.
Je peux te faire des copies et te les envoyés sous formes d'imprimés.
Si çà te dis, tes coordonnées SVP....
A+.
Un Acadien doublé d'un Linuxien.
Slt. Qelqu'un pourrait il m'aider. Je voudré rendre utilisable la date sous autolisp pour l'insérer dans un dessin. L'avoir sous la forme JJ/MM/AA quoi. Comment puis je faire. Merci d'avance.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
(setq annee (fix (/ (getvar 'cdate) 10000)))
(setq mois (- (fix (/ (getvar 'cdate) 100)) (* annee 100)))
(setq jour (- (fix (getvar 'cdate)) (* mois 100) (* annee 10000)))
;;;
;;; Affiche le commentaire
;;;
(Princ (strcat "\nCe fond de plan a été traité par "
(getvar "CPROFILE")
" le "
(rtos jour 2 0)
"/"
(rtos mois 2 0)
"/"
(rtos annee 2 0)
)
)
A laisser votre OS en Administrateur
vous en perdez vos cheveux :p
(setq mois (- (fix (/ (getvar 'cdate) 100)) (* annee 100)))
(setq jour (- (fix (getvar 'cdate)) (* mois 100) (* annee 10000)))
;;;
;;; Affiche le commentaire
;;;
(Princ (strcat "\nCe fond de plan a été traité par "
(getvar "CPROFILE")
" le "
(rtos jour 2 0)
"/"
(rtos mois 2 0)
"/"
(rtos annee 2 0)
)
)
A laisser votre OS en Administrateur
vous en perdez vos cheveux :p
merci bien Maximilien. C'est trés cool d'avoir cherché une solution.
Malheureusement j'ai trouvé un truc beaucoup plus simple.
(setq jour (menucmd "M=$(edtime,$(getvar,DATE),DD)")
mois (menucmd "M=$(edtime,$(getvar,DATE),MO)")
annee (menucmd "M=$(edtime,$(getvar,DATE),YY)")
Date (strcat jour "/" mois "/" annee))
Merci encore.
Tu n'aurais pas un moyen pour déboguer ça:
(setq listef '(A4 A3 A2 A1 A0))
(setq n 0)
(start_list "f" 2 0)
(repeat (length listef)
(add_list (nth n listef)));je n'arrive pas a définir en temps que string les A4 A3...
(setq n (+ 1 n))
)
(end_list)
(action_tile "f" "(setq choix (get_tile $key))");pb identique
bye bonne fête de fin d'année
Malheureusement j'ai trouvé un truc beaucoup plus simple.
(setq jour (menucmd "M=$(edtime,$(getvar,DATE),DD)")
mois (menucmd "M=$(edtime,$(getvar,DATE),MO)")
annee (menucmd "M=$(edtime,$(getvar,DATE),YY)")
Date (strcat jour "/" mois "/" annee))
Merci encore.
Tu n'aurais pas un moyen pour déboguer ça:
(setq listef '(A4 A3 A2 A1 A0))
(setq n 0)
(start_list "f" 2 0)
(repeat (length listef)
(add_list (nth n listef)));je n'arrive pas a définir en temps que string les A4 A3...
(setq n (+ 1 n))
)
(end_list)
(action_tile "f" "(setq choix (get_tile $key))");pb identique
bye bonne fête de fin d'année