Initial commit
[trapthecap.git] / src / .svn / text-base / clockwise-cloud.rb.svn-base
1 #!/usr/bin/ruby
2 #
3 # == Synopsis
4 #
5 # Play one move of a Trap the Cap game
6 #
7 # == Usage
8 # clockwise-p1
9 # Game state file read on STDIN
10 # Move produced on STDOUT
11 #
12 # == Author
13 # Neil Smith
14 #
15 # This program is free software: you can redistribute it and/or modify
16 # it under the terms of the GNU General Public License as published by
17 # the Free Software Foundation, either version 3 of the License, or
18 # (at your option) any later version.
19 #
20 # This program is distributed in the hope that it will be useful,
21 # but WITHOUT ANY WARRANTY; without even the implied warranty of
22 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 # GNU General Public License for more details.
24 #
25 # You should have received a copy of the GNU General Public License
26 # along with this program. If not, see <http://www.gnu.org/licenses/>.
27
28
29 require 'libttc'
30
31 def more_clockwise(this, other)
32 here = this.place
33 there = other.place
34
35 # if both are on a spoke, choose the one with the lowest number (nearer the rim)
36 if here =~ /.c./ and there =~ /.c./
37 # break ties by preferring the most clockwise arc
38 if here[-1] == there[-1]
39 return here[0] <=> there[0]
40 else
41 return -1 * (here[-1] <=> there[-1])
42 end
43 # If one is one a spoke and the other is on the rim, choose the one on the rim
44 elsif here =~ /.c./ or there =~ /.c./
45 return -1 * (here.length <=> there.length)
46 # If one is in the 'f' rim section and the other in the 'a' rim section, choose the 'a'
47 elsif here[0,1] == 'a' and there[0,1] == 'f'
48 return +1
49 elsif here[0,1] == 'f' and there[0,1] == 'a'
50 return -1
51 # Otherwise, choose the one with highest arc code
52 else
53 return here <=> there
54 end
55
56 end
57
58 # Get the current game state
59 game_lines = readlines
60 game, moves, next_roll = Game.read_game(game_lines)
61 game.apply_moves moves
62
63
64 # The piece to move is the least clockwise of my uncaptured pieces
65 # Always move pieces on the base first
66 my_pieces = game.pieces.values.select {|p| p.colour == game.current_player and not p.captured}
67 piece_to_move = (my_pieces.sort {|x, y| more_clockwise x.position, y.position})[0]
68
69 # Find the most clockwise move for this piece
70 potential_moves = game.possible_moves(next_roll).select {|m| m.piece == piece_to_move}
71 sorted_moves = potential_moves.sort {|x, y| more_clockwise x.destination, y.destination}
72 best_move = sorted_moves[-1]
73
74 # return that move
75 puts best_move
76
77