DataMuseum.dk

top - metrics - download

    Length: 2154 (0x86a)
    Types: TextFile
    Names: »prof.c«

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

TextFile

/*
 * Galactic Bloodshed (Robert Chansky, smq@b)
 * prof.c -- print out racial profile
 */

#include "vars.h"
#include "races.h"

profile(APcount, argn,args)
int APcount;
int argn;
char args[MAXARGS][COMMANDSIZE];
{
 int i, numraces;


 printf("---==** Racial profile for %s (player %d) **==---\n\n",Race->name,
		Race->Playernum);
 if (Race->Thing)
	printf("Your race is like \"The Thing\".\n");
 printf("%srate:%.1f\n",Race->Thing ? "Infection " : "Birth",Race->birthrate);
 printf("# of sexes: %d\n", Race->number_sexes);
 printf("Technology: %.1f\n",Race->tech);
 printf("Avg Intelligence: %u\n",Race->IQ);
 printf("mass:%.2f\n",Race->mass);
 printf("metabolism:%.1f\n",Race->metabolism);
 printf("adventurists:%.2f%%\n",Race->nonhomebodies*100.0);
 printf("default scope: / %s / %s.\n",Stars[Race->homesystem]->name,
		Stars[Race->homesystem]->pnames[Race->homeplanetnum] );

  printf("planetary conditions preferred by %s:\n", Race->name);
  printf("    temperature: %d\n", Temp(Race->conditions[TEMP]) );
  printf(" atmosphere concentrations:\n");
  printf("    methane %02d%%    oxygen %02d%%\n",
		Race->conditions[METHANE], Race->conditions[OXYGEN] );
  printf("        CO2 %02d%%  hydrogen %02d%%\n", 
		Race->conditions[CO2], Race->conditions[HYDROGEN] );
  printf("   nitrogen %02d%%    sulfur %02d%%\n",
		Race->conditions[NITROGEN], Race->conditions[SULFUR] );
  printf("     helium %02d%%     other %02d%%\n", 
		Race->conditions[HELIUM], Race->conditions[OTHER]);
  printf("Sector type preferences:\n");
  printf(" %c %.1f%%      %c %.1f%%\n", CHAR_SEA, Race->likes[DES_SEA]*100,
	CHAR_GAS, Race->likes[DES_GAS]*100);
  printf(" %c %.1f%%      %c %.1f%%\n", CHAR_MOUNT, Race->likes[DES_MOUNT]*100,
	CHAR_LAND, Race->likes[DES_LAND]*100);
  printf(" %c %.1f%%      %c %.1f%%\n", CHAR_ICE, Race->likes[DES_ICE]*100,
	CHAR_PLATED, Race->likes[DES_PLATED]*100);

 printf("\nRelations with other races:\nPlayer	relation\n");
 numraces = Numraces();
   for (i=1; i<= numraces; i++)
	if (i!=Race->Playernum)
		printf("%2d	%s\n", i, isset( Race->atwar, i) ? "war!" :
				       isset( Race->allied, i) ? "alliance" :
				       "neutral" );

}