DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T p

⟦a6e502ab7⟧ TextFile

    Length: 1065 (0x429)
    Types: TextFile
    Names: »printships.c«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Trek73/src/printships.c« 

TextFile

#ident "@(#) TREK73 $Header: printships.c,v 1.1 87/10/09 11:10:37 okamoto Exp $"
/*
 * $Source: /ccc/okamoto/src/trek/src/RCS/printships.c,v $
 *
 * $Header: printships.c,v 1.1 87/10/09 11:10:37 okamoto Exp $
 *
 * $Log:	printships.c,v $
 * Revision 1.1  87/10/09  11:10:37  11:10:37  okamoto (Jeff Okamoto)
 * Initial revision
 * 
 */
/*
 * TREK73: printships.c
 *
 * Print Basic Point Values for all standard ships.
 *
 */

#include <stdio.h>
#include "externs.h"

extern struct ship_stat stats[];

main()
{
	double bpv, efficiency;
	int turn, max_speed;
	int i;
	void calculate();

	for(i=0; i<MAXSHIPCLASS; i++) {
		calculate(
		    stats[i].regen,
		    stats[i].pods,
		    stats[i].ph_shield,
		    stats[i].tp_shield,
		    stats[i].num_phaser + stats[i].num_torp,
		    stats[i].o_crew,
		    &bpv,
		    &efficiency,
		    &turn,
		    &max_speed
		);
		printf("%s:", stats[i].abbr);
		printf("\tBPV =\t\t%.2f\n", bpv);
		printf("\tEfficiency =\t%.2f\n", efficiency);
		printf("\tTurn =\t\t%d\n", turn);
		printf("\tMax speed =\t%d\n\n", max_speed);
	}
}