X-Git-Url: https://jxself.org/git/?p=super-star-trek.git;a=blobdiff_plain;f=c-version%2Fsrc%2Fio.c;fp=c-version%2Fsrc%2Fio.c;h=0000000000000000000000000000000000000000;hp=fa028f52933078a621d985bbbac65c2fa3cea186;hb=92e5cab2949160324146ae563bbd88af865beeda;hpb=b10de966829aea9fc9f8aa04522725d8434e2d36

diff --git a/c-version/src/io.c b/c-version/src/io.c
deleted file mode 100644
index fa028f5..0000000
--- a/c-version/src/io.c
+++ /dev/null
@@ -1,466 +0,0 @@
-#include <stdio.h>
-#include <unistd.h>
-#include <wchar.h>
-
-#include "config.h"
-#include "sst.h"
-#include "sstlinux.h"
-
-static int rows, linecount;	/* for paging */
-
-WINDOW *curwnd;
-WINDOW *fullscreen_window;
-WINDOW *srscan_window;
-WINDOW *report_window;
-WINDOW *status_window;
-WINDOW *lrscan_window;
-WINDOW *message_window;
-WINDOW *prompt_window;
-
-static void outro(void)
-/* wrap up, either normally or due to signal */
-{
-    if (game.options & OPTION_CURSES) {
-	//clear();
-	//curs_set(1);
-	//refresh();
-	//resetterm();
-	//echo();
-	endwin();
-	putchar('\n');
-    }
-    if (logfp)
-	fclose(logfp);
-}
-
-void iostart(void) 
-{
-    setlocale(LC_ALL, "");
-    bindtextdomain(PACKAGE, LOCALEDIR);
-    textdomain(PACKAGE);
-
-    if (atexit(outro)){
-	fprintf(stderr,"Unable to register outro(), exiting...\n");
-	exit(1);
-    }
-    if (!(game.options & OPTION_CURSES)) {
-	char *ln_env = getenv("LINES");
-	rows = ln_env ? atoi(ln_env) : 25;
-    } else {
-	initscr();
-#ifdef KEY_MIN
-	keypad(stdscr, TRUE);
-#endif /* KEY_MIN */
-	saveterm();
-	nonl();
-	cbreak();
-#ifdef A_COLOR
-	{
-	    start_color();
-	    init_pair(COLOR_BLACK, COLOR_BLACK, COLOR_BLACK);
-	    init_pair(COLOR_GREEN, COLOR_GREEN, COLOR_BLACK);
-	    init_pair(COLOR_RED, COLOR_RED, COLOR_BLACK);
-	    init_pair(COLOR_CYAN, COLOR_CYAN, COLOR_BLACK);
-	    init_pair(COLOR_WHITE, COLOR_WHITE, COLOR_BLACK);
-	    init_pair(COLOR_MAGENTA, COLOR_MAGENTA, COLOR_BLACK);
-	    init_pair(COLOR_BLUE, COLOR_BLUE, COLOR_BLACK);
-	    init_pair(COLOR_YELLOW, COLOR_YELLOW, COLOR_BLACK);
-	}
-#endif /* A_COLOR */
-	//noecho();
-	fullscreen_window = stdscr;
-	srscan_window     = newwin(12, 25, 0,       0);
-	report_window     = newwin(11, 0,  1,       25);
-	status_window     = newwin(10, 0,  1,       39);
-	lrscan_window     = newwin(5,  0,  0,       64); 
-	message_window    = newwin(0,  0,  12,      0);
-	prompt_window     = newwin(1,  0,  LINES-2, 0); 
-	scrollok(message_window, TRUE);
-	setwnd(fullscreen_window);
-	textcolor(DEFAULT);
-    }
-}
-
-
-void waitfor(void)
-/* wait for user action -- OK to do nothing if on a TTY */
-{
-    if (game.options & OPTION_CURSES)
-	wgetch(prompt_window);
-}
-
-void announce(void)
-{
-    skip(1);
-    prouts(_("[ANNOUNCEMENT ARRIVING...]"));
-    skip(1);
-}
-
-static void pause_game(void)
-{
-	char *prompt;
-	char buf[BUFSIZ];
-        if (game.skill > SKILL_FAIR)
-	    prompt = _("[CONTINUE?]");
-	else
-	    prompt = _("[PRESS ENTER TO CONTINUE]");
-
-	if (game.options & OPTION_CURSES) {
-	    drawmaps(0);
-	    setwnd(prompt_window);
-	    wclear(prompt_window);
-	    waddstr(prompt_window, prompt);
-	    wgetnstr(prompt_window, buf, sizeof(buf));
-	    wclear(prompt_window);
-	    wrefresh(prompt_window);
-	    setwnd(message_window);
-	} else {
-	    int j;
-	    putchar('\n');
-	    proutn(prompt);
-	    fgets(buf, sizeof(buf), stdin);
-	    for (j = 0; j < rows; j++)
-		putchar('\n');
-	    linecount = 0;
-	}
-}
-
-
-void skip(int i) 
-{
-    while (i-- > 0) {
-	if (game.options & OPTION_CURSES) {
-	    if (curwnd == message_window && getcury(curwnd) >= getmaxy(curwnd) - 3) {
-		pause_game();
-		clrscr();
-	    } else {
-		proutn("\n");
-	    }
-	} else {
-	    linecount++;
-	    if (linecount >= rows)
-		pause_game();
-	    else
-		putchar('\n');
-	}
-    }
-}
-
-static void vproutn(const char *fmt, va_list ap) 
-{
-    if (game.options & OPTION_CURSES) {
-	vwprintw(curwnd, fmt, ap);
-	wrefresh(curwnd);
-    }
-    else
-	vprintf(fmt, ap);
-}
-
-void proutn(const char *fmt, ...) 
-{
-    va_list ap;
-    va_start(ap, fmt);
-    vproutn(fmt, ap);
-    va_end(ap);
-}
-
-void prout(const char *fmt, ...) 
-{
-    va_list ap;
-    va_start(ap, fmt);
-    vproutn(fmt, ap);
-    va_end(ap);
-    skip(1);
-}
-
-void prouts(const char *fmt, ...) 
-/* print slowly! */
-{
-    char buf[BUFSIZ];
-    wchar_t *s, mbuf[BUFSIZ];
-    va_list ap;
-    va_start(ap, fmt);
-    vsprintf(buf, fmt, ap);
-    va_end(ap);
-    mbstowcs(mbuf, buf, BUFSIZ);
-    for (s = mbuf; *s; s++) {
-	/* HOW to convince ncurses to use wchar_t?? */
-	/* WHY putwchar() doesn't work?? */
-	/* OK then, convert back to mbs... */
-	char c[MB_CUR_MAX*2];
-	int n;
-	n = wctomb(c, *s);
-	c[n] = 0;
-	delay(30);
-	proutn(c);
-	if (game.options & OPTION_CURSES)
-	    wrefresh(curwnd);
-	else
-	    fflush(stdout);
-    }
-    delay(300);
-}
-
-void cgetline(char *line, int max)
-{
-    if (game.options & OPTION_CURSES) {
-	wgetnstr(curwnd, line, max);
-	strcat(line, "\n");
-	wrefresh(curwnd);
-    } else {
-	if (replayfp && !feof(replayfp))
-	    (void)fgets(line, max, replayfp);
-	else
-	    (void)fgets(line, max, stdin);
-    }
-    if (logfp)
-	(void)fputs(line, logfp);
-    line[strlen(line)-1] = '\0';
-}
-
-void setwnd(WINDOW *wnd)
-/* change windows -- OK for this to be a no-op in tty mode */
-{
-    if (game.options & OPTION_CURSES) {
-     curwnd=wnd;
-     curs_set(wnd == fullscreen_window || wnd == message_window || wnd == prompt_window);
-    }
-}
-
-void clreol(void)
-/* clear to end of line -- can be a no-op in tty mode */
-{
-   if (game.options & OPTION_CURSES) {
-       wclrtoeol(curwnd);
-       wrefresh(curwnd);
-   }
-}
-
-void clrscr(void)
-/* clear screen -- can be a no-op in tty mode */
-{
-   if (game.options & OPTION_CURSES) {
-       wclear(curwnd);
-       wmove(curwnd,0,0);
-       wrefresh(curwnd);
-   }
-   linecount = 0;
-}
-
-void textcolor(int color)
-{
-#ifdef A_COLOR
-    if (game.options & OPTION_CURSES) {
-	switch(color) {
-	case DEFAULT: 
-	    wattrset(curwnd, 0);
-	    break;
-	case BLACK: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_BLACK));
-	    break;
-	case BLUE: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_BLUE));
-	    break;
-	case GREEN: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_GREEN));
-	    break;
-	case CYAN: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_CYAN));
-	    break;
-	case RED: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_RED));
-	    break;
-	case MAGENTA: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_MAGENTA));
-	    break;
-	case BROWN: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_YELLOW));
-	    break;
-	case LIGHTGRAY: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_WHITE));
-	    break;
-	case DARKGRAY: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_BLACK) | A_BOLD);
-	    break;
-	case LIGHTBLUE: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_BLUE) | A_BOLD);
-	    break;
-	case LIGHTGREEN: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_GREEN) | A_BOLD);
-	    break;
-	case LIGHTCYAN: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_CYAN) | A_BOLD);
-	    break;
-	case LIGHTRED: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_RED) | A_BOLD);
-	    break;
-	case LIGHTMAGENTA: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_MAGENTA) | A_BOLD);
-	    break;
-	case YELLOW: 
-	    wattron(curwnd, COLOR_PAIR(COLOR_YELLOW) | A_BOLD);
-	    break;
-	case WHITE:
-	    wattron(curwnd, COLOR_PAIR(COLOR_WHITE) | A_BOLD);
-	    break;
-	}
-    }
-#endif /* A_COLOR */
-}
-
-void highvideo(void)
-{
-    if (game.options & OPTION_CURSES) {
-	wattron(curwnd, A_REVERSE);
-    }
-}
- 
-void commandhook(char *cmd, bool before) {
-}
-
-/*
- * Things past this point have policy implications.
- */
-
-void drawmaps(int mode)
-/* hook to be called after moving to redraw maps */
-{
-    if (game.options & OPTION_CURSES) {
-	if (mode == 1)
-	    sensor();
-        setwnd(srscan_window);
-        wmove(curwnd, 0, 0);
-        srscan();
-	if (mode != 2) {
-	    setwnd(status_window);
-	    wclear(status_window);
-	    wmove(status_window, 0, 0);
-	    setwnd(report_window);
-	    wclear(report_window);
-	    wmove(report_window, 0, 0);
-	    status(0);
-	    setwnd(lrscan_window);
-	    wclear(lrscan_window);
-	    wmove(lrscan_window, 0, 0);
-	    lrscan();
-	}
-    }
-}
-
-static void put_srscan_sym(coord w, char sym)
-{
-    wmove(srscan_window, w.x+1, w.y*2+2);
-    waddch(srscan_window, sym);
-    wrefresh(srscan_window);
-}
-
-void boom(coord w)
-/* enemy fall down, go boom */ 
-{
-    if (game.options & OPTION_CURSES) {
-	drawmaps(2);
-	setwnd(srscan_window);
-	wattron(srscan_window, A_REVERSE);
-	put_srscan_sym(w, game.quad[w.x][w.y]);
-	sound(500);
-	delay(1000);
-	nosound();
-	wattroff(srscan_window, A_REVERSE);
-	put_srscan_sym(w, game.quad[w.x][w.y]);
-	delay(500);
-	setwnd(message_window);
-    }
-} 
-
-void warble(void)
-/* sound and visual effects for teleportation */
-{
-    if (game.options & OPTION_CURSES) {
-	drawmaps(2);
-	setwnd(message_window);
-	sound(50);
-    }
-    prouts("     . . . . .     ");
-    if (game.options & OPTION_CURSES) {
-	delay(1000);
-	nosound();
-    }
-}
-
-void tracktorpedo(coord w, int l, int i, int n, int iquad)
-/* torpedo-track animation */
-{
-    if (!(game.options & OPTION_CURSES)) {
-	if (l == 1) {
-	    if (n != 1) {
-		skip(1);
-		proutn(_("Track for torpedo number %d-  "), i);
-	    }
-	    else {
-		skip(1);
-		proutn(_("Torpedo track- "));
-	    }
-	} else if (l==4 || l==9) 
-	    skip(1);
-	proutn("%d - %d   ", w.x, w.y);
-    } else {
-	if (!damaged(DSRSENS) || game.condition==docked) {
-	    if (i != 1 && l == 1) {
-		drawmaps(2);
-		delay(400);
-	    }
-	    if ((iquad==IHDOT)||(iquad==IHBLANK)){
-		put_srscan_sym(w, '+');
-		sound(l*10);
-		delay(100);
-		nosound();
-		put_srscan_sym(w, iquad);
-	    }
-	    else {
-		wattron(curwnd, A_REVERSE);
-		put_srscan_sym(w, iquad);
-		sound(500);
-		delay(1000);
-		nosound();
-		wattroff(curwnd, A_REVERSE);
-		put_srscan_sym(w, iquad);
-	    }
-	} else {
-	    proutn("%d - %d   ", w.x, w.y);
-	}
-    }
-}
-
-void makechart(void) 
-{
-    if (game.options & OPTION_CURSES) {
-	setwnd(message_window);
-	wclear(message_window);
-    }
-    chart();
-    if (game.options & OPTION_TTY) {
-	skip(1);
-    }
-}
-
-void prstat(const char *txt, const char *fmt, ...)
-{
-#define NSYM 14
-    int i;
-    va_list args;
-    proutn(txt);
-    if (game.options & OPTION_CURSES) {
-	skip(1);
-    } else  {
-	for (i = mblen(txt, strlen(txt)); i < NSYM; i++)
-	    proutn(" ");
-    }
-    if (game.options & OPTION_CURSES)
-	setwnd(status_window);
-    va_start(args, fmt);
-    vproutn(fmt, args);
-    va_end(args);
-    skip(1);
-    if (game.options & OPTION_CURSES)
-	setwnd(report_window);
-}