Forgot to remove these files with the NetBSD games cleanups.
This commit is contained in:
Steve Price
parent
713959259e
commit
5f78f4b3f1
@ -1,5 +0,0 @@
|
||||
schumann puff game_2 171 1414 195
|
||||
schumann puff default 18 220 59
|
||||
schumann puff easy 13 182 146
|
||||
schumann puff crossover 11 74 448
|
||||
schumann puff Killer 0 38 27
|
||||
@ -1,210 +0,0 @@
|
||||
/*
|
||||
* Convert Phantasia 3.3.1 and 3.3.1+ characs file format to 3.3.2
|
||||
*
|
||||
*/
|
||||
|
||||
#include "include.h"
|
||||
#include "oldplayer.h"
|
||||
|
||||
struct oldplayer Oldplayer; /* old format structure */
|
||||
struct player Newplayer; /* new format structure */
|
||||
|
||||
char Oldpfile[] = DEST/characs"; /* old format file */
|
||||
char Newpfile[] = DEST/newcharacs"; /* new format file */
|
||||
|
||||
/************************************************************************
|
||||
/
|
||||
/ FUNCTION NAME: main()
|
||||
/
|
||||
/ FUNCTION: convert old Phantasia player file to new format
|
||||
/
|
||||
/ AUTHOR: C. Robertson, 9/1/85 E. A. Estes, 3/12/86
|
||||
/
|
||||
/ ARGUMENTS: none
|
||||
/
|
||||
/ RETURN VALUE: none
|
||||
/
|
||||
/ MODULES CALLED: time(), exit(), fread(), fopen(), srandom(), floor(),
|
||||
/ random(), strcmp(), fwrite(), strcpy(), fclose(), fprintf()
|
||||
/
|
||||
/ GLOBAL INPUTS: _iob[], Oldplayer, Newplayer
|
||||
/
|
||||
/ GLOBAL OUTPUTS: Oldplayer, Newplayer
|
||||
/
|
||||
/ DESCRIPTION:
|
||||
/ Read in old player structures and write out to new file in
|
||||
/ new format.
|
||||
/ Old player file is unmodified.
|
||||
/ New file is "DEST/newcharacs".
|
||||
/ #define PHANTPLUS to convert from 3.3.1+.
|
||||
/
|
||||
/************************************************************************/
|
||||
|
||||
main()
|
||||
{
|
||||
FILE *oldcharac, *newcharac; /* to open old and new files */
|
||||
|
||||
if ((oldcharac = fopen(Oldpfile, "r")) == NULL)
|
||||
{
|
||||
fprintf(stderr, "Cannot open original character file!\n");
|
||||
exit(1);
|
||||
}
|
||||
|
||||
if ((newcharac = fopen(Newpfile, "w")) == NULL)
|
||||
{
|
||||
fprintf(stderr, "Cannot create new character file!\n");
|
||||
exit(1);
|
||||
}
|
||||
|
||||
srandomdev();
|
||||
|
||||
while (fread((char *) &Oldplayer, sizeof(struct oldplayer), 1, oldcharac) == 1)
|
||||
/* read and convert old structures into new */
|
||||
{
|
||||
Newplayer.p_experience = Oldplayer.o_experience;
|
||||
Newplayer.p_level = (double) Oldplayer.o_level;
|
||||
Newplayer.p_strength = Oldplayer.o_strength;
|
||||
Newplayer.p_sword = Oldplayer.o_sword;
|
||||
Newplayer.p_might = 0.0; /* game will calculate */
|
||||
Newplayer.p_energy = Oldplayer.o_energy;
|
||||
Newplayer.p_maxenergy = Oldplayer.o_maxenergy;
|
||||
Newplayer.p_shield = Oldplayer.o_shield;
|
||||
Newplayer.p_quickness = (double) Oldplayer.o_quickness;
|
||||
Newplayer.p_quksilver = (double) Oldplayer.o_quksilver;
|
||||
Newplayer.p_speed = 0.0; /* game will calculate */
|
||||
Newplayer.p_magiclvl = Oldplayer.o_magiclvl;
|
||||
Newplayer.p_mana = Oldplayer.o_mana;
|
||||
Newplayer.p_brains = Oldplayer.o_brains;
|
||||
Newplayer.p_poison = Oldplayer.o_poison;
|
||||
Newplayer.p_gold = Oldplayer.o_gold;
|
||||
Newplayer.p_gems = Oldplayer.o_gems;
|
||||
Newplayer.p_sin = Oldplayer.o_sin;
|
||||
Newplayer.p_x = Oldplayer.o_x;
|
||||
Newplayer.p_y = Oldplayer.o_y;
|
||||
Newplayer.p_1scratch = Oldplayer.o_1scratch;
|
||||
Newplayer.p_2scratch = Oldplayer.o_2scratch;
|
||||
|
||||
Newplayer.p_ring.ring_type = Oldplayer.o_ring.ring_type;
|
||||
Newplayer.p_ring.ring_duration = Oldplayer.o_ring.ring_duration;
|
||||
Newplayer.p_ring.ring_inuse = FALSE;
|
||||
|
||||
Newplayer.p_age = (long) Oldplayer.o_degenerated * N_AGE;
|
||||
|
||||
Newplayer.p_degenerated = Oldplayer.o_degenerated + 1;
|
||||
|
||||
/* convert character type into character type and special type */
|
||||
|
||||
if (Oldplayer.o_type < 0)
|
||||
/* player with crown */
|
||||
Oldplayer.o_type = -Oldplayer.o_type;
|
||||
|
||||
if (Oldplayer.o_type == 99)
|
||||
/* valar */
|
||||
{
|
||||
Newplayer.p_specialtype = SC_VALAR;
|
||||
Newplayer.p_type = (short) ROLL(C_MAGIC, C_EXPER - C_MAGIC + 1);
|
||||
Newplayer.p_lives = Oldplayer.o_ring.ring_duration;
|
||||
}
|
||||
else if (Oldplayer.o_type == 90)
|
||||
/* ex-valar */
|
||||
{
|
||||
Newplayer.p_specialtype = SC_EXVALAR;
|
||||
Newplayer.p_type = (short) ROLL(C_MAGIC, C_EXPER - C_MAGIC + 1);
|
||||
Newplayer.p_lives = 0;
|
||||
}
|
||||
else if (Oldplayer.o_type > 20)
|
||||
/* council of wise */
|
||||
{
|
||||
Newplayer.p_specialtype = SC_COUNCIL;
|
||||
Newplayer.p_type = Oldplayer.o_type - 20;
|
||||
Newplayer.p_lives = Oldplayer.o_ring.ring_duration;
|
||||
}
|
||||
else if (Oldplayer.o_type > 10)
|
||||
/* king */
|
||||
{
|
||||
Newplayer.p_specialtype = SC_KING;
|
||||
Newplayer.p_type = Oldplayer.o_type - 10;
|
||||
Newplayer.p_lives = 0;
|
||||
}
|
||||
else
|
||||
/* normal player */
|
||||
{
|
||||
Newplayer.p_specialtype = SC_NONE;
|
||||
Newplayer.p_type = Oldplayer.o_type;
|
||||
Newplayer.p_lives = 0;
|
||||
}
|
||||
|
||||
Newplayer.p_lives = 0;
|
||||
Newplayer.p_crowns = Oldplayer.o_crowns;
|
||||
Newplayer.p_charms = Oldplayer.o_charms;
|
||||
Newplayer.p_amulets = Oldplayer.o_amulets;
|
||||
Newplayer.p_holywater = Oldplayer.o_holywater;
|
||||
Newplayer.p_lastused = Oldplayer.o_lastused;
|
||||
|
||||
/* convert status and name into status */
|
||||
|
||||
Newplayer.p_status = Oldplayer.o_status + S_OFF;
|
||||
if (strcmp(Oldplayer.m_name, "<null>") == 0)
|
||||
/* unused recored */
|
||||
Newplayer.p_status = S_NOTUSED;
|
||||
if (Oldplayer.o_quickness < 0)
|
||||
/* hung up player */
|
||||
{
|
||||
Newplayer.p_quickness = (double) Oldplayer.o_tampered;
|
||||
Oldplayer.o_tampered = T_OFF;
|
||||
Newplayer.p_status = S_HUNGUP;
|
||||
}
|
||||
|
||||
Newplayer.p_tampered = Oldplayer.o_tampered + T_OFF;
|
||||
Newplayer.p_istat = I_OFF;
|
||||
|
||||
Newplayer.p_palantir = Oldplayer.o_palantir;
|
||||
Newplayer.p_blessing = Oldplayer.o_blessing;
|
||||
Newplayer.p_virgin = Oldplayer.o_virgin;
|
||||
Newplayer.p_blindness = Oldplayer.o_blindness;
|
||||
|
||||
strcpy(Newplayer.p_name, Oldplayer.o_name);
|
||||
strcpy(Newplayer.p_password, Oldplayer.o_password);
|
||||
strcpy(Newplayer.p_login, Oldplayer.o_login);
|
||||
|
||||
/* write new structure */
|
||||
fwrite((char *) &Newplayer, sizeof(Newplayer), 1, newcharac);
|
||||
}
|
||||
|
||||
fclose(oldcharac); /* close files */
|
||||
fclose(newcharac);
|
||||
|
||||
exit(0);
|
||||
}
|
||||
/* */
|
||||
/************************************************************************
|
||||
/
|
||||
/ FUNCTION NAME: drandom()
|
||||
/
|
||||
/ FUNCTION: return a random number between 0.0 < 1.0
|
||||
/
|
||||
/ AUTHOR: E. A. Estes, 2/7/86
|
||||
/
|
||||
/ ARGUMENTS: none
|
||||
/
|
||||
/ RETURN VALUE: random number
|
||||
/
|
||||
/ MODULES CALLED: random()
|
||||
/
|
||||
/ GLOBAL INPUTS: none
|
||||
/
|
||||
/ GLOBAL OUTPUTS: none
|
||||
/
|
||||
/ DESCRIPTION:
|
||||
/ Return a random number.
|
||||
/
|
||||
/************************************************************************/
|
||||
|
||||
double
|
||||
drandom()
|
||||
{
|
||||
if (sizeof(int) != 2)
|
||||
return((double) (random() & 0x7fff) / 32768.0);
|
||||
else
|
||||
return((double) random() / 32768.0);
|
||||
}
|
||||
@ -1,54 +0,0 @@
|
||||
/*
|
||||
* oldplayer.h - old player structure
|
||||
*/
|
||||
|
||||
struct oldplayer /* player statistics */
|
||||
{
|
||||
char o_name[21]; /* name */
|
||||
char o_password[9]; /* password */
|
||||
char o_login[10]; /* login */
|
||||
double o_x; /* x coord */
|
||||
double o_y; /* y coord */
|
||||
double o_experience; /* experience */
|
||||
int o_level; /* level */
|
||||
short o_quickness; /* quickness */
|
||||
double o_strength; /* strength */
|
||||
double o_sin; /* sin */
|
||||
double o_mana; /* mana */
|
||||
double o_gold; /* gold */
|
||||
double o_energy; /* energy */
|
||||
double o_maxenergy; /* maximum energy */
|
||||
double o_magiclvl; /* magic level */
|
||||
double o_brains; /* brains */
|
||||
short o_crowns; /* crowns */
|
||||
struct
|
||||
{
|
||||
short ring_type; /* type of ring */
|
||||
short ring_duration; /* duration of ring */
|
||||
} o_ring; /* ring stuff */
|
||||
bool o_palantir; /* palantir */
|
||||
double o_poison; /* poison */
|
||||
short o_holywater; /* holy water */
|
||||
short o_amulets; /* amulets */
|
||||
bool o_blessing; /* blessing */
|
||||
short o_charms; /* charms */
|
||||
double o_gems; /* gems */
|
||||
short o_quksilver; /* quicksilver */
|
||||
double o_sword; /* sword */
|
||||
double o_shield; /* shield */
|
||||
short o_type; /* character type */
|
||||
bool o_virgin; /* virgin */
|
||||
short o_lastused; /* day of year last used */
|
||||
short o_status; /* playing, cloaked, etc. */
|
||||
short o_tampered; /* decree'd, etc. flag */
|
||||
double o_1scratch,
|
||||
o_2scratch; /* variables used for decree, player battle */
|
||||
bool o_blindness; /* blindness */
|
||||
int o_notused; /* not used */
|
||||
long o_age; /* age in seconds */
|
||||
short o_degenerated; /* age/2500 last degenerated */
|
||||
short o_istat; /* used for inter-terminal battle */
|
||||
#ifdef PHANTPLUS
|
||||
short o_lives;
|
||||
#endif
|
||||
};
|
||||
@ -1,10 +0,0 @@
|
||||
./"index"16t"captain"nD20C
|
||||
+/"points"8t"loadL"8t"loadR"8t"readyL"8t"readyL"ndbbbb2+36+36+
|
||||
+/"struck"8t"capture"8t"pcrew"8t"movebuf"nb3+pd10C
|
||||
+/"drift"8t"nfoul"8t"ngrap"nb1+dd
|
||||
+/"foul:"8t"count"8t"turn"16t"count"8t"turn"
|
||||
+,5/8tdd16tddn
|
||||
+/"grap:"8t"count"8t"turn"16t"count"8t"turn"
|
||||
+,5/8tdd16tddn
|
||||
+/"RH"8t"RG"8t"RR"8t"FS"8t"explode"8t"sink"n6b
|
||||
+/"dir"8t"col"8t"row"8t"loadwit"8t"stern"nb+2d2b
|
||||
@ -1,3 +0,0 @@
|
||||
./"winddir windspd windchg vessels"n4b
|
||||
.+8/"ship: "a
|
||||
*(.-4)/S
|
||||
@ -1,4 +0,0 @@
|
||||
./"name"16t"specs"16t"nation"nppb+
|
||||
+/"row"8t"col"8t"dir"nddb+
|
||||
+/"file"np
|
||||
+/t
|
||||
@ -1,3 +0,0 @@
|
||||
./"bs bs ta guns class hull qual"n3b+d3b
|
||||
+/"crew1 crew2 crew3 gunL gunR carL carR"n8b
|
||||
+/"rig1 rig2 rig3 rig4 pts"n4b+d
|
||||
@ -1,59 +0,0 @@
|
||||
# include "trek.h"
|
||||
|
||||
/*
|
||||
** BOARD A KLINGON
|
||||
**
|
||||
** A Klingon battle cruiser is boarded. If the boarding party
|
||||
** is successful, they take over the vessel, otherwise, you
|
||||
** have wasted a move. Needless to say, this move is not free.
|
||||
**
|
||||
** User parameters are the Klingon to be boarded and the size of
|
||||
** the boarding party.
|
||||
**
|
||||
** Three things are computed. The first is the probability that
|
||||
** the party takes over the Klingon. This is dependent on the
|
||||
** size of the party, the condition of the Klingon (for which
|
||||
** the energy left is used, which is definately incorrect), and
|
||||
** the number of losses that the boarding party sustains. If too
|
||||
** many of the boarding party are killed, the probability drops
|
||||
** to zero. The second quantity computed is the losses that the
|
||||
** boarding party sustains. This counts in your score. It
|
||||
** depends on the absolute and relative size of the boarding
|
||||
** party and the strength of the Klingon. The third quantity
|
||||
** computed is the number of Klingon captives you get to take.
|
||||
** It is actually computed as the number of losses they sustain
|
||||
** subtracted from the size of their crew. It depends on the
|
||||
** relative size of the party. All of these quantities are
|
||||
** randomized in some fashion.
|
||||
*/
|
||||
|
||||
board()
|
||||
{
|
||||
int prob;
|
||||
int losses;
|
||||
int captives;
|
||||
float t;
|
||||
int party;
|
||||
|
||||
if (checkout(XPORTER))
|
||||
return;
|
||||
|
||||
k = selectklingon();
|
||||
if (!k->srndreq)
|
||||
{
|
||||
return (printf("But captain! You must request surrender first\n"));
|
||||
}
|
||||
|
||||
t = party / Param.crew;
|
||||
|
||||
prob = 1000 * t;
|
||||
prob =- 500 * k->power / Param.klingpwr;
|
||||
|
||||
losses = party * k->power * t * 0.5 / Param.klingpwr * (franf() + 1.0);
|
||||
if (losses * 4 > party)
|
||||
prob = 0;
|
||||
|
||||
captives = %%% * (1.0 - t) * 0.5 * (franf() + 1.0);
|
||||
|
||||
if (prob > ranf(1000))
|
||||
success!!!;
|
||||
Loading…
x
Reference in New Issue
Block a user