AutoCad - 07. AutoLISP. Κώδικες προγραμματάκια, οδηγίες σύνταξης κώδικα

[iliekater]

maik :

Νομίζω πολύ την επαίνεσα την .... DCL.

Βρε Μαικ , είπα να την πενέψεις , όχι να την διασύρεις !

[maik]

maik :

 

Βρε Μαικ , είπα να την πενέψεις , όχι να την διασύρεις !

 

 

Διορθώνω...

Η Autolisp ειναι το αυτοκίνητο , η DCL ειναι το GPS NAVIGATOR. Καλό το GPS , αλλά χρειάζεται αυτοκίνητο. Αν ομως εχεις αυτοκίνητο τότε σου κάνει τη ζωή πιό εύκολη , δηλαδή οδηγείς πιό ανετα και σε ελεύθερη μετάφραση εχουμε ενα πρόγραμμα Φιλικό στο Χρήστη.

[iliekater]

Και εγώ σατυρικά το είχα πει . Εξάλλου , ο ίδιος έχω παραδεχτεί πως εγκατέλειψα την DCL προς χάρη της VBA . Και είχα γράψει χιλιάδες και χιλιάδες γραμμές σε DCl !

[angelos23]

καλησπερα,μηπως εχεις ακομα αυτο το λισπ για χαττ-εγσα?

[terry]

Για ενημέρωση αυτών που δεν γνωρίζουν, η Autolisp (απλοποίηση της common lisp) δεν είναι μόνο συρραφή μακροεντολών αλλά μπορεί να επεξεργαστεί τις ιδιότητες των οντοτήτων ενός σχεδίου και, το κυριότερο, να εφαρμόσει λογικούς τελεστές σε ομάδες επιλεγμένων οντοτήτων δημιουργώντας άλλες ομάδες με αλλαγμένα τα χαρακτηριστικά τους. Ενα παράδειγμα απλού κώδικα lisp είναι η ρουτίνα korkth.lsp στα downloads, που διαβάζει τα ανύσματα σε μια lwpolyline, γράφει πινακάκι συντεταγμένων αρχής-τέλους, μήκους ανύσματος, ολικού εμβαδού που περικλείει, γράφει το μήκος ανύσματος με label δυο δεκαδικών και στοίχιση centered-above, σχεδιάζει κυκλάκια στις αρχές και στο τέλος κάθε ανύσματος και, το κυριότερο και δυσκολότερο για μένα, ελληνικούς χαρακτήρες από Α-Ω στοιχισμένα σε κάθε κορυφή της.

 

 

 

Ενω ξεκιναω το lisp δεν βγαζει τιποτα...ουτε κορυφες, ουτε διαστασεις.. Τι φταει?

 

 

Αλλη ερωτηση...εχω κατεβασει ενα lisp που βγαζει σε πινακα συντεταγμενες κορυφων.....αλλα μονο για lwpolylines..τι ακριβως ειναι αυτο?? πως τις εισαγω???

edit βρηκα πως να μετατρεψω μια polyline σε lwpolyline...με την εντολη CONVERTPOLY

 

και αλλη ερωτηση...Ποτε μια polyline ειναι κλειστη και ποτε ανοιχτη???

[agior]

Εαν αναφέρεσαι στο korkth.lsp τότε πιθανό είναι πως δεν είναι ορατή όλη η polyline στην οθόνη, πράγμα απαραίτητο στη λειτουργία της ρουτίνας.

Κλειστή polyline είναι όταν το σημείο αρχής της είναι και σημείο τέλους, κλειστό πολύγωνο δηλαδή.

[Directionless]

Ένα απλό Lisp παιδιά, για προσδιορισμό συντεταγμένων αρχής και τέλους απλών ευθειών (και εξαγωγή σε ένα .txt αρχείο) ξέρετε που μπορώ να βρω ;

[terry]

Πηγαινε στην πρωτη σελιδα αυτου του τοπικ...εχει ενα λινκ.....πηγαινε εκει κι κατεβασε το lisp ----ordy

 

@agior Ευχαριστω πολυ...Θα το δοκιμασω κ θα σου πω....

[Directionless]

1000 ευχαριστώ ! Πραγματικά μου έλυσες τα χέρια.

[terry]

@agior για δες εδω...

 

@agior <!> It isn't LwPolyline! Quit. <!>

 

 

 

 

 

 

>
Command: korkth

Enter the drawing scale (100,200,500,etc) : 100

Pick point for the coords tag:
Prefix, Suffix for the labels? (simple <enter>=nothing) :suffix

Enter the suffix : 2

Select boundary lwpolyline:
Yes or No, please.
; error: Function cancelled
Vertical? [Yes/No] <Yes>: yes

"Standard" is now the current text style. 

 

 

 

to suffix & prefix τι σημαινει???