CADsite forum

Bedankt alvast voor de moeite.

De lisp routines zijn wel al ongeveer 30 jaar oud. Verklaart waarschijnlijk waarom ze ondermaats zijn.
Maar ze werken en ik heb er veel aan.

Vriendelijke groet.

Dag Roy,

Hierbij de resterende routines.

Mvg.

Jean

Dag Roy,

Bedankt voor uw antwoord.

Ik zal hierbij verschillende lisp routines bijvoegen, die allen min of meer dezelfde architectuur hebben.
Vooreerst moet ik eerst UDIST laden voor ik de andere lisp routines kan draaien.
Meestal moet ik ook mijn ESNAP mode (of OSMODE) uitdoen voor het correct werkt, anders worden punten gekozen die niet overeenkomen met wat zou moeten.

COORD is om een coördinatenlijst op te maken. Ik kan het één keer inladen en het werkt. Maar als ik een andere reeks wil opmaken naast de eerste geeft hij een error. Ik moet uit mijn tekening gaan, de UDIST en de COORD weer inladen, en dan werkt het weer voor één reeks.

AFSLHOUT en AFSLBETON is om een reeks blokjes (rond of vierkant) gelijkmatig te verdelen over een lijn met measure commando, maar met evenredige verdeling over de lijn. Dient om een afsluiting voor te stellen.
Bij opladen geeft het een quit - exit abort
HG1 en HG2 is denk ik hetselfde maar met een haagsymbool als block. Reageert zelfs niet.

RAAM en DEUR werkt enkel met ESNAP uit. En ik kan maar één van de twee laden. Eens geladen werkt het andere niet.
HEK hetzelfde.

MAAT en MAATONG is om een maat van een lijn centraal te plaatsen boven de lijn. Werkt ook nog goed alleen met ESNAP uit. MEt ESNAP aan gaat de bemating elders staan dan in het midden.

Kijk maar waar je tijd voor hebt, met gelijk welke hulp ben ik al verder. Liefst het eerst item COORD die het nuttigste is.

Alvast bijzondere dank voor uw welwillende medewerking

Jean

Beste,
Ik beschik over oude lisp routines voor kleine automatisaties binnen mijn CAD programma (Bricscad) die vroeger draaiden op AutoCad.
Blijkt dat deze routines nog deels werken maar er zijn automatisaties die mank lopen.
Durf ik vragen of iemand dit eens kan bekijken en een oplossing aanreiken ?
Het zou fantastisch zijn.
Alvast dank.

Dag Roy,

Bijzondere dank voor het herschrijven van de lisp routine. Nu draait alles perfect.
Je hebt mij goed geholpen.

Met vriendelijke groet,

Dag Roy_043,

Bijzonder dank om de lisp-routine te herschrijven. Het werkt prima.
Wel merk ik dat het begrensd is op 30 punten. Is dit zo of loopt er iets mis ?
Alvast niet erg want het is zelden dat een perceel meer dan 30 punten heeft.
Verder als antwoord op uw vraag : eens mijn plan af is verbind ik de punten waarvan ik wil dat ze in mijn coördinatenlijst voorkomen met een polyline, uiteraard in volgorde. Ik begin uiteraard met de hoekpunten van mijn perceel, maar kan dan verder vaste punten (zoals hoeken gebouwen) ook meenemen zodanig dat mijn informatie compleet is.
Na doorlopen van de routine heb ik mijn coördinatenlijst en kan de getekende polyline verwijderd worden.

Alvast al dank voor uw snel antwoord.

In bijlage de LISP routine.
Een ander euvel is dat ik mijn hoekpunten aanduid met letters (A, B, C ..) in plaats van met cijfers.
Deze LISP routine werkt met startcijfer 100 en nummert dan verder naar 101, 102, enz.
Is het ook mogelijk om dit aan te passen zonder veel moeite ?

Met vriendelijke groet,

Ik heb destijds van een vriend een Lisp routine gekregen voor het maken van een TXT listing van de coördinaten van de hoekpunten van een polygoon, welke voor elk plan dient afgeleverd te worden bij indiening bij het kadaster.
Vroeger werkte ik met lokale coördinaten (dus waarden nooit hoger dan 1000) en alles ging prima.
Nu werk ik in Lambert coördinaten (aardrijkskundige) en dezen hebben waarden met 6 cijfers voor de komma.
Met mijn lisp routine krijg ik nu een listing waarbij het coördinaat afgerond wordt voor de komma, en één 0 achter de komma (of decimaal punt). Ik ben dus mijn decimeters en centimeters kwijt
Ik ken niets van Lisp en kan niet programmeren. Waarschijnlijk is het een kleinigheidje.
Kan iemand mij helpen ?
Ik kan uiteraard de Lisp routine opsturen.
Met dank voor uw hulp.
Vriendelijke groet.