1: /*      $NetBSD: human.cc,v 1.1 2003/12/27 01:16:55 christos Exp $   */
    2: 
    3: /*-
    4:  * Copyright (c) 2003 The NetBSD Foundation, Inc.
    5:  * All rights reserved.
    6:  *
    7:  * This code is derived from software contributed to The NetBSD Foundation
    8:  * by Christos Zoulas.
    9:  *
   10:  * Redistribution and use in source and binary forms, with or without
   11:  * modification, are permitted provided that the following conditions
   12:  * are met:
   13:  * 1. Redistributions of source code must retain the above copyright
   14:  *    notice, this list of conditions and the following disclaimer.
   15:  * 2. Redistributions in binary form must reproduce the above copyright
   16:  *    notice, this list of conditions and the following disclaimer in the
   17:  *    documentation and/or other materials provided with the distribution.
   18:  * 3. All advertising materials mentioning features or use of this software
   19:  *    must display the following acknowledgement:
   20:  *        This product includes software developed by the NetBSD
   21:  *        Foundation, Inc. and its contributors.
   22:  * 4. Neither the name of The NetBSD Foundation nor the names of its
   23:  *    contributors may be used to endorse or promote products derived
   24:  *    from this software without specific prior written permission.
   25:  *
   26:  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
   27:  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
   28:  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
   29:  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
   30:  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
   31:  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
   32:  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
   33:  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
   34:  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
   35:  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
   36:  * POSSIBILITY OF SUCH DAMAGE.
   37:  */
   38: 
   39: /*
   40:  * human.C: Human interface for dots, using rogue-like keys.
   41:  */
   42: #include "defs.h"
   43: RCSID("$NetBSD: human.cc,v 1.1 2003/12/27 01:16:55 christos Exp $")
   44: 
   45: #include "human.h"
   46: #include "board.h"
   47: #include "box.h"
   48: 
   49: #define CONTROL(a) ((a) & 037)
   50: 
   51: HUMAN::HUMAN(const char c) :
   52:     PLAYER(c),
   53:     _curx(0),
   54:     _cury(1)
   55: {
   56: }
   57: 
   58: void HUMAN::play(const BOARD& b, size_t& y, size_t& x, int& dir)
   59: {
   60:     int mv;
   61:     b.setpos(_cury, _curx);
   62: 
   63:     for (;;) {
   64:         switch (mv = b.getmove()) {
   65:         case 'h': case 'H':
   66:             _curx -= 2;
   67:             break;
   68: 
   69:         case 'l': case 'L':
   70:             _curx += 2;
   71:             break;
   72: 
   73:         case 'k': case 'K':
   74:             _cury -= 2;
   75:             break;
   76: 
   77:         case 'j': case 'J':
   78:             _cury += 2;
   79:             break;
   80: 
   81:         case 'u': case 'U':
   82:             _curx += 1;
   83:             _cury -= 1;
   84:             break;
   85: 
   86:         case 'y': case 'Y':
   87:             _curx -= 1;
   88:             _cury -= 1;
   89:             break;
   90: 
   91:         case 'b': case 'B':
   92:             _curx -= 1;
   93:             _cury += 1;
   94:             break;
   95: 
   96:         case 'n': case 'N':
   97:             _curx += 1;
   98:             _cury += 1;
   99:             break;
  100: 
  101:         case 'q': case 'Q':
  102:             exit(0);
  103: 
  104:         case CONTROL('L'): case CONTROL('R'):
  105:             b.clean();
  106:             b.paint();
  107:             break;
  108: 
  109:         case ' ':
  110:             {
  111:                 x = _curx / 2;
  112:                 y = _cury / 2;
  113: 
  114:                 if (_cury & 1) {
  115:                     if (_curx == 0)
  116:                         dir = BOX::left;
  117:                     else {
  118:                         x--;
  119:                         dir = BOX::right;
  120:                     }
  121:                 }
  122: 
  123:                 if (_curx & 1) {
  124:                     if (_cury == 0)
  125:                         dir = BOX::top;
  126:                     else {
  127:                         y--;
  128:                         dir = BOX::bottom;
  129:                     }
  130:                 }
  131:             }
  132:             return;
  133: 
  134:         default:
  135:             break;
  136:         }
  137: 
  138:         // We add 2 before the comparison to avoid underflow
  139:         if ((2 + _curx) - (_curx & 1) < 2)
  140:             _curx = (b.nx() * 2) + (_curx & 1);
  141:         if (_curx >= (b.nx() * 2) + 1)
  142:             _curx = (_curx & 1);
  143: 
  144:         if ((2 + _cury) - (_cury & 1) < 2)
  145:             _cury = (b.ny() * 2) + (_cury & 1);
  146:         if (_cury >= (b.ny() * 2) + 1)
  147:             _cury = (_cury & 1);
  148: 
  149:         b.setpos(_cury, _curx);
  150:     }
  151: }