DataMuseum.dk

top - metrics - download

    Length: 1043 (0x413)
    Types: TextFile
    Names: »getship.c«

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

TextFile

static char sccsid[] = "@(#)getship.c	1.1";
#ifndef lint
static char *rcsid_getship_c = "$Header: /uraid2/riedl/src/xceltrek/RCS/getship.c,v 1.1 88/04/18 16:10:21 riedl Exp Locker: riedl $";
#endif	lint
/* Copyright (c) 1986 	Chris Guthrie */

#include <X11/Xlib.h>
#include <stdio.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include "defs.h"
#include "data.h"

/* fill in ship characteristics */

getship(shipp)
struct ship *shipp;
{
    shipp->s_turns = 64000;
    shipp->s_accint = 100;
    shipp->s_decint = 200;
    shipp->s_accs = 100;
    shipp->s_torpdamage = 30;
    shipp->s_phaserdamage = 100;
    shipp->s_phasedist = shipp->s_phaserdamage * 60;
    shipp->s_torpspeed = 12;
    shipp->s_maxspeed = 9;
    shipp->s_repair = 100;
    shipp->s_maxfuel = 10000;
    shipp->s_detcost = 100;
    shipp->s_torpcost = 10 * shipp->s_torpdamage;
    shipp->s_phasercost = 10 * shipp->s_phaserdamage;
    shipp->s_warpcost = 2;
    shipp->s_cloakcost = 30;
    shipp->s_recharge = 10;
    shipp->s_maxarmies = 10;
}