C++

[CAML] algo a comprendre - viendez tester lIA en meme temps

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [CAML] algo a comprendre - viendez tester lIA en meme temps

red faction

http://users.skynet.be/fa218598/p4.exe

je conseille le niv 8 ou en dessous

pour ceux qui ont pas confiance : un ptit coup de win32dasm pour sapercevoir quil ny a aucun acces a la base de registre ou aux fichiers

bon la fonction devaluation jme suis un peu inspiré de lalgo ce dessous mais le reste est entirement de moi

Code :

let eval_quatre m l_dep c_dep delta_l delta_c =
let n = ref 0 and e = ref Vide
and x = ref c_dep and y = ref l_dep
in try
for i = 1 to 4 do
if !y<0 or !y>=lig or !x<0 or !x>=col then raise Arg_invalid ;
( match m.(!y).(!x) with
A -> if !e = B then raise Valeur_nulle ;
incr n ;
if !n = 4 then raise (Quatre plusI) ;
e := A
| B -> if !e = A then raise Valeur_nulle ;
incr n ;
if !n = 4 then raise (Quatre moinsI);
e := B;
| Vide -> () ) ;
x := !x + delta_c ;
y := !y + delta_l
done ;
valeur.(!n) * (if !e=A then 1 else -1)
with
Valeur_nulle | Arg_invalid -> 0
let eval_bloc m e cmin cmax lmin lmax dx dy =
for c=cmin to cmax do for l=lmin to lmax do
e := !e + eval_quatre m l c dx dy
done done
let evaluer b m =
try let evaluation = ref 0
in (* evaluation des lignes *)
eval_bloc m evaluation 0 (lig-1) 0 (col-4) 0 1 ;
(* evaluation des colonnes *)
eval_bloc m evaluation 0 (col-1) 0 (lig-4) 1 0 ;
(* diagonales partant de la premiere ligne (à droite) *)
eval_bloc m evaluation 0 (col-4) 0 (lig-4) 1 1 ;
(* diagonales partant de la premiere colonne (à droite) *)
eval_bloc m evaluation 1 (lig-4) 0 (col-4) 1 1 ;
(* diagonales partant de la premiere ligne (à gauche) *)
eval_bloc m evaluation 3 (col-1) 0 (lig-4) 1 (-1) ;
(* diagonales partant de la derniere colonne (à gauche) *)
eval_bloc m evaluation 1 (lig-4) 3 (col-1) 1 (-1) ;
!evaluation
with Quatre v -> v

voila je c a peu pres ce que ca fait, le probleme c la comprehension de la fonction evaluer (les autres c ok)
en gros ca lance une analyse verticale des lignes (en partant du bas) et aussi horizontale (en partant de la gauche)

le seul probleme c pour les diagonales
1 1 de bas gauche vers haut droite 1 -1 de bas droite vers haut gauche, mais pour le reste je comprend pas trop

cette fonction est sensée évaluer un plateau de jeu puissance 4 pour minmax

Message édité par red faction le 22-12-2003 à 18:43:14

Publicité

nraynaud

lol

c'est quoi le problème ? les 2 derniers paramètres passés à eval_bloc sont les coordonnée du vecteur directeur du parcour.

Code :

0 1 -> -
1 0 -> |
1 1 -> /
1 -1-> \

après, il y a le point de départ des diagonales car le pb est que ta grille est finie :

Code :

.....| x |
.....| x |
.....| x o |
.....|x o |
.....| o |
.....|_______o_____|

tester l'alignement des x ne peut se faire qu'en partant de la colone de droite car l'intersection de la diagonale avec la ligne du bas est en dehors du jeu. symétriquement, tester l'alignement de 'o' nécessite de partir de la ligne du bas car l'intersection de cette diagonale avec la première colone est en dehors du jeu.

C'est pour ça que les coordonnées du point de départ de l'alignement qu'on teste sont incluse à la fonction.

---------------
trainoo.com, c'est fini

red faction

en gros ca fait ca non ?

nraynaud

lol

non, ça fait les lignes, les colones et 2 fois chaque diagonale (avec un point de départ différent), pour la raison que je t'ai expliquée.
Mais ça parcourt toujours les diagonales dans le même sens, comme tu peux le voir dans les 2 derniers paramètres.

---------------
trainoo.com, c'est fini

red faction

nraynaud a écrit :

ok c bon now

les deux premieres instructions pour les diagonales font ca :

eval_bloc mat evaluation 0 (col-4) 0 (lig-4) 1 1 ;
eval_bloc mat evaluation 3 (col-1) 0 (lig-4) 1 (-1);

mais je vois pas lutilite de ces 2 la vu que tout a ete balaye :
eval_bloc mat evaluation 1 (lig-4) 0 (col-4) 1 1 ;
eval_bloc mat evaluation 1 (lig-4) 3 (col-1) 1 (-1);

Message édité par red faction le 22-12-2003 à 17:27:51

