Source/HexchequerGame.m
author Jens Alfke <jens@mooseyard.com>
Tue Jul 08 20:32:52 2008 -0700 (2008-07-08)
changeset 14 4585c74d809c
parent 10 6c78cc6bd7a6
child 15 73f8c889f053
permissions -rw-r--r--
Minor fixes.
jens@0
     1
/*  This code is based on Apple's "GeekGameBoard" sample code, version 1.0.
jens@0
     2
    http://developer.apple.com/samplecode/GeekGameBoard/
jens@0
     3
    Copyright © 2007 Apple Inc. Copyright © 2008 Jens Alfke. All Rights Reserved.
jens@0
     4
jens@0
     5
    Redistribution and use in source and binary forms, with or without modification, are permitted
jens@0
     6
    provided that the following conditions are met:
jens@0
     7
jens@0
     8
    * Redistributions of source code must retain the above copyright notice, this list of conditions
jens@0
     9
      and the following disclaimer.
jens@0
    10
    * Redistributions in binary form must reproduce the above copyright notice, this list of
jens@0
    11
      conditions and the following disclaimer in the documentation and/or other materials provided
jens@0
    12
      with the distribution.
jens@0
    13
jens@0
    14
    THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR
jens@0
    15
    IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND 
jens@0
    16
    FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRI-
jens@0
    17
    BUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
jens@0
    18
    (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 
jens@0
    19
    PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
jens@0
    20
    CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF 
jens@0
    21
    THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
jens@0
    22
*/
jens@0
    23
#import "HexchequerGame.h"
jens@0
    24
#import "HexGrid.h"
jens@0
    25
#import "Piece.h"
jens@0
    26
#import "QuartzUtils.h"
jens@1
    27
#import "GGBUtils.h"
jens@0
    28
jens@0
    29
jens@0
    30
@implementation HexchequerGame
jens@0
    31
jens@0
    32
jens@10
    33
- (void) setUpBoard
jens@0
    34
{
jens@7
    35
    HexGrid *grid = [[HexGrid alloc] initWithRows: 9 columns: 9 frame: _board.bounds];
jens@7
    36
    _grid = grid;
jens@10
    37
    [_board addSublayer: _grid];
jens@0
    38
    CGPoint pos = grid.position;
jens@10
    39
    pos.x += grid.spacing.width / 4;    // The right edge of the grid is blank because of the unused cells outside the hexagon
jens@0
    40
    grid.position = pos;
jens@0
    41
    grid.allowsMoves = YES;
jens@0
    42
    grid.allowsCaptures = NO;      // no land-on captures, that is
jens@1
    43
    grid.cellColor = CreateGray(1.0, 0.25);
jens@0
    44
    grid.lineColor = kTranslucentLightGrayColor;
jens@7
    45
    [grid addCellsInHexagon];
jens@10
    46
}
jens@10
    47
jens@10
    48
jens@10
    49
- (NSString*) initialStateString
jens@10
    50
{
jens@10
    51
    return @"111111111111111111-------------------------222222222222222222";
jens@0
    52
}
jens@0
    53
jens@0
    54
jens@0
    55
- (BOOL) canBit: (Bit*)bit moveFrom: (id<BitHolder>)srcHolder to: (id<BitHolder>)dstHolder
jens@0
    56
{
jens@0
    57
    Hex *src=(Hex*)srcHolder, *dst=(Hex*)dstHolder;
jens@0
    58
    if( [bit valueForKey: @"King"] )
jens@0
    59
        if( dst==src.bl || dst==src.br || dst==src.l || dst==src.r
jens@0
    60
           || (src.bl.bit.unfriendly && dst==src.bl.bl) || (src.br.bit.unfriendly && dst==src.br.br)
jens@0
    61
           || (src.l.bit.unfriendly  && dst==src.l.l)   || (src.r.bit.unfriendly  && dst==src.r.r) )
jens@0
    62
            return YES;    
jens@0
    63
    return dst==src.fl || dst==src.fr
jens@0
    64
        || (src.fl.bit.unfriendly && dst==src.fl.fl) || (src.fr.bit.unfriendly && dst==src.fr.fr);
jens@0
    65
}
jens@0
    66
jens@0
    67
- (void) bit: (Bit*)bit movedFrom: (id<BitHolder>)srcHolder to: (id<BitHolder>)dstHolder
jens@0
    68
{
jens@0
    69
    Hex *src=(Hex*)srcHolder, *dst=(Hex*)dstHolder;
jens@0
    70
    int playerIndex = self.currentPlayer.index;
jens@7
    71
jens@10
    72
    Turn *turn = self.currentTurn;
jens@10
    73
    if( turn.move.length==0 )
jens@10
    74
        [turn addToMove: src.name];
jens@10
    75
    [turn addToMove: @"-"];
jens@10
    76
    [turn addToMove: dst.name];
jens@0
    77
    
jens@7
    78
    BOOL isKing = ([bit valueForKey: @"King"] != nil);    
jens@1
    79
    PlaySound(isKing ?@"Funk" :@"Tink");
jens@0
    80
jens@0
    81
    // "King" a piece that made it to the last row:
jens@0
    82
    if( dst.row == (playerIndex ?0 :8) )
jens@0
    83
        if( ! isKing ) {
jens@1
    84
            PlaySound(@"Blow");
jens@0
    85
            bit.scale = 1.4;
jens@0
    86
            [bit setValue: @"King" forKey: @"King"];
jens@0
    87
            // don't set isKing flag - piece can't capture again after being kinged.
jens@0
    88
        }
jens@0
    89
jens@0
    90
    // Check for a capture:
jens@0
    91
    Hex *capture = nil;
jens@0
    92
    if(dst==src.fl.fl)
jens@0
    93
        capture = src.fl;
jens@0
    94
    else if(dst==src.fr.fr)
jens@0
    95
        capture = src.fr;
jens@0
    96
    else if(dst==src.bl.bl)
jens@0
    97
        capture = src.bl;
jens@0
    98
    else if(dst==src.br.br)
jens@0
    99
        capture = src.br;
jens@0
   100
    else if(dst==src.l.l)
jens@0
   101
        capture = src.l;
jens@0
   102
    else if(dst==src.r.r)
jens@0
   103
        capture = src.r;
jens@0
   104
    
jens@0
   105
    if( capture ) {
jens@1
   106
        PlaySound(@"Pop");
jens@10
   107
        [turn addToMove: @"!"];
jens@10
   108
        [capture destroyBit];
jens@0
   109
        
jens@0
   110
        // Now check if another capture is possible. If so, don't end the turn:
jens@0
   111
        if( (dst.fl.bit.unfriendly && dst.fl.fl.empty) || (dst.fr.bit.unfriendly && dst.fr.fr.empty) )
jens@0
   112
            return;
jens@0
   113
        if( isKing )
jens@0
   114
            if( (dst.bl.bit.unfriendly && dst.bl.bl.empty) || (dst.br.bit.unfriendly && dst.br.br.empty)
jens@0
   115
                    || (dst.l.bit.unfriendly && dst.l.l.empty) || (dst.r.bit.unfriendly && dst.r.r.empty))
jens@0
   116
                return;
jens@0
   117
    }
jens@0
   118
    
jens@0
   119
    [self endTurn];
jens@0
   120
}
jens@0
   121
jens@0
   122
jens@0
   123
@end