int srscan(int l) {
- static char requests[][3] =
- {"","da","co","po","ls","wa","en","to","sh","kl","ti"};
- char *cp = NULL;
- int leftside=TRUE, rightside=TRUE, i, j, jj, k=0, nn=FALSE, t, dam=0;
- int goodScan=TRUE;
- switch (l) {
- case SCAN_FULL: // SRSCAN
- if (game.damage[DSRSENS] != 0) {
- /* Allow base's sensors if docked */
- if (condit != IHDOCKED) {
- prout(" S.R. SENSORS DAMAGED!");
- goodScan=FALSE;
- }
- else
- prout(" [Using Base's sensors]");
- }
- else proutn(" Short-range scan\n\r");
- if (goodScan) game.starch[quadx][quady] = game.damage[DRADIO]>0.0 ? game.state.galaxy[quadx][quady]+1000:1;
- scan();
- if (isit("chart")) nn = TRUE;
- if (isit("no")) rightside = FALSE;
- chew();
- proutn(" 1 2 3 4 5 6 7 8 9 10\n\r");
- break;
- case SCAN_REQUEST:
- while (scan() == IHEOL)
- proutn("Information desired? ");
- chew();
- for (k = 1; k <= 10; k++)
- if (strncmp(citem,requests[k],min(2,strlen(citem)))==0)
- break;
- if (k > 10) {
- prout("UNRECOGNIZED REQUEST. Legal requests are:\n"
- " date, condition, position, lsupport, warpfactor,\n"
- " energy, torpedoes, shields, klingons, time.");
- return FALSE;
- }
- // no "break"
- case SCAN_STATUS: // STATUS
- chew();
- leftside = FALSE;
- skip(1);
- case SCAN_NO_LEFTSIDE: // REQUEST
- leftside=FALSE;
- break;
+ static char requests[][3] =
+ {"","da","co","po","ls","wa","en","to","sh","kl","ti"};
+ char *cp = NULL;
+ int leftside=TRUE, rightside=TRUE, i, j, jj, k=0, nn=FALSE, t, dam=0;
+ int goodScan=TRUE;
+ switch (l) {
+ case SCAN_FULL: // SRSCAN
+ if (game.damage[DSRSENS] != 0) {
+ /* Allow base's sensors if docked */
+ if (condit != IHDOCKED) {
+ prout(" S.R. SENSORS DAMAGED!");
+ goodScan=FALSE;
+ }
+ else
+ prout(" [Using Base's sensors]");
+ }
+ else proutn(" Short-range scan\n\r");
+ if (goodScan) game.starch[quadx][quady] = game.damage[DRADIO]>0.0 ? game.state.galaxy[quadx][quady]+1000:1;
+ scan();
+ if (isit("chart")) nn = TRUE;
+ if (isit("no")) rightside = FALSE;
+ chew();
+ proutn(" 1 2 3 4 5 6 7 8 9 10\n\r");
+ break;
+ case SCAN_REQUEST:
+ while (scan() == IHEOL)
+ proutn("Information desired? ");
+ chew();
+ for (k = 1; k <= 10; k++)
+ if (strncmp(citem,requests[k],min(2,strlen(citem)))==0)
+ break;
+ if (k > 10) {
+ prout("UNRECOGNIZED REQUEST. Legal requests are:\n"
+ " date, condition, position, lsupport, warpfactor,\n"
+ " energy, torpedoes, shields, klingons, time.");
+ return FALSE;
}
- if (condit != IHDOCKED) newcnd();
- for (i = 1; i <= 10; i++) {
- jj = (k!=0 ? k : i);
- if (leftside) {
- proutn("%2d ", i);
- for (j = 1; j <= 10; j++) {
- if (goodScan || (abs(i-sectx)<= 1 && abs(j-secty) <= 1)){
- if ((game.quad[i][j]==IHMATER0)||(game.quad[i][j]==IHMATER1)||(game.quad[i][j]==IHMATER2)||(game.quad[i][j]==IHE)||(game.quad[i][j]==IHF)){
- switch (condit) {
- case IHRED: textcolor(RED); break;
- case IHGREEN: textcolor(GREEN); break;
- case IHYELLOW: textcolor(YELLOW); break;
- case IHDOCKED: textcolor(CYAN); break;
- case IHDEAD: textcolor(BROWN);
- }
- if (game.quad[i][j] != ship)
- highvideo();
- }
- if (game.quad[i][j] & DAMAGED)
- highvideo();
- proutn("%c ",game.quad[i][j] & ~DAMAGED);
- textcolor(DEFAULT);
- }
- else
- proutn("- ");
+ // no "break"
+ case SCAN_STATUS: // STATUS
+ chew();
+ leftside = FALSE;
+ skip(1);
+ case SCAN_NO_LEFTSIDE: // REQUEST
+ leftside=FALSE;
+ break;
+ }
+ if (condit != IHDOCKED) newcnd();
+ for (i = 1; i <= 10; i++) {
+ jj = (k!=0 ? k : i);
+ if (leftside) {
+ proutn("%2d ", i);
+ for (j = 1; j <= 10; j++) {
+ if (goodScan || (abs(i-sectx)<= 1 && abs(j-secty) <= 1)){
+ if ((game.quad[i][j]==IHMATER0)||(game.quad[i][j]==IHMATER1)||(game.quad[i][j]==IHMATER2)||(game.quad[i][j]==IHE)||(game.quad[i][j]==IHF)){
+ switch (condit) {
+ case IHRED: textcolor(RED); break;
+ case IHGREEN: textcolor(GREEN); break;
+ case IHYELLOW: textcolor(YELLOW); break;
+ case IHDOCKED: textcolor(CYAN); break;
+ case IHDEAD: textcolor(BROWN);
}
+ if (game.quad[i][j] != ship)
+ highvideo();
+ }
+ if (game.quad[i][j] & DAMAGED)
+ highvideo();
+ proutn("%c ",game.quad[i][j] & ~DAMAGED);
+ textcolor(DEFAULT);
}
- if (rightside) {
- switch (jj) {
- case 1:
- proutn("Stardate %.1f, Time Left %.2f", game.state.date, game.state.remtime);
- break;
- case 2:
- if (condit != IHDOCKED) newcnd();
- switch (condit) {
- case IHRED: cp = "RED"; break;
- case IHGREEN: cp = "GREEN"; break;
- case IHYELLOW: cp = "YELLOW"; break;
- case IHDOCKED: cp = "DOCKED"; break;
- case IHDEAD: cp="DEAD"; break;
- }
- for (t=0;t<=NDEVICES;t++)
- if (game.damage[t]>0) dam++;
- proutn("Condition %s, %i DAMAGES", cp, dam);
- break;
- case 3:
- proutn("Position %d - %d , %d - %d",
- quadx, quady, sectx, secty);
- break;
- case 4:
- proutn("Life Support ");
- if (game.damage[DLIFSUP] != 0.0) {
- if (condit == IHDOCKED)
- proutn("DAMAGED, Base provides");
- else
- proutn("DAMAGED, reserves=%4.2f", lsupres);
- }
- else
- proutn("ACTIVE");
- break;
- case 5:
- proutn("Warp Factor %.1f", warpfac);
- break;
- case 6:
- proutn("Energy %.2f", energy);
- if (icrystl)
- proutn(" (crystals on board)");
- break;
- case 7:
- proutn("Torpedoes %d", torps);
- break;
- case 8:
- proutn("Shields ");
- if (game.damage[DSHIELD] != 0)
- proutn("DAMAGED,");
- else if (shldup)
- proutn("UP,");
- else
- proutn("DOWN,");
- proutn(" %d%% %.1f units",
- (int)((100.0*shield)/inshld + 0.5), shield);
- break;
- case 9:
- proutn("Klingons Left %d", game.state.remkl);
- break;
- case 10:
- attakreport(1);
- break;
- }
+ else
+ proutn("- ");
+ }
+ }
+ if (rightside) {
+ switch (jj) {
+ case 1:
+ proutn("Stardate %.1f, Time Left %.2f", game.state.date, game.state.remtime);
+ break;
+ case 2:
+ if (condit != IHDOCKED) newcnd();
+ switch (condit) {
+ case IHRED: cp = "RED"; break;
+ case IHGREEN: cp = "GREEN"; break;
+ case IHYELLOW: cp = "YELLOW"; break;
+ case IHDOCKED: cp = "DOCKED"; break;
+ case IHDEAD: cp="DEAD"; break;
+ }
+ for (t=0;t<=NDEVICES;t++)
+ if (game.damage[t]>0) dam++;
+ proutn("Condition %s, %i DAMAGES", cp, dam);
+ break;
+ case 3:
+ proutn("Position %d - %d , %d - %d",
+ quadx, quady, sectx, secty);
+ break;
+ case 4:
+ proutn("Life Support ");
+ if (game.damage[DLIFSUP] != 0.0) {
+ if (condit == IHDOCKED)
+ proutn("DAMAGED, Base provides");
+ else
+ proutn("DAMAGED, reserves=%4.2f", lsupres);
}
- if (i<10) proutn("\n\r");
- if (k!=0) return(goodScan);
+ else
+ proutn("ACTIVE");
+ break;
+ case 5:
+ proutn("Warp Factor %.1f", warpfac);
+ break;
+ case 6:
+ proutn("Energy %.2f", energy);
+ if (icrystl)
+ proutn(" (have crystals)");
+ break;
+ case 7:
+ proutn("Torpedoes %d", torps);
+ break;
+ case 8:
+ proutn("Shields ");
+ if (game.damage[DSHIELD] != 0)
+ proutn("DAMAGED,");
+ else if (shldup)
+ proutn("UP,");
+ else
+ proutn("DOWN,");
+ proutn(" %d%% %.1f units",
+ (int)((100.0*shield)/inshld + 0.5), shield);
+ break;
+ case 9:
+ proutn("Klingons Left %d", game.state.remkl);
+ break;
+ case 10:
+ attakreport(1);
+ break;
+ }
}
- prout("");
- if (nn) chart(1);
- return(goodScan);
+ if (i<10) proutn("\n\r");
+ if (k!=0) return(goodScan);
+ }
+ prout("");
+ if (nn) chart(1);
+ return(goodScan);
}