Μετάβαση στο περιεχόμενο

Toposynt.lsp - Πίνακας Συντεταγμένων για Διαγράμματα Δόμησης, Τοπογραφικά, Διανομές, κλπ. 3


Σχετικά με αυτό το αρχείο

Πίνακας Συντεταγμένων για Διαγράμματα Δόμησης, Τοπογραφικά, Διανομές, κλπ.

Πρόβλημα με τα Ελληνικά; Κοίταξε το  https://www.michanikos.gr/files/file/644-toposyntlsp-πίνακας-συντεταγμένων-για-διαγράμματα-δόμησης-τοπογραφικά-διανομές-κλπ/?do=findComment&comment=11485&tab=comments

Συνάδελφοι,

Βλέποντας την μεγάλη αποδοχή που έχει αυτό το πραγματικά πολύ χρήσιμο προγραμματάκι (900 εμφανίσεις, 200 downloads και 18 σχόλια σε 3 μέρες), αφιέρωσα ένα Σαββατοκύριακο για να το βελτιώσω όσο μπορούσα, ενσωματώνοντας όσο ήταν δυνατόν και τις επιθυμίες που εκφράσατε στα αρχικά σας σχόλια.

Ένα μεγάλο ευχαριστώ στον χρήστη agior που μοιράστηκε μαζί μας το αρχικό korkth.lsp που είναι και ο πυρήνας αυτού του προγράμματος

Εύχομαι να σας φανεί χρήσιμο και Καλές Δουλειές

Κάλυμνος 3/12/2012

Νικόλας Ρεΐσης

Πολιτικός Μηχανικός

 

 

Σύντομη Περιγραφή

