---

Hallo,
ich möchte folgendes mit einem Makro realisieren und bitte um eure Mithilfe, da ich neu bin in dieser Programmierung:

In einem aktiven Teil werden manuell Hilfslinien gesetzt, die sich untereinander schneiden (also z.B. schneidet eine waagerechte Hilfslinie zwei senkrechte -> es entstehen zwei Schnittpunkte).
An diesen Schnittpunkten sollen nun durch ein Makro automatisch Punkte gesetzt werden.

Wie könnte man das realisieren?
Das Makro müsste also im aktiven Teil die Hilfslinien suchen, erkennen ob sich diese schneiden, und dort einen Punkt setzen (ggf. vorher kontrollieren ob schon ein Punkt vorhanden ist).

Danke für euren Input 

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

---

fk_rechne_schnittpunkt.txt

Hallo mecaddy,

hast du nach der langen Zeit noch Interesse daran?
Bin eben über deine unbeantwortete Frage gestolpert.
Probiere es mal aus.
Achtung. Das Verzeichnis 'c:\tmp' muss vorhanden und schreibbar sein.
Alternativ kannst du auch im Macro ein anderes Verzeichnis angeben.
Makroinput 'Pfad_zur_Datei\fk_rechne_schnittpunkt.txt'
dann Makrostart mit fk_rechne_schnittpunkt

------------------
Gruss Friedhelm

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

---

Hallo mecaddy,
Antwort kommt, arbeite noch daran... 

Gruß Barbarossa

------------------
-----------------------------------------------
Eventuelle Doppelbuchstaben, welche einen Recht-
schreibfehler darstellen, sind unbeabsichtigte
Tastaturpreller.

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

---

hc_schnittpunkt_setzen.txt

Hallo,

hier kommt eine andere Version. Ich hoffe ja, daß sich jemand
findet, der eine Version mit einer logischen Tabelle schreibt.   

Anmerkungen erbeten.

Gruß Barbarossa

P.S.: Die Hilfsdatei wird nach Gebrauch gelöscht und die Sonderfälle der
senkrechten Linien wird auch abgefangen.

P.P.S.:
Der Befehl "window_fit" im U-Prog "Hc_schnittpunkt_ber" führt zu Fehlern, bitte loeschen.
------------------
-----------------------------------------------
Eventuelle Doppelbuchstaben, welche einen Recht-
schreibfehler darstellen, sind unbeabsichtigte
Tastaturpreller.

[Diese Nachricht wurde von barbarossa am 20. Dez. 2012 editiert.]

[Diese Nachricht wurde von barbarossa am 20. Dez. 2012 editiert.]

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

---

hc_schnittpunkt_setzen_v2.txt

Hallo zusammen,

hallo Barbarossa, schöne saubere Lösung.

Anbei dein Macro mit logischer Tabelle als Datenbehälter.
War gar nicht so kompliziert wie gedacht.
Und so Festplattenschonend 

>Sonderfälle der senkrechten Linien wird auch abgefangen.
Das war eigentlich nicht nötig, weil die übliche Ungenauigkeit von Me10 in den Dezimalstellen für Abhilfe sorgte 

Das "window_fit" machte dein Macro wirklich träge wenn viele Punkte zu berechnen sind.
Besser wenn es nur einmal vorkommt.

Habe in meinem Macro auch noch Fehler gefunden.
Bitte im Macro ändern. 15 war 4. Die Zahlen wurden falsch abgeschnitten. 
      IF (V1 <> V2)
        LET P1 (VAL (SUBSTR V1 1 (POS V1 ' ')))
        LET W1 (VAL (SUBSTR V1 (POS V1 ' ') 15))
        LET P2 (VAL (SUBSTR V2 1 (POS V2 ' ')))
        LET W2 (VAL (SUBSTR V2 (POS V2 ' ') 15))
und WAIT .5 einfügen
  COPY_FILE 'c:\tmp\schnittpunktliste_1.m' DEL_OLD 'c:\tmp\schnittpunktliste_2.m'
  WAIT .5
  OPEN_INFILE 1 'c:\tmp\schnittpunktliste_1.m'
Manchmal werden die Daten schon eingelesen bevor das Kopieren fertig war.  

------------------
Gruss Friedhelm

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

---

hc_schnittpunkt_setzen_v3.txt hc_schnittpunkt_setzen_v4.txt

Hallo und ein fröhliches neues Jahr allen Interessierten,

hier kommen von mir nochmal zwei überarbeitete Versionen des Themas
Schnittpunkte.

@ Friedhelm
Version 3 ist eine Mischung aus Version 4 mit logischer Tabelle nach
Deiner guten Vorlage. 

@ all

Version 4 ist eine getestete und optimierte Version mit ext. Datei.

Optimierung 1:
Es werden für jeden möglichen Schnittpunkt die Elemente nur einmal aufgerufen.

Optimierung 2:
Die Winkel-Fu. und deren Ausnahmen wurden behandelt.

Gruß
Barbarossa

------------------
-----------------------------------------------
Eventuelle Doppelbuchstaben, welche einen Recht-
schreibfehler darstellen, sind unbeabsichtigte
Tastaturpreller.

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