EditBoard: resync Curses implementation with the Raw one.
[gnushogi.git] / gnushogi / cursesdsp.c
1 /*
2  * FILE: cursesdsp.c
3  *
4  *     Curses interface for GNU Shogi
5  *
6  * ----------------------------------------------------------------------
7  * Copyright (c) 1993, 1994, 1995 Matthias Mutz
8  * Copyright (c) 1999 Michael Vanier and the Free Software Foundation
9  * Copyright (c) 2008, 2013, 2014 Yann Dirson and the Free Software Foundation
10  *
11  * GNU SHOGI is based on GNU CHESS
12  *
13  * Copyright (c) 1988, 1989, 1990 John Stanback
14  * Copyright (c) 1992 Free Software Foundation
15  *
16  * This file is part of GNU SHOGI.
17  *
18  * GNU Shogi is free software; you can redistribute it and/or modify it
19  * under the terms of the GNU General Public License as published by the
20  * Free Software Foundation; either version 3 of the License,
21  * or (at your option) any later version.
22  *
23  * GNU Shogi is distributed in the hope that it will be useful, but WITHOUT
24  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
25  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
26  * for more details.
27  *
28  * You should have received a copy of the GNU General Public License along
29  * with GNU Shogi; see the file COPYING. If not, see
30  * <http://www.gnu.org/licenses/>.
31  * ----------------------------------------------------------------------
32  */
33
34 /* request *snprintf prototypes*/
35 #define _POSIX_C_SOURCE 200112L
36
37 #include <ctype.h>
38 #include <signal.h>
39 #include <stdio.h>
40
41 #include <sys/param.h>
42 #include <sys/types.h>
43 #include <sys/file.h>
44 #include <curses.h>
45
46 #include "gnushogi.h"
47 #include "cursesdsp.h"
48
49 #if HAVE_UNISTD_H
50 #include <unistd.h>
51 #endif
52
53 #if HAVE_SYS_FILIO_H
54 /* Definition of FIONREAD */
55 #include <sys/filio.h>
56 #endif
57
58 #if HAVE_ERRNO_H
59 /* Definition of errno(). */
60 #include <errno.h>
61 #endif
62
63 #define FLUSH_SCANW fflush(stdout), scanw
64
65 int mycnt1, mycnt2;
66
67 #define TAB (58)
68
69 #define VIR_C(s)  ((flag.reverse) ? (NO_COLS - 1 - column(s)) : column(s))
70 #define VIR_R(s)  ((flag.reverse) ? (NO_ROWS - 1 - row(s)) : row(s))
71
72 unsigned short MV[MAXDEPTH];
73 int MSCORE;
74 char *DRAW;
75
76 /* Forward declarations. */
77 /* FIXME: change this name, puh-leeze! */
78
79 static void UpdateCatched(void);
80 static void DrawPiece(short sq);
81 static void ShowScore(short score);
82
83 /****************************************
84  * Trivial output functions.
85  ****************************************/
86
87 static void
88 ClearEoln(void)
89 {
90     clrtoeol();
91     refresh();
92 }
93
94
95 void
96 Curses_ClearScreen(void)
97 {
98     clear();
99     refresh();
100 }
101
102
103 static void
104 gotoXY(short x, short y)
105 {
106     move(y - 1, x - 1);
107 }
108
109
110 static void
111 ClearMessage(void)
112 {
113     gotoXY(TAB, 6);
114     ClearEoln();
115 }
116
117
118 void
119 Curses_ShowCurrentMove(short pnt, short f, short t)
120 {
121     algbr(f, t, false);
122     gotoXY(TAB, 7);
123     printw("(%2d) %5s ", pnt, mvstr[0]);
124 }
125
126
127 void
128 Curses_ShowDepth(char ch)
129 {
130     gotoXY(TAB, 4);
131     printw("Depth= %d%c ", Sdepth, ch);
132     ClearEoln();
133 }
134
135
136 void
137 Curses_ShowGameType(void)
138 {
139     if (flag.post)
140     {
141         gotoXY(TAB, 20);
142         printw("%c vs. %c", GameType[black], GameType[white]);
143     }
144 }
145
146
147 void
148 ShowHeader(void)
149 {
150     gotoXY(TAB, 2);
151     printw("GNU Shogi %s", PACKAGE_VERSION);
152 }
153
154
155 void
156 Curses_ShowLine(unsigned short *bstline)
157 {
158 }
159
160
161 void
162 Curses_ShowMessage(char *s)
163 {
164     gotoXY(TAB, 6);
165     printw("%s", s);
166     ClearEoln();
167 }
168
169
170 void
171 Curses_AlwaysShowMessage(const char *format, va_list ap)
172 {
173     static char buffer[60];
174     vsnprintf(buffer, sizeof(buffer), format, ap);
175     Curses_ShowMessage(buffer);
176 }
177
178
179 void
180 Curses_Printf(const char *format, va_list ap)
181 {
182     static char buffer[60];
183     vsnprintf(buffer, sizeof(buffer), format, ap);
184     printw("%s", buffer);
185 }
186
187
188 void
189 Curses_doRequestInputString(const char* fmt, char* buffer)
190 {
191     FLUSH_SCANW(fmt, buffer);
192 }
193
194
195 int
196 Curses_GetString(char* sx)
197 {
198     fflush(stdout);
199     return (getstr(sx) == ERR);
200 }
201
202
203 void
204 Curses_ShowNodeCnt(long NodeCnt)
205 {
206     gotoXY(TAB, 22);
207     /* printw("Nodes = %8ld, Nodes/Sec = %5ld", NodeCnt, (et > 100) ? NodeCnt / (et / 100) : 0); */
208     printw("n = %ld n/s = %ld", 
209            NodeCnt, (et > 100) ? NodeCnt / (et / 100) : 0);
210     ClearEoln();
211 }
212
213
214 void
215 Curses_ShowPatternCount(short side, short n)
216 {
217     if (flag.post)
218     {
219         gotoXY(TAB + 10 + 3 * side, 20);          /* CHECKME */
220
221         if (n >= 0)
222             printw("%3d", n);
223         else
224             printw("   ");
225     }
226 }
227
228
229 static void
230 ShowPlayers(void)
231 {
232     gotoXY(5, ((flag.reverse) ? (5 + 2*NO_ROWS) : 2));
233     printw("%s", (computer == white) ? "Computer" : "Human   ");
234     gotoXY(5, ((flag.reverse) ? 2 : (5 + 2*NO_ROWS)));
235     printw("%s", (computer == black) ? "Computer" : "Human   ");
236 }
237
238
239 void
240 Curses_ShowPrompt(void)
241 {
242     Curses_ShowSidetoMove();
243     gotoXY(TAB, 17);
244     printw("Your move is? ");
245     ClearEoln();
246 }
247
248
249 void
250 Curses_ShowResponseTime(void)
251 {
252     if (flag.post)
253     {
254         short TCC = TCcount;
255         gotoXY(TAB, 21);
256         printw("%ld, %d, %ld, %ld, %ld, %d",
257                ResponseTime, TCC, TCleft, ExtraTime, et, flag.timeout);
258         ClearEoln();
259     }
260 }
261
262
263 void
264 Curses_ShowResults(short score, unsigned short *bstline, char ch)
265 {
266     unsigned char d, ply;
267
268     if (flag.post)
269     {
270         Curses_ShowDepth(ch);
271         ShowScore(score);
272         d = 7;
273
274         for (ply = 1; bstline[ply] > 0; ply++)
275         {
276             if (ply % 2 == 1)
277             {
278                 gotoXY(TAB, ++d);
279                 ClearEoln();
280             }
281
282             algbr((short) bstline[ply] >> 8, 
283                   (short) bstline[ply] & 0xFF, false);
284             printw("%5s ", mvstr[0]);
285         }
286
287         ClearEoln();
288
289         while (d < 13)
290         {
291             gotoXY(TAB, ++d);
292             ClearEoln();
293         }
294     }
295 }
296
297
298 static void
299 ShowScore(short score)
300 {
301     gotoXY(TAB, 5);
302     printw("Score= %d", score);
303     ClearEoln();
304 }
305
306
307 void
308 Curses_ShowSidetoMove(void)
309 {
310     gotoXY(TAB, 14);
311     printw("%2d:   %s", 1 + GameCnt / 2, ColorStr[player]);
312     ClearEoln();
313 }
314
315
316 void
317 Curses_ShowStage(void)
318 {
319     gotoXY(TAB, 19);
320     printw("Stage= %2d%c B= %2d W= %2d",
321            stage, flag.tsume?'T':' ', balance[black], balance[white]);
322     ClearEoln();
323 }
324
325 /****************************************
326  * End of trivial output routines.
327  ****************************************/
328
329 void
330 Curses_Initialize(void)
331 {
332     signal(SIGINT, Curses_Die);
333     signal(SIGQUIT, Curses_Die);
334     initscr();
335     crmode();
336 }
337
338
339 void
340 Curses_ExitShogi(void)
341
342     if (!nolist)
343         ListGame();
344
345     gotoXY(1, 24);
346
347     refresh();
348     nocrmode();
349     endwin();
350
351     exit(0);
352 }
353
354
355 void
356 Curses_Die(int sig)
357 {
358     char s[80];
359
360     signal(SIGINT, SIG_IGN);
361     signal(SIGQUIT, SIG_IGN);
362
363     Curses_ShowMessage("Abort? ");
364     FLUSH_SCANW("%s", s);
365
366     if (strcmp(s, "yes") == 0)
367         Curses_ExitShogi();
368
369     signal(SIGINT, Curses_Die);
370     signal(SIGQUIT, Curses_Die);
371 }
372
373
374 void
375 Curses_TerminateSearch(int sig)
376 {
377     signal(SIGINT, SIG_IGN);
378     signal(SIGQUIT, SIG_IGN);
379
380     if (!flag.timeout)
381         flag.musttimeout = true;
382
383     Curses_ShowMessage("Terminate Search");
384     flag.bothsides = false;
385     signal(SIGINT, Curses_Die);
386     signal(SIGQUIT, Curses_Die);
387 }
388
389
390 void
391 Curses_help(void)
392 {
393     Curses_ClearScreen();
394     printw("GNU Shogi %s command summary\n", PACKAGE_VERSION);
395     printw("-------------------------------"
396            "---------------------------------\n");
397     printw("7g7f      move from 7g to 7f      quit      Exit Shogi\n");
398     printw("S6h       move silver to 6h       beep      turn %s\n", (flag.beep) ? "OFF" : "ON");
399     printw("2d2c+     move to 2c and promote  material  turn %s\n", (flag.material) ? "OFF" : "ON");
400     printw("P*5e      drop pawn to 5e         easy      turn %s\n", (flag.easy) ? "OFF" : "ON");
401     printw("tsume     toggle tsume mode       hash      turn %s\n", (flag.hash) ? "OFF" : "ON");
402     printw("bd        redraw board            reverse   board display\n");
403     printw("list      game to shogi.lst       book      turn %s used %d of %d\n", (Book) ? "OFF" : "ON", bookcount, BOOKSIZE);
404     printw("undo      undo last ply           remove    take back a move\n");
405     printw("edit      edit board              force     toggle manual move mode\n");
406     printw("switch    sides with computer     both      computer match\n");
407     printw("black     computer plays black    white     computer plays white\n");
408     printw("depth     set search depth        clock     set time control\n");
409     printw("post      principle variation     hint      suggest a move\n", (flag.post) ? "OFF" : "ON");
410     printw("save      game to file            get       game from file\n");
411     printw("random    randomize play          new       start new game\n");
412     gotoXY(10, 20);
413     printw("Computer: %s", ColorStr[computer]);
414     gotoXY(10, 21);
415     printw("Opponent: %s", ColorStr[opponent]);
416     gotoXY(10, 22);
417     printw("Level: %ld", MaxResponseTime/100);
418     gotoXY(10, 23);
419     printw("Easy mode: %s", (flag.easy) ? "ON" : "OFF");
420     gotoXY(25, 23);
421     printw("Tsume: %s", (flag.tsume) ? "ON" : "OFF");
422     gotoXY(40, 20);
423     printw("Depth: %d", MaxSearchDepth);
424     gotoXY(40, 21);
425     printw("Random: %s", (dither) ? "ON" : "OFF");
426     gotoXY(40, 22);
427     printw("Transposition table: %s", (flag.hash) ? "ON" : "OFF");
428     gotoXY(40, 23);
429     printw("Hit <RET> to return: ");
430     gotoXY(10, 24);
431     printw("Time Control %s %d moves %d sec %d add %d depth\n", (TCflag) ? "ON" : "OFF",
432            TimeControl.moves[black], 
433            TimeControl.clock[black] / 100, 
434            OperatorTime, MaxSearchDepth);
435
436     refresh();
437
438 #ifdef BOGUS
439     fflush(stdin); /* what is this supposed to do?? */
440 #endif /* BOGUS */
441
442     getchar();
443     Curses_ClearScreen();
444     Curses_UpdateDisplay(0, 0, 1, 0);
445 }
446
447
448 static const short x0[2] = { 54, 2 };
449 static const short y0[2] = { 20, 4 };
450
451
452 /*
453  * Set up a board position. Pieces are entered by typing the piece followed
454  * by the location. For example, N3f will place a knight on square 3f.
455  * P* will put a pawn to the captured pieces.
456  */
457
458 void
459 Curses_EditBoard(void)
460 {
461     short a, c, sq, i, found;
462     short r = 0;
463     char s[80];
464
465     flag.regularstart = true;
466     Book = BOOKFAIL;
467     Curses_ClearScreen();
468     Curses_UpdateDisplay(0, 0, 1, 0);
469     gotoXY(TAB, 3);
470     printw(".   Exit to main\n");
471     gotoXY(TAB, 4);
472     printw("#   Clear board\n");
473     gotoXY(TAB, 5);
474     printw("c   Change sides\n");
475     gotoXY(TAB, 7);
476     printw("Enter piece & location: ");
477     a = black;
478
479     do
480     {
481         gotoXY(TAB, 6);
482         printw("Editing: %s", ColorStr[a]);
483         gotoXY(TAB + 24, 7);
484         ClearEoln();
485         FLUSH_SCANW("%s", s);
486         found = 0;
487
488         if (s[0] == '#')
489         {
490             for (sq = 0; sq < NO_SQUARES; sq++)
491             {
492                 board[sq] = no_piece;
493                 color[sq] = neutral;
494                 DrawPiece(sq);
495             }
496
497             ClearCaptured();
498             UpdateCatched();
499         }
500
501         if (s[0] == 'c')
502             a = otherside[a];
503
504         if (s[1] == '*')
505         {
506             for (i = NO_PIECES; i > no_piece; i--)
507             {
508                 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
509                 {
510                     Captured[a][unpromoted[i]]++;
511                     UpdateCatched();
512                     found = 1;
513                     break;
514                 }
515             }
516
517             c = -1;
518         }
519         else
520         {
521             c = COL_NUM(s[1]);
522             r = ROW_NUM(s[2]);
523         }
524
525         if ((c >= 0) && (c < NO_COLS) && (r >= 0) && (r < NO_ROWS))
526         {
527             sq = locn(r, c);
528             color[sq] = a;
529             board[sq] = no_piece;
530     
531             for (i = NO_PIECES; i > no_piece; i--)
532             {
533                 if ((s[0] == pxx[i]) || (s[0] == qxx[i]))
534                 {
535                     if (s[3] == '+')
536                         board[sq] = promoted[i];
537                     else
538                         board[sq] = unpromoted[i];
539
540                     found = 1;
541                     break;
542                 }
543             }
544     
545
546             if (found == 0)
547                 color[sq] = neutral;
548
549             DrawPiece(sq);
550         }
551     }
552     while (s[0] != '.');
553
554     for (sq = 0; sq < NO_SQUARES; sq++)
555         Mvboard[sq] = ((board[sq] != Stboard[sq]) ? 10 : 0);
556
557     GameCnt = 0;
558     Game50 = 1;
559     ZeroRPT();
560     Sdepth = 0;
561     InitializeStats();
562     Curses_ClearScreen();
563     Curses_UpdateDisplay(0, 0, 1, 0);
564 }
565
566
567 static void 
568 UpdateCatched()
569 {
570     short side;
571
572     for (side = black; side <= white; side++)
573     { 
574         short x, y, piece, cside, k;
575
576         cside = flag.reverse ? (side ^ 1) : side;
577         x = x0[cside];
578         y = y0[cside];
579         k = 0;
580
581         for (piece = pawn; piece <= king; piece++)
582         {
583             short n;
584
585             if ((n = Captured[side][piece]))
586             {
587                 gotoXY(x, y); 
588                 printw("%i%c", n, pxx[piece]);
589
590                 if (cside == black) 
591                     y--; 
592                 else 
593                     y++;
594             }
595             else
596             {
597                 k++;
598             }
599         }
600
601         while (k)
602         {
603             k--;
604             gotoXY(x, y);
605             printw("  ");
606
607             if (cside == black) 
608                 y--; 
609             else 
610                 y++;
611         }
612     }
613
614     refresh();
615 }
616
617
618 void
619 Curses_SearchStartStuff(short side)
620 {
621     short i;
622
623     signal(SIGINT, Curses_TerminateSearch);
624     signal(SIGQUIT, Curses_TerminateSearch);
625
626     for (i = 4; i < 14; i++)                      /* CHECKME */
627     {
628         gotoXY(TAB, i);
629         ClearEoln();
630     }
631 }
632
633
634 void
635 Curses_OutputMove(void)
636 {
637
638     Curses_UpdateDisplay(root->f, root->t, 0, (short) root->flags);
639     gotoXY(TAB, 16);
640
641     if (flag.illegal) 
642     {
643         printw("Illegal position.");
644         return;
645     }
646
647     printw("My move is: %5s", mvstr[0]);
648
649     if (flag.beep)
650         putchar(7);
651
652     ClearEoln();
653
654     gotoXY(TAB, 18);
655
656     if (root->flags & draw)
657         printw("Drawn game!");
658     else if (root->score == -(SCORE_LIMIT + 999))
659         printw("Opponent mates!");
660     else if (root->score == SCORE_LIMIT + 998)
661         printw("Computer mates!");
662 #ifdef VERYBUGGY
663     else if (root->score < -SCORE_LIMIT)
664         printw("Opp: mate in %d!", SCORE_LIMIT + 999 + root->score - 1);
665     else if (root->score > SCORE_LIMIT)
666         printw("Comp: mate in %d!", SCORE_LIMIT + 998 - root->score - 1);
667 #endif /* VERYBUGGY */
668
669     ClearEoln();
670
671     if (flag.post)
672     {
673         short h, l, t;
674
675         h = TREE;
676         l = 0;
677         t = TREE >> 1;
678
679         while (l != t)
680         {
681             if (Tree[t].f || Tree[t].t)
682                 l = t;
683             else
684                 h = t;
685
686             t = (l + h) >> 1;
687         }
688
689         ShowNodeCnt(NodeCnt);
690         gotoXY(TAB, 23);
691         printw("Max Tree = %5d", t);
692         ClearEoln();
693     }
694
695     Curses_ShowSidetoMove();
696 }
697
698
699 void
700 Curses_UpdateClocks(void)
701 {
702     short m, s;
703     long dt;
704
705     if (TCflag)
706     {
707         m = (short) ((dt = (TimeControl.clock[player] - et)) / 6000);
708         s = (short) ((dt - 6000 * (long) m) / 100);
709     }
710     else
711     {
712         m = (short) ((dt = et) / 6000);
713         s = (short) (et - 6000 * (long) m) / 100;
714     }
715
716     if (m < 0)
717         m = 0;
718
719     if (s < 0)
720         s = 0;
721
722     if (player == black)
723         gotoXY(20, (flag.reverse) ? 2 : 23);
724     else
725         gotoXY(20, (flag.reverse) ? 23 : 2);
726
727     /* printw("%d:%02d %ld  ", m, s, dt); */
728     printw("%d:%02d  ", m, s); 
729
730     if (flag.post)
731         ShowNodeCnt(NodeCnt);
732
733     refresh();
734 }
735
736
737 static void
738 DrawPiece(short sq)
739 {
740     char y;
741     char piece, l, r, p; 
742
743     if (color[sq] == neutral)
744     {
745         l = r = ' ';
746     }
747     else if (flag.reverse ^ (color[sq] == black))
748     {
749         l = '/';
750         r = '\\';
751     } 
752     else
753     {
754         l = '\\', r = '/';
755     }
756
757     piece = board[sq];
758
759     if (is_promoted[(int)piece])
760     {
761         p = '+';
762         y = pxx[unpromoted[(int)piece]];
763     } 
764     else
765     {
766         p = ' ';
767         y = pxx[(int)piece];
768     }
769
770     gotoXY(8 + 5 * VIR_C(sq), 4 + 2 * ((NO_ROWS - 1) - VIR_R(sq)));
771     printw("%c%c%c%c", l, p, y, r);
772 }
773
774
775 /*
776  * Curses_ShowPostnValue(): must have called ExaminePosition() first
777  */
778 void
779 Curses_ShowPostnValue(short sq)
780 {
781     short score;
782
783     gotoXY(4 + 5 * VIR_C(sq), 5 + 2 * (7 - VIR_R(sq))); /* CHECKME */
784     score = ScorePosition(color[sq]);
785
786     if (color[sq] != neutral)
787 #if defined SAVE_SVALUE
788     {
789         printw("??? ");
790     }
791 #else
792     {
793         printw("%3d ", svalue[sq]);
794     }
795 #endif
796     else
797     {
798         printw("   ");
799     }
800 }
801
802
803 void
804 Curses_ShowPostnValues(void)
805 {
806     short sq, score;
807
808     ExaminePosition(opponent);
809
810     for (sq = 0; sq < NO_SQUARES; sq++)
811         Curses_ShowPostnValue(sq);
812
813     score = ScorePosition(opponent);
814     gotoXY(TAB, 5);
815     printw("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
816            mtl[computer], pscore[computer], GameType[computer],
817            mtl[opponent], pscore[opponent], GameType[opponent]);
818
819     ClearEoln();
820 }
821
822
823 void
824 Curses_UpdateDisplay(short f, short t, short redraw, short isspec)
825 {
826     short i, sq, z;
827     int j;
828
829     if (redraw)
830     {
831         ShowHeader();
832         ShowPlayers();
833
834         i = 2;
835         gotoXY(3, ++i);
836
837         printw("    +");
838         for (j=0; j<NO_COLS; j++)
839             printw("----+");
840
841         while (i <= 1 + 2*NO_ROWS)
842         {
843             gotoXY(1, ++i);
844
845             if (flag.reverse)
846                 z = (i / 2) - 1;
847             else
848                 z = NO_ROWS + 2 - ((i + 1) / 2);
849
850             printw("    %c |", ROW_NAME(z+1));
851             for (j=0; j<NO_COLS; j++)
852                 printw("    |");
853
854             gotoXY(3, ++i);
855
856             if (i < 2 + 2*NO_ROWS)
857             {
858                 printw("    +");
859                 for (j=0; j<NO_COLS; j++)
860                     printw("----+");
861             }
862         }
863
864         printw("    +");
865         for (j=0; j<NO_COLS; j++)
866             printw("----+");
867
868         gotoXY(3, 4 + 2*NO_ROWS);
869         printw("    ");
870
871 #ifndef MINISHOGI
872         if (flag.reverse)
873             printw("  1    2    3    4    5    6    7    8    9");
874         else
875             printw("  9    8    7    6    5    4    3    2    1");
876 #else
877         if (flag.reverse)
878             printw("  1    2    3    4    5");
879         else
880             printw("  1    2    3    4    5");
881 #endif
882
883         for (sq = 0; sq < NO_SQUARES; sq++)
884             DrawPiece(sq);
885     }
886     else /* not redraw */
887     {
888         if (f < NO_SQUARES)
889             DrawPiece(f);
890
891         DrawPiece(t & 0x7f);
892     }
893
894     if ((isspec & capture) || (isspec & dropmask) || redraw)
895     {
896         short side;
897
898         for (side = black; side <= white; side++)
899         {
900             short x, y, piece, cside, k;
901             cside = flag.reverse ? (side ^ 1) : side;
902             x = x0[cside];
903             y = y0[cside];
904             k = 0;
905
906             for (piece = pawn; piece <= king; piece++)
907             {
908                 short n;
909
910                 if ((n = Captured[side][piece]))
911                 {
912                     gotoXY(x, y); 
913                     printw("%i%c", n, pxx[piece]);
914
915                     if (cside == black) y--; else y++;
916                 }
917                 else
918                 {
919                     k++;
920                 }
921             }
922
923             while (k)
924             {
925                 k--;
926                 gotoXY(x, y);
927                 printw("  ");
928
929                 if (cside == black) 
930                     y--;
931                 else 
932                     y++;
933             }
934         }
935     }
936
937     refresh();
938 }
939
940
941 void
942 Curses_ChangeAlphaWindow(void)
943 {
944     Curses_ShowMessage("WAwindow = ");
945     FLUSH_SCANW("%hd", &WAwindow);
946     Curses_ShowMessage("BAwindow = ");
947     FLUSH_SCANW("%hd", &BAwindow);
948 }
949
950
951 void
952 Curses_ChangeBetaWindow(void)
953 {
954     Curses_ShowMessage("WBwindow = ");
955     FLUSH_SCANW("%hd", &WBwindow);
956     Curses_ShowMessage("BBwindow = ");
957     FLUSH_SCANW("%hd", &BBwindow);
958 }
959
960
961 void
962 Curses_GiveHint(void)
963 {
964     char s[40];
965
966     if (hint)
967     {
968         algbr((short) (hint >> 8), (short) (hint & 0xFF), false);
969         strcpy(s, "try ");
970         strcat(s, mvstr[0]);
971         Curses_ShowMessage(s);
972     }
973     else
974     {
975         Curses_ShowMessage("I have no idea.\n");
976     }
977 }
978
979
980 void
981 Curses_ChangeSearchDepth(void)
982 {
983     Curses_ShowMessage("depth = ");
984     FLUSH_SCANW("%hd", &MaxSearchDepth);
985     TCflag = !(MaxSearchDepth > 0);
986 }
987
988
989 void
990 Curses_ChangeHashDepth(void)
991 {
992     Curses_ShowMessage("hashdepth = ");
993     FLUSH_SCANW("%hd", &HashDepth);
994     Curses_ShowMessage("MoveLimit = ");
995     FLUSH_SCANW("%hd", &HashMoveLimit);
996 }
997
998
999 void
1000 Curses_SetContempt(void)
1001 {
1002     Curses_ShowMessage("contempt = ");
1003     FLUSH_SCANW("%hd", &contempt);
1004 }
1005
1006
1007 void
1008 Curses_ChangeXwindow(void)
1009 {
1010     Curses_ShowMessage("xwndw= ");
1011     FLUSH_SCANW("%hd", &xwndw);
1012 }
1013
1014
1015 void
1016 Curses_SelectLevel(char *sx)
1017 {
1018     int item;
1019
1020     Curses_ClearScreen();
1021     gotoXY(32, 2);
1022     printw("GNU Shogi %s", PACKAGE_VERSION);
1023     gotoXY(20, 4);
1024     printw(" 1.   40 moves in   5 minutes");
1025     gotoXY(20, 5);
1026     printw(" 2.   40 moves in  15 minutes");
1027     gotoXY(20, 6);
1028     printw(" 3.   40 moves in  30 minutes");
1029     gotoXY(20, 7);
1030     printw(" 4.  all moves in  15 minutes");
1031     gotoXY(20, 8);
1032     printw(" 5.  all moves in  30 minutes");
1033     gotoXY(20, 9);
1034     printw(" 6.  all moves in  15 minutes, 30 seconds fischer clock");
1035     gotoXY(20, 10);
1036     printw(" 7.  all moves in  30 minutes, 30 seconds fischer clock");
1037     gotoXY(20, 11);
1038     printw(" 8.    1 move  in   1 minute");
1039     gotoXY(20, 12);
1040     printw(" 9.    1 move  in  15 minutes");
1041     gotoXY(20, 13);
1042     printw("10.    1 move  in  30 minutes");
1043
1044     OperatorTime = 0;
1045     TCmoves = 40;
1046     TCminutes = 5;
1047     TCseconds = 0;
1048
1049     gotoXY(20, 17);
1050     printw("Enter Level: ");
1051     refresh();
1052     FLUSH_SCANW("%d", &item);
1053
1054     switch(item)
1055     {
1056     case 1:
1057         TCmoves = 40;
1058         TCminutes = 5;
1059         break;
1060
1061     case 2:
1062         TCmoves = 40;
1063         TCminutes = 15;
1064         break;
1065
1066     case 3:
1067         TCmoves = 40;
1068         TCminutes = 30;
1069         break;
1070
1071     case 4:
1072         TCmoves = 80;
1073         TCminutes = 15;
1074         flag.gamein = true;
1075         break;
1076
1077     case 5:
1078         TCmoves = 80;
1079         TCminutes = 30;
1080         flag.gamein = true;
1081         break;
1082
1083     case 6:
1084         TCmoves = 80;
1085         TCminutes = 15;
1086         TCadd = 3000;
1087         flag.gamein = true;
1088         break;
1089
1090     case 7:
1091         TCmoves = 80;
1092         TCminutes = 30;
1093         TCadd = 3000;
1094         break;
1095
1096     case 8:
1097         TCmoves = 1;
1098         TCminutes = 1;
1099         flag.onemove = true;
1100         break;
1101
1102     case 9:
1103         TCmoves = 1;
1104         TCminutes = 15;
1105         flag.onemove = true;
1106         break;
1107
1108     case 10:
1109         TCmoves = 1;
1110         TCminutes = 30;
1111         flag.onemove = true;
1112         break;
1113     }
1114
1115     TCflag = (TCmoves > 0);
1116
1117     TimeControl.clock[black] = TimeControl.clock[white] = 0; 
1118
1119     SetTimeControl();
1120     Curses_ClearScreen();
1121     Curses_UpdateDisplay(0, 0, 1, 0);
1122 }
1123
1124
1125 void
1126 Curses_DoDebug(void)
1127 {
1128     short c, p, sq, tp, tc, tsq, score;
1129     char s[40];
1130
1131     ExaminePosition(opponent);
1132     Curses_ShowMessage("Enter piece: ");
1133     FLUSH_SCANW("%s", s);
1134     c = neutral;
1135
1136     if ((s[0] == 'b') || (s[0] == 'B'))
1137         c = black;
1138
1139     if ((s[0] == 'w') || (s[0] == 'W'))
1140         c = white;
1141
1142     for (p = king; p > no_piece; p--)
1143     {
1144         if ((s[1] == pxx[p]) || (s[1] == qxx[p]))
1145             break;
1146     }
1147
1148     for (sq = 0; sq < NO_SQUARES; sq++)
1149     {
1150         tp = board[sq];
1151         tc = color[sq];
1152         board[sq] = p;
1153         color[sq] = c;
1154         tsq = PieceList[c][1];
1155         PieceList[c][1] = sq;
1156         Curses_ShowPostnValue(sq);
1157         PieceList[c][1] = tsq;
1158         board[sq] = tp;
1159         color[sq] = tc;
1160     }
1161
1162     score = ScorePosition(opponent);
1163     gotoXY(TAB, 5);
1164     printw("S%d m%d ps%d gt%c m%d ps%d gt%c", score,
1165            mtl[computer], pscore[computer], GameType[computer],
1166            mtl[opponent], pscore[opponent], GameType[opponent]);
1167
1168     ClearEoln();
1169 }
1170
1171
1172 void
1173 Curses_DoTable(short table[NO_SQUARES])
1174 {
1175     short  sq;
1176     ExaminePosition(opponent);
1177
1178     for (sq = 0; sq < NO_SQUARES; sq++)
1179     {
1180         gotoXY(4 + 5 * VIR_C(sq), 5 + 2 * (7 - VIR_R(sq)));
1181         printw("%3d ", table[sq]);
1182     }
1183
1184
1185
1186 void
1187 Curses_PollForInput(void)
1188 {
1189     int  i;
1190     int  nchar;
1191
1192     if ((i = ioctl((int) 0, FIONREAD, &nchar)))
1193     {
1194         perror("FIONREAD");
1195         fprintf(stderr,
1196                 "You probably have a non-ANSI <ioctl.h>; "
1197                 "see README. %d %d %x\n",
1198                 i, errno, FIONREAD);
1199         exit(1);
1200     }
1201
1202     if (nchar)
1203     {
1204         if (!flag.timeout)
1205             flag.back = true;
1206
1207         flag.bothsides = false;
1208     }
1209 }
1210
1211
1212 void
1213 Curses_SetupBoard(void)
1214 {
1215     Curses_ShowMessage("'setup' command is not supported in Cursesmode");
1216 }