+////////////////////////////////////////////////////////////
+// starting game
+
+static bool shipselected;
+static int loadpos;
+
+static int
+nextload(int load)
+{
+ switch (load) {
+ case L_ROUND: return L_GRAPE;
+ case L_GRAPE: return L_CHAIN;
+ case L_CHAIN: return L_DOUBLE;
+ case L_DOUBLE: return L_ROUND;
+ }
+ return L_ROUND;
+}
+
+static int
+loadbychar(int ch)
+{
+ switch (ch) {
+ case 'r': return L_ROUND;
+ case 'g': return L_GRAPE;
+ case 'c': return L_CHAIN;
+ case 'd': return L_DOUBLE;
+ }
+ return L_ROUND;
+}
+
+static const char *
+loadstr(int load)
+{
+ switch (load) {
+ case L_ROUND: return "round";
+ case L_GRAPE: return "grape";
+ case L_CHAIN: return "chain";
+ case L_DOUBLE: return "double";
+ }
+ return "???";
+}
+
+static void
+displayshiplist(void)
+{
+ struct ship *sp;
+ int which;
+
+ erase();
+
+ attron(A_BOLD);
+ mvaddstr(1, 4, cc->name);
+ attroff(A_BOLD);
+
+ which = 0;
+ foreachship(sp) {
+ mvselprintw(which + 3, 4, which, player, 60,
+ " %2d: %-10s %-15s (%-2d pts) %s",
+ sp->file->index,
+ countryname[sp->nationality],
+ sp->shipname,
+ sp->specs->pts,
+ saywhat(sp, 1));
+ which++;
+ }
+
+ if (!shipselected) {
+ mvaddstr(15, 4, "Choose your ship");
+ move(player + 3, 63);
+ } else {
+ mvselprintw(15, 4, 0, loadpos, 32,
+ "Initial left broadside: %s", loadstr(mf->loadL));
+ mvselprintw(16, 4, 1, loadpos, 32,
+ "Initial right broadside: %s", loadstr(mf->loadR));
+ mvselprintw(17, 4, 2, loadpos, 32, "Set sail");
+ move(loadpos+15, 35);
+ }
+
+ wrefresh(stdscr);
+}
+
+static int
+pickship(void)
+{
+ struct File *fp;
+ struct ship *sp;
+ bool done;
+ int ch;
+
+ for (;;) {
+ foreachship(sp)
+ if (sp->file->captain[0] == 0 && !sp->file->struck
+ && sp->file->captured == 0)
+ break;
+ if (sp >= ls) {
+ return -1;
+ }
+ player = sp - SHIP(0);
+ if (randomize) {
+ /* nothing */
+ } else {
+ done = false;
+ while (!done) {
+ displayshiplist();
+
+ ch = getch();
+ switch (ch) {
+ case 12 /*^L*/:
+ clear();
+ break;
+ case '\r':
+ case '\n':
+ done = true;
+ break;
+ case 7 /*^G*/:
+ case 8 /*^H*/:
+ case 27 /*ESC*/:
+ case 127 /*^?*/:
+ beep();
+ break;
+ case 16 /*^P*/:
+ case KEY_UP:
+ up(&player, NULL);
+ break;
+ case 14 /*^N*/:
+ case KEY_DOWN:
+ down(&player, NULL, cc->vessels,
+ cc->vessels);
+ break;
+ default:
+ beep();
+ break;
+ }
+ }
+ }
+ if (player < 0)
+ continue;
+ if (Sync() < 0)
+ leave(LEAVE_SYNC);
+ fp = SHIP(player)->file;
+ if (fp->captain[0] || fp->struck || fp->captured != 0)
+ oops(16, 4, "That ship is taken.");
+ else
+ break;
+ }
+ return 0;
+}
+
+static void
+pickload(void)
+{
+ bool done;
+ int ch;
+
+ mf->loadL = L_ROUND;
+ mf->loadR = L_ROUND;
+
+ loadpos = 0;
+ done = false;
+ while (!done) {
+ displayshiplist();
+
+ ch = getch();
+ switch (ch) {
+ case 12 /*^L*/:
+ clear();
+ break;
+ case 'r':
+ case 'g':
+ case 'c':
+ case 'd':
+ switch (loadpos) {
+ case 0: mf->loadL = loadbychar(ch); break;
+ case 1: mf->loadR = loadbychar(ch); break;
+ case 2: beep(); break;
+ }
+ break;
+ case '\r':
+ case '\n':
+ switch (loadpos) {
+ case 0: mf->loadL = nextload(mf->loadL); break;
+ case 1: mf->loadR = nextload(mf->loadR); break;
+ case 2: done = true; break;
+ }
+ break;
+ case 7 /*^G*/:
+ case 8 /*^H*/:
+ case 27 /*ESC*/:
+ case 127 /*^?*/:
+ beep();
+ break;
+ case 16 /*^P*/:
+ case KEY_UP:
+ up(&loadpos, NULL);
+ break;
+ case 14 /*^N*/:
+ case KEY_DOWN:
+ down(&loadpos, NULL, 3, 3);
+ break;
+ default:
+ beep();
+ break;
+ }
+ }
+ mf->readyR = R_LOADED|R_INITIAL;
+ mf->readyL = R_LOADED|R_INITIAL;
+}
+
+static void
+startgame(void)
+{
+
+ ingame = true;
+ shipselected = false;
+
+ pl_main_init();
+
+ hasdriver = sync_exists(game);
+ if (sync_open() < 0) {
+ oops(21, 10, "syncfile: %s", strerror(errno));
+ pl_main_uninit();
+ ingame = false;
+ return;
+ }
+
+ if (hasdriver) {
+ mvaddstr(21, 10, "Synchronizing with the other players...");
+ wrefresh(stdscr);
+ fflush(stdout);
+ if (Sync() < 0)
+ leave(LEAVE_SYNC);
+ } else {
+ mvaddstr(21, 10, "Starting driver...");
+ wrefresh(stdscr);
+ fflush(stdout);
+ startdriver();
+ }
+
+ if (pickship() < 0) {
+ oops(21, 10, "All ships taken in that scenario.");
+ sync_close(0);
+ people = 0;
+ pl_main_uninit();
+ ingame = false;
+ return;
+ }
+ shipselected = true;
+
+ ms = SHIP(player);
+ mf = ms->file;
+ mc = ms->specs;
+
+ pickload();
+
+ pl_main();
+ ingame = false;
+}
+
+////////////////////////////////////////////////////////////
+// scenario picker
+
+static int pickerpos;
+static int pickerscroll;
+
+static const char *
+absdirectionname(int dir)
+{
+ switch (dir) {
+ case 1: return "South";
+ case 2: return "Southwest";
+ case 3: return "West";
+ case 4: return "Northwest";
+ case 5: return "North";
+ case 6: return "Northeast";
+ case 7: return "East";
+ case 8: return "Southeast";
+ }
+ return "?";
+}
+
+static const char *
+windname(int wind)
+{
+ switch (wind) {
+ case 0: return "calm";
+ case 1: return "light breeze";
+ case 2: return "moderate breeze";
+ case 3: return "fresh breeze";
+ case 4: return "strong breeze";
+ case 5: return "gale";
+ case 6: return "full gale";
+ case 7: return "hurricane";
+ }
+ return "???";
+}
+
+static const char *
+nationalityname(int nationality)
+{
+ switch (nationality) {
+ case N_A: return "a";
+ case N_B: return "b";
+ case N_S: return "s";
+ case N_F: return "f";
+ case N_J: return "j";
+ case N_D: return "d";
+ case N_K: return "k";
+ case N_O: return "o";
+ }
+ return "?";
+}
+
+static void
+drawpicker(void)
+{
+ int y, sc, i;
+ struct ship *ship;
+
+ erase();
+
+ mvaddstr(0, 0, "## SHIPS TITLE");
+ for (y=1; y<LINES-11; y++) {
+ sc = (y-1) + pickerscroll;
+ if (sc < NSCENE) {
+ mvselprintw(y, 0, sc, pickerpos, 56,
+ "%-2d %-5d %s",
+ sc, scene[sc].vessels, scene[sc].name);
+ }
+ }
+
+ mvprintw(2, 60 + 2, "%s wind",
+ absdirectionname(scene[pickerpos].winddir));
+ mvprintw(3, 60 + 2, "(%s)",
+ windname(scene[pickerpos].windspeed));
+
+ for (i=0; i<scene[pickerpos].vessels; i++) {
+ ship = &scene[pickerpos].ship[i];
+ mvprintw(LINES-10 + i, 0,
+ "(%s) %-16s %3d gun %s (%s crew) (%d pts)",
+ nationalityname(ship->nationality),
+ ship->shipname,
+ ship->specs->guns,
+ shortclassname[ship->specs->class],
+ qualname[ship->specs->qual],
+ ship->specs->pts);
+ }
+
+ move(1 + pickerpos - pickerscroll, 55);
+ wrefresh(stdscr);
+}
+
+static int
+pickscenario(int initpos)
+{
+ int ch;
+
+ pickerpos = initpos;
+ if (pickerpos < 0) {
+ pickerpos = 0;
+ }
+
+ while (1) {
+ drawpicker();
+ ch = getch();
+ switch (ch) {
+ case 12 /*^L*/:
+ clear();
+ break;
+ case '\r':
+ case '\n':
+ return pickerpos;
+ case 7 /*^G*/:
+ case 8 /*^H*/:
+ case 27 /*ESC*/:
+ case 127 /*^?*/:
+ return initpos;
+ case 16 /*^P*/:
+ case KEY_UP:
+ up(&pickerpos, &pickerscroll);
+ break;
+ case 14 /*^N*/:
+ case KEY_DOWN:
+ down(&pickerpos, &pickerscroll, NSCENE, LINES-12);
+ break;
+ default:
+ beep();
+ break;
+ }
+ }
+ return pickerpos;
+}
+
+////////////////////////////////////////////////////////////
+// setup menus
+
+#define MAINITEMS_NUM 5
+#define STARTITEMS_NUM 4
+#define OPTIONSITEMS_NUM 5
+
+static int mainpos;
+static bool connected;
+
+static bool joinactive;
+static int joinpos;
+static int joinscroll;
+static int joinable[NSCENE];
+static int numjoinable;
+
+static bool startactive;
+static int startpos;
+static int startscenario;
+
+static bool optionsactive;
+static int optionspos;
+static char o_myname[MAXNAMESIZE];
+static bool o_randomize;
+static bool o_longfmt;
+static bool o_nobells;
+
+
+/*
+ * this and sgetstr() should share code
+ */
+static void
+startup_getstr(int y, int x, char *buf, size_t max)
+{
+ size_t pos = 0;
+ int ch;
+
+ for (;;) {
+ buf[pos] = 0;
+ move(y, x);
+ addstr(buf);
+ clrtoeol();
+ wrefresh(stdscr);
+ fflush(stdout);
+
+ ch = getch();
+ switch (ch) {
+ case '\n':
+ case '\r':
+ return;
+ case '\b':
+ if (pos > 0) {
+ /*waddstr(scroll_w, "\b \b");*/
+ pos--;
+ }
+ break;
+ default:
+ if (ch >= ' ' && ch < 0x7f && pos < max - 1) {
+ buf[pos++] = ch;
+ } else {
+ beep();
+ }
+ }
+ }
+}
+
+static void
+changename(void)
+{
+ mvaddstr(LINES-2, COLS/2, "Enter your name:");
+ startup_getstr(LINES-1, COLS/2, o_myname, sizeof(o_myname));
+}
+
+static void
+checkforgames(void)
+{
+ int i;
+ int prev;
+
+ if (numjoinable > 0) {
+ prev = joinable[joinpos];
+ } else {
+ prev = 0;
+ }
+
+ numjoinable = 0;
+ for (i = 0; i < NSCENE; i++) {
+ if (!sync_exists(i)) {
+ continue;
+ }
+ if (i < prev) {
+ joinpos = numjoinable;
+ }
+ joinable[numjoinable++] = i;
+ }
+ if (joinpos > numjoinable) {
+ joinpos = (numjoinable > 0) ? numjoinable - 1 : 0;
+ }
+ if (joinscroll > joinpos) {
+ joinscroll = (joinpos > 0) ? joinpos - 1 : 0;
+ }
+}
+
+static void
+drawstartmenus(void)
+{
+ const int mainy0 = 8;
+ const int mainx0 = 12;
+
+ erase();
+
+ mvaddstr(5, 10, "Wooden Ships & Iron Men");
+
+ mvaddselstr(mainy0+0, mainx0, 0, mainpos, 17, "Join a game");
+ mvaddselstr(mainy0+1, mainx0, 1, mainpos, 17, "Start a game");
+ mvaddselstr(mainy0+2, mainx0, 2, mainpos, 17, "Options");
+ mvaddselstr(mainy0+3, mainx0, 3, mainpos, 17, "Show high scores");
+ mvaddselstr(mainy0+4, mainx0, 4, mainpos, 17, "Quit");
+
+ mvprintw(15, 10, "Captain %s", myname);
+ if (connected) {
+ mvaddstr(16, 10, "Connected via scratch files.");
+ } else {
+ mvaddstr(16, 10, "Not connected.");
+ }
+
+ if (joinactive) {
+ int y0, leavey = 0, i, sc;
+
+ mvaddstr(0, COLS/2, "## SHIPS TITLE");
+ y0 = 1;
+ for (i = 0; i < numjoinable; i++) {
+ if (i >= joinscroll && i < joinscroll + LINES-1) {
+ move(y0 + i - joinscroll, COLS/2);
+ if (i == joinpos) {
+ attron(A_REVERSE);
+ }
+ sc = joinable[i];
+ printw("%-2d %-5d %s",
+ sc, scene[sc].vessels, scene[sc].name);
+ if (i == joinpos) {
+ filltoeol();
+ attroff(A_REVERSE);
+ leavey = y0 + i - joinscroll;
+ }
+ }
+ }
+ mvaddstr(19, 10, "(Esc to abort)");
+ if (numjoinable > 0) {
+ mvaddstr(18, 10, "Choose a game to join.");
+ move(leavey, COLS-1);
+ } else {
+ mvaddstr(2, COLS/2, "No games.");
+ mvaddstr(18, 10, "Press return to refresh.");
+ }
+
+ } else if (startactive) {
+ const char *name;
+
+ mvaddstr(18, 10, "Start a new game");
+ mvaddstr(19, 10, "(Esc to abort)");
+ mvaddstr(2, COLS/2, "New game");
+
+ name = (startscenario < 0) ?
+ "not selected" : scene[startscenario].name;
+
+ mvselprintw(4, COLS/2, 0, startpos, COLS/2 - 1,
+ "Scenario: %s", name);
+ mvaddselstr(5, COLS/2, 1, startpos, COLS/2 - 1,
+ "Visibility: local");
+ mvaddselstr(6, COLS/2, 2, startpos, COLS/2 - 1,
+ "Password: unset");
+ mvaddselstr(7, COLS/2, 3, startpos, COLS/2 - 1,
+ "Start game");
+ move(4+startpos, COLS - 2);
+
+ } else if (optionsactive) {
+ mvaddstr(18, 10, "Adjust options");
+ mvaddstr(19, 10, "(Esc to abort)");
+ mvaddstr(2, COLS/2, "Adjust options");
+
+ mvselprintw(4, COLS/2, 0, optionspos, COLS/2-1,
+ "Your name: %s", o_myname);
+ mvselprintw(5, COLS/2, 1, optionspos, COLS/2-1,
+ "Auto-pick ships: %s", o_randomize ? "ON" : "off");
+ mvselprintw(6, COLS/2, 2, optionspos, COLS/2-1,
+ "Usernames in scores: %s",
+ o_longfmt ? "ON" : "off");
+ mvselprintw(7, COLS/2, 3, optionspos, COLS/2-1,
+ "Beeping: %s", o_nobells ? "OFF" : "on");
+ mvselprintw(8, COLS/2, 4, optionspos, COLS/2-1,
+ "Apply changes");
+ move(4+optionspos, COLS - 2);
+
+ } else {
+ move(mainy0 + mainpos, mainx0 + 16);
+ }
+
+ wrefresh(stdscr);
+ fflush(stdout);
+}
+
git.ckatri.com / bsdgames-darwin.git / blobdiff