1 /* $NetBSD: human.cc,v 1.2 2005/07/02 15:48:03 jdc 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.2 2005/07/02 15:48:03 jdc Exp $") 44 45 #include "human.h" 46 #include "board.h" 47 #include "box.h" 48 #include "ttyscrn.h" 49 50 #define CONTROL(a) ((a) & 037) 51 52 extern GAMESCREEN *sc; 53 54 HUMAN::HUMAN(const char c) : 55 PLAYER(c), 56 _curx(0), 57 _cury(1) 58 { 59 } 60 61 void HUMAN::play(const BOARD& b, size_t& y, size_t& x, int& dir) 62 { 63 int mv; 64 b.setpos(_cury, _curx); 65 66 for (;;) { 67 switch (mv = b.getmove()) { 68 case 'h': case 'H': 69 _curx -= 2; 70 break; 71 72 case 'l': case 'L': 73 _curx += 2; 74 break; 75 76 case 'k': case 'K': 77 _cury -= 2; 78 break; 79 80 case 'j': case 'J': 81 _cury += 2; 82 break; 83 84 case 'u': case 'U': 85 _curx += 1; 86 _cury -= 1; 87 break; 88 89 case 'y': case 'Y': 90 _curx -= 1; 91 _cury -= 1; 92 break; 93 94 case 'b': case 'B': 95 _curx -= 1; 96 _cury += 1; 97 break; 98 99 case 'n': case 'N': 100 _curx += 1; 101 _cury += 1; 102 break; 103 104 case 'q': case 'Q': 105 // Cleanup 106 delete sc; 107 exit(0); 108 109 case CONTROL('L'): case CONTROL('R'): 110 b.clean(); 111 b.paint(); 112 break; 113 114 case ' ': 115 { 116 x = _curx / 2; 117 y = _cury / 2; 118 119 if (_cury & 1) { 120 if (_curx == 0) 121 dir = BOX::left; 122 else { 123 x--; 124 dir = BOX::right; 125 } 126 } 127 128 if (_curx & 1) { 129 if (_cury == 0) 130 dir = BOX::top; 131 else { 132 y--; 133 dir = BOX::bottom; 134 } 135 } 136 } 137 return; 138 139 default: 140 break; 141 } 142 143 // We add 2 before the comparison to avoid underflow 144 if ((2 + _curx) - (_curx & 1) < 2) 145 _curx = (b.nx() * 2) + (_curx & 1); 146 if (_curx >= (b.nx() * 2) + 1) 147 _curx = (_curx & 1); 148 149 if ((2 + _cury) - (_cury & 1) < 2) 150 _cury = (b.ny() * 2) + (_cury & 1); 151 if (_cury >= (b.ny() * 2) + 1) 152 _cury = (_cury & 1); 153 154 b.setpos(_cury, _curx); 155 } 156 } 157