Return to boarders.c CVS log

Up to [CSRG BSD Unix] / 42BSD / games / sail

Annotation of 42BSD/games/sail/boarders.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char *sccsid = "@(#)boarders.c  1.1 83/03/17";
                      3: #endif
                      4: #include "externs.h"
                      5: 
                      6: subtract(from, totalfrom, crewfrom, fromcap, pcfrom)
                      7: int from, fromcap, pcfrom;
                      8: register int  totalfrom, crewfrom[3];
                      9: {
                     10:        register int n;
                     11: 
                     12:        if (fromcap == from && totalfrom){              /* if not captured */
                     13:                for (n = 0; n < 3; n++){
                     14:                        if (totalfrom > crewfrom[n]){
                     15:                                totalfrom -= crewfrom[n];
                     16:                                crewfrom[n] = 0;
                     17:                        }
                     18:                        else {
                     19:                                crewfrom[n] -= totalfrom;
                     20:                                totalfrom = 0;
                     21:                        }
                     22:                        Write(SPECS + from, 0, 14 + 2*n, crewfrom[n]);
                     23:                }
                     24:        }
                     25:        else if (totalfrom){
                     26:                pcfrom -= totalfrom;
                     27:                pcfrom = pcfrom < 0 ? 0 : pcfrom;
                     28:                Write(FILES + from, 0, 70, pcfrom);
                     29:        }
                     30: }
                     31: 
                     32: mensent(from, to, crew, captured, pc, points, key)
                     33: int from, to, key, crew[3], *captured, *pc, *points;
                     34: {                                      /* returns # of crew squares sent */
                     35:        int men = 0;
                     36:        register int n;
                     37:        int c1, c2, c3;
                     38:        struct shipspecs *ptr;
                     39:        struct File *ptr1;
                     40:        struct BP *ptr2;
                     41: 
                     42:        ptr = &specs[scene[game].ship[from].shipnum];
                     43:        ptr1 = scene[game].ship[from].file;     /* key:  0 OBP */
                     44:        ptr2 = key ? ptr1 -> DBP : ptr1 -> OBP; /*       1 DBP */
                     45:        *pc = ptr1 -> pcrew;
                     46:        *captured = ptr1 -> captured;
                     47:        crew[0] = ptr -> crew1;
                     48:        crew[1] = ptr -> crew2;
                     49:        crew[2] = ptr -> crew3;
                     50:        for (n=0; n < 3; n++){
                     51:                if (ptr2[n].turnsent && ptr2[n].toship == to)
                     52:                        men += ptr2[n].mensent;
                     53:        }
                     54:        if (men){
                     55:                c1 = men/100 ? crew[0] : 0;
                     56:                c2 = (men%100)/10 ? crew[1] : 0;
                     57:                c3 = men/10 ? crew[2] : 0;
                     58:                c3 = *captured < 0 ? crew[2] : *pc;
                     59:        } else
                     60:                c1 = c2 = c3 = 0;
                     61:        return(c1 + c2 + c3);
                     62: }
                     63: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.