1 /* $NetBSD: human.cc,v 1.3 2008/04/28 20:22:54 martin 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 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * human.C: Human interface for dots, using rogue-like keys. 34 */ 35 #include "defs.h" 36 RCSID("$NetBSD: human.cc,v 1.3 2008/04/28 20:22:54 martin Exp $") 37 38 #include "human.h" 39 #include "board.h" 40 #include "box.h" 41 #include "ttyscrn.h" 42 43 #define CONTROL(a) ((a) & 037) 44 45 extern GAMESCREEN *sc; 46 47 HUMAN::HUMAN(const char c) : 48 PLAYER(c), 49 _curx(0), 50 _cury(1) 51 { 52 } 53 54 void HUMAN::play(const BOARD& b, size_t& y, size_t& x, int& dir) 55 { 56 int mv; 57 b.setpos(_cury, _curx); 58 59 for (;;) { 60 switch (mv = b.getmove()) { 61 case 'h': case 'H': 62 _curx -= 2; 63 break; 64 65 case 'l': case 'L': 66 _curx += 2; 67 break; 68 69 case 'k': case 'K': 70 _cury -= 2; 71 break; 72 73 case 'j': case 'J': 74 _cury += 2; 75 break; 76 77 case 'u': case 'U': 78 _curx += 1; 79 _cury -= 1; 80 break; 81 82 case 'y': case 'Y': 83 _curx -= 1; 84 _cury -= 1; 85 break; 86 87 case 'b': case 'B': 88 _curx -= 1; 89 _cury += 1; 90 break; 91 92 case 'n': case 'N': 93 _curx += 1; 94 _cury += 1; 95 break; 96 97 case 'q': case 'Q': 98 // Cleanup 99 delete sc; 100 exit(0); 101 102 case CONTROL('L'): case CONTROL('R'): 103 b.clean(); 104 b.paint(); 105 break; 106 107 case ' ': 108 { 109 x = _curx / 2; 110 y = _cury / 2; 111 112 if (_cury & 1) { 113 if (_curx == 0) 114 dir = BOX::left; 115 else { 116 x--; 117 dir = BOX::right; 118 } 119 } 120 121 if (_curx & 1) { 122 if (_cury == 0) 123 dir = BOX::top; 124 else { 125 y--; 126 dir = BOX::bottom; 127 } 128 } 129 } 130 return; 131 132 default: 133 break; 134 } 135 136 // We add 2 before the comparison to avoid underflow 137 if ((2 + _curx) - (_curx & 1) < 2) 138 _curx = (b.nx() * 2) + (_curx & 1); 139 if (_curx >= (b.nx() * 2) + 1) 140 _curx = (_curx & 1); 141 142 if ((2 + _cury) - (_cury & 1) < 2) 143 _cury = (b.ny() * 2) + (_cury & 1); 144 if (_cury >= (b.ny() * 2) + 1) 145 _cury = (_cury & 1); 146 147 b.setpos(_cury, _curx); 148 } 149 } 150