Tutorial pathfinding2 - Versionsgeschichte

DGLBot: Der Ausdruck ''(.*?)'' wurde ersetzt mit ''$1''.

2009-03-10T18:16:15Z

Der Ausdruck ''<pascal>(.*?)</pascal>'' wurde ersetzt mit ''<source lang="pascal">$1</source>''.

I0n0s: /* Abschluss */ Link auf den Benutzer und nicht auf den Artikel Frase gesetzt

2006-01-18T06:53:49Z

‎Abschluss: Link auf den Benutzer und nicht auf den Artikel Frase gesetzt

Frase: /* Abschluss */

2006-01-17T21:54:52Z

‎Abschluss

Flash: /* Abschluss */

2005-12-25T20:14:08Z

‎Abschluss

BenBE: /* Berechnen der Schnittpunkte */ Code durch Syntax-Highlighting ersetzt.

2005-12-08T21:56:55Z

‎Berechnen der Schnittpunkte: Code durch Syntax-Highlighting ersetzt.

Flo: /* Abschluss */

2005-12-08T21:31:29Z

‎Abschluss

Flo: /* Abschluss */

2005-12-08T21:31:14Z

‎Abschluss

Phobeus: Tutorial pathfinding 2 wurde nach Tutorial pathfinding2 verschoben

2005-11-28T11:53:38Z

Tutorial pathfinding 2 wurde nach Tutorial pathfinding2 verschoben

Frase am 21. November 2005 um 18:31 Uhr

2005-11-21T18:31:17Z

Frase am 21. November 2005 um 18:04 Uhr

2005-11-21T18:04:14Z

@@ Zeile 104: / Zeile 104: @@
 Für alle die, wie ich, ein paar Probleme dabei hatten, sei dieses Stückchen Code ans Herz gelegt, das hauptsächlich durch die Beiträge von Lars im Forum entstanden ist:
-<pascal>function LineIntersects(LineA, LineB: TLine): boolean;
+<source lang="pascal">function LineIntersects(LineA, LineB: TLine): boolean;
 var
    p1, p2,
@@ Zeile 135: / Zeile 135: @@
    if (s.x < p1.x) and (s.x < p2.x) then Result := False;
    if (s.x < q1.x) and (s.x < q2.x) then Result := False;
-end;</pascal>
+end;</source>
 ===Erzeugung des Netzwerkes===

← Nächstältere Version		Version vom 18. Januar 2006, 06:53 Uhr
Zeile 182:		Zeile 182:
	Gruß,		Gruß,

−	[[Frase\|Philipp (aka Frase)]]	+	[[Benutzer:Frase\|Philipp (aka Frase)]]

← Nächstältere Version		Version vom 17. Januar 2006, 21:54 Uhr
Zeile 182:		Zeile 182:
	Gruß,		Gruß,

−	[[Frase\|Philipp]]	+	[[Frase\|Philipp (aka Frase)]]

@@ Zeile 183: / Zeile 183: @@
 [[Frase|Philipp]]
 {{TUTORIAL_NAVIGATION|[[Tutorial_pathfinding]]|-}}
-[[Kategorie:Tutorial|pathfinding2]]
+[[Kategorie:Tutorial|Pathfinding2]]

@@ Zeile 104: / Zeile 104: @@
 Für alle die, wie ich, ein paar Probleme dabei hatten, sei dieses Stückchen Code ans Herz gelegt, das hauptsächlich durch die Beiträge von Lars im Forum entstanden ist:
- function LineIntersects(LineA, LineB: TLine): boolean;
+<pascal>function LineIntersects(LineA, LineB: TLine): boolean;
- var
+var
-   p1, p2,
+  p1, p2,
-   q1, q2: TDot;
+  q1, q2: TDot;
-   a1, b1, c1,
+  a1, b1, c1,
-   a2, b2, c2: Single;
+  a2, b2, c2: Single;
-   s: TDot;
+  s: TDot;
- begin
+begin
-   p1.X := LineA.A.X; p2.X := LineA.B.X;
+  p1.X := LineA.A.X; p2.X := LineA.B.X;
-   q1.X := LineB.A.X; q2.X := LineB.B.X;
+  q1.X := LineB.A.X; q2.X := LineB.B.X;
-   p1.Y := LineA.A.Y; p2.Y := LineA.B.Y;
+  p1.Y := LineA.A.Y; p2.Y := LineA.B.Y;
-   q1.Y := LineB.A.Y; q2.Y := LineB.B.Y;
+  q1.Y := LineB.A.Y; q2.Y := LineB.B.Y;
-−
-   a1 := p2.y - p1.y; b1 := p1.x - p2.x; c1 := a1*p1.x + b1*p1.y;
+  a1 := p2.y - p1.y; b1 := p1.x - p2.x; c1 := a1*p1.x + b1*p1.y;
-   a2 := q2.y - q1.y; b2 := q1.x - q2.x; c2 := a2*q1.x + b2*q1.y;
+  a2 := q2.y - q1.y; b2 := q1.x - q2.x; c2 := a2*q1.x + b2*q1.y;
-−
-   s.x := (c1*b2-c2*b1)/(a1*b2-a2*b1); s.y := (a1*c2-a2*c1)/(a1*b2-a2*b1);
+  s.x := (c1*b2-c2*b1)/(a1*b2-a2*b1); s.y := (a1*c2-a2*c1)/(a1*b2-a2*b1);
-−
-   Schnittpunkt.X := S.X;
+  Schnittpunkt.X := S.X;
-   Schnittpunkt.Y := S.Y;
+  Schnittpunkt.Y := S.Y;
-−
-   Result := True;
+  Result := True;
-−
-   if (s.y > p1.y) and (s.y > p2.y) then Result := False;
+  if (s.y > p1.y) and (s.y > p2.y) then Result := False;
-   if (s.y > q1.y) and (s.y > q2.y) then Result := False;
+  if (s.y > q1.y) and (s.y > q2.y) then Result := False;
-   if (s.y < p1.y) and (s.y < p2.y) then Result := False;
+  if (s.y < p1.y) and (s.y < p2.y) then Result := False;
-   if (s.y < q1.y) and (s.y < q2.y) then Result := False;
+  if (s.y < q1.y) and (s.y < q2.y) then Result := False;
-   if (s.x > p1.x) and (s.x > p2.x) then Result := False;
+  if (s.x > p1.x) and (s.x > p2.x) then Result := False;
-   if (s.x > q1.x) and (s.x > q2.x) then Result := False;
+  if (s.x > q1.x) and (s.x > q2.x) then Result := False;
-   if (s.x < p1.x) and (s.x < p2.x) then Result := False;
+  if (s.x < p1.x) and (s.x < p2.x) then Result := False;
-   if (s.x < q1.x) and (s.x < q2.x) then Result := False;
+  if (s.x < q1.x) and (s.x < q2.x) then Result := False;
- end;
+end;</pascal>
 ===Erzeugung des Netzwerkes===

← Nächstältere Version		Version vom 8. Dezember 2005, 21:31 Uhr
Zeile 183:		Zeile 183:

	[[Frase\|Philipp]]		[[Frase\|Philipp]]
		+
		+	{{TUTORIAL_NAVIGATION\|Tutorial_pathfinding\|-}}
		+
		+	[[Kategorie:Tutorial\|pathfinding2]]

← Nächstältere Version	Version vom 28. November 2005, 11:53 Uhr
(kein Unterschied)

@@ Zeile 91: / Zeile 91: @@
 Es liegt nahe, das Gebiet, in dem nach den Eckpunkten der Hindernisse gesucht wird, so einzuschränken, wie man auf dem nebenstehenden Bild sehen kann.
 Doch mal angenommen, in diesem Gebiet existiert ein Hindernis, welches nicht vollständig in dieses Gebiet passt. Dann nämlich liegen dessen Ecken außerhalb des Gebietes und die Einheit würde geradewegs in einen Berg laufen, weil sie meint, dass kein Hindernis da ist.
 Beschäftigen wir uns nun mit der Ermittlung der Punkte, die in der Abbildung hellgrün markiert sind. Dazu prüfen wir zuerst, ob zwischen Start- und Zielpunkt ein Hindernis liegt. Dies wird festgestellt, indem man alle Hinderniskanten auf einen Schnittpunkt mit der Strecke Anfangspunkt-Zielpunkt prüft. Wenn sich keine Strecken schneiden, ist ein direkter Weg möglich. Ansonsten liegt ein Hindernis dazwischen.
 ===Berechnen der Schnittpunkte===

@@ Zeile 34: / Zeile 34: @@
 Für den Fall, dass keine direkte Verbindung vom Startpunkt zum Ziel, wie in diesem Beispiel, möglich ist, muss also ein Weg um die Hindernisse herum gefunden werden. Dieser Weg muss die oben genannten Kriterien erfüllen.
 Somit steht fest, was unser Algorithmus können muss:
 *Selbstständiges Erkennen der Hindernisse
@@ Zeile 53: / Zeile 63: @@
 ===Ermitteln der Hindernis-Kanten===
-Die Kanten der Hindernisse werden auf ähnliche Art und Weise berechnet. Nimmt man sich einen einfachen Würfel zur Hand (zur Not tut es auch der Bildschirm vor dir ;) ), wird schnell klar, dass jede Kante von zwei Ecken begrenzt wird. Da unsere Karte Zweidimensional ist, kann auch jede Ecke max. zwei Kanten begrenzen. Also geht man auch hier die Karte Feld für Feld durch, bis man auf eine Ecke stößt. Man merkt sich diesen Punkt und geht weiter. Stößt man nun auf die nächste Ecke, ist klar, dass zwischen diesen beiden Ecken eine Kante sein muss. Diese Prozedur macht man der Einfachheit halber bei den Linien und den Spalten getrennt.
+[[Bild:Tutorial_Pathfinding_Result12-small.png|Bild:Tutorial_Pathfinding_Result12.png|right]]
 Die Berechnung der Ecken und Kanten macht man wohl am Besten beim Laden des Levels oder beim Speichern im Leveleditor. Wenn sich an der Karte im Spielverlauf etwas ändert – sei es durch gefällte Bäume oder zerstörte Mauern – müssen diese Daten natürlich erneut berechnet werden.
 ===Zusammenfügen des Puzzles===