---

ANNO_Koordinatentabelle.lsp.txt

Hallo zusammen,

das im Beitrag "Koordinatentabelle"  beschriebene Makro zur Erstellung einer Koordinatentabelle habe ich mir meinen geringen LISP-Kenntnissen unseren Firmenanforderungen angepasst. Ihr könnt euch das mal ansehen und Verbesserungsvorschläge machen oder besser noch Verbesserungen einbringen.

Für Tipps und Tricks zur Programmierung wäre ich auch sehr erfreut, da ich in diesem meinem ersten Makro sicherlich recht umständlich programmiert habe.

Schneewitchen

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

---

Funktioniert bestens, gefällt mir !

Ich finde, es gehört auf die Hilfeseite, ihr doch auch oder ?

Schön wäre es, wenn man die Spalten Toleranz und Bemerkung noch ausblenden könnte. Oder kann man den Code relativ leicht umbauen, so daß die Tabelle nur die Positionen und die Koordinaten anzeigt ?
(muß aber nicht, nur so ne Idee)

[PS] hab den Link korrigiert

[PPS] Denselben Topic gibt es nochmal im Bereich Programmierung-Diskussionen

------------------
                CoCreate: Hilfeseite I FAQ I Forum I Schach: Team schwarz

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

---

Moin!

Schön, dass es jemand ausprobiert hat und es auf Zuspruch trifft.
Das so umbauen, dass man die Spalten Toleranz und Bemerkung ausblenden kann, könnte ich ja, wenn das gewünscht wird, noch machen.

Auf der Hilfeseite zu landen wäre für mich eine Ehre.

wie hätte ich das mit dem Link richtig hin bekommen?

Danke

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

---

Zitat:

---

Original erstellt von schneewitchen:
...so umbauen, dass man die Spalten Toleranz und Bemerkung ausblenden kann, könnte ich ja, wenn das gewünscht wird, noch machen...

---

Nicht nötig, jedenfalls für mich nicht !
Zur Not kann man die Spalten ja auch manuell wieder löschen.

Zitat:

---

Original erstellt von schneewitchen:
...wie hätte ich das mit dem Link richtig hin bekommen?...

---

So ist es korrekt:
{URL=www.internetadressse}sichtbarer Text{/URL}
mit eckigen Klammern natürlich.

Lisp bekommst du hin, aber UBB nicht 

------------------
                 CoCreate: Hilfeseite I FAQ I Forum I Schach: Team schwarz

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

---

Entschuldige, aber was ist UBB? 

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

---

So nennt sich der Code, den du im Antwortfenster links findest, mit dem man im Forum Bilder einbinden, Text fett oder kursiv etc. machen kann.

Das hier:  [img]    [b]    [i]

------------------
                 CoCreate: Hilfeseite I FAQ I Forum I Schach: Team schwarz

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

---

UBB

------------------
meine LISP-Makros sind auf osd.cad.de
Disclaimer
Grüße aus Wien

Walter
DC4 Technisches Büro GmbH

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

---

Aha,

eigentlich hab ich mit HTML nicht so die Probleme aber mein Link-versuch hat nicht auf Anhieb funktioniert.
Jetzt weiß ich auch was UBB (Test) ist. DANKE!

Tschau

Ronny

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

---

 

Zitat:

---

Original erstellt von schneewitchen:
...Auf der Hilfeseite zu landen wäre für mich eine Ehre...

---

http://osd.cad.de/lisp_2d.htm#19      

------------------
                   CoCreate: Hilfeseite I FAQ I Forum I Schach: Team schwarz

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

---

Hallo highway45,

ich bin total platt! 

Bei der beschreibung hast du dir ja noch richtig arbeit gemacht! --> SUPER!

Danke und Tschau Ronny 

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

---

Das schwierigste ist immer, den Screenshot so winzig zu bekommen, so daß noch was erkennbar ist.
Hab etwas nacharbeiten müssen, darum ist alles in weiß...

------------------
                 CoCreate: Hilfeseite I FAQ I Forum I Schach: Team schwarz

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

---

Fehler69.JPG

Hallo zusammen,

