---

lisp.jpg

Hallo liebe Community,

Ich habe wie der Titel schon verrät ein Problem mit AutoLISP in AutoCAD 2011.
Vorab muss ich erwähnen, dass mein LISP Programm etwas älter ist. Es wurde zu AutoSoft Zeiten programmiert und hat auch über weite Strecken
auf neueren Versionen von AutoCAD funktioniert.
Zum Programm selbst:
Wie in der angehängten Grafik erkennbar ist, erstellt das LISP Programm durch Eingabe des Benutzers diese Beschriftung. Sie besteht aus Linien und Texten.
Jetzt kommt folgenden Problem. Benutze ich einen großen Zoom-Faktor, sprich ich scrolle mit dem Mausrad tief in die Zeichnung hinein und
führe das Programm aus, so stellt es die Beschriftung richtig dar. Wenn ich jedoch weit hinaus zoome, so dass man z.B. die komplette Zeichnung
überblicken kann und den Befehl erneut ausführe, so stellt das Programm die Beschriftung dar. Zu erkennen auf der Grafik linke Beschriftung.
Man erkennt der untere Text ist nach oben hin verschoben. Die Verschiebung der Linien bzw. Texten varriert je nach dem welchen Zoom-faktor(Wie weit ich mit dem scroll-rad zoome) eingestellt ist.

Nun die Frage aller Fragen.... Warum ist das so??
Ich hoffe jemand kann mir helfen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo b0hra,

erstmal Herzlich Willkommen im W(elt) B(esten) F(orum) 

Ich tippe mal auf einen eingeschalteten Objektfang, der von dem Lisp-Programm nicht ausgeschaltet wird und dann, wenn man mehr rauszoomt, zum Tragen kommt.
Schalte mal vor dem Starten des Lisp-Programms alle Objektfänge aus und probiere dann noch mal.

Gruß
Thomas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Abgesehen davon das dein Beispiel nicht ordentlich durchgelauen ist / das Programm ist in einen Fehler gerannt (siehe Befehlszeile im Bild) ?

Man sieht das du wohl mit COMMANDs arbeitest und das der Text links im Bild evtl. direkt auf dem Mittelpunkt
der Linien eingefügt wurde..  Vermutung: Du hast den OFang "Mittelpunkt" aktiv, und dieser wurde gefangen.

Problem und Lösung: Die Systemvariable OSNAPCOORD steht nicht auf 1
Wer mit Makro,Script,Command oder Sendcommand - ähnliches Arbeitet und den
aktuellen OFang nicht benutzen möchte, der muß mit Osnapcorrd=1 arbeiten.

------------------
CAD.de System-Angaben  -  CAD on demand  -  User:FAQ(Acad)

[Diese Nachricht wurde von cadffm am 11. Dez. 2012 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Tatsache, ich glaub das ist die Lösung!!
Ich probiere hier seit stunden am Programm und bin schon fast verzweifelt :-)

Weisst du vllt zufällig wie man Ofang durch das LISP Programm ausschaltet und wieder an?

Schon mal sehr vielen Dank. Hast mir den Tag gerettet :-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von b0hra:
Weisst du vllt zufällig wie man Ofang durch das LISP Programm ausschaltet und wieder an?

---

Viele Wege führen nach Rom, dies ist z. B. einer von ihnen:

Am Anfang des Lisp:

(setq sosmode (getvar "osmode")) ; aktuellen Stand merken
(setvar "osmode" 0)

Am Ende (und möglichst auch in der Fehlerroutine)

(setvar "osmode" sosmode)

Gruß
Thomas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Code:

---

(SETVAR "OSMODE" (+ (getvar "OSMODE") 16384))

---

schaltet den Ofang aus

Code:

---

(SETVAR "OSMODE" (- (getvar "OSMODE") 16384))

---

würde ihn wieder einschalten, falls "OSMODE" > 16384

------------------
Schöne Grüße
Ernst

www.geopaint.at

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Bitte nicht den Objektfang hin und herstellen, sondern OSNAPCOORD verwenden.

Jedeer bentzer ist dankbar, wenn sein eingestellter Objektfang behalten bleibt, auch wenn das Lisp abstürtzt, mict ESC abgebrochen wird etc. etc.

Kaum jemand programmiert eine saubere Fehlerbehandlung, die sich ums Rücksetzen kümmert.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP