#define INCLUDED // Define externs here\r
-#include "sst.h"\r
#include <ctype.h>\r
-#ifdef MSDOS\r
-#include <dos.h>\r
+#include <getopt.h>\r
+#include "sst.h"\r
+\r
+#ifndef SSTDOC\r
+#define SSTDOC "sst.doc"\r
#endif\r
-#include <time.h>\r
\r
-int getch(void);\r
-\r
static char line[128], *linep = line;\r
-static int linecount; /* for paging */\r
\r
-static void clearscreen(void);\r
+/*\r
\r
-#define NUMCOMMANDS 34\r
+Here are Tom Almy's changes:\r
\r
-/* Compared to original version, I've changed the "help" command to\r
+ Compared to original version, I've changed the "help" command to\r
"call" and the "terminate" command to "quit" to better match\r
user expectations. The DECUS version apparently made those changes\r
as well as changing "freeze" to "save". However I like "freeze".\r
2. deathray improvement (but keeping original failure alternatives)\r
\r
3. Tholian Web\r
-\r
+s\r
4. Enemies can ram the Enterprise. Regular Klingons and Romulans can\r
move in Expert and Emeritus games. This code could use improvement.\r
\r
\r
6. Perhaps cloaking to be added later? BSD version\r
\r
+Here are Stas Sergeev's changes (controlled by the proprocessor symbol\r
+SERGEEV, not yet merged):\r
\r
- */\r
+ 1. The Space Thingy can be shoved, if you it ram, and can fire back if \r
+ fired upon.\r
+\r
+ 1 The Tholian can be hit with phasers\r
+\r
+ 2. When you are docked, base covers you with an almost invincible shields \r
+ (a commander can still ram you, or a Romulan can destroy the base,\r
+ or a SCom can even succeed with direct attack IIRC, but this rarely \r
+ happens).\r
+\r
+ 3. SCom can't escape from you if no more enemies remain (without this, \r
+ chasing SCom can take an eternity).\r
+\r
+ 4. Probe target you enter is now the destination quadrant. Before I don't \r
+ remember what it was, but it was something I had difficulty using)\r
+\r
+ 5. Secret password is now autogenerated.\r
+\r
+ 6. "Plaque" is adjusted for A4 paper:)\r
+\r
+ 7. Phasers now tells you how much energy needed, but only if the computer \r
+ is alive.\r
+\r
+ 8. Planets are auto-scanned when you enter the quadrant.\r
\r
+ 9. Mining or using crystals in presense of enemy now yields an attack.\r
+ There are other minor adjustments to what yields an attack\r
+ and what does not.\r
\r
-static char *commands[NUMCOMMANDS] = {\r
+ 10. Ramming a black hole is no longer instant death. \r
+\r
+ */\r
+\r
+static char *commands[] = {\r
"srscan",\r
"lrscan",\r
"phasers",\r
"quit",\r
"help"\r
};\r
+#define NUMCOMMANDS sizeof(commands)/sizeof(commands[0])\r
\r
static void listCommands(int x) {\r
prout(" SRSCAN MOVE PHASERS CALL\n"\r
\r
static void helpme(void) {\r
int i, j;\r
- char cmdbuf[32];\r
+ char cmdbuf[32], *cp;\r
char linebuf[132];\r
FILE *fp;\r
/* Give help on commands */\r
strcpy(cmdbuf, " ABBREV");\r
}\r
else {\r
- strcpy(cmdbuf, " Mnemonic: ");\r
- j = 0;\r
- while ((cmdbuf[j+13] = toupper(commands[i][j])) != 0) j++;\r
+ for (j = 0; commands[i][j]; j++)\r
+ cmdbuf[j] = toupper(commands[i][j]);\r
+ cmdbuf[j] = '\0';\r
}\r
- fp = fopen("sst.doc", "r");\r
+ fp = fopen(SSTDOC, "r");\r
if (fp == NULL) {\r
prout("Spock- \"Captain, that information is missing from the");\r
prout(" computer. You need to find SST.DOC and put it in the");\r
prout(" current directory.\"");\r
return;\r
}\r
- i = strlen(cmdbuf);\r
- do {\r
- if (fgets(linebuf, 132, fp) == NULL) {\r
+ for (;;) {\r
+ if (fgets(linebuf, sizeof(linebuf), fp) == NULL) {\r
prout("Spock- \"Captain, there is no information on that command.\"");\r
fclose(fp);\r
return;\r
}\r
- } while (strncmp(linebuf, cmdbuf, i) != 0);\r
+ if (linebuf[0] == '%' && linebuf[1] == '%'&& linebuf[2] == ' ') {\r
+ for (cp = linebuf+3; isspace(*cp); cp++)\r
+ continue;\r
+ linebuf[strlen(linebuf)-1] = '\0';\r
+ if (strcmp(cp, cmdbuf) == 0)\r
+ break;\r
+ }\r
+ }\r
\r
skip(1);\r
prout("Spock- \"Captain, I've found the following information:\"");\r
skip(1);\r
\r
- do {\r
- if (linebuf[0]!=12) { // ignore page break lines \r
- linebuf[strlen(linebuf)-1] = '\0'; // No \n at end\r
- prout(linebuf);\r
- }\r
- fgets(linebuf,132,fp);\r
- } while (strstr(linebuf, "******")==NULL);\r
+ while (fgets(linebuf, sizeof(linebuf),fp)) {\r
+ if (strstr(linebuf, "******"))\r
+ break;\r
+ proutc(linebuf);\r
+ }\r
fclose(fp);\r
}\r
\r
static void makemoves(void) {\r
int i, hitme;\r
- char ch;\r
while (TRUE) { /* command loop */\r
hitme = FALSE;\r
justin = 0;\r
}\r
else prout("UNRECOGNIZED COMMAND.");\r
}\r
+ commandhook(commands[i], TRUE);\r
switch (i) { /* command switch */\r
case 0: // srscan\r
srscan(1);\r
warp(1);\r
break;\r
case 5: // shields\r
- sheild(1);\r
+ doshield(1);\r
if (ididit) {\r
attack(2);\r
shldchg = 0;\r
}\r
break;\r
case 6: // dock\r
- dock();\r
+ dock(1);\r
+ if (ididit) attack(0);\r
break;\r
case 7: // damages\r
dreprt();\r
helpme(); // get help\r
break;\r
}\r
+ commandhook(commands[i], FALSE);\r
for (;;) {\r
if (alldone) break; // Game has ended\r
#ifdef DEBUG\r
events();\r
if (alldone) break; // Events did us in\r
}\r
- if (d.galaxy[quadx][quady] == 1000) { // Galaxy went Nova!\r
+ if (game.state.galaxy[quadx][quady] == 1000) { // Galaxy went Nova!\r
atover(0);\r
continue;\r
}\r
if (hitme && justin==0) {\r
attack(2);\r
if (alldone) break;\r
- if (d.galaxy[quadx][quady] == 1000) { // went NOVA! \r
+ if (game.state.galaxy[quadx][quady] == 1000) { // went NOVA! \r
atover(0);\r
hitme = TRUE;\r
continue;\r
}\r
\r
\r
-void main(int argc, char **argv) {\r
- int i;\r
- int hitme;\r
- char ch;\r
- prelim();\r
-\r
- if (argc > 1) {\r
- fromcommandline = 1;\r
- line[0] = '\0';\r
- while (--argc > 0) {\r
- strcat(line, *(++argv));\r
- strcat(line, " ");\r
- }\r
+int main(int argc, char **argv) {\r
+ int i, option, usecurses = TRUE;\r
+ while ((option = getopt(argc, argv, "t")) != -1) {\r
+ switch (option) {\r
+ case 't':\r
+ usecurses = FALSE;\r
+ break;\r
+ default:\r
+ fprintf(stderr, "usage: sst [-t] [startcommand...].\n");\r
+ exit(0);\r
+ }\r
}\r
- else fromcommandline = 0;\r
-\r
\r
+ iostart(usecurses);\r
+ prelim(); \r
+ line[0] = '\0';\r
+ for (i = optind; i < argc; i++) {\r
+ strcat(line, argv[i]);\r
+ strcat(line, " ");\r
+ }\r
while (TRUE) { /* Play a game */\r
- setup();\r
+ setup(line[0] == '\0');\r
if (alldone) {\r
score();\r
alldone = 0;\r
skip(1);\r
\r
if (tourn && alldone) {\r
- printf("Do you want your score recorded?");\r
+ proutn("Do you want your score recorded?");\r
if (ja()) {\r
chew2();\r
freeze(FALSE);\r
}\r
}\r
- printf("Do you want to play again?");\r
+ proutn("Do you want to play again?");\r
if (!ja()) break;\r
}\r
skip(1);\r
- prout("May the Great Bird of the Galaxy roost upon your home planet.");\r
+ ioend();\r
+ puts("May the Great Bird of the Galaxy roost upon your home planet.");\r
+ exit(0);\r
}\r
\r
\r
case IHP: s = "Planet"; break;\r
case IHB: s = "Starbase"; break;\r
case IHBLANK: s = "Black hole"; break;\r
- case IHT: s = "Tholean"; break;\r
- case IHWEB: s = "Tholean web"; break;\r
+ case IHT: s = "Tholian"; break;\r
+ case IHWEB: s = "Tholian web"; break;\r
+ case IHQUEST: s = "Stranger"; break;\r
default: s = "Unknown??"; break;\r
}\r
proutn(s);\r
}\r
\r
-void cramlc(int key, int x, int y) {\r
- if (key == 1) proutn(" Quadrant");\r
- else if (key == 2) proutn(" Sector");\r
- proutn(" ");\r
- crami(x, 1);\r
- proutn(" - ");\r
- crami(y, 1);\r
+char *cramlc(enum loctype key, int x, int y) {\r
+ static char buf[32];\r
+ buf[0] = '\0';\r
+ if (key == quadrant) strcpy(buf, "Quadrant ");\r
+ else if (key == sector) strcpy(buf, "Sector ");\r
+ sprintf(buf+strlen(buf), "%d-%d", x, y);\r
+ return buf;\r
}\r
\r
void crmena(int i, int enemy, int key, int x, int y) {\r
if (i == 1) proutn("***");\r
cramen(enemy);\r
- proutn(" at");\r
- cramlc(key, x, y);\r
+ proutn(" at ");\r
+ proutn(cramlc(key, x, y));\r
}\r
\r
void crmshp(void) {\r
}\r
\r
void chew(void) {\r
- linecount = 0;\r
linep = line;\r
*linep = 0;\r
}\r
\r
void chew2(void) {\r
/* return IHEOL next time */\r
- linecount = 0;\r
linep = line+1;\r
*linep = 0;\r
}\r
int i;\r
char *cp;\r
\r
- linecount = 0;\r
-\r
// Init result\r
aaitem = 0.0;\r
*citem = 0;\r
chew();\r
return IHEOL;\r
}\r
- gets(line);\r
+ getline(line, sizeof(line));\r
linep = line;\r
}\r
// Skip leading white space\r
}\r
if (isdigit(*linep) || *linep=='+' || *linep=='-' || *linep=='.') {\r
// treat as a number\r
+ i = 0;\r
if (sscanf(linep, "%lf%n", &aaitem, &i) < 1) {\r
linep = line; // Invalid numbers are ignored\r
*linep = 0;\r
}\r
}\r
\r
-void cramf(double x, int w, int d) {\r
- char buf[64];\r
- sprintf(buf, "%*.*f", w, d, x);\r
- proutn(buf);\r
-}\r
-\r
-void crami(int i, int w) {\r
- char buf[16];\r
- sprintf(buf, "%*d", w, i);\r
- proutn(buf);\r
-}\r
-\r
-double square(double i) { return i*i; }\r
- \r
-static void clearscreen(void) {\r
- /* Somehow we need to clear the screen */\r
-#ifdef __BORLANDC__\r
- extern void clrscr(void);\r
- clrscr();\r
-#else\r
- proutn("\033[2J"); /* Hope for an ANSI display */\r
-#endif\r
-}\r
-\r
-/* We will pull these out in case we want to do something special later */\r
-\r
-void pause(int i) {\r
- putchar('\n');\r
- if (i==1) {\r
- if (skill > 2)\r
- prout("[ANOUNCEMENT ARRIVING...]");\r
- else\r
- prout("[IMPORTANT ANNOUNCEMENT ARRIVING -- HIT SPACE BAR TO CONTINUE]");\r
- getch();\r
- }\r
- else {\r
- if (skill > 2)\r
- proutn("[CONTINUE?]");\r
- else\r
- proutn("[HIT SPACE BAR TO CONTINUE]");\r
- getch();\r
- proutn("\r \r");\r
- }\r
- if (i != 0) {\r
- clearscreen();\r
- }\r
- linecount = 0;\r
-}\r
-\r
-\r
-void skip(int i) {\r
- while (i-- > 0) {\r
- linecount++;\r
- if (linecount >= 23)\r
- pause(0);\r
- else\r
- putchar('\n');\r
- }\r
-}\r
-\r
-\r
-void proutn(char *s) {\r
- fputs(s, stdout);\r
-}\r
-\r
-void prout(char *s) {\r
- proutn(s);\r
- skip(1);\r
-}\r
-\r
-void prouts(char *s) {\r
- clock_t endTime;\r
- /* print slowly! */\r
- while (*s) {\r
- endTime = clock() + CLOCKS_PER_SEC*0.05;\r
- while (clock() < endTime) ;\r
- putchar(*s++);\r
- fflush(stdout);\r
- }\r
-}\r
-\r
void huh(void) {\r
chew();\r
skip(1);\r
proutn("Reset damage? ");\r
if (ja() != 0) {\r
int i;\r
- for (i=0; i <= ndevice; i++) if (damage[i] > 0.0) damage[i] = 0.0;\r
+ for (i=0; i <= NDEVICES; i++) if (damage[i] > 0.0) damage[i] = 0.0;\r
stdamtim = 1e30;\r
}\r
proutn("Toggle idebug? ");\r
proutn("Cause selective damage? ");\r
if (ja() != 0) {\r
int i, key;\r
- for (i=1; i <= ndevice; i++) {\r
+ for (i=1; i <= NDEVICES; i++) {\r
proutn("Kill ");\r
proutn(device[i]);\r
proutn("? ");\r
key = scan();\r
if (key == IHALPHA && isit("y")) {\r
damage[i] = 10.0;\r
- if (i == DRADIO) stdamtim = d.date;\r
+ if (i == DRADIO) stdamtim = game.state.date;\r
}\r
}\r
}\r
case FSCMOVE: proutn("SC Move "); break;\r
case FSCDBAS: proutn("SC Base Destroy "); break;\r
}\r
- cramf(future[i]-d.date, 8, 2);\r
+ proutn("%.2f", future[i]-game.state.date);\r
chew();\r
proutn(" ?");\r
key = scan();\r
if (key == IHREAL) {\r
- future[i] = d.date + aaitem;\r
+ future[i] = game.state.date + aaitem;\r
}\r
}\r
chew();\r
projects / super-star-trek.git / blobdiff