eg0n

tableCoords v.1 (Φεβρουάριος 2018)
Το tableCoords είναι ένα πρόγραμμα σε lisp για την αυτόματη δημιουργία πίνακα συντεταγμένων και λοιπόν βοηθητικών στοιχείων σε περιβάλλον Autocad.
Αν δεν ξέρετε πως να εκτελέσετε αρχεία lisp διαβάστε τη σχετική ενότητα στο τέλος αυτού του αρχείου.
 
Αρχείο αλλαγών
tableCoords v.1.01 (Ιανουάριος 2022)
Στο πινακάκι με τις συντεταγμένες εμβαδά και αποστάσεις αναγράφονται με τρία δεκαδικά. Αν θέλετε να αλλάξετε τον αριθμό των δεκαδικών μπορείτε να κάνετε edit το αρχείο lisp και στη γραμμή 522 να τροποποιήσετε τη μεταβλητή (setq *decimals* 3).
tableCoords v.1.02 (Ιούλιος 2022)
Επειδή σε κάποιες περιπτώσεις ο έλεγχος για πολύγωνα που τέμνονται με τον εαυτό τους έβγαζε εσφαλμένα μήνυμα λάθους, υπάρχει πλέον η δυνατότητα να απενεργοποιηθεί τελείως. Αρκεί να κάνετε edit το αρχείο lisp και στη γραμμή 523 να τροποποιήσετε τη μεταβλητή (setq *selfintersect* 1). Όταν η τιμή είναι 1 γίνεται έλεγχος για self overlap ενώ όταν είναι 0 ο έλεγχος παρακάμπτεται.
Στην τελευταία περίπτωση να σημειωθεί πως αν υπάρχει όντως πολύγωνο που τέμνεται με τον εαυτό του, το πρόγραμμα θα διακοπεί (δεν μπορεί να γίνει offset η polyline για την τοποθέτηση των ονομάτων στις κορυφές). Μπορείτε πάντοτε να βγάλετε πινακάκι με την εντολή ptc, η οποία όμως δεν τοποθετεί αυτόματα ονόματα στις κορυφές και δεν κάνει διαστασιολόγηση.
 
>>> Δημιουργία πίνακα (tc)
Για εκτέλεση πληκτρολογείτε tc και πατάτε space ή enter.
Το πρόγραμμα θα σας ζητήσει να επιλέξετε μία ή περισσότερες κλειστές polylines. Δεν είναι απαραίτητο οι γραμμές να έχουν την ιδιότητα closed, αρκεί να αρχίζουν και να τελειώνουν στο ίδιο σημείο.
Στη συνέχεια θα σας ζητηθεί να δώσετε την κλίμακα του σχεδίου σας (κρατάει μόνο το ακέραιο τμήμα).
Η κλίμακα καθορίζει αφενός το μέγεθος των γραμμάτων του πίνακα, αφετέρου τα μεγέθη των βοηθητικών στοιχείων (ονόματα κορυφών, διαστασιολόγηση).
Η επόμενη ερώτηση σας ζητάει αν θέλετε να δώσετε κάποιο πρόθεμα για την αυτόματη ονομασία των κορυφών. Αν π.χ. πατήστε το γράμμα Τ, οι κορυφές του πολυγώνου θα ονομαστούν Τ1, Τ2, Τ3 κ.λπ. Αν δεν θέλετε κάποιο πρόθεμα πατήστε απλώς enter.
Τέλος, θα σας ζητηθεί να δώσετε το σημείο εισαγωγής του πίνακα. Μπορείτε να τον τοποθετήσετε κάπου πρόχειρα, είναι πολύ εύκολο να τον μετακινήσετε στη συνέχεια στο σημείο ακριβώς που επιθυμείτε.
Το tableCoords θα δημιουργήσει ένα καινούριο layer (Pinakakia). Θα φτιαχτεί πίνακας ο οποίος περιλαμβάνει όνομα κορυφής, συντεταγμένες Χ και Υ, αποστάσεις μεταξύ κορυφών, συνολικό εμβαδόν πολυγώνο και συνολική περίμετρο. Ο πίνακας είναι ένα ενιαίο αντικείμενο, που στη λογική του θυμίζει πίνακα excel. Μπορείτε να κάνετε εύκολα edit κάποιο στοιχείο, να αλλάξετε τις ιδιότητες γραμμών και στηλών, να του δώσετε κάποιο συγκεκριμένο στυλ μορφοποίησης κ.λπ. Αν θέλετε να τον μετακινήσετε αρκεί να τον επιλέξετε και να διαλέξετε το πάνω αριστερά τετραγωνάκι.
Εκτός από τον πίνακα θα μπούνε αυτόματα ονόματα στις κορυφές του πολυγώνου και θα γίνει διαστασιολόγηση στις πλευρές του. Οι διαστάσεις έχουν φτιαχτεί με το στυλ tcDimStyle. Αν θέλετε να αλλάξετε εύκολα την εμφάνισή τους, πατήστε dimstyle και από το παράθυρο που ανοίγει τροποποιήστε το παραπάνω στυλ.
>>> Εντολή διαγραφής (deltc)
Με την εντολή αυτή θα σβήσετε όλα όσα έχουν φτιαχτεί (πίνακας, ονόματα κορυφών, διαστασιολογήσεις, layers, styles). Η deltc φροντίζει να σβήσει οριστικά (purge) τυχόν υπολείμματα των παραπάνω στοιχείων.
>>> Εισαγωγή πίνακα από σημεία (ptc)
Ένας εναλλακτικός τρόπος για να δουλέψετε είναι αντί να κάνετε επιλογή polyline(s) να περιγράψετε το πολύγωνο που σας ενδιαφέρει με τις κορυφές του. Για τον σκοπό αυτό πατάτε ptc και δίνετε διαδοχικά τις κορυφές του πολυγώνου. Η υπόλοιπη διαδικασία είναι παραπλήσια με όσα ειπώθηκαν παραπάνω, με μόνη διαφορά ότι δεν δημιουργείται αυτόματη διαστασιολόγηση και δεν μπαίνουνε ονόματα στις κορυφές.
>>> Έλεγχος για self overlap
Να σημειωθεί πως το πρόγραμμα είτε όταν επιλέγετε polylines είτε όταν επιλέγετε σημεία ελέγχει την τοπολογική ορθότητα των πολυγώνων, ότι δεν τέμνονται δηλαδή με τον εαυτό τους. Αν εντοπιστεί κάποιο σφάλμα η διαδικασία διακόπτεται και βγαίνει αντίστοιχο προειδοποιητικό μήνυμα.
>>> Τέλος, πατώντας helptc βγαίνει ένα μήνυμα συνοπτικής παρουσίασης.
Η πρώτη έκδοση του tableCoords δημιουργήθηκε τον Φεβρουάριο του 2018.
Ευχαριστώ πολύ για τη βοήθεια στον έλεγχο και την αποσφαλμάτωση τον Σπύρο Σταμπολίδη και τον Αλέξη Ντούλα.
Για αποστολή σχολίων και παρατηρήσεων μπορείτε να επικοινωνήσετε μαζί μου στο [email protected]
============================================
Για να φορτώσετε ένα πρόγραμμα lisp πληκτρολογείτε "ap" και πατάτε enter.
Βρείτε το αρχείο .lsp που θέλετε να εκτελέσετε, επιλέξτε το και κάντε load.
Αναλόγως της έκδοσης του Autocad που δουλεύετε μπορεί να σας ζητήσει επιβεβαίωση για το αν εμπιστεύεστε το αρχείο.
Αν θέλετε το αρχείο μπορεί να φορτώνει αυτόματα κάθε φορά που ανοίγετε το πρόγραμμα.
Πατάτε πάλι "ap" και πατάτε το κουμπί "contents" (startup suite) κάτω δεξιά.
Από εκεί μπορείτε να κάνετε add και remove αρχεία lisp.
Στο επόμενο σχέδιο που θα ανοίξετε θα φορτωθεί ότι έχετε τοποθετήσει στο startup.
Για να μην βγαίνει συνεχώς ερώτηση ασφαλείας, μπορείτε από τις επιλογές του προγράμματος να δηλώσετε ένα trusted folder μέσα στο οποίο θα έχετε βάλει όλα τα lisp αρχεία που δουλεύετε.
Για περισσότερες πληροφορίες σχετικά με το πως μπορείτε να εκτελέστε lisp, καθώς επίσης και για να κατεβάσετε πολλά χρήσιμα προγράμματα, επισκεφτείτε τον σύνδεσμο http://www.lee-mac.com/runlisp.html

myGrid v.1 (Νοέμβριος 2017)
Το myGrid είναι ένα πρόγραμμα σε lisp για την αυτόματη δημιουργία κανάβου και εισαγωγή βορρά προσανατολισμού σε περιβάλλον Autocad.
Αν δεν ξέρετε πως να εκτελέσετε αρχεία lisp διαβάστε τη σχετική ενότητα στο τέλος αυτού του κειμένου.
>>> Δημιουργία κανάβου (mg)
Για εκτέλεση πληκτρολογείτε mg και πατάτε space ή enter.
Το πρόγραμμα θα σας ζητήσει να δώσετε τα σημεία που ορίζουν μια οποιαδήποτε διαγώνιο του κανάβου.
Στη συνέχεια θα σας ζητηθεί να δώσετε την κλίμακα του σχεδίου σας (κρατάει μόνο το ακέραιο τμήμα).
Η κλίμακα καθορίζει αφενός το βήμα του κανάβου, αφετέρου το μέγεθος των γραμμάτων του οπλισμού.
Αν θέλει ο χρήστης μπορεί να παρακάμψει την προεπιλογή μεγέθους γραμμάτων και να δώσει μια δική του τιμή.
Η τελευταία ερώτηση αφορά το αν θα δημιουργηθούν σταυροί ή γραμμές, πατώντας c ή l αντίστοιχα.
Το myGrid θα δημιουργεί ένα καινούριο layer (kanabos). Αν το layer υπάρχει ήδη, θα σας ρωτήσει αν θέλετε να κρατήσετε τα περιεχόμενά του ή να τα διαγράψετε. Αν λοιπόν θέλετε να αντικαταστήσετε τον κάναβο που έχετε φτιάξει με έναν καινούριο, ζητάτε διαγραφή. Αν θέλετε να έχετε παραπάνω από έναν κανάβους στο σχέδιο σας, ζητάτε διατήρηση. Το layer που φτιάχνεται κλειδώνεται αυτόματα.
>>> Εντολές διαγραφής (delgrid) και αποστολής πίσω (backgrid)
Η πρώτη σβήνει το layer kanabos μαζί με τα περιεχόμενά του.
Η δεύτερη στέλνει τον κάναβο πίσω από τα υπόλοιπα αντικείμενα του σχεδίου σας (εκτός από τις εικόνες).

