begin process at 2012 02 05 00:55:58
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Maths

 > ASTAR - A* RECHERCHE DU PLUS COURT CHEMIN

ASTAR - A* RECHERCHE DU PLUS COURT CHEMIN


 Information sur la source

Note :
8 / 10 - par 5 personnes
8,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Maths Classé sous :astar, recherche, chemin, court Niveau :Initié Date de création :25/03/2007 Date de mise à jour :26/03/2007 00:12:33 Vu / téléchargé :6 024 / 602

Auteur : ant31

Ecrire un message privé
Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
bonjour,
je poste la source d'un A* codé l'an passé. C'était mon premier programme donc je me suis fortement aidé du code de "neodelphi" qui m'a permis de bien comprendre, je le remercie donc au passage ( http://www.delphifr.com/codes/ALGORITHME-RECHERCHE -PLUS-COURT-CHEMIN_31396.aspx ).
Le but est de trouver le plus court chemin entre 2 points. Dans le cas d'une carte le principe est de faire une estimation de la distance à "vol d'oiseau" pour essayer de prendre la bonne direction dès le début.
L'affichage des flèches permet de savoir d'où l'on vient. C'est de cette manière qu'on retrouve son chemin final.
Ce n'est pas du tout optimisé, mais pour débuter c'est plus simple des parcours de listes.

Deux liens sympa:
http://www.gamasutra.com/features/20010314/pinter _pfv.htm
http://www.gamedev.net/reference/programm ing/features/astar/


En espérant que ce là aidera d'autre personnes.



ps : Lorsque vous modifiez une option, elle sera prise en compte seulement en recliquant sur la map.



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

25 mars 2007 21:53:19 :
.
25 mars 2007 22:08:29 :
Zip propre.
26 mars 2007 00:12:34 :
.

 Sources de la même categorie

Source avec Zip Source avec une capture RESOLUTION EQUATIONS DEGRE "N" + CALCULETTE SCIENTIFIQUE par pseudo3
Source avec Zip DEUX BIBLIOTHÈQUES POUR CALCULER AVEC DES ENTIERS TRÈS GRAND... par Rekin85
Source avec Zip Source avec une capture MOTEUR PHYSIQUE 2D CHIPMUNK.. EN DELPHI! par Bacterius
Source avec Zip Source avec une capture TABLEAU DE KARNAUGH par ADMR
Source avec Zip Source avec une capture FILTRAGE NUMÉRIQUE IIR par Pouillerot

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture RECHERCHE PAR EXTENSION AVEC JVCL par Weirdy
Source avec Zip Source avec une capture A PROPOS DE LABYRINTHE 2 par Debiars
Source avec Zip A PROPOS DE LABYRINTHE par Debiars
Source avec Zip Source avec une capture LABYRINTHE RESOLVER par diglas
Source avec Zip Source avec une capture GENERATION ET RECHERCHE DE SORTIE D'UN LABYRINTHE par timmalos

Commentaires et avis

Commentaire de cirec le 25/03/2007 21:46:15 administrateur CS

Salut,

bon alors par ou commencer ...

Déjà ton Zip contient des fichiers inutiles (*.dcu; *.~*; *.ddp; *.cfg; *.dof) et le fichier "sans titre.bmp"

Ensuite un survol rapide de la source me fait remarquer ceci :
les "Constructeurs et Destructeurs" se déclare dans la partie "Public" et non "Private"
Les procédures et fonctions qui sont sans paramètres ne nécessitent pas de parenthèses

Tu as crée plein d'objets que tu ne libères jamais (Bitmap; Liste; Node)

Pour le reste tu le dis toi même :"Ce n'est pas du tout optimisé" ;)

Bonne prog ...
@+
Cirec

Commentaire de jeanr le 26/03/2007 10:57:25

Salut,
bonne source, peut être pas à 100% optimisé mais je considère aussi le A* comme un super moyen de pathfinder, terrible pour les jeux notamment, et une source fonctionnel dans notre langage préféré n'est jamais à déplorer ^^

Commentaire de candyman7 le 29/03/2007 14:19:02

Salut,

Le code n'est pas terrible (liberations, optimisations) mais l'appli reste sympa au niveau du rendu.

Pas mal pour une premiere source.

;-).

Commentaire de hfr11 le 15/05/2008 11:59:46

Bonjour à tous,
Petite remarque très personnelle quant aux critiques de CIREC, ci-dessus.
Il est vrai qu'une fonction sans paramètre ne nécessite pas, sous Delphi, qu'on la fasse suivre de parenthèse...
Mais ! Pour plus de lisibilité :
- MonResultat:=FaireCela
- MonResultat:=FaireCela()
Dans le second cas je sais de suite que "FaireCela" est une fonction ou une procédure, je n'ai pas besoin de retourner consulter les déclarations pour constater qu'il ne s'agit pas d'une variable globale ou locale. Mieux, même si c'est un peu lourd :
- MonResultat:=MonUnite.FaireCela()
A le privilège de m'envoyer directement vers la bonne unité pour examiner la fonction ou procédure en question.
Je vous avoue que je n'ai jamais eu de tendinite à force de taper sur mon clavier...
Très cordialement et sans animosité, juste une petite remarque ayant pour but de parfois simplifier la vie aux éventuels déboggeurs de passage même s'il est vrai que des conventions acceptées et respectées par tous assurent une compréhension sans équivoque dans la plupart des cas.
Patrice

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Recherche du plus court chemin [ par Planete Mars ] Je suis à la recherche d'une implémentation d'un algorithme de calcul du plus court chemin sous Delphi. La méthode importe peu (Dijkstr Recherche d'un dossier sur le disque [ par PHIL63 ] Bonjour à tous,Après avoir effectué bien des recherches sur le site, je n'ai pas trouvé de solution à mon petit souci...J'ai besoin de retrouver le ch Sauvegarde & chemin de dossier avec un OD [ par bidulchouette ] Bonjour a tous, je rencontre quelques problèmes avec une application que je tente de mettre au point. Je m'explique, j'ai 2 soucis principaux :- Je n' recherche dans une BD ACCESS? [ par abdousoft ] Salut j'ai une BD access de 10000 employers relier avec une application delphimais j'ai un probleme dans la recherche et la saisie,lorsque je depass A la recherche de rédacteurs... [ par Matt 261 ] Hello,voila, certain sont peut-être au courant de mon site (matt-Dev anciennement alvenlogics.com).Le site parle essentiellement d'informatique, et un Renommer une série de fichiers [ par cincap ] Bonsoir,J'ai un petit souci avec une procédure pour renommer une série de fichiers.Si les fichiers en questions ont déjà été renommé avec le nouveau n Filtre de Recherche sur une ListView [ par FFYLH ] Bonjour à tous,Recherche le moyen de filtrer une ListView déjà affichée par Query  et à partir d'un objet TEdit, je souhaite en tapant le début d'une Recherche lien ou tutoriel delphi==>SQL server [ par couf ] Bonjour à Tous, J'ai une application à faire et de l'autre coté le SGBD est sql serverproblème je veux savoir si il existe un tutoreil delphi sql serv recherche dans un fichier text [ par Hardouz ] salut je debute encore sous delphi et j'aime bien savoir comment rechercher un mot dans un fichier texte et determiner la ligne puis l'afficher :)) me Recherche par date [ par ghassenus ] SalutAlors j'ai un petit probléme qui me dérange depuis pas peuje posséde une table qui contient des anciens prix de certains produit (avec leur dates


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,092 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales