Scripturi in LISP AutoLISP

[John Doe]

                  Tabelul parcelelor arata asa:


, si daca nici datele astea nu le ai ce fisier CP vrei sa faci?

583/296px  38.4KB


               

[DanCad]

                  Am scris un program Autolisp care raporteaza puncte dintr-un fisier csv, il mai perfectionez putin, si daca sunteti interesati de el il postez gratuit.In acest moment studiez Visual Basic program in care se pot scrie programe mai profesional.
Felicitari John pentru programele realizate, esti cu adevarat un tip foarte inteligent.
Cu respect,
Dan. http://www.3xforum.ro/img/smilies/big_smile.png">


               

[John Doe]

                  Mersi, dar nu cred ca sunt eu asa inteligent.... cred ca stiu doar atât cât sa-mi dau seama ce putine stiu de fapt... iar restul e pasiune.


               

[zamfy]

                  John, eu mi-am dat cu parerea din ce am vazut in poze. Daca ma crezi, nu am facut niciodata CP multiplu, de fapt nu am mai facut vreun CP de cel putin jumatate de an (am alti colegi care se ocupa de asta http://www.3xforum.ro/img/smilies/big_smile.png">). Textele din desen nu cred ca ar fi chiar greu de manipulat, mai ales daca sunt create pe layere diferite si dupa niste reguli precise. M-ar bate gandul sa fac eu aplicatia asta, dar, deh, lenea-i mare...si oricum, nu prea am tangenta cu domeniul...
@DanCAD, vezi ca VB nu mai este suportat oficial de AutoCAD-urile mai recente de vers. 2009 parca, iar user-ul trebuie sa instaleze singur suportul pt. VB (asta daca vrei sa faci aplicatii comerciale).


               

[zamfy]

                  Si pt. cei care se pricep, as avea nevoie de o indrumare pentru un program:
-sa zicem ca am intr-un desen 2 borne care se numesc A1 si B1 si cate 3 repere pentru fiecare. Reperele au denumirea A1R1, A1R2, A1R3, B1R1, B1R2, B1R3. Eu vreau sa duc cate o linie din borna in fiecare reper care ii corespunde automat, adica sa am cate 3 linii pentru fiecare borna in parte. Eu am incercat ceva, dar problema este ca in aplicatia mea imi duce o linie din A1 in A1R1, dar sare peste celelalte 2 repere, apoi imi duce o linie din B1 in B1R1, dar sare peste celelalte 2 si tot asa.
Poate aveti o rezolvare sau o idee.


               

[John Doe]

                  @zamfy: da, inteleg si mersi pentru sfaturi. Insa culegerea informatiilor din textele din desen mi se pare cel putin inutil de greoaie si imprecisa, ca sa nu zic aiurea. In plus, constrangerea utilizatorilor pe anumite structuri fixe prestabilite ale desenului nu e nici ea o solutie buna, constrangerile trebuie sa fie minime si cat mai usor de indeplinit.
Dar, in fine, fiecare face cum vrea el ca de-aia e democratie, si vedem pe urma cum ar fi fost mai bine - n-are rost sa despicam firul in patru aici pe chestiuni care tin prea mult de impresiile personale. O sa revin cu o prezentare mai completa saptamana viitoare, ori aici ori la rubrica "Vanzari" si mai vedem.


               

[zamfy]

                  

John Doe a scris: Adresa proprietarilor este scrisa ca fiind in judetul in care sunt parcelele, UAT-ul la fel iar la localitate se trece NEIDENTIFICATA (fara strada si numar) - valabil pentru toata tara. Datele personale ale proprietarilor nu se trec.

John, pentru chestia asta hai sa-ti dau o idee: poti sa treci in CP orice localitate din Romania, nu trebuie sa o treci neidentificata! Daca ai TopoLT instalat, cauta fisierul Siruta.csv si acolo ai codurile Sirsup si Siruta pentru orice localitate din Romania. Daca nu il ai, ti-l trimit eu:
http://www.fileshare.ro/30392169203.5" target="_blank">http://www.fileshare.ro/30392169203.5

Nu cred ca iti ia mai mult de 10 minute sa implementezi o rutina care genereaza codul Siruta si Sirsup in programul tau, pe baza fisierului de acolo. Succes!


               

[zamfy]

                  Am imbunatatit destul de mult programul care genereaza puncte pe contur, asa ca m-am decis sa il postez din nou:
http://www.fileshare.ro/30393993662.4" target="_blank">http://www.fileshare.ro/30393993662.4


               

[John Doe]

                  Mersi, am si eu fisierul ala dar problema e alta: proprietarii inscrisi in Titlurile de proprietate nu au si datele personale acolo, deci chiar nu se stie ce domiciliu au. Asa ca, oficial, se trece localitatea "neidentificata". Asa e trecut si in exemplul de fisier CPXML primit oficial de la un OCPI de care m-am folosit ca exemplu.
Codurile SIRUTA si SIRSUP le am si eu toate, chiar le folosesc in alta aplicatie care face dosare de intabulare la foc automat cu toate anexele si cu fisiere DXF si CPXML cu tot, si in aplicatia asta scriu chiar datele reale ale proprietarilor, fiindca le cunosc, avand in fata actele de intabulare ale parcelei respective. Deci rutina de care spui o am de mult. SI daca se va cere sa fie trecuta la localitatea de domiciliu a proprietarilor UAT-ul unde e parcela, sunt vreo trei linii de program in plus deci no problem.
Mersi din nou pentru sugestii.

Sa-ti zic si eu ceva: am postat mai demult pe-aici pe undeva o rutina care genereaza puncte pe un contur cu tabelul de coordonate langa, ai vazut-o? E open source. Poate iti foloseste. Am incercat sa pozitionez ceva mai bine textele de la numarul punctelor cu "BL" , "TL" si altele functie de distanta pana la punctul anterior si orientarea segmentului. Depinde si cum te-ai obisnuit, pentru mine e mult mai convenabil decat rutina din TopoLT, care am impresia ca face mai mult ce vrea ea si mai putin ce vreau eu.


               

[zamfy]

                  Da, ai dreptate, am uitat ca CP-urile de tipul acesta se fac doar pentru extravilan http://www.3xforum.ro/img/smilies/smile.png">. Dar poate ii va folosi cuiva fisierul respectiv.
Am aplicatia de care spui tu si chiar m-am inspirat din ea pentru alte programe pe care le-am facut. Cred ca o sa iau din ea portiunea de cod care genereaza inventarul de coordonate http://www.3xforum.ro/img/smilies/big_smile.png">.
Pe aceasta iti multumesc si tie si tuturor celor care au pus coduri sursa aici, sunt de 1 milion de ori mai bune decat orice carte de lisp. Iar in viitor, daca voi crea programe mai bune, le voi posta cu siguranta aici.


               

[John Doe]

                  Codurile alea au si putin suflet in ele... asa au fos scrise, asa au fost postate. Oricum ar fi, eu si ceilalti autori iti multumim pentru apreciere.
O sa revin si eu, cred ca ar mai fi ceva interesant de postat in materie de aplicatii utile.  Dar repet si aici ce am spus cuiva pe privat: niciodata nu voi mai munci ca sa fac gratis munca altuia. Deci aplicatia cu generare de CPXML am s-o fac cat de buna pot, dar nu va fi gratis.


               

[advex]

                  

John Doe a scris: ...Dar repet si aici ce am spus cuiva pe privat: niciodata nu voi mai munci ca sa fac gratis munca altuia....

Generozitatea inseamna sa dai mai mult decat poti si mandria inseamna sa iei mai putin decat ai nevoie. (Khalil Gibran)
 http://www.3xforum.ro/img/smilies/smile.png">  http://www.3xforum.ro/img/smilies/smile.png">

http://www.millan.net/anims/giffar/monday.gif" alt="" border="0" align="top">

Modificat de advex (08-10-2011 19:35:36)

_______________________________________
http://info-topograf.blogspot.ro/" target="_blank">http://info-topograf.blogspot.ro/


               

[John Doe]

                  Sigur va fi mai putin decat am eu nevoie...


               

[diagodose2009]

                  Salut JohnDoe, am convertit in programul tau PunePuncte_pe_contur, conversie automata din LISP in LISPmatemtatic/C+.

Modificat de diagodose2009 (20-02-2012 11:46:22)

_______________________________________
http://we.tl/D8HOKFyTJ7" target="_blank">http://we.tl/D8HOKFyTJ7


               

[John Doe]

                  Bun... tu imi spui ce sa fac... iar eu te intreb: de ce crezi ca as face asta?
Si... dezactiveaza-ti smilies cand mai postezi coduri. Sau scrie [ code ] si [ / code ] la inceput si sfarsit (fara spatii).