/*
* Create a spoiler file for artifacts
*/
static void spoil_artifact(const char *fname)
{
int i, j;
object_type *i_ptr;
object_type object_type_body;
char buf[1024];
/* Build the filename */
path_build(buf, sizeof(buf), ANGBAND_DIR_USER, fname);
fh = file_open(buf, MODE_WRITE, FTYPE_TEXT);
/* Oops */
if (!fh)
{
msg("Cannot create spoiler file.");
return;
}
/* Dump to the spoiler file */
text_out_hook = text_out_to_file;
text_out_file = fh;
/* Dump the header */
spoiler_underline(format("Artifact Spoilers for %s", buildid), '=');
/* List the artifacts by tval */
for (i = 0; group_artifact[i].tval; i++)
{
/* Write out the group title */
if (group_artifact[i].name)
{
spoiler_blanklines(2);
spoiler_underline(group_artifact[i].name, '=');
spoiler_blanklines(1);
}
/* Now search through all of the artifacts */
for (j = 1; j < z_info->a_max; ++j)
{
artifact_type *a_ptr = &a_info[j];
char buf[80];
/* We only want objects in the current group */
if (a_ptr->tval != group_artifact[i].tval) continue;
/* Get local object */
i_ptr = &object_type_body;
/* Wipe the object */
object_wipe(i_ptr);
/* Attempt to "forge" the artifact */
if (!make_fake_artifact(i_ptr, a_ptr)) continue;
/* Grab artifact name */
object_desc(buf, sizeof(buf), i_ptr, ODESC_PREFIX |
ODESC_COMBAT | ODESC_EXTRA | ODESC_SPOIL);
/* Print name and underline */
spoiler_underline(buf, '-');
/* Write out the artifact description to the spoiler file */
object_info_spoil(fh, i_ptr, 80);
/*
* Determine the minimum and maximum depths an
* artifact can appear, its rarity, its weight, and
* its power rating.
*/
text_out("\nMin Level %u, Max Level %u, Generation chance %u, Power %d, %d.%d lbs\n",
a_ptr->alloc_min, a_ptr->alloc_max,
a_ptr->alloc_prob, object_power(i_ptr, FALSE,
NULL, TRUE), (a_ptr->weight / 10),
(a_ptr->weight % 10));
/* Terminate the entry */
spoiler_blanklines(2);
}
}
/* Check for errors */
if (!file_close(fh))
{
msg("Cannot close spoiler file.");
return;
}
/* Message */
msg("Successfully created a spoiler file.");
}
/**
* Create a spoiler file for artifacts
*/
static void spoil_artifact(const char *fname)
{
int i, j;
char buf[1024];
/* Build the filename */
path_build(buf, sizeof(buf), ANGBAND_DIR_USER, fname);
fh = file_open(buf, MODE_WRITE, FTYPE_TEXT);
/* Oops */
if (!fh) {
msg("Cannot create spoiler file.");
return;
}
/* Dump to the spoiler file */
text_out_hook = text_out_to_file;
text_out_file = fh;
/* Dump the header */
spoiler_underline(format("Artifact Spoilers for %s", buildid), '=');
text_out("\n Randart seed is %u\n", seed_randart);
/* List the artifacts by tval */
for (i = 0; group_artifact[i].tval; i++) {
/* Write out the group title */
if (group_artifact[i].name) {
spoiler_blanklines(2);
spoiler_underline(group_artifact[i].name, '=');
spoiler_blanklines(1);
}
/* Now search through all of the artifacts */
for (j = 1; j < z_info->a_max; ++j) {
struct artifact *art = &a_info[j];
char buf2[80];
char *temp;
struct object *obj, *known_obj;
/* We only want objects in the current group */
if (art->tval != group_artifact[i].tval) continue;
/* Get local object */
obj = object_new();
known_obj = object_new();
/* Attempt to "forge" the artifact */
if (!make_fake_artifact(obj, art)) {
object_delete(&known_obj);
object_delete(&obj);
continue;
}
/* Grab artifact name */
object_copy(known_obj, obj);
obj->known = known_obj;
object_desc(buf2, sizeof(buf2), obj, ODESC_PREFIX |
ODESC_COMBAT | ODESC_EXTRA | ODESC_SPOIL);
/* Print name and underline */
spoiler_underline(buf2, '-');
/* Temporarily blank the artifact flavour text - spoilers
spoil the mechanics, not the atmosphere. */
temp = obj->artifact->text;
obj->artifact->text = NULL;
/* Write out the artifact description to the spoiler file */
object_info_spoil(fh, obj, 80);
/* Put back the flavour */
obj->artifact->text = temp;
/*
* Determine the minimum and maximum depths an
* artifact can appear, its rarity, its weight, and
* its power rating.
*/
text_out("\nMin Level %u, Max Level %u, Generation chance %u, Power %d, %d.%d lbs\n",
art->alloc_min, art->alloc_max, art->alloc_prob,
object_power(obj, false, NULL), (art->weight / 10),
(art->weight % 10));
if (OPT(birth_randarts)) text_out("%s.\n", art->text);
/* Terminate the entry */
spoiler_blanklines(2);
object_delete(&known_obj);
object_delete(&obj);
}
}
/* Check for errors */
if (!file_close(fh)) {
msg("Cannot close spoiler file.");
return;
}
/* Message */
msg("Successfully created a spoiler file.");
}