liaskosd

Ορθή επανάληψη της τελευταίας έκδοσης R2 του Areaob.
Από βιασύνη ξέχασα να προσθέσω μια καινούργια ρουτίνα που προστέθηκε για μία από τις βελτιώσεις, με αποτέλεσμα να βγάζει μήνυμα ότι το nearest_point δεν υπάρχει.
Κατά τα άλλα ισχύουν όσα αναφέρω στα προηγούμενα.
Συγνώμη για τον χαμένο χρόνο.
 

Είναι μια βελτιωμένη έκδοση η R2 του Areaob που είχα δημοσιεύσει 13 Μαρτίου 2021.
Υπενθυμίζω ότι αφορά τον υπολογισμό εμβαδού κλειστού σχήματος με πλευρές γραμμές ή τόξα που τέμνονται μεταξύ τους.
Οι αλλαγές είναι οι πρακάτω:
1. Έχει βελτιωμένο αλγόριθμο έτσι ώστε να έχουμε λιγότερες περιπτώσεις που το τελικό σχήμα δεν περιέχει το εσωτερικό σημείο που έχουμε δώσει.
2. Έχει γίνει βελτίωση στη ρουτίνα error, η μία αφορά την αποκλειστική έξοδο από το πρόγραμμα με το πλήκτρο escape (η έξοδος με το πάτημα enter δημιουργούσε πρόβλημα στην επαναφορά των αρχικών ρυθμίσεων και η δεύτερη αφορά την αντιιμετώπιση προβλημάτων στην λειτουργία της ρουτίνας για τις εκδόσεις του autocad από 2015 και πάνω.
3. Έχει δοκιμαστεί και τρέχει και στην έκδοση Autocad 2017.
 

Πρόγραμμα υπολογισμού εμβαδού κλειστού σχήματος
Ένα από πιο συχνά ζητήματα που αντιμετωπίζει ένας τοπογράφος μηχανικός
στην σχεδίαση - υπολογισμό ενός τοπογραφικού διαγράμματος είναι ο υπολογισμός
του εμβαδού μικρών ή μεγάλων τμημάτων.
Με το autocad που είναι το βασικό πρόγραμμα, χωρίς τη χρήση βοηθητικών εφαρμογών
έχουμε δύο επιλογές:
1. Επιλέγοντας μια-μια τις κορυφές του σχήματος, πράγμα που είναι επίπονο
και αφ' ετέρου μπορεί εύκολα να μας οδηγήσει σε λάθος επιλογή κορυφής.
2. Να σχεδιάζουμε κάθε φορά μια polyline για το σχήμα που θέλουμε να υπολογίσουμε
το εμβαδόν που και αυτό είναι χρονοβόρο και επίπονο.
Αντίθετα εάν είχαμε τη δυνατότητα αντί για τις κορυφές, να επιλέγουμε τις πλευρές
του σχήματος, η όλη διαδικασία θα ήταν κατά πολύ απλούστερη, ακριβέστερη και πολύ
πιο σύντομη.
Πόσο μάλλον εάν είχαμε και τη δυνατότητα να μπορούμε να υπολογίσουμε σχήματα που
να έχουν πλευρές, όχι μόνο γραμμές αλλά και τόξα.
Αυτό ακριβώς επιχειρεί αυτό το πρόγραμμα, με άλλα λόγια:
Απλοποιεί την εύρεση του εμβαδού σχήματος, με επιλογή των πλευρών, που μπορεί
να είναι είτε γραμμές είτε τόξα, με την επιλογή να γίνεται είτε αριστερόστροφα
είτε δεξιόστροφα.
Μας ζητά να ορίσουμε ένα σημείο εσωτερικό του σχήματος που θέλουμε να υπολογίσουμε
και στη συνέχεια να επιλέξουμε τις πλευρές του σχήματος, με μόνη προϋπόθεση, η κάθε
πλευρά να τέμνεται με την επόμενη. Το εμβαδόν προκύπτει μόλις ορίσουμε κλειστό σχήμα
με τουλάχιστον τρεις (3) πλευρές. Στην περίπτωση που δεν "κλείνουμε" το σχήμα δεν
υπάρχει αποτέλεσμα και αναγκαστικά θα πρέπει να διακόψουμε πατώντας το πλήκτρο Esc.
Σε κάθε περίπτωση πατώντας το πλήκτρο  Esc βγαίνουμε από το πρόγραμμα και το σχέδιο
επανέρχεται στις ρυθμίσεις που είχε.
              
Την πρώτη φορά που τρέχουμε το πρόγραμμα μας ζητά να καθορίσουμε το ύψος του κειμένου
του εμβαδού και το layer στο οποίο θα εμφανιστεί. Τις αμέσως επόμενες φορές συνεχίζει
με τις επιλεγμένες τιμές.              
Εάν κατά την διαδικασία επιλογής των πλευρών η επιλογή μας είναι άνευ αντικειμένου
ή επιλέγουμε άσχετα αντικείμενα θα μας ζητά να ξανά επιλέξουμε χωρίς κάποια άλλη
ειδοποίηση εκτός από την περίπτωση που επιλέξουμε κάποια Lwpolyline οπότε θα μας
ενημερώσει για το λάθος αντικείμενο που έχουμε επιλέξει.
Αυτό γίνεται  για να γνωρίζουμε ότι επιλέξαμε κάτι, που δεν είναι αποδεκτό, επειδή
οι Lwpolylines δεν ξεχωρίζουν από τις απλές γραμμές ή τα τόξα.
              
Για να έχουμε ακριβή οπτική εικόνα, με την επιλογή κάθε πλευράς αλλάζει η κατάσταση
θέασης της πλευράς σε highlight, με τον ορισμό δε του κλειστού σχήματος, επιπλέον,
δημιουργείται μια διαγράμμιση Solid της περιοχής που έχει υπολογιστεί για μερικά
δέκατα του δευτερολέπτου και στη συνέχεια γίνεται επισήμανση των κορυφών του σχήματος.
Έτσι έχουμε πλήρη έλεγχο για το σχήμα που έχουμε επιλέξει αν είναι αυτό που θέλουμε ή όχι
              
Στην περίπτωση που το τελικό σχήμα που προκύπτει δεν περιέχει το αρχικό εσωτερικό
σημείο που έχουμε επιλέξει, θα ειδοποιηθούμε ότι πιθανό να υπάρχει πρόβλημα σωστού
υπολογισμού και στη συνέχεια θα εκτυπωθεί το αποτέλεσμα οπότε επιλέγουμε αν θα
αποδεχθούμε το αποτέλεσμα.
Έχει σημασία εδώ να αναφέρω ότι στην περίπτωση που οι πλευρές του σχήματος είναι μόνο
γραμμές το αν είναι το 'εσωτερικό σημείο' εντός ή εκτός του σχήματος δεν επηρεάζει
το αποτέλεσμα.
Όμως εάν όμως έχουμε πλευρές που είναι τόξα είναι πιθανό το τελικό σχήμα να είναι
διαφορετικό από αυτό που θέλουμε, οπότε το αποτέλεσμα είναι λανθασμένο.
Σε κάθε περίπτωση επειδή έχουμε οπτική εικόνα της διαδικασίας, αποφασίζουμε
ανάλογα.            
Απαιτείται εξάσκηση για να κατανοήσουμε την λειτουργία του ειδικά όταν έχουμε πολλές
γραμμές και τόξα ταυτόχρονα.
Για να φορτώσει το πρόγραμμα, εάν το βάλετε σε κάποιο φάκελο που μπορεί να δει το
Autocad, γράφετε την εντολή (load"areaob") και πατάτε enter ή space, Μπορείτε να
το φορτώσετε και μέσα από το γραφικό περιβάλλον του Autocad -->Tools -->Load Application
Ξεκινά με την εντολή areaob και enter η space και με την εντολή help_areaob εμφανίζει
επεξηγηματικό - βοηθητικό κείμενο για το πρόγραμμα.
Εχει γίνει, στο μέτρο του δυνατού, αποσφαλματοποίηση και μπορεί να τρέξει οποιαδήποτε
ρύθμιση και αν έχετε κάνει, χρησιμοποιεί τις δικές του και μετα από την εκτέλεση
επαναφέρει τις ρυθμίσεις που είχατε.
Είναι δοκιμασμένο και τρέχει σε εκδόσεις από Autocad 2000 εως και 2008.
Μπορείτε να στείλετε τυχόν παρατηρήσεις - ερωτήσεις στο [email protected]
Διατίθεται ελεύθερα, αφιερωμένο στη μνήμη του συνάδελφου μου και παλιού συμφοιτητή
Άνθιμου Σαββίδη, που πρόσφατα έφυγε από τη  ζωή.
CopyRight ® Dimitris Liaskos 2020