Σε κλειστή polyline AutoCAD :

  • εκτελεί αυτόματη αύξουσα ονομασία κορυφών (κατ'επιλογή είτε με Γράμματα (Ελληνικό αλφάβητο true type) είτε με Αριθμούς - με η χωρίς Πρόθεμα/Επίθεμα).
    Η ονοματοδοσία δηλαδή μπορεί να είναι του τύπου Α,Β,Γ,Δ,... ή του τύπου 1,2,3,4 με επιλογή του πρώτο αριθμού που θα χρησιμοποιηθεί
    Με πρόθεμα η επίθεμα μπορεί να είναι του τύπου κΑ,κΒ,κΓ,... ή κ1,κ2,κ3 η του τύπου Ακκκ,... η 1κ,2κ,3κ όπου κ οποιοσδήποτε χαρακτήρας ή ακολουθία χαρακτήρων
  • αναγράφει την ονομασία στις κορυφές, προσθέτει σημεία (προαιρετικά), υπολογίζει και αναγράφει τις αποστάσεις μεταξύ κορυφών πάνω στις πλευρές
  • συντάσσει Πίνακα Συντεταγμένων των κορυφών και αναγράφει τις Αποστάσεις μεταξύ τους, το εμβαδόν και την περίμετρο της polyline

Πως το ενεργοποιείτε:

  1. Μεταφορτώνετε (Κατεβάζετε, download) το επισυναπτόμενο αρχείο και το σώζετε κατά προτίμηση στο \Program Files\AutoCAD χχχ\Support (η όπου αλλού θέλετε αν ξέρετε τι πρέπει να κάνετε μετά).
  2. Φορτώνετε το πρόγραμμα στο Autocad γράφοντας στην γραμμή εντολών (load "Toposynt ").
    Προσοχή: γράφουμε ακριβώς αυτό που βλέπουμε - δηλαδή μέσα σε παρενθέσεις και εισαγωγικά
  3. Εναλλακτικά το φορτώνουμε με την εντολή APPLOAD
  4. Αφού φορτωθεί το τρέχουμε όπως τρέχουμε οποιαδήποτε εντολή του Autocad γράφοντας στην γραμμή εντολών toposynt και enter η tps και enter

Τι νέο υπάρχει στην έκδοση 3   See changelog

Κυκλοφόρησε

  • V3 - Δημιουργία διαφορετικών layer για ευκολότερη διαχείριση
  • - Τοποθετούνται οι οντότητες σε διαφορετικά layer που δημιουργούνται για κάθε τύπο οντότητας:
  • - "Pinakas-Syntetagmenon" για τον πίνακα, "Pinakas-Syntetagmenon-Points" για τα σημεία,"Pinakas-Syntetagmenon-Koryfes" για την ονομασία κορυφών,"Pinakas-Syntetagmenon-Pleyres" για την διαστασιολόγηση των πλευρών
  • Έχουν όλα άσπρο χρώμα το οποίο αλλάζετε εσείς
  • V2
  • Επιλογή ανάμεσα σε Γράμματα η Αριθμούς στην ονοματοδοσία
  • Οποιαδήποτε True Type γραμματοσειρά θέλει ο χρήστης
  • Επιλογή Σχεδίασης η όχι σημείων στις κορυφές
  • Επιλογή αριθμού Δεκαδικών στις συντεταγμένες
  • Επαναφορά περιβάλλοντος στο αρχικό του χρήστη (μονάδες, δεκαδικά, τρέχον layer κλπ)
  • Προσθήκη 3 πρώτων κορυφών στον τίτλο
  • Υπολογισμός και εγγραφή περιμέτρου
  • Προσθήκη κειμένου στην απόσταση τελευταίας και πρώτης κορυφής
  • Like 18
  • Thanks 11
  • Upvote 1

Σχόλια Μελών

Recommended Comments



Ευχαριστώ πολύ....Πολύ χρήσιμο ειδικά όταν υπάρχουν πολλές κορυφές και γλυτώνεις πραγματικά πολύ χρόνο.Να σαι καλά 

Link to comment
Share on other sites

Και πάλι μπράβο

Μήπως θα μπορούσε να προστεθεί και η δυνατότητα να αναγράφεται δίπλα από τα σημεία και το υψόμετρο τους  σε παρένθεση? 

Link to comment
Share on other sites

Κατ αρχήν είναι πολύ χρήσιμο για όποιον ή όποιους δεν έχουν κάποιο άλλο πρόγραμμα αυτού του τύπου. Νομίζω ότι θα έχει πλήρη τελειωποίηση άν στο τέλος του πίνακα προστεθεί και η μέθοδος υπολογισμού του εμβαδού της επιφάνειας που περιγράφεται

Link to comment
Share on other sites

Αρκετά καλό κοίταξε ένα πρόβλημα που εμφανίζει στο Σ βγάζει ?στην λίστα  (χρήση γραμματοσειράς ngreekn.shx που είχε προτείνει συνάδελφος),ενώ είναι σωστά πάνω στο σχέδιο.

Επίσης όταν δίνεις την polyline με close αρχίζει την ονοματολογία κορυφών από την δεύτερη κορυφή , υπάρχει θέμα σύγχυσης . Όταν την κλείσεις με ταύτιση αρχικής κορυφής και τελικής η αρίθμηση είναι σωστή βάζοντας μία επιπλέον κορυφή στο τέλος. Προσοχή επίσης αν ταυτίσεις δύο ενδιάμεσες κορυφές χωρίς να κάνεις διαγραφή , θα σου εμφανίσει δύο σημεία διαφορετικά με ίδιες συντεταγμένες .Και κάτι ακόμη στο πινακάκι να υπάρχει δυνατότητα να μήν εμφανίζει αποστάσεις μεταξύ των σημείων

Η δυνατότητα που υπήρχε για την εισαγωγή κύκλων στις κορυφές αντί για σημεία τώρα νομίζω ήταν καλή.

Σε κάθε περίπτωση σε ευχαριστούμε ,καλή δύναμη και καλές αναβαθμίσεις

Link to comment
Share on other sites

επειδή σήμερα το έπιασα πρώτη μέρα , ήθελα να βγάλω γρήγορα συντεταγμένες σε polyline (όχι κλειστές) ,

το δοκίμασα αρκετά
και παρατήρησα ότι μια γραμμή δεν καταφέρνει να την αναλύσει, στο σημείο που ζητάει να ορίσεις που θα γίνει το πινακακι ... κλατάρει ,
ψάχνω την αιτία , σε μια παράλληλη γραμμή (από την αρχική που εμφάνισε το πρόβλημα ) την οποία έφτιαξα από την αρχή , πάλι απέτυχε , οπότε δεν είναι πρόβλημα της γραμμής .

Link to comment
Share on other sites

 

Σημείο εισαγωγής του Πίνακα Συντεταγμένων:

*Invalid selection*

Expects a point or Last

 Πρόσεχε Ντε!!

στην δημιουργία του πίνακα , μάλλον έχει όρια ...

γιατί με μια διαίρεση της pl σε 2 τμήματα δούλεψε ..

Link to comment
Share on other sites

τέλος... στα μέσα της δουλειάς , δεν βρίσκω τρόπο να προχωρήσω. Τι νέες γραμμές κανω; , τι μοιραζω το μηκος των παλιων ....;
δυστυχώς , το πρόγραμμα έχει για κάποιο λόγο κάποιο όριο ...
και με κρέμασε στα μέσα της δουλειάς , οπότε πρέπει να βρω άλλο και να αρχίσω από την αρχή .
πολύ κΑλο , αλλά για δοκιμές και μόνο .

Link to comment
Share on other sites

Ευχαριστώ πολύ για το τόσο χρήσιμο πρόγραμμα!!!

Γιατί δε μπορώ να βρω την επιλογή ώστε να γράφουν αριθμούς οι κορυφές αντί για γράμματα;

Με ρωτάει τα παρακάτω:

 

"Command: TOPOSYNT
undo Current settings: Auto = On, Control = All, Combine = Yes, Layer = Yes
Enter the number of operations to undo or [Auto/Control/BEgin/End/Mark/Back] <1>: m
Command:
Κλίμακα Σχεδίου (100,200,500,κλπ) : 100

Σημείο εισαγωγής του Πίνακα Συντεταγμένων:
Πρόθεμα(P)refix, Επίθεμα (S)uffix για τα Γράμματα? (απλό <enter>=τίποτα) :

Διάλεξε polyline:.....
"

 

Πουθενά για επιλογή Γραμμάτων ή αριθμών!

Link to comment
Share on other sites

Καλησπέρα σας

 

Η εφαρμογη μοιάζει εξαιρετική αλλα συναντάω ένα πρόβλημα κατά τη φόρτωση του Toposynt, καθώς μου εμφανίζει το εξής:

"LISP command is not available"

 

Γνωρίζει κάποιος γιατί συμβαίνει αυτό;

Link to comment
Share on other sites

Συγνωμη, αλλα, αυτό δεν το καταλαβα.

Συναδελφε εισαι χακερ ή κρακερ;

Γιατι δεν αναφερεις τον δημιουργο του αρχειου lisp;

Νομιζω οτι αυτο δεν ειναι σωστο.

Ανοιγμα με notepad , κανα δυο ellinika και ετοιμο.

Καλα να παθουμε (ως κλαδος)

Link to comment
Share on other sites


Δημιουργήστε ένα λογαριασμό ή συνδεθείτε προκειμένου να αφήσετε κάποιο σχόλιο

Πρέπει να είστε μέλος για να μπορέσετε να αφήσετε κάποιο σχόλιο

Δημιουργία λογαριασμού

Κάντε μια δωρεάν εγγραφή στην κοινότητά μας. Είναι εύκολο!

Εγγραφή νέου λογαριασμού

Σύνδεση

Εάν έχετε ήδη λογαριασμό; Συνδεθείτε εδώ.

Συνδεθείτε τώρα
×
×
  • Create New...

Σημαντικό

Χρησιμοποιούμε cookies για να βελτιώνουμε το περιεχόμενο του website μας. Μπορείτε να τροποποιήσετε τις ρυθμίσεις των cookie, ή να δώσετε τη συγκατάθεσή σας για την χρήση τους.