nraynaud

lol

non, les 2 derniers paramètres sont la DIRECTION du balayage pas le point de départ.

eval_bloc m evaluation 0 (col-4) 0 (lig-4) 1 1 ;

Code :

.....| ////////|
.....| /////////|
.....| //////////|
.....| ///////////|
.....| ////////////|
.....|/////////////|

(* diagonales partant de la premiere colonne (à droite) *)
eval_bloc m evaluation 1 (lig-4) 0 (col-4) 1 1 ;

Code :

.....|////// |
.....|///// |
.....|//// |
.....|/// |
.....|// |
.....|/____________|

(* diagonales partant de la premiere ligne (à gauche) *)
eval_bloc m evaluation 3 (col-1) 0 (lig-4) 1 (-1) ;

Code :

.....|\\\\\\\\ |
.....|\\\\\\\\\ |
.....|\\\\\\\\\\ |
.....|\\\\\\\\\\\ |
.....|\\\\\\\\\\\\ |
.....|\\\\\\\\\\\\\|

(* diagonales partant de la derniere colonne (à gauche) *)
eval_bloc m evaluation 1 (lig-4) 3 (col-1) 1 (-1) ;[/g]

Code :

.....| \\\\\\|
.....| \\\\\|
.....| \\\\|
.....| \\\|
.....| \\|
.....|____________\|

bon, j'ai pris la première ligne en bas, il fallait peut-être la prendre en haut, mais c'est l'esprit.

---------------
trainoo.com, c'est fini

red faction

[:prosterne] merci merci

sinon a quoi ca sert de cherchez des diagonales dans le sens / dans les coins haut gauche et bas droit sachant que au plus on pourra connecter 3 pions....

Message édité par red faction le 22-12-2003 à 17:50:43

red faction

au debut je pensait
eval_bloc m evaluation 0 (col-4) 0 (lig-4) 1 1 ;

Code :

.....| ////////|
.....| /////////|
.....| ///////// |
.....| ///////// |
.....| ///////// |
.....|///////// |

mais bon comme je tu mle dit c pas ca

nraynaud

lol

heu passke j'ai pas lu tout le programme, les soustractions (-4) et les point de départ à 3 sont là pour ça ...

---------------
trainoo.com, c'est fini

red faction

[:yoyoz]

Message édité par red faction le 22-12-2003 à 18:42:12

Publicité

red faction

l'interface est toute pourrie mais c pas let but non plus

nraynaud

lol

up de quoi ? Comme tu le dis, il va pas tester là où c'est matériellement impossible qu'il y ait 4 pions alignés.

---------------
trainoo.com, c'est fini

red faction

nraynaud a écrit :

up de quoi ? Comme tu le dis, il va pas tester là où c'est matériellement impossible qu'il y ait 4 pions alignés.

ben le lien au dessus du topic

nraynaud

lol

'tain t'as tout changé !

On peut avoir le code ocaml plutôt ? j'ai un mac.

---------------
trainoo.com, c'est fini

red faction

nraynaud a écrit :

'tain t'as tout changé !

On peut avoir le code ocaml plutôt ? j'ai un mac.

tu connait le site dou le code est tire?

ya longtemps que tu fait du caml

pour le source il arrive dans 2 sec

nraynaud

lol

/o\ j'ai le bouquin sur mon bureau /o\
J'ai jamais dû lire cette partie.

je sais pas combien de temps ça fait que je connais, peut-être 3-4 ans.

---------------
trainoo.com, c'est fini

red faction

nraynaud a écrit :

/o\ j'ai le bouquin sur mon bureau /o\
J'ai jamais dû lire cette partie.

je sais pas combien de temps ça fait que je connais, peut-être 3-4 ans.

si tarrive a resoudre mon prob total respect

red faction

ca fait des semaines que je cherche a le resoudre , le pire c que je doit presenter ca bientot (en janvier) et sy y me fait un coup pareil lors de la presentation

nraynaud

lol

il arrive ce code ?

---------------
trainoo.com, c'est fini

red faction

nraynaud a écrit :

il arrive ce code ?

red faction

impatient

Publicité

FORUM HardWare.fr

Programmation

C++

[CAML] algo a comprendre - viendez tester lIA en meme temps

Sujets relatifs
w3c : comment tester ses pages ?	OS-Unix : Tester si un fichier est un dossier
Tester un .htaccess sous winnt	[Java] Evaluer le temps d'exécution d'un fonction.
Exercice d'algo [probleme resolu par Tentacle, algo p2 poste par Giz]	Lire, afficher et écrire en meme temps
[Algo] Débutant à un poblème avec un exercice	temps de generation aléatoire
boucle if pour tester les doublons ...	[php/mysql] Tester une chaine different de vide
Plus de sujets relatifs à : [CAML] algo a comprendre - viendez tester lIA en meme temps

Page générée en 0.081 secondes