super tool, doch leider funktioniert es bei mir leider nicht richtig.
Wenn ich eine Bohrtabelle erstelle, ist der text in dieser nach unten verschoben.
Das wär aber nicht so schlimm. Wenn ich dann einen koordinatenpunkt anklicke und diesem eine position zuweise bekomme ich die meldung: YES oder :No eingeben.(Fehler 69).
Weiss jemand woran das liegen kann? Habs auch schon in vers. 15 probiert, die selbe fehlermeldung.
vielen dank im voraus,
HAPE

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

---

Hallo HAPE,

verstehe ich dich richtig, nur der Text in der Tabelle ist in dieser Nach unten verschoben?

Von allen Zeilen? Kannst du davon einen Screenshot machen?

Ronny

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

---

Tabelle.JPG

ja, alle zeilen sind nach unten verschoben.
siehe anhang

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

---

Ich schätze mal, das Lisp verwendet die Standard-Text-Vorgaben und nicht eigene.
Und die sind normalerweise voreingestellt auf Ausrichtung: unten links
Wahrscheinlich hast du die in Bearbeiten --> Vorgaben --> Textvorgaben --> auf oben links stehen ?

------------------
                 CoCreate: Hilfeseite I FAQ I Forum I Schach: Team schwarz

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

---

Hallo Matthias,
du hast recht, mit der einstellung "unten links", ist der text richtig in der spalte ausgerichtet.
Jetz hab ich aber immer noch das problem mit der Koordinaten-Position mit der
fehlermeldung (fehler69) :yes oder :no eingeben.

Vielen dank, hape

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

---

Zitat:

---

Ich schätze mal, das Lisp verwendet die Standard-Text-Vorgaben und nicht eigene.

---

Stimmt!

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

---

Kann mir jemand sagen wo ich Beschreibungen zu Fehlermeldungsnummern finden kann?

Ronny

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

---

YesNo.JPG

Bei mir genau das gleiche Fehler! Gibt es eine Lösung? siehe Anhang

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

---

Hallo zusammen,

ja es gibt eine Lösung. Aber, ich hab gerade etwas Stress. Ich mach das demnächst. (nä. Woche)

Die Ursache --> für jemanden der's wissen will:
ZITAT: Wenn die Anwender die Warnung, dass der angeklickte Punkt zu
      weit vom Besitzer liegt, nicht standardmäßig unterdrückt haben,
      kommt die Meldung:
      "Angeklickter Punkt befindet sich nicht innerhalb des
      angegebenen Besitzers. Soll der Punkt tatsächlich verwendet
      werden?"

      Dann  muss man "Weiter" oder "Abbrechen" anklicken.

Die Lösung --> für jemanden der weniger Stress hat:
(setq DOCU::*DOCU-HIDE-WRONG-OWNER-WARNING* T)

Ronny

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

---

Zitat:

---

Original erstellt von schneewitchen:
ja es gibt eine Lösung
(setq DOCU::*DOCU-HIDE-WRONG-OWNER-WARNING* T)

---

Hab' das mal reingeflickt... ist auf dem Weg zu Matthias.

------------------
Seamonkey Firefox Thunderbird  Seamonkey auf deutsch

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

---

Und schon online: http://osd.cad.de/lisp_2d.htm#19

Hab die Datei einfach überschrieben, daher einfach nochmal laden und testen !

------------------
                 CoCreate: Hilfeseite I FAQ I Forum

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

---

Fehler1.JPG Fehler2.JPG

Danke für schnelle Antwort,
leider sind noch Fehler.

Fehler1 (siehe Anhang) kommt schon bei (load....)
Nach entnehmen der Header-Zeilen mit #
lässt sich das laden, aber danach bei positionieren der NullPunkt-Textes
kommt Fehler2 und bricht alles ab.

Dazu noch ,der Nullpunkt liegt genau auf ein Schnittverlauf-Knick.
Ist das die Ursache?

Woanders funktioniert :-)

Gruß
Robert

[Diese Nachricht wurde von R.Landmann am 03. Okt. 2007 editiert.]

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

---

Zitat:

---

Original erstellt von R.Landmann:
Danke für schnelle Antwort,
leider sind noch Fehler.

