diff options
Diffstat (limited to 'src/levels.c')
| -rw-r--r-- | src/levels.c | 234 |
1 files changed, 0 insertions, 234 deletions
diff --git a/src/levels.c b/src/levels.c deleted file mode 100644 index 71148fc5..00000000 --- a/src/levels.c +++ /dev/null @@ -1,234 +0,0 @@ -/* File: levels.c */ - -/* Purpose: Levels functions */ - -/* - * Copyright (c) 1989 James E. Wilson, Robert A. Koeneke - * - * This software may be copied and distributed for educational, research, and - * not for profit purposes provided that this copyright and statement are - * included in all such copies. - */ - -#include "angband.h" - - -/* - * Return the parameter of the given command in the given file - */ -static int start_line = 0; -bool_ get_command(const char *file, char comm, char *param) -{ - char buf[1024]; - int i = -1; - FILE *fp; - char *s; - - /* Build the filename */ - path_build(buf, 1024, ANGBAND_DIR_DNGN, file); - - /* Open the file */ - fp = my_fopen(buf, "r"); - - /* The file exists ? */ - /* no ? then command not found */ - if (!fp) return FALSE; - - /* Parse to the end of the file or when the command is found */ - while (0 == my_fgets(fp, buf, 1024)) - { - /* Advance the line number */ - i++; - - /* Skip comments and blank lines */ - if (!buf[0] || (buf[0] == '#')) continue; - - /* Is it the command we are looking for ? */ - if ((i > start_line) && (buf[0] == comm)) - { - /* Acquire the text */ - s = buf + 2; - - start_line = i; - - /* Get the parameter */ - strcpy(param, s); - - /* Close it */ - my_fclose(fp); - - return TRUE; - } - - } - - /* Close it */ - my_fclose(fp); - - /* Assume command not found */ - return FALSE; -} - - -/* - * Return the dungeon branch starting form the current dungeon/level - */ -int get_branch() -{ - char file[20], buf[5]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the branch */ - start_line = -1; - if (get_command(file, 'B', buf)) return (atoi(buf)); - - /* No branch ? return 0 */ - else return 0; -} - -/* - * Return the father dungeon branch - */ -int get_fbranch() -{ - char file[20], buf[5]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the branch */ - start_line = -1; - if (get_command(file, 'A', buf)) return (atoi(buf)); - - /* No branch ? return 0 */ - else return 0; -} - -/* - * Return the father dungeon level - */ -int get_flevel() -{ - char file[20], buf[5]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the level */ - start_line = -1; - if (get_command(file, 'L', buf)) return (atoi(buf)); - - /* No level ? return 0 */ - else return 0; -} - -/* - * Return the extension of the savefile for the level - */ -bool_ get_dungeon_save(char *buf) -{ - char file[20]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the level */ - start_line = -1; - if (get_command(file, 'S', buf)) return (TRUE); - else return FALSE; -} - -/* - * Return the level generator - */ -bool_ get_dungeon_generator(char *buf) -{ - char file[20]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the level */ - start_line = -1; - if (get_command(file, 'G', buf)) return (TRUE); - else return FALSE; -} - -/* - * Return the special level - */ -bool_ get_dungeon_special(char *buf) -{ - char file[20]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the level */ - start_line = -1; - if (get_command(file, 'U', buf)) return (TRUE); - else return FALSE; -} - -/* - * Return the special level name - */ -bool_ get_dungeon_name(char *buf) -{ - char file[20]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the level */ - start_line = -1; - if (get_command(file, 'N', buf)) return (TRUE); - else return FALSE; -} - -/* - * Return the special level name - */ -void get_level_flags() -{ - char file[20]; - char buf[1024], *s, *t; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - start_line = -1; - - /* Parse until done */ - while (get_command(file, 'F', buf)) - { - /* Parse every entry textually */ - for (s = buf; *s; ) - { - /* Find the end of this entry */ - for (t = s; *t && (*t != ' ') && (*t != '|'); ++t) /* loop */; - - /* Nuke and skip any dividers */ - if (*t) - { - *t++ = '\0'; - while (*t == ' ' || *t == '|') t++; - } - - /* Parse this entry */ - if (0 != grab_one_dungeon_flag(&dungeon_flags1, &dungeon_flags2, s)) return; - - /* Start the next entry */ - s = t; - } - } -} - -/* - * Return the special level desc - */ -bool_ get_level_desc(char *buf) -{ - char file[20]; - - sprintf(file, "dun%d.%d", dungeon_type, dun_level - d_info[dungeon_type].mindepth); - - /* Get and return the level */ - start_line = -1; - if (get_command(file, 'D', buf)) return (TRUE); - else return FALSE; -} |