>>> Εντολές γρήγορης σχεδίασης (cmg και lmg)
Η cmg δημιουργεί κάναβο με σταυρούς. Η μοναδική ερώτηση είναι για την κλίμακα.
Η lmg δημιουργεί κάναβο με γραμμές. Η μοναδική ερώτηση είναι για την κλίμακα.

>>> Εισαγωγή βορρά προσανατολισμού (na)
Εκτελείται με την εντολή na. Κατά την πρώτη εκτέλεση θα σας ζητήσει να υποδείξετε το αρχείο dwg που βρίσκεται ο βορράς προσανατολισμού. Χρησιμοποιείστε κάποιο από τα πρότυπα αρχεία (northarrow.dwg).
Θα σας ζητήσει επίσης να δώσετε το σημείο εισαγωγής του βορρά και (αν δεν το έχετε κάνει ήδη) την κλίμακα του σχεδίου. Ο βορράς θα κεντραριστεί οριζόντια και κάθετα στο αντίστοιχο τετράγωνο του κανάβου. Θα φτιαχτεί ένα καινούριο layer (borras).

>>> Εντολές διαγραφής (delna), στοίχισης (alna) και αλλαγής (changena)
Πατώντας delna σβήνεται ο βορράς και το layer που είχε φτιαχτεί.
Πατώντας alna μπορείτε να κεντράρετε τον βορρά σας σε κάποιο τετράγωνο του κανάβου.
Τέλος, με την εντολή changena μπορείτε να αντικαταστήσετε το πρότυπο αρχείο βορρά με κάποιο δικό σας. Θα σας ζητηθεί να υποδείξετε το αρχείο (.dwg) που θέλετε να χρησιμοποιήσετε. Για καλύτερη λειτουργικότητα (σωστό μέγεθος και σωστή θέση) φέρτε τον βορρά σας πάνω στο υπόδειγμα του northarrow.dwg προσέχοντας τα εξής δύο πράγματα: α)το οπτικό κέντρο του βορρά σας να είναι στην αρχή των αξόνων και β)το συνολικό ύψος του βορρά να είναι 100 units (για εύκολη προσαρμογή, μπορείτε να κάνετε align τον δικό σας πάνω στον προτεινόμενο).

>>> Τέλος, πατώντας helpgrid βγαίνει ένα μήνυμα που περιγράφει συνοπτικά τη λειτουργία του.
Η πρώτη έκδοση του myGrid δημιουργήθηκε τον Νοέμβριο του 2017.
Ευχαριστώ πολύ για τη βοήθεια στον έλεγχο και την αποσφαλμάτωση τον Σπύρο Σταμπολίδη και την Κατερίνα Μπρεντάκη.
Για αποστολή σχολίων και παρατηρήσεων μπορείτε να επικοινωνήσετε μαζί μου στο [email protected]
============================================
Για να φορτώσετε ένα πρόγραμμα lisp πληκτρολογείτε "ap" και πατάτε enter.
Βρείτε το αρχείο .lsp που θέλετε να εκτελέσετε, επιλέξτε το και κάντε load.
Αναλόγως της έκδοσης του Autocad που δουλεύετε μπορεί να σας ζητήσει επιβεβαίωση για το αν εμπιστεύεστε το αρχείο.
Αν θέλετε το αρχείο μπορεί να φορτώνει αυτόματα κάθε φορά που ανοίγετε το πρόγραμμα.
Πατάτε πάλι "ap" και πατάτε το κουμπί "contents" (startup suite) κάτω δεξιά.
Από εκεί μπορείτε να κάνετε add και remove αρχεία lisp.
Στο επόμενο σχέδιο που θα ανοίξετε θα φορτωθεί ότι έχετε τοποθετήσει στο startup.
Για να μην βγαίνει συνεχώς ερώτηση ασφαλείας, μπορείτε από τις επιλογές του προγράμματος να δηλώσετε ένα trusted folder μέσα στο οποίο θα έχετε βάλει όλα τα lisp αρχεία που δουλεύετε.
Για περισσότερες πληροφορίες σχετικά με το πως μπορείτε να εκτελέστε lisp, καθώς επίσης και για να κατεβάσετε πολλά χρήσιμα προγράμματα, επισκεφτείτε τον σύνδεσμο http://www.lee-mac.com/runlisp.html