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