Berlin
Vollständige, lauffähige Beispiel-Messwertdatei (MWT) für die Berlin-Edition von VermCad. Die Datei enthält jedes Rechenmakro genau einmal, geometrisch konsistent auf einem 500 m × 500 m großen Punktfeld im Lagestatus 489 (UTM-Zone 33, Raum Berlin), und ist mit dem VermCad-Compiler der Berlin-Edition fehlerfrei übersetzbar.
Die Datei enthält keine binären Codierungszeilen und keine Projekt-GUID — beides ergänzt VermCad beim ersten Speichern. Aufbau, Blöcke und Makros sind in der MWT-Syntax-Dokumentation beschrieben; eine Übersicht aller Beispiele steht unter Beispiele.
Datei
{ ============================================================================ }
{ Beispiel_Berlin.mwt - Lauffaehige Beispiel-Messwertdatei Berlin }
{ Task MWT_Syntax - jedes Rechenmakro genau einmal, geometrisch konsistent. }
{ Punktfeld: 500 m x 500 m, ETRS89/UTM Zone 33 (LS 489), Raum Berlin. }
{ Design: global = lokal + (33392000, 5820000); Verifikation siehe }
{ beispiele\work\geometrie.py und beispiele\MASTERPLAN.md }
{ ProjectID und binaere Codierungszeilen ergaenzt VermCad beim Speichern. }
{ Berlin-Sonderformen: AUFTRAG mit Bezirk/BV/Ortsteil/Lagebezeichnung }
{ (kein Katasteramt/Finanzamt/Gemeinde/GeV), Toleranzklassen ZS = D1/D2, }
{ NETZAUSGLEICH-Parameter DEA_EKP, BELEG-Bezeichner FENW statt ALB. }
{ ============================================================================ }
{ Globale Option: alle gemessenen Strecken sind bereits auf das UTM- }
{ Abbildungsniveau reduziert (Design rechnet direkt in Gitterstrecken). }
$GK_HD;
AUFTRAG
Nummer = 26-0001;
Kennzeichen = Beispiel;
Objekt = Beispielprojekt MWT-Syntax;
Ortsteil = Musterort; { nur Berlin }
Lagebezeichnung = Musterweg 1; { nur Berlin }
Flur = 1;
Flurstueck = 123;
LBJ = 2026;
Messungshorizont = 305; {NHN, mittlere Hoehe des Punktfeldes}
Lagestatus = 489;
Hoehenstatus = 170;
Rechtswert = 392;
UTM_Zone = 33;
GV = 110051;
Gemarkung = Musterfeld;
BV = 11000006; { Berlin: Bezirksschluessel statt GeV }
Bezirk = Musterbezirk; { Berlin: Bezirk statt Gemeinde }
RissNummer = 415; { Sachsen/Berlin/BW }
END
{ Nummerierungsbezirks-Verschluesselung (2-stelliger NV -> 8-stelliger NB) }
NUMMERIERUNGSBEZIRKE
{ NV Nummerierungsbezirk }
{---------------------------}
80 33925820;
END
{ ---------------------------------------------------------------------------- }
{ Vorgabekoordinaten im Lagestatus 489 (ETRS89/UTM Zone 33, Ostwert mit }
{ Zonenkennziffer 33 wie in den echten Berliner Dateien). NV-Spalte = }
{ 2-stelliger Schluessel (80) aus dem Block NUMMERIERUNGSBEZIRKE. }
{ ---------------------------------------------------------------------------- }
VORGABEN LS 489
{ NV A NR VMA F }
80 1 5001 x SA Y = 33392100.000 X = 5820100.000 Z = 300.000;
80 1 5002 x SA Y = 33392400.000 X = 5820100.000 Z = 302.000;
80 1 5003 x SA Y = 33392400.000 X = 5820400.000 Z = 304.000;
80 1 5004 x SA Y = 33392100.000 X = 5820400.000 Z = 306.000;
{ Grenzpunkte Flurstueck 123 (Quadrat 100 m x 100 m) }
80 2 101 x S Y = 33392200.000 X = 5820200.000;
80 2 102 x SA Y = 33392300.000 X = 5820200.000;
80 2 103 x S Y = 33392300.000 X = 5820300.000;
80 2 104 x S Y = 33392200.000 X = 5820300.000;
{ Messungslinie 111-112 (Laenge 200 m), 113 liegt 5 cm neben der Linie, }
{ 114 (2 cm daneben) nur fuer EINFLUCHTEN_GERADE }
80 2 111 x S Y = 33392150.000 X = 5820150.000;
80 2 112 x S Y = 33392350.000 X = 5820150.000;
80 2 113 x S Y = 33392250.000 X = 5820150.050;
80 2 114 x S Y = 33392250.000 X = 5820149.980;
{ Kreisbogen 121-122 (M = 33392250/5820300, R = 70.711), 124 nahe Scheitel, }
{ 125 (2 cm daneben) nur fuer EINFLUCHTEN_BOGEN, 135 = gegebener Mittelpunkt }
80 2 121 x S Y = 33392200.000 X = 5820350.000;
80 2 122 x S Y = 33392300.000 X = 5820350.000;
80 2 124 x S Y = 33392250.000 X = 5820370.750;
80 2 125 x S Y = 33392250.000 X = 5820370.691;
80 7 135 x S Y = 33392250.000 X = 5820300.000;
{ Gerade 131-132 fuer Schnittmakros }
80 2 131 x S Y = 33392150.000 X = 5820250.000;
80 2 132 x S Y = 33392350.000 X = 5820250.000;
{ Klotoide: 133 = Mittelpunkt Endpunktkreis (R = 50), 134 = Klotoidenendpunkt }
80 7 133 x S Y = 33392300.000 X = 5820180.000;
80 7 134 x S Y = 33392340.000 X = 5820150.000;
{ Hoehenfestpunkte fuer das Nivellement (nur Hoehe) }
80 9 9001 x SA Z = 300.000;
80 9 9003 x SA Z = 300.600;
{ Ebenheitsraster 2 x 2; Z leicht verrauscht (+-2 mm) - die ausgleichende }
{ Ebene der EBENHEIT zeigt dadurch echte Restabweichungen }
80 4 9101 x S Y = 33392120.000 X = 5820120.000 Z = 310.001;
80 4 9102 x S Y = 33392130.000 X = 5820120.000 Z = 309.999;
80 4 9111 x S Y = 33392120.000 X = 5820130.000 Z = 310.002;
80 4 9112 x S Y = 33392130.000 X = 5820130.000 Z = 309.998;
END
{ Quell-Koordinatensystem 1 fuer KSTRANSFORMATION (lokales Design-Raster). }
{ 901..904 mit Punktart 1 wie ihre Zielpunkte 5001..5004 (AP), sonst meldet }
{ der Compiler eine widerspruechliche Punktart. Koordinaten mit +-5 mm }
{ Rauschen - die Helmert-Transformation zeigt echte Restklaffen. }
VORGABEN KOORDINATENSYSTEM 1, REM = 'Altriss lokal (Translation +33392000/+5820000)'
80 1 901 x x Y = 100.006 X = 99.995;
80 1 902 x x Y = 399.996 X = 100.007;
80 1 903 x x Y = 400.004 X = 400.006;
80 1 904 x x Y = 99.995 X = 399.995;
80 2 905 x x Y = 250.002 X = 449.997;
END
{ Quell-Koordinatensystem 2 fuer KSMASCHENTRANSFORMATION (Rauschen +-5 mm) }
VORGABEN KOORDINATENSYSTEM 2, REM = 'Digitalisierung lokal (Translation wie KS 1)'
80 2 911 x x Y = 200.004 X = 199.997;
80 2 912 x x Y = 299.996 X = 200.003;
80 2 913 x x Y = 300.002 X = 300.005;
80 2 914 x x Y = 260.001 X = 229.996;
END
{ ----------------------------------------------------------------------------- }
{ Zwei lokale Quell-Koordinatensysteme fuer die KS-Beobachtungslisten der VKT }
{ (Makro 33): KS 4 = Altriss (KSKOORDINATEN), KS 5 = Digitalisierung }
{ (KSDIG_KOORDINATEN). Reine Translation des Design-Punktfeldes, Rauschen wenige }
{ mm bzw. cm; die VKT-Ausgleichung bestimmt daraus die Zielkoordinaten. }
{ ----------------------------------------------------------------------------- }
VORGABEN KOORDINATENSYSTEM 4, REM = 'VKT-Altriss lokal (Translation +2000/+3000)'
80 2 111 x x Y = 2150.003 X = 3150.004;
80 2 112 x x Y = 2349.993 X = 3149.998;
80 2 101 x x Y = 2200.005 X = 3199.997;
80 2 102 x x Y = 2300.001 X = 3199.997;
END
VORGABEN KOORDINATENSYSTEM 5, REM = 'VKT-Digitalisierung lokal (Translation +4000/+5000)'
80 2 111 x x Y = 4149.979 X = 5150.010;
80 2 112 x x Y = 4349.988 X = 5150.021;
80 2 113 x x Y = 4249.996 X = 5150.038;
80 2 101 x x Y = 4199.999 X = 5199.996;
END
{ ---------------------------------------------------------------------------- }
{ Polaraufnahme: freie Station 7001 = (33392250, 5820180), Orientierung 0, }
{ Anschluss 5001/5002/102, Gebaeudepunkte 301-304 (303/304 ca. 2 cm verzerrt }
{ als Eingabe fuer die Gebaeudeumringausgleichung), 7002 nur Richtung }
{ (Grundlage fuer RICHTUNGSFUSSPUNKTE: Hz ~ 0 = Richtung Nord). }
{ Messwerte mit realistischem Rauschen (Hz +-1.5 mgon, HD +-3 mm) - die }
{ freie Stationierung verteilt Restklaffen von wenigen mm; REM je Zielung. }
{ ---------------------------------------------------------------------------- }
MESSUNG, A = 3
80 7 7001 x x ;
80 1 5001 x a Hz = 268.8091 HD = 170.003;
80 1 5002 x a Hz = 131.1906 HD = 169.997;
80 2 102 x a Hz = 75.7774 HD = 53.850 REM = 'Grenzstein';
80 3 301 x x Hz = 359.0330 HD = 50.002 REM = 'Gebaeudeecke SW';
80 3 302 x x Hz = 370.4840 HD = 44.719;
80 3 303 x x Hz = 373.9188 HD = 50.161;
80 3 304 x x Hz = 363.1839 HD = 54.921;
80 7 7002 x x Hz = 0.0006;
END
{ ---------------------------------------------------------------------------- }
{ Netzmessungen Layer 1: Beobachtungen des Polygonzugs }
{ 5001 -> 7101 -> 7102 -> 5002 (Hz = Azimut, Orientierung 0). }
{ In NETZMESSUNGEN ist der Vertikalwinkel V Pflicht (unterscheidet die }
{ Fernrohrlagen); V trigonometrisch aus den Design-Hoehen (7101 = 300.700, }
{ 7102 = 301.300; ohne hi keine Hoehenauswertung). Beobachtungen mit Rauschen }
{ (Hz/V +-1 mgon, HD +-2 mm): der Polygonzug erhaelt einen Schlusswiderspruch }
{ von ca. 12 mm (zulaessig ~79 mm), den die Zugausgleichung sichtbar verteilt. }
{ ---------------------------------------------------------------------------- }
NETZMESSUNG, L = 1, S = 1, FN
80 1 5001 x x ;
80 1 5004 x x Hz = 0.0008 V = 98.7263;
80 7 7101 x x Hz = 87.4327 V = 99.5638 HD = 101.982;
END
NETZMESSUNG, L = 1, S = 1, FN
80 7 7101 x x ;
80 1 5001 x x Hz = 287.4340 V = 100.4362 HD = 101.979;
80 7 7102 x x Hz = 99.9994 V = 99.6186 HD = 100.002;
END
NETZMESSUNG, L = 1, S = 1, FN
80 7 7102 x x ;
80 7 7101 x x Hz = 300.0007 V = 100.3812 HD = 99.998;
80 1 5002 x x Hz = 112.5674 V = 99.5624 HD = 101.981;
END
NETZMESSUNG, L = 1, S = 1, FN
80 1 5002 x x ;
80 7 7102 x x Hz = 312.5658 V = 100.4377 HD = 101.978;
80 1 5003 x x Hz = 0.0005 V = 99.5762;
END
{ ---------------------------------------------------------------------------- }
{ Netzmessungen Layer 2: Lage- und Hoehennetz 5001/5002 -> Neupunkt 7201 }
{ Soll: 7201 = (33392250.000, 5820260.000, Z = 301.000); hi = hr = 1.500. }
{ Beobachtungen mit Rauschen (Hz/V +-1 mgon, SD +-2 mm): Lage- und }
{ Hoehennetzausgleichung verteilen Verbesserungen im mm-Bereich. }
{ ---------------------------------------------------------------------------- }
NETZMESSUNG, L = 2, S = 1, FN
80 1 5001 x x hi = 1.500;
80 1 5002 x x Hz = 100.0008 V = 99.5761 SD = 300.005 hr = 1.500;
80 7 7201 x x Hz = 47.9463 V = 99.7104 SD = 219.321 hr = 1.500;
END
NETZMESSUNG, L = 2, S = 1, FN
80 1 5002 x x hi = 1.500;
80 1 5001 x x Hz = 299.9994 V = 100.4239 SD = 300.009 hr = 1.500;
80 7 7201 x x Hz = 352.0536 V = 100.2896 SD = 219.317 hr = 1.500;
END
{ ---------------------------------------------------------------------------- }
{ Nivellement-Rohdaten: Zug 9001 (300.000) -> 9002 -> 9003 (300.600); }
{ Doppelablesungen R-V-V-R mit Ablesegenauigkeit +-0.2 mm; die Schleife }
{ schliesst mit 0.13 mm Widerspruch (wird vom NIVELLEMENT verteilt). }
{ ---------------------------------------------------------------------------- }
NIVMESSUNG
80 9 9001 x x Z = 1.50012 HD = 20.000;
80 7 9002 x x Z = 1.19998 HD = 20.000;
80 7 9002 x x Z = 1.20003 HD = 20.000;
80 9 9001 x x Z = 1.50009 HD = 20.000;
END
NIVMESSUNG
80 7 9002 x x Z = 1.40005 HD = 25.000;
80 9 9003 x x Z = 1.10002 HD = 25.000;
80 9 9003 x x Z = 1.09996 HD = 25.000;
80 7 9002 x x Z = 1.39998 HD = 25.000;
END
{ ============================================================================ }
{ Rechenmakros NR = 1 .. 40 }
{ ============================================================================ }
{ 1: Spannmasskontrollen. Demonstriert: ZS-Toleranz, VR (Masse fuer den }
{ Vermessungsriss), KN, REM je Datensatz, Anlege-/Endmass-Variante }
{ (2 Werte) und Fehlwert x. ZS = 0.15 deckt die Streckenreduktion der }
{ oertlich gemessenen Masse (UTM + Horizont, bis ~9 cm/200 m) sicher ab. }
ENTFERNUNGEN, NR = 1, ZS = D1, VR, { Berlin: Toleranzklasse D1 statt Zahlenwert }
DATUM = 17.07.2026, ZEIT = 10:00:00,
KN = 'Spannmasskontrolle Flurstueck 123'
80 x 101 80 x 102 100.000;
80 x 102 80 x 103 100.000 REM = 'FR 12/1980';
80 x 111 80 x 112 0.000 200.000;
END
{ 2: Koordinatenvergleich. Demonstriert: Satz ohne Pruefung (x) und Satz }
{ mit zulaessiger Lageabweichung (113-114 sind 7 cm auseinander < 0.100). }
KOORDINATENVERGLEICH, NR = 2, ZP = 0.10,
DATUM = 17.07.2026, ZEIT = 10:01:00
80 x 111 80 x 113 x ;
80 x 113 80 x 114 0.100;
END
{ 3: Linienelemente auf 111-112. Demonstriert: Anlege-/Endmass an den }
{ Geradenpunkten mit ZS-Toleranz (Massvergleich); 113: Abszisse 100.000, }
{ Ordinate -0.050 (reines Protokoll, kein Ruecken). }
LINIENELEMENTE, NR = 3, ZS = 0.15,
DATUM = 17.07.2026, ZEIT = 10:02:00
80 111 0.000,
80 112 200.000;
80 113;
END
{ 4: Kleinpunkte auf 111-112 (ohne Anlege-/Endmass -> Massstab exakt 1; }
{ ein Massvergleich wuerde wegen der Streckenreduktion den Massstab }
{ verfaelschen). 8002 = (33392200, 5820150), 8003 = (33392300, 5820152) }
{ (Ordinate -2 = links = Nord). Demonstriert: ZP. }
KLEINPUNKTE, NR = 4, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:03:00
80 111,
80 112;
80 2 8002 x B 50.000 0.000;
80 2 8003 x B 150.000 -2.000;
END
{ 5: Messlinie = Linienelemente + Kleinpunkte auf derselben Linie. }
{ Element 113 (Protokoll), Neupunkt 8004 = (33392250, 5820140) }
{ (Ordinate +10 = rechts = Sued). Demonstriert: KN, ZP. }
MESSLINIE, NR = 5, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:04:00,
KN = 'Orthogonalaufnahme Baulinie'
80 111,
80 112;
80 113;
80 2 8004 x B 100.000 10.000;
END
{ 6: Bogenelemente auf Bogen 121-122 (R = 70.711, M = 33392250/5820300); }
{ 124 liegt 3.9 cm radial neben dem Scheitel. Demonstriert: VR, ZP. }
BOGENELEMENTE, NR = 6, VR, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:05:00
80 121,
80 122; R = 70.711;
80 124;
END
{ 7: Bogenpunkte; 8005 = Bogenscheitel (33392250.000, 5820370.711) }
{ (Abszisse 55.536 = halbe Bogenlaenge 111.072); Neupunktzeile OHNE }
{ Werte = Bogenmittelpunkt 8006. Demonstriert: VR. }
BOGENPUNKTE, NR = 7, VR,
DATUM = 17.07.2026, ZEIT = 10:06:00
80 121,
80 122; R = 70.711;
80 2 8005 x B 55.536 0.000;
80 7 8006 x B ;
END
{ 8: Gewichtete ausgleichende Gerade durch 111/113/112 (mf a priori je }
{ Punkt: 0.010/0.050/0.010 -> Gerade bei X = 5820150.001); 114 nimmt }
{ passiv teil (o = nur protokolliert). Demonstriert: mf-Spalte, Flag o, }
{ ZP-Zusatzsatz je Gerade, Start-/Endpunkt 8007/8008. }
AUSGLEICHGERADEN, NR = 8,
DATUM = 17.07.2026, ZEIT = 10:07:00
80 111 0.010,
80 113 0.050,
80 114 0.050 o,
80 112 0.010;
ZP = 0.10;
80 2 8007 x B ;
80 2 8008 x B ;
END
{ 9: Lot von 124 auf Gerade 101-102; Lotfusspunkt 8009 = (33392250, 5820200). }
{ Demonstriert: ZP, REM. }
LOTFUSSPUNKTE, NR = 9, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:08:00,
REM = 'Lot vom Bogenscheitelpunkt auf die Suedgrenze'
80 101,
80 102;
80 124;
80 2 8009 x B ;
END
{ 10: Richtungsfusspunkt: Strahl 7001 -> 7002 (Hz ~ 0 = Nord, nur Richtung }
{ gemessen) schneidet Gerade 121-122; 8010 ~ (33392250, 5820350) }
RICHTUNGSFUSSPUNKTE, NR = 10,
DATUM = 17.07.2026, ZEIT = 10:09:00
80 121,
80 122;
80 7001;
80 7002;
80 7 8010 x B ;
END
{ 11: 114 in die Gerade 111-112 einfluchten -> (33392250.000, 5820150.000). }
{ 114 liegt bewusst 2 cm neben der Flucht - die gemeldete Abweichung von }
{ 0.02 ist der didaktisch gewollte Rueckbetrag des Einfluchtens. }
EINFLUCHTEN_GERADE, NR = 11, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:10:00
80 111,
80 112;
80 114;
END
{ 12: 125 in den Bogen 121-122 einfluchten -> (33392250.000, 5820370.711). }
{ 125 liegt bewusst 2 cm neben dem Bogen (didaktisch gewollter }
{ Rueckbetrag). }
EINFLUCHTEN_BOGEN, NR = 12, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:11:00
80 121,
80 122; R = 70.711;
80 125;
END
{ 13: Schnitt Gerade 131-132 (X = 5820250) mit der um S = +10 m nach rechts }
{ (Blick 101->104 = Nord, rechts = Ost) verschobenen Geraden 101-104; }
{ Schnittpunkt 8001 = (33392210, 5820250). Demonstriert: Verschiebesatz. }
GERADENSCHNITT, NR = 13,
DATUM = 17.07.2026, ZEIT = 10:12:00
80 131,
80 132;
80 101,
80 104; S = 10.000;
80 2 8001 x B ;
END
{ 14: Kreis um den gegebenen Mittelpunkt 135 (R = 70.711) x Gerade 131-132; }
{ Abstand Mittelpunkt-Gerade = 50.000 << R -> robuster Schnitt, }
{ Halbsehne = 50.000; Austrittspunkt 8011 = (33392300, 5820250) }
KREISGERADESCHNITT, NR = 14,
DATUM = 17.07.2026, ZEIT = 10:13:00
80 135; R = 70.711;
80 131,
80 132;
80 2 8011 x B ;
END
{ 15: Bogenschnitt um 101 (R = 50.000) und 102 (R = 67.082); }
{ Schnittpunkt rechts von 101->102: 8012 = (33392240, 5820170) }
BOGENSCHNITT, NR = 15,
DATUM = 17.07.2026, ZEIT = 10:14:00,
REM = 'Bogenschlag zur GP-Wiederherstellung'
80 101; R = 50.000;
80 102; R = 67.082;
80 2 8012 x B ;
END
{ 16: Mehrfacher Bogenschnitt (ueberbestimmt): Strecken mit +-3 mm Rauschen }
{ und Standardabweichung s(S) = 0.005 je Strecke; 104 mit Kennzeichen O }
{ (kein Passpunkt, nur dokumentiert). 8013 ~ (33392260, 5820240). }
M_BOGENSCHNITT, NR = 16,
DATUM = 17.07.2026, ZEIT = 10:15:00
80 101 72.113 0.005,
80 102 56.567 0.005,
80 103 72.110 0.005,
80 104 84.850 0.005 O;
80 2 8013 x B ;
END
{ 17: Vorwaertsschnitt von 5002 und 5001 mit je ZWEI Anschlussrichtungen }
{ (gewichteter Abriss); Richtungen mit +-1 mgon Rauschen. }
{ 8014 ~ (33392250, 5820250), rechts der Linie 5002 -> 5001. }
VORWAERTSSCHNITT, NR = 17,
DATUM = 17.07.2026, ZEIT = 10:16:00
80 5002;
80 5003 0.0006,
80 5001 299.9994;
80 5001;
80 5004 0.0005,
80 5002 100.0008;
80 2 8014 x B 350.0008 49.9994;
END
{ 18: Kreis durch 121/124/122 mit zusaetzlichem Kontrollradius (R = 70.620 }
{ wird nur mit dem berechneten Radius 70.616 verglichen); }
{ Mittelpunkt 8015 = (33392250.000, 5820300.134) }
KREIS, NR = 18,
DATUM = 17.07.2026, ZEIT = 10:17:00
80 121,
80 124,
80 122;
R = 70.620;
80 7 8015 x B ;
END
{ 19: Klotoide: Startrichtung = Gerade 5001-5002 (Az 100 gon), }
{ Endpunktkreis um 133 (R = 50.000), Endpunkt 134; Richtungsaenderung }
{ 59.03 gon < 100 gon -> kurze Klotoide (L = 0) loesbar }
KLOTOIDE, NR = 19,
DATUM = 17.07.2026, ZEIT = 10:18:00,
REM = 'Uebergangsbogen Anschluss Wirtschaftsweg'
80 5001,
80 5002;
80 133;
80 134;
L = 0;
80 7 8016 x B 1.000 1.000;
END
{ 20: Rechtwinkelzug 101 -> 102 (Bezugslinie Az 100 gon): Seiten mit +-2 mm }
{ Rauschen (40.002/-29.998/59.999/+30.001) -> Schlussfehler ~3 mm wird }
{ proportional verteilt. 8017 ~ (...240, ...200), 8018 ~ (...240, }
{ ...230), 8019 ~ (...300, ...230). }
RECHTWINKELZUG, NR = 20,
DATUM = 17.07.2026, ZEIT = 10:19:00
80 101,
80 102;
80 101;
80 102;
80 7 8017 x B 40.002 0.000;
80 7 8018 x B 0.000 -29.998;
80 7 8019 x B 59.999 0.000;
80 2 102 x x 0.000 30.001;
END
{ 21: Polarelemente von 5001: Anschluss 101 MIT Anschlussrichtung und }
{ gemessener Strecke (141.418, wahr 141.421; ZS = 0.10 deckt Rauschen }
{ und Streckenreduktion); Ziele 104 und 5002. }
POLARELEMENTE, NR = 21, ZS = D2, { Berlin: Toleranzklasse D2 }
DATUM = 17.07.2026, ZEIT = 10:20:00
80 5001;
80 101 50.0007 141.418;
80 104;
80 5002;
END
{ 22: Polarpunkte von 5004: ZWEI Anschluesse (5001 und 5003, gewichteter }
{ Abriss; 5003 mit O = kein Passpunkt), a-priori-Fehler MF_Hz/MF_ZU, }
{ NETZ = Neupunkte stehen der Netzmessung zur Verfuegung. }
{ 8023 = (33392150, 5820450), 8024 = (33392140, 5820430) (3-4-5). }
POLARPUNKTE, NR = 22, NETZ, MF_Hz = 0.0020, MF_ZU = 0.0020,
DATUM = 17.07.2026, ZEIT = 10:21:00
80 5004;
80 5001 200.0006,
80 5003 100.0008 O;
80 7 8023 x B 50.0000 70.711;
80 7 8024 x B 59.0334 50.000;
END
{ 23: Gewichtetes Koordinatenmittel aus 101 (Gewicht 2) und 102 (Gewicht 1); }
{ 8025 = (33392233.333, 5820200.000) }
MITTELWERT, NR = 23,
DATUM = 17.07.2026, ZEIT = 10:22:00,
KN = 'Hilfspunkt Zufahrtsmitte'
80 101 2.0,
80 102 1.0;
80 7 8025 x B ;
END
{ 24: Winkel am Scheitel 101 zwischen 102 und 104 (100 gon) }
WINKEL, NR = 24,
DATUM = 17.07.2026, ZEIT = 10:23:00
80 101;
80 102;
80 104;
END
{ 25: Polygonzug 5001 -> 7101 -> 7102 -> 5002 aus den Netzmessungen Layer 1; }
{ Anschlussziel 5004, Abschlussziel 5003; W = Winkelfehler verteilen. }
{ Schlusswiderspruch aus dem Beobachtungsrauschen ~12 mm (zul. ~79 mm). }
POLYGONZUG, NR = 25, W, L = 1,
DATUM = 17.07.2026, ZEIT = 10:24:00
80 5001,
80 7101,
80 7102,
80 5002;
80 5004;
80 5003;
END
{ 26: Flaeche Flurstueck 123: Umring 101-104-103-102 im Uhrzeigersinn, }
{ Soll = 10000 m2 (ohne Streckenkontrollen im Umring); BELEG mit }
{ amtlicher Buchflaeche. Demonstriert: KN (Katasternachweistext). }
FLAECHE, NR = 26,
DATUM = 17.07.2026, ZEIT = 10:25:00,
KN = 'Flst. 123, Gemarkung Musterhausen'
FS 123;
80 101,
80 104,
80 103,
80 102,
80 101;
BELEG
FENW = 10000; { Berlin: Flaecheneinwohnernachweis statt ALB }
ALKIS = -1;
END
{ 27: Grenzpruefung im oertlichen System der Linie 111-112 (Az 100 gon): }
{ Risswerte mit +-1 cm Rauschen, Gewichte je Passpunkt, VRK = }
{ nachbarschaftstreue Restklaffenverteilung; Helmert-Restklaffen < 1 cm. }
GRENZPRUEFUNG, NR = 27, P = 4, VRK,
DATUM = 17.07.2026, ZEIT = 10:26:00,
KN = 'Riss 123/1980'
80 111 0.006 -0.008 2.0,
80 112 -0.004 200.007 1.0;
80 113 -0.043 100.004;
80 101 -49.991 50.006;
END
{ 28: Punktidentitaet (Soll-Ist-Nachweis) fuer 101 und 102. }
{ Demonstriert: punktweise Riss-Angabe RJ = '...' und REM je Satz. }
PUNKTIDENTITAET, NR = 28,
DATUM = 17.07.2026, ZEIT = 10:27:00
RJ = 123/1980;
80 101 RJ = '123/1980' REM = 'Grenzstein vorgefunden';
80 102 REM = 'Grenzstein, Kopf leicht beschaedigt';
END
{ 29: Helmert-Transformation (P = 4) aus dem Zahlenriss-System der Linie }
{ 111-112 (Rotation 100 gon): Risswerte mit +-1 cm Rauschen, Gewichte }
{ je Passpunkt, 104 passiv (o), MF_YX a priori, VRK. }
{ Neupunkt 8031 lokal (-20, 80) -> ca. (33392230, 5820170). }
TRANSFORMATION, NR = 29, P = 4, VRK, MF_YX = 0.02,
DATUM = 17.07.2026, ZEIT = 10:28:00,
REM = 'Zahlenriss 123/1980'
80 111 0.008 -0.006 2.0,
80 112 -0.005 200.009 2.0,
80 101 -49.992 50.004 1.0,
80 104 -150.008 49.996 1.0 o;
80 2 8031 x -20.000 80.000;
END
{ 30: KS-Transformation aus Koordinatensystem 1 (Quellwerte mit +-5 mm }
{ Rauschen -> echte Restklaffen): Passpunktpaare 901..904 -> 5001..5004 }
{ mit Gewichten, Neupunkt 905 -> 8041 ~ (33392250.00, 5820450.00). }
{ Demonstriert: Gewichtsspalte, MF_YX, VRK, ZP. }
KSTRANSFORMATION, NR = 30, VRK, MF_YX = 0.02, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:29:00
KS 1;
80 901 80 5001 2.0,
80 902 80 5002 2.0,
80 903 80 5003 1.0,
80 904 80 5004 1.0;
80 905 80 8041 ;
END
{ 31: Maschentransformation mit automatischen Maschen (AUTO_MASCHEN, }
{ Delaunay): Passpunkte 101..104 lokal (Translation -150/-150) mit }
{ +-5 mm Rauschen, MF_YX a priori; Neupunkt 8052 -> ca. (...230, ...230). }
MASCHENTRANSFORMATION, NR = 31, AUTO_MASCHEN, MF_YX = 0.02,
DATUM = 17.07.2026, ZEIT = 10:30:00
80 101 50.004 49.997,
80 102 149.996 50.002,
80 103 150.003 150.005,
80 104 49.998 149.995;
80 2 8052 x 80.000 80.000;
END
{ 32: KS-Maschentransformation aus Koordinatensystem 2 (Quellwerte +-5 mm }
{ verrauscht) mit expliziter Masche 911-912-913; Neupunkt 914 -> 8051 }
{ ~ (33392260, 5820230); 914 liegt im Dreieck der Masche. }
KSMASCHENTRANSFORMATION, NR = 32, MF_YX = 0.02, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:31:00
KS 2;
80 911 80 101 ,
80 912 80 102 ,
80 913 80 103 ;
80 914 80 8051 ;
MASCHEN
80 911 , 80 912 , 80 913 ;
END
{ 33: Verkettete Transformation (VA, 'VKTRANSFORMATION'): gleicht acht }
{ oertliche Systeme GEMEINSAM ins Auftragssystem aus und demonstriert }
{ ALLE Beobachtungslisten-Typen. Festpunktliste: 111/112 fest (x, Datum), }
{ 101/102/103/104/113 (in VORGABEN vorhanden) zu bestimmen (mf 0.02); der }
{ ECHT NEUE Punkt 8061 steht NICHT in der Festpunktliste (sonst 'kein }
{ Festpunkt/keine Koordinaten'), er wird vom System K1 erzeugt. Jeder }
{ Neupunkt bekommt seine Naeherung aus einem koordinatenliefernden System,}
{ das durch die zwei Festpunkte verankert ist (sonst 'Transformations- }
{ parameter nicht berechenbar' / 'keine Naeherungskoordinaten'). Systeme: }
{ K1 KOORDINATEN Riss (Rotation 100 gon) -> 113, 8061 }
{ K2 KSKOORDINATEN Quell-KS 4 (Altriss) -> 101, 102 }
{ K3 DIG_KOORDINATEN digitalisierte Urkarte -> 103, 104 }
{ K4 KSDIG_KOORDINATEN Quell-KS 5 (Digitalisierung, existierende Pkt.) }
{ K5 RICHTUNGEN Standpunkt 111 -> 112/101/102 }
{ K6 ENTFERNUNGEN Spannmasse (Kette ab 111, Belegform, DFHD) }
{ K7 POLARELEMENTE Standpunkt 111, P=3 -> 112/101/102 }
{ K8 PARALLELEN 111->112 parallel 101->102 }
{ SNR = Ausgabe nach Punktnummern sortiert. Rauschen unter allen }
{ Toleranzen (siehe work\make_vkt.py, Selbstpruefung). }
VKTRANSFORMATION, NR = 33, GI = 3, SNR, ZP = 0.05,
DATUM = 17.07.2026, ZEIT = 10:32:00
80 111 x 0.0200,
80 112 x 0.0200,
80 101 0.0200,
80 102 0.0200,
80 103 0.0200,
80 104 0.0200,
80 113 0.0200;
KOORDINATEN, SYSID = '1', TITEL = 'Riss 4711', P = 4, MF_Y = 0.02, MF_X = 0.02, MF_Mx = 0.15, MF_My = 0.15,
REM = 'Zahlenriss von 1980'
80 x 111 x 0.004 -0.003 ;
80 x 112 x 0.002 200.005 ;
80 x 113 B -0.049 100.007 ;
80 x 8061 B 0.007 119.998 ;
KSKOORDINATEN, SYSID = '2', TITEL = 'KS 4 Altriss', MF_Y = 0.02, MF_X = 0.02
KS 4;
80 111 x ;
80 112 x ;
80 101 x ;
80 102 x ;
DIG_KOORDINATEN, SYSID = '3', TITEL = 'Urkarte Bl. 7', P = 5, MF_Y = 0.05, MF_X = 0.05
80 x 111 x 50.015 50.016 ;
80 x 112 x 250.011 49.997 ;
80 x 103 B 200.004 200.006 ;
80 x 104 B 100.027 199.994 ;
KSDIG_KOORDINATEN, SYSID = '4', TITEL = 'KS 5 Digitalisierung', P = 5, MF_Y = 0.3, MF_X = 0.3
KS 5;
80 111 x ;
80 112 x ;
80 113 x ;
80 101 x ;
RICHTUNGEN, SYSID = '5', TITEL = 'Bussolenzug', MF_Hz = 0.01
80 x 111 x ;
80 x 112 x 99.9927 ;
80 x 101 x 49.9978 ;
80 x 102 x 79.5183 ;
ENTFERNUNGEN, SYSID = '6', TITEL = 'FR 88/1955', MF_S = 0.02, DFHD
80 x 111 x ;
80 x 113 x 100.002 ;
80 x 112 x 200.000 ;
POLARELEMENTE, SYSID = '7', TITEL = 'Polaraufnahme 1975', P = 3, MF_Hz = 0.005, MF_HD = 0.010, MF_ZU = 0.010, MF_HDr = 3.0
80 x 111 x ;
80 x 112 x 99.9989 199.999 ;
80 x 101 x 50.0013 70.713 ;
80 x 102 x 79.5165 158.114 ;
PARALLELEN, SYSID = '8', MF_S = 0.005, MF_PAR = 0.0010
80 x 111 x ;
80 x 112 x ;
80 x 101 x ;
80 x 102 x ;
END
{ 34: Lagenetzausgleichung aus den Netzmessungen Layer 2 (verrauscht). }
{ Demonstriert: a-priori-Fehler im Kopf (MF_Hz/MF_HD/MF_ZU/MF_HDr, }
{ MF_HzAbs fuer Kreiselazimute, MF_SNetz fuer Spannmasse), Festpunkte }
{ mit mf/mf0-Spalte und ALLE Untersektionen: RICHTUNGEN und ENTFERNUNGEN }
{ (individuelle Standardabweichung je Beobachtung), KREISELAZIMUTE }
{ (Azimut + Sigma) und SPANNMASSE_NETZ (Kontrollmass + Sigma). }
{ Neupunkt 7201 ~ (33392250.000, 5820260.000). }
NETZAUSGLEICH, NR = 34, L = 2, DEA_EKP, MF_Hz = 0.0010, MF_HD = 0.0030, MF_ZU = 0.0020, MF_HDr = 2.0,
MF_HzAbs = 0.0050, MF_SNetz = 0.0500,
DATUM = 17.07.2026, ZEIT = 10:33:00
80 5001,
80 5002,
80 7201;
80 5001 x 0.0100,
80 5002 x 0.0100;
RICHTUNGEN
80 5001 80 7201 0.0015;
ENTFERNUNGEN
80 5001 80 5002 0.0040;
KREISELAZIMUTE
80 5001 80 7201 47.9491 0.0050;
SPANNMASSE_NETZ
80 5002 80 7201 219.321 0.0500;
END
{ 35: Hoehennetzausgleichung aus den Netzmessungen Layer 2 (verrauscht); }
{ a-priori-Fehler MF_V/MF_HU, Hoehen-Festpunkte mit mf/mf0-Spalte, }
{ Untersektion HOEHENUNTERSCHIEDE mit individueller Standardabweichung. }
{ 7201 erhaelt Z ~ 301.000. }
NETZAUSGLEICH_HOEHE, NR = 35, L = 2, MF_V = 0.0010, MF_HU = 0.0020,
DATUM = 17.07.2026, ZEIT = 10:34:00
80 5001,
80 5002,
80 7201;
80 5001 x 0.0050,
80 5002 x 0.0050;
HOEHENUNTERSCHIEDE
80 5001 80 7201 0.0030;
END
{ 36: Nivellement-Auswertung des Zuges 9001 -> 9002 -> 9003 (Doppel- }
{ ablesungen, Schleifenwiderspruch 0.13 mm wird verteilt). }
{ Demonstriert: MF_KM (km-Fehler), MF_Z (Ablesegenauigkeit), }
{ Festpunkte mit mf/mf0-Spalte, Untersektion HOEHENUNTERSCHIEDE. }
{ Wechselpunkt 9002 erhaelt Z ~ 300.300. }
NIVELLEMENT, NR = 36, MF_KM = 0.0020, MF_Z = 0.0005,
DATUM = 17.07.2026, ZEIT = 10:35:00
80 9001,
80 9002,
80 9003;
80 9001 x 0.0010,
80 9003 x 0.0010;
HOEHENUNTERSCHIEDE
80 9001 80 9002 0.0010;
END
{ 37: Gebaeudeumringausgleichung: Rechteck 10 m x 6 m, Festpunkte 301/302; }
{ 303/304 (ca. 2 cm verzerrt gemessen) werden auf das Soll-Rechteck }
{ ausgeglichen. Umlauf 301-302-303-304 gegen den Uhrzeigersinn -> }
{ Umringwinkel 300 gon (Umlauf im Uhrzeigersinn ergaebe 100 gon). }
{ links/rechts entscheidet CalcUmringWinkel (VcCalcUmringAusgleich.pas). }
{ Demonstriert: MF_Hz/MF_HD im Kopf + INDIVIDUELLE mfWinkel/mfStrecke. }
GEBAEUDEUMRINGAUSGLEICHUNG, NR = 37, MF_Hz = 1.0, MF_HD = 0.01,
DATUM = 17.07.2026, ZEIT = 10:36:00
80 301 ,
80 302 ;
80 x 301 x 300.0000 10.000;
80 x 302 x 300.0000 6.000;
80 x 303 B 300.0000 10.000 0.5000 0.0080;
80 x 304 B 300.0000 6.000 0.5000 0.0080;
END
{ 38: Ebenheitspruefung: Raster 2 x 2 ab 9101 (Nummernschritt 1 in Y, }
{ 10 in X, Rasterabstand 10 m); Z-Werte +-2 mm verrauscht -> die }
{ ausgleichende Ebene zeigt Restabweichungen << Toleranz 0.010. }
EBENHEIT, NR = 38,
DATUM = 17.07.2026, ZEIT = 10:37:00
80 9101;
2 1 10 ,
2 10 10 ;
0.010;
END
{ 39: Trasse: Gerade 111 -> 112 (LEN 200, DIR 100 gon), Gradiente }
{ 300.000 -> 302.000 (TRP_POINT-Profil) und ein Querprofil TQUERS bei }
{ Station 100 (Querabstand/Hoehe-Paare). }
TRASSE, NR = 39, TNAME = 'ACHSE SUED', AS = 0,
DATUM = 17.07.2026, ZEIT = 10:38:00
TR_LINE, LEN = 200.000, DIR = 100.00000
80 2 111 x x ;
80 2 112 x x ;
TRP_POINT, TITEL = 'ACHSE SUED-PR'
0.0000 300.0000;
TRP_POINT, TITEL = 'ACHSE SUED-PR'
200.0000 302.0000;
TQUERS, TITEL = 'OK STRASSE', TQSTA = 100.0000
-3.5000 300.9600 0.0000 301.0000 3.5000 300.9600;
END
{ 40: Fassade: Umklappachse 301-302 (Gebaeudesuedseite) MIT Stationsmassen }
{ (0.000/10.000, ZS = 0.05 prueft das Achsmass); Fassadenpunkte 303/304 }
{ aus der Gebaeudeumringausgleichung werden in das Ansichts-KS 3 }
{ umgeklappt. }
FASSADE, NR = 40, KS 3 = 'Ansicht Sued', ZS = 0.05,
DATUM = 17.07.2026, ZEIT = 10:39:00
80 301 0.000,
80 302 10.000;
80 303;
80 304;
END