121293Sdist /*
2*60859Sbostic * Copyright (c) 1980, 1993
3*60859Sbostic * The Regents of the University of California. All rights reserved.
434205Sbostic *
542606Sbostic * %sccs.include.redist.c%
621293Sdist */
721293Sdist
811693Smckusick #ifndef lint
9*60859Sbostic static char sccsid[] = "@(#)score.c 8.1 (Berkeley) 05/31/93";
1034205Sbostic #endif /* not lint */
1111693Smckusick
1211693Smckusick # include "trek.h"
1311693Smckusick # include "getpar.h"
1411693Smckusick
1511693Smckusick /*
1611693Smckusick ** PRINT OUT THE CURRENT SCORE
1711693Smckusick */
1811693Smckusick
score()1911693Smckusick long score()
2011693Smckusick {
2111693Smckusick register int u;
2211693Smckusick register int t;
2311693Smckusick long s;
2411693Smckusick double r;
2511693Smckusick extern struct cvntab Skitab[];
2611693Smckusick
2711693Smckusick printf("\n*** Your score:\n");
2811693Smckusick s = t = Param.klingpwr / 4 * (u = Game.killk);
2911693Smckusick if (t != 0)
3011693Smckusick printf("%d Klingons killed\t\t\t%6d\n", u, t);
3111693Smckusick r = Now.date - Param.date;
3211693Smckusick if (r < 1.0)
3311693Smckusick r = 1.0;
3411693Smckusick r = Game.killk / r;
3512344Slayer s += (t = 400 * r);
3611693Smckusick if (t != 0)
3711693Smckusick printf("Kill rate %.2f Klingons/stardate \t%6d\n", r, t);
3811693Smckusick r = Now.klings;
3912344Slayer r /= Game.killk + 1;
4012344Slayer s += (t = -400 * r);
4111693Smckusick if (t != 0)
4211693Smckusick printf("Penalty for %d klingons remaining\t%6d\n", Now.klings, t);
4311693Smckusick if (Move.endgame > 0)
4411693Smckusick {
4512344Slayer s += (t = 100 * (u = Game.skill));
4611693Smckusick printf("Bonus for winning a %s%s game\t\t%6d\n", Skitab[u - 1].abrev, Skitab[u - 1].full, t);
4711693Smckusick }
4811693Smckusick if (Game.killed)
4911693Smckusick {
5012344Slayer s -= 500;
5111693Smckusick printf("Penalty for getting killed\t\t -500\n");
5211693Smckusick }
5312344Slayer s += (t = -100 * (u = Game.killb));
5411693Smckusick if (t != 0)
5511693Smckusick printf("%d starbases killed\t\t\t%6d\n", u, t);
5612344Slayer s += (t = -100 * (u = Game.helps));
5711693Smckusick if (t != 0)
5811693Smckusick printf("%d calls for help\t\t\t%6d\n", u, t);
5912344Slayer s += (t = -5 * (u = Game.kills));
6011693Smckusick if (t != 0)
6111693Smckusick printf("%d stars destroyed\t\t\t%6d\n", u, t);
6212344Slayer s += (t = -150 * (u = Game.killinhab));
6311693Smckusick if (t != 0)
6411693Smckusick printf("%d inhabited starsystems destroyed\t%6d\n", u, t);
6511693Smckusick if (Ship.ship != ENTERPRISE)
6611693Smckusick {
6712344Slayer s -= 200;
6811693Smckusick printf("penalty for abandoning ship\t\t -200\n");
6911693Smckusick }
7012344Slayer s += (t = 3 * (u = Game.captives));
7111693Smckusick if (t != 0)
7211693Smckusick printf("%d Klingons captured\t\t\t%6d\n", u, t);
7312344Slayer s += (t = -(u = Game.deaths));
7411693Smckusick if (t != 0)
7511693Smckusick printf("%d casualties\t\t\t\t%6d\n", u, t);
7611693Smckusick printf("\n*** TOTAL\t\t\t%14ld\n", s);
7711693Smckusick return (s);
7811693Smckusick }
79