]> git.pond.sub.org Git - empserver/blobdiff - src/lib/commands/stre.c
Indented with src/scripts/indent-emp.
[empserver] / src / lib / commands / stre.c
index cf890157b44c4eccb28bda376490cf4f10e86146..974cdf502f6b6043ea14ba7469bdf3c6b3b5d796 100644 (file)
@@ -55,107 +55,106 @@ static void stre_hdr(void);
 int
 stre(void)
 {
-       struct  sctstr sect;
-       int     nsect = 0;
-       struct  nstr_sect nstr;
-       double  dtotal, r_total, eff;
-       struct  combat  def[1];
-       int     dummy;
-       int     mines;
+    struct sctstr sect;
+    int nsect = 0;
+    struct nstr_sect nstr;
+    double dtotal, r_total, eff;
+    struct combat def[1];
+    int dummy;
+    int mines;
 
-       if (!snxtsct(&nstr, player->argp[1]))
-               return RET_SYN;
-       prdate();
-       nsect = 0;
-       att_combat_init(def, EF_SECTOR);
-       while (nxtsct(&nstr, &sect)) {
-               if (!player->owner)
-                       continue;
-               if (nsect++ == 0)
-                       stre_hdr();
-               if (player->god)
-                       pr("%3d ", sect.sct_own);
-               prxy("%4d,%-4d", nstr.x, nstr.y, player->cnum);
-               pr(" %c", dchr[sect.sct_type].d_mnem);
-               pr("%4d%%", sect.sct_effic);
-               def->x = nstr.x;
-               def->y = nstr.y;
-               def->set = 0;
-               att_get_combat(def, 1);
-               if (def->mil)
-                       pr("%5d", def->mil);
-               else
-                       pr("%5s", "");
-               dtotal = units_in_sector(def);
-               if (dtotal > 0)
-                       pr("%7d", (int)dtotal);
-               else
-                       pr("%7s", "");
+    if (!snxtsct(&nstr, player->argp[1]))
+       return RET_SYN;
+    prdate();
+    nsect = 0;
+    att_combat_init(def, EF_SECTOR);
+    while (nxtsct(&nstr, &sect)) {
+       if (!player->owner)
+           continue;
+       if (nsect++ == 0)
+           stre_hdr();
+       if (player->god)
+           pr("%3d ", sect.sct_own);
+       prxy("%4d,%-4d", nstr.x, nstr.y, player->cnum);
+       pr(" %c", dchr[sect.sct_type].d_mnem);
+       pr("%4d%%", sect.sct_effic);
+       def->x = nstr.x;
+       def->y = nstr.y;
+       def->set = 0;
+       att_get_combat(def, 1);
+       if (def->mil)
+           pr("%5d", def->mil);
+       else
+           pr("%5s", "");
+       dtotal = units_in_sector(def);
+       if (dtotal > 0)
+           pr("%7d", (int)dtotal);
+       else
+           pr("%7s", "");
 
-               r_total = att_reacting_units(def, 0, 0, &dummy, 9999999);
-               def->own = 0;
-               eff = att_combat_eff(def);
-               if (sect.sct_own == sect.sct_oldown) {
-                       mines = getvar(V_MINE, (s_char *)&sect, EF_SECTOR);
-                       if (mines > 0)
-                               pr("%7d", mines);
-                       else
-                               pr("%7s", "");
-                       eff *= (1.0 + min(mines,20) * 0.02);
-               } else {
-                       pr("%7s", "?");
-               }
-               pr("%6.2f", eff);
-               pr("%9d", (int)((dtotal + def->mil) * eff));
-               if (r_total > 0)
-                       pr(" %9d", (int)(r_total * eff));
-               else
-                       pr(" %9s", "");
-               pr("%9d\n", (int)((dtotal + def->mil + r_total) * eff));
+       r_total = att_reacting_units(def, 0, 0, &dummy, 9999999);
+       def->own = 0;
+       eff = att_combat_eff(def);
+       if (sect.sct_own == sect.sct_oldown) {
+           mines = getvar(V_MINE, (s_char *)&sect, EF_SECTOR);
+           if (mines > 0)
+               pr("%7d", mines);
+           else
+               pr("%7s", "");
+           eff *= (1.0 + min(mines, 20) * 0.02);
+       } else {
+           pr("%7s", "?");
        }
-       if (!nsect) {
-               if (player->argp[1])
-                       pr("%s: No sector(s)\n", player->argp[1]);
-               else
-                       pr("%s: No sector(s)\n", "");
-               return RET_FAIL;
-       } else
-               pr("%d sector%s\n", nsect, splur(nsect));
-       return 0;
+       pr("%6.2f", eff);
+       pr("%9d", (int)((dtotal + def->mil) * eff));
+       if (r_total > 0)
+           pr(" %9d", (int)(r_total * eff));
+       else
+           pr(" %9s", "");
+       pr("%9d\n", (int)((dtotal + def->mil + r_total) * eff));
+    }
+    if (!nsect) {
+       if (player->argp[1])
+           pr("%s: No sector(s)\n", player->argp[1]);
+       else
+           pr("%s: No sector(s)\n", "");
+       return RET_FAIL;
+    } else
+       pr("%d sector%s\n", nsect, splur(nsect));
+    return 0;
 }
 
 static double
 units_in_sector(struct combat *def)
 {
-       double d_unit;
-       double dtotal = 0.0;
-       struct  nstr_item ni;
-       struct  lndstr land;
+    double d_unit;
+    double dtotal = 0.0;
+    struct nstr_item ni;
+    struct lndstr land;
 
-       snxtitem_xy(&ni,EF_LAND,def->x, def->y);
-       while(nxtitem(&ni,(s_char *)&land)){
-               if (land.lnd_own == 0)
-                       continue;
-               if (land.lnd_own != def->own)
-                       continue;
-               if (land.lnd_ship >= 0)
-                       continue;
-               d_unit = defense_val(&land);
-               if (!has_supply(&land))
-                       d_unit /= 2.0;
-               dtotal += d_unit;
-       }
-       return dtotal;
+    snxtitem_xy(&ni, EF_LAND, def->x, def->y);
+    while (nxtitem(&ni, (s_char *)&land)) {
+       if (land.lnd_own == 0)
+           continue;
+       if (land.lnd_own != def->own)
+           continue;
+       if (land.lnd_ship >= 0)
+           continue;
+       d_unit = defense_val(&land);
+       if (!has_supply(&land))
+           d_unit /= 2.0;
+       dtotal += d_unit;
+    }
+    return dtotal;
 }
 
 static void
 stre_hdr(void)
 {
-       if (player->god)
-               pr("    ");
-       pr("DEFENSE STRENGTH               land  sect   sector  reacting    total\n");
-       if (player->god)
-               pr("own ");
-       pr("  sect       eff  mil  units  mines  mult  defense     units  defense\n");
+    if (player->god)
+       pr("    ");
+    pr("DEFENSE STRENGTH               land  sect   sector  reacting    total\n");
+    if (player->god)
+       pr("own ");
+    pr("  sect       eff  mil  units  mines  mult  defense     units  defense\n");
 }
-