DelphiX + A*

[maximov]

Zitat von mimi:

...

Delphi-Quellcode:

TMap = record
Typ, tex:Integer;
Begebear:Boolean;

end;

Schöne map! Sogar begebar. In dem fall ist lässt sich A* sehr schön kürzen:

Delphi-Quellcode:

function findPath(const aMap:TMap):boolean;
begin
  assert(aMAp<>nil);
  result := aMap.begebar and (typ = tex);
end;

Also im ernst mimi, du bist lange genug dabei, um zu wissen was du tun musst, um vernünftige antworten zu erhalten.