rearranged player and screen stuff
[unix-history] / usr / src / games / sail / game.c
CommitLineData
cd818f56 1#ifndef lint
6c17b19a 2static char *sccsid = "@(#)game.c 1.5 83/10/10";
cd818f56 3#endif
cd818f56 4
7fc06086 5#include "externs.h"
cd818f56 6
6c17b19a 7maxturns(ship, af)
b3a57661 8register struct ship *ship;
6c17b19a 9char *af;
cd818f56 10{
7fc06086 11 register int turns;
cd818f56 12
b3a57661 13 turns = ship->specs->ta;
6c17b19a 14 if (*af = (ship->file->drift > 1 && turns)) {
cd818f56 15 turns--;
b3a57661 16 if (ship->file->FS == 1)
cd818f56 17 turns = 0;
cd818f56 18 }
b3a57661 19 return turns;
cd818f56
CL
20}
21
b3a57661
EW
22maxmove(ship, dir, fs)
23register struct ship *ship;
24int dir, fs;
cd818f56 25{
b3a57661 26 register int riggone = 0, Move, flank = 0;
cd818f56 27
b3a57661
EW
28 Move = ship->specs->bs;
29 if (!ship->specs->rig1)
30 riggone++;
31 if (!ship->specs->rig2)
32 riggone++;
33 if (!ship->specs->rig3)
34 riggone++;
35 if (!ship->specs->rig4)
36 riggone++;
37 if ((ship->file->FS || fs) && fs != -1) {
cd818f56 38 flank = 1;
b3a57661 39 Move = ship->specs->fs;
cd818f56
CL
40 }
41 if (dir == winddir)
b3a57661 42 Move -= 1 + WET[windspeed][ship->specs->class-1].B;
cd818f56 43 else if (dir == winddir + 2 || dir == winddir - 2 || dir == winddir - 6 || dir == winddir + 6)
b3a57661 44 Move -= 1 + WET[windspeed][ship->specs->class-1].C;
cd818f56 45 else if (dir == winddir + 3 || dir == winddir - 3 || dir == winddir - 5 || dir == winddir + 5)
b3a57661 46 Move = (flank ? 2 : 1) - WET[windspeed][ship->specs->class-1].D;
cd818f56
CL
47 else if (dir == winddir + 4 || dir == winddir - 4)
48 Move = 0;
49 else
b3a57661 50 Move -= WET[windspeed][ship->specs->class-1].A;
cd818f56
CL
51 Move -= riggone;
52 Move = Move < 0 ? 0 : Move;
53 return(Move);
54}