diff options
| author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-11-10 10:46:37 +0100 |
|---|---|---|
| committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-11-10 10:46:37 +0100 |
| commit | 80e625a9c8d33c71fe69a375c211868fcc1938a5 (patch) | |
| tree | f516d701cc8cb50e9a1d003afe6e7d1f05b457ca /morpion_rec/FeirisuNyanNyan | |
| parent | d343fcb803e955504b0d6b5c9c852620886c2994 (diff) | |
| download | CompetIA-80e625a9c8d33c71fe69a375c211868fcc1938a5.tar.gz CompetIA-80e625a9c8d33c71fe69a375c211868fcc1938a5.zip | |
Start work on players!
Diffstat (limited to 'morpion_rec/FeirisuNyanNyan')
| -rw-r--r-- | morpion_rec/FeirisuNyanNyan/_tags | 2 | ||||
| -rw-r--r-- | morpion_rec/FeirisuNyanNyan/feirisu.ml | 17 | ||||
| l--------- | morpion_rec/FeirisuNyanNyan/lib | 1 |
3 files changed, 20 insertions, 0 deletions
diff --git a/morpion_rec/FeirisuNyanNyan/_tags b/morpion_rec/FeirisuNyanNyan/_tags new file mode 100644 index 0000000..c653205 --- /dev/null +++ b/morpion_rec/FeirisuNyanNyan/_tags @@ -0,0 +1,2 @@ +"lib": include +true: use_unix, use_graphics diff --git a/morpion_rec/FeirisuNyanNyan/feirisu.ml b/morpion_rec/FeirisuNyanNyan/feirisu.ml new file mode 100644 index 0000000..be6cc63 --- /dev/null +++ b/morpion_rec/FeirisuNyanNyan/feirisu.ml @@ -0,0 +1,17 @@ + +module Mayushii : Player.IA = struct + + module G = Morpion_rec.G + + let play g = + let cc = G.possibilities g in + List.nth cc + (Random.int (List.length cc)) + +end + +module P = Player.P(Mayushii) + +let () = + Random.self_init(); + P.run() diff --git a/morpion_rec/FeirisuNyanNyan/lib b/morpion_rec/FeirisuNyanNyan/lib new file mode 120000 index 0000000..e834a2a --- /dev/null +++ b/morpion_rec/FeirisuNyanNyan/lib @@ -0,0 +1 @@ +../../judge
\ No newline at end of file |