---

ersterer ist irknwie ein Übertragungsfehler.

in Zeile 11 hat sich zwischen | und # ein blank eingeschlichen (deswegen geht der mehrzeilige kommentar nie zu) und am Ende "\ No newline at end of file"...  ist ein Zeilenende Zeichen unter den Tisch gefallen.

@Matthias - kannst diesen meinen Beitrag loeschen wenn der neue upload online ist.

------------------
Seamonkey Firefox Thunderbird  Seamonkey auf deutsch

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

---

*blank* ist rausgeflogen und die rote Klammer ist jetzt blau... 

------------------
                 CoCreate: Hilfeseite I FAQ I Forum

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

---

Koordfehler.jpg

Hallo zusammen,

vielen Danke Highway45 für deine Anpassungen.

Mir sind aber noch einige Kleinigkeiten aufgefallen, die ich mir nicht erklären kann und auch nicht beheben kann.

1.) Wenn man viele Nullpunkte erstellt hat (insbesondere mit großen Nullpunktnummern), dann bekommt man hin und wieder einen Fehler --> siehe Bild.
2.) Nach der Prüfung zur erst verfügbaren freien Nullpunktnummer ist das Eingabefeld noch gelb hinterlegt, so das man es erst mit Enter bestätigen muss. Woran liegt das? Wie könnte ich das ändern?
3.) In dem Makro gibt es ab Zeile 201 folgenden Code:

Code:

---

              :before-input (sd-execute-annotator-command :cmd (format nil "TEXT '~A"
(sd-num-to-string (+ Tab_row a-wert))))

---

Das find ich zwar ganz nett dass so ein parr Infos am Cursor hängen, jedoch falls das Makro mal vorab abgebrochen wird hängt das immernoch dran. Auch werden dann erstmal keine Auswahlinfos (z.B.: Aufleuchtende Ansichten in der Ansichtsauswahl) mehr angezeigt. Weis da wer was zu?

Danke schon mal vorab!
Tschau Ronny

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

---

Keiner hilft mir 

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

---

Zitat:

---

Original erstellt von schneewitchen:
Keiner hilft mir    

---

Dann heul doch!

Ach machst Du ja schon... 

------------------
Seamonkey Firefox Thunderbird  Seamonkey auf deutsch

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

---

Code:

---

:cleanup-action
'(progn
   (setq DOCU::*DOCU-HIDE-WRONG-OWNER-WARNING* old-wrong-owner-warning)
   (sd-execute-annotator-command :cmd "CANCEL")
   ;; ++ eventuell noch:
   (sd-call-cmds (am_current_sheet (sd-am-inq-curr-sheet-name)))
   )
;; :cancel-action  '(abbruch)  raussloeschen, die ist *so* nemmlich nicht gut!

---

------------------
Seamonkey Firefox Thunderbird  Seamonkey auf deutsch

[Diese Nachricht wurde von der_Wolfgang am 26. Okt. 2007 editiert.]

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

---

Hallo Wolfgang,

danke dass hier doch noch einer mit mir redet.

Kannst du mir mal etwas langsamer erklären was da passiert? Ich weiß schon nicht mal was :cleanup-action ist.

(sd-execute-annotator-command :cmd "CANCEL")--> DANKE das hatte ich gesucht (ich wollte es schon mit NIL versuchen)

:'ok-action nehm ich raus.

Kannst du mir zu meinem Punkt 2.) noch nen Tipp geben?

Punkt 1.) wird wohl nicht so einfach nachzuvollziehen sein.

Danke für deine Hinweise

Ronny

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

---

sd_wire2solid.lsp.txt

Zitat:

---

Original erstellt von schneewitchen:
Kannst du mir mal etwas langsamer erklären was da passiert? Ich weiß schon nicht mal was :cleanup-action ist.

---

Dann guck mal bitte in die Integration Kit Documentation (IKIT-Docu) beim sd-defdialog. Ein dialog kann haben: :ook-action (das ist am offensichtlichsten, denn oft geht erst DA ne menge ab), eine :cancel-action und oft auch eine :cleanup-action. In letzerere kann man am besten aufräumen, z.b. Defaults wieder herstellen, die man temporaer verändert hat, oder ähnliche Dinge.

Am besten Du schreibst Dir mal einen Dialog, wo in jedem dieser Dinge nur ein entsprechender (pprint ..) drin steht. Das kannst du dann bei den variablen auch noch bei before/after input show/hide-input-tool usw. machen (es gibt ja nen Haufen zeugs). Dann bekommt man am ehesten ein Gefühl was wann (zeitlich) durchlaufen wird und bei welchen Interaktionen (knöpfchen drücken).

Zitat:

---

:'ok-action nehm ich raus.

---

Wenn du die bisherige  :cancel-action meinst.. ok 

Zitat:

---

Kannst du mir zu meinem Punkt 2.) noch nen Tipp geben?
Punkt 1.) wird wohl nicht so einfach nachzuvollziehen sein.

---

Ich muss jetzt mal gestehen: Ich habe Kotab noch nie angewandt. Sondern nur das LISP file gelesen, daher kann ich dir zu 1+2 momentan (fast) nix sagen (und bis nächste Wochen wird das auch nix bei mir)

zu 1. muesste Du evtl mal nen MI file spendieren. Damit man dann schnell hineinlaueft.  Oder handelt es sich nur im ein verspätetes Jahr 2000 Problem?    (siehe Deinen Screenshot)

zu 2:
(if (numberp NP_nr) () (setq NP_nr 1))
Das ist ein klasischen UNLESS
(unless (numberp NP_nr) (setq NP_nr 1))

mir ist schleierhaft warum man
  :before-input (Pruefung)
  :after-input (Pruefung)
(Pruefung) vorher AUCH machen sollte???

ich denke ein :initial-value 1 ist vollkommen korrekt. Und in der :after-initialization dann  (Pruefung) aufrufen.

Zudem tendiere ich dazu NP_nr als :value-type :ppositive-number zu definieren und nicht als length, oder kann das Ding auch 0.246Yard sein?

Ok, wegen 'gelb' habe ich nur so, ohne laufen zu lassen auch keinen TIP parat.

Ich hoffe Du hast trotzdem etwas aus meinem Geschreibsel lesen können.

------------------
Seamonkey Firefox Thunderbird  Seamonkey auf deutsch

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

---

koordinatentabelle.lsp.txt

Hallo Wolfgang,

besten Dank für deine Hinweise.

Ich bin deinem Hinweis gefolgt und habe mir mal nen Testmakro geschrieben. Damit wird es klarer was wann passiert.

Aber worauf meine Frage (hinter der Blume) mehr abzielte war:
Was passiert bei

Code:

---

(setq DOCU::*DOCU-HIDE-WRONG-OWNER-WARNING* old-wrong-owner-warning)

---

und

Code:

---

(sd-execute-annotator-command :cmd "CANCEL")

---

Soweit ich weis wird da ein ME10 Befehl gestartet der einen Cursortext erstellt bzw. hier beendet.

Code:

---

(sd-call-cmds (am_current_sheet (sd-am-inq-curr-sheet-name)))

---

ist mir wieder unklar (wird hier das aktuelle Blatt gesetzt?)

Richtig :cancel-action meinte ich.

zu 1. Ich hab meinen Fehler gefunden! Hab eine Liste falsch sortiert.

Dein Vorschlag mit unless funktioniert bei mir nicht.
Warum --> keine Ahnung.

Das :before-input ist notwendig, damit schon vor der Eingabe die erst mögliche Nullpunktnummer ermittelt wird. Ist vielleicht etwas komisch gelöst, geht aber. Ein Problem hat das aber, wie ich feststellen musste. :before-input ist eben vor der Eingabe und erwartet eben noch eine. Somit ist das Eingabefeld gelb. Nachdem ich das begriffen hatte (mit der Testdatei) habe ich die Prüfung einfach auf den :Initial-value gelegt und sieh da es geht!

NP_nr habe ich wie vorgeschlagen als :Positive-number definiert.

Anbei das optimierte Makro.

Allen die geholfen haben --> "besten Dank",
und auch allen anderen viel Spaß damit!

Tschau Ronny

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