3 * @brief グローバル変数定義 / Angband variables
6 * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke<br>
8 * This software may be copied and distributed for educational, research,<br>
9 * and not for profit purposes provided that this copyright and statement<br>
10 * are included in all such copies. Other copyrights may also apply.<br>
17 * Hack -- Link a copyright message into the executable
19 const concptr copyright[5] =
21 "Copyright (c) 1989 James E. Wilson, Robert A. Keoneke",
23 "This software may be copied and distributed for educational, research,",
24 "and not for profit purposes provided that this copyright and statement",
25 "are included in all such copies."
28 int max_macrotrigger = 0; /*!< 現在登録中のマクロ(トリガー)の数 */
29 concptr macro_template = NULL; /*!< Angband設定ファイルのT: タグ情報から読み込んだ長いTコードを処理するために利用する文字列ポインタ */
30 concptr macro_modifier_chr; /*!< &x# で指定されるマクロトリガーに関する情報を記録する文字列ポインタ */
31 concptr macro_modifier_name[MAX_MACRO_MOD]; /*!< マクロ上で取り扱う特殊キーを文字列上で表現するためのフォーマットを記録した文字列ポインタ配列 */
32 concptr macro_trigger_name[MAX_MACRO_TRIG]; /*!< マクロのトリガーコード */
33 concptr macro_trigger_keycode[2][MAX_MACRO_TRIG]; /*!< マクロの内容 */
35 int level_up = 0; /*!< レベルアップの際に遅延してcalc_mana()関数上で上昇量を表示するかどうかの判定フラグ */
39 * 自動拾い/破壊設定のリストに関する変数 / List for auto-picker/destroyer entries
41 int max_autopick = 0; /*!< 現在登録している自動拾い/破壊設定の数 */
42 int max_max_autopick = 0; /*!< 自動拾い/破壊設定の限界数 */
43 autopick_type *autopick_list = NULL; /*!< 自動拾い/破壊設定構造体のポインタ配列 */
48 byte h_ver_major; /* Savefile version for Hengband 1.1.1 and later */
53 byte sf_extra; /* Savefile's encoding key */
55 byte z_major; /* Savefile version for Hengband */
60 * Savefile information
62 u32b sf_system; /* Operating system info */
63 u32b sf_when; /* Time when savefile created */
64 u16b sf_lives; /* Number of past "lives" with this file */
65 u16b sf_saves; /* Number of "saves" during this life */
70 bool arg_fiddle; /* Command arg -- Request fiddle mode */
71 bool arg_wizard; /* Command arg -- Request wizard mode */
72 bool arg_sound; /* Command arg -- Request special sounds */
73 bool arg_music; /* Command arg -- Request special musics */
74 byte arg_graphics; /* Command arg -- Request graphics mode */
75 bool arg_monochrome; /* Command arg -- Request monochrome mode */
76 bool arg_force_original; /* Command arg -- Request original keyset */
77 bool arg_force_roguelike; /* Command arg -- Request roguelike keyset */
78 bool arg_bigtile = FALSE; /* Command arg -- Request big tile mode */
83 bool character_generated; /* The character exists */
84 bool character_dungeon; /* The character has a dungeon */
85 bool character_loaded; /* The character was loaded from a savefile */
86 bool character_saved; /* The character was just saved to a savefile */
88 bool character_icky; /* The game is in an icky full screen mode */
89 bool character_xtra; /* The game is in an icky startup mode */
91 bool creating_savefile; /* New savefile is currently created */
93 u32b seed_flavor; /* Hack -- consistent object colors */
94 u32b seed_town; /* Hack -- consistent town layout */
96 s16b command_cmd; /* Current "Angband Command" */
98 COMMAND_ARG command_arg; /*!< 各種コマンドの汎用的な引数として扱う / Gives argument of current command */
99 COMMAND_NUM command_rep; /*!< 各種コマンドの汎用的なリピート数として扱う / Gives repetition of current command */
100 DIRECTION command_dir; /*!< 各種コマンドの汎用的な方向値処理として扱う/ Gives direction of current command */
102 s16b command_see; /* See "object1.c" */
103 s16b command_wrk; /* See "object1.c" */
105 TERM_LEN command_gap = 999; /* See "object1.c" */
107 s16b command_new; /* Command chaining from inven/equip view */
109 bool msg_flag; /* Used in msg_print() for "buffering" */
111 s16b running; /* Current counter for running, if any */
112 GAME_TURN resting; /* Current counter for resting, if any */
114 bool invoking_midnight_curse; /*!< 悪夢モード時の真夜中太古の呪い発生処理フラグ */
116 GAME_TURN old_turn; /* Turn when level began */
117 GAME_TURN old_battle;
119 bool use_sound; /* The "sound" mode is enabled */
120 bool use_music; /* The "music" mode is enabled */
121 bool use_graphics; /* The "graphics" mode is enabled */
122 bool use_bigtile = FALSE;
124 s16b signal_count; /* Hack -- Count interupts */
126 bool inkey_base; /* See the "inkey()" function */
127 bool inkey_xtra; /* See the "inkey()" function */
128 bool inkey_scan; /* See the "inkey()" function */
129 bool inkey_flag; /* See the "inkey()" function */
130 bool get_com_no_macros = FALSE; /* Expand macros in "get_com" or not */
132 OBJECT_SUBTYPE_VALUE coin_type; /* Hack -- force coin type */
134 bool opening_chest; /* Hack -- prevent chest generation */
136 bool shimmer_monsters; /* Hack -- optimize multi-hued monsters */
137 bool shimmer_objects; /* Hack -- optimize multi-hued objects */
139 bool repair_monsters; /* Hack -- optimize detect monsters */
140 bool repair_objects; /* Hack -- optimize detect objects */
142 bool is_loading_now; /*!< ロード直後にcalc_bonus()時の徳変化、及びsanity_blast()による異常を抑止する */
145 s16b inven_cnt; /* Number of items in inventory */
146 s16b equip_cnt; /* Number of items in equipment */
148 OBJECT_IDX o_max = 1; /* Number of allocated objects */
149 OBJECT_IDX o_cnt = 0; /* Number of live objects */
151 MONSTER_IDX m_max = 1; /* Number of allocated monsters */
152 MONSTER_IDX m_cnt = 0; /* Number of live monsters */
154 MONSTER_IDX hack_m_idx = 0; /* Hack -- see "process_monsters()" */
155 MONSTER_IDX hack_m_idx_ii = 0;
157 bool multi_rew = FALSE;
158 char summon_kin_type; /* Hack, by Julian Lighton: summon 'relatives' */
160 int total_friends = 0;
161 s32b friend_align = 0;
163 int leaving_quest = 0;
164 bool reinit_wilderness = FALSE;
172 bool closing_flag; /* Dungeon is closing */
179 POSITION panel_row_min, panel_row_max;
180 POSITION panel_col_min, panel_col_max;
181 POSITION panel_col_prt, panel_row_prt;
185 * Targetting variables
187 MONSTER_IDX target_who;
200 * Stripped version of "player_name"
202 char player_base[32];
206 * Buffer to hold the current savefile name
207 * 'savefile' holds full path name. 'savefile_base' holds only base name.
210 char savefile_base[40];
212 POSITION_IDX mon_lite_n; //!< Array of grids lit by player lite (see "current_floor_ptr->grid_array.c")
213 POSITION mon_lite_y[MON_LITE_MAX];
214 POSITION mon_lite_x[MON_LITE_MAX];
216 POSITION_IDX view_n; //!< Array of grids viewable to the player (see "current_floor_ptr->grid_array.c")
217 POSITION view_y[VIEW_MAX];
218 POSITION view_x[VIEW_MAX];
220 POSITION_IDX temp_n; //!< Array of grids for use by various functions (see "current_floor_ptr->grid_array.c")
221 POSITION temp_y[TEMP_MAX];
222 POSITION temp_x[TEMP_MAX];
224 POSITION_IDX redraw_n = 0; //!< Array of grids for delayed visual updating (see "current_floor_ptr->grid_array.c")
225 POSITION redraw_y[REDRAW_MAX];
226 POSITION redraw_x[REDRAW_MAX];
230 * Number of active macros.
235 * Array of macro patterns [MACRO_MAX]
240 * Array of macro actions [MACRO_MAX]
245 * Array of macro types [MACRO_MAX]
250 * Current macro action [1024]
256 * The number of quarks
258 STR_OFFSET quark__num;
261 * The pointers to the quarks [QUARK_MAX]
267 * The next "free" index to use
272 * The index of the oldest message (none yet)
277 * The next "free" offset
282 * The offset to the oldest used char (none yet)
287 * The array of offsets, by index [MESSAGE_MAX]
292 * The array of chars, by offset [MESSAGE_BUF]
296 BIT_FLAGS option_flag[8]; //!< The array of normal options
297 BIT_FLAGS option_mask[8]; //!< The array of normal options
298 BIT_FLAGS window_flag[8]; //!< The array of window options
299 BIT_FLAGS window_mask[8]; //!< The array of window options
302 * The array of window pointers
304 term *angband_term[8];
307 * Standard window names
309 const char angband_term_name[8][16] =
323 * Global table of color definitions
325 byte angband_color_table[256][4] =
327 {0x00, 0x00, 0x00, 0x00}, /* TERM_DARK */
328 {0x00, 0xFF, 0xFF, 0xFF}, /* TERM_WHITE */
329 {0x00, 0x80, 0x80, 0x80}, /* TERM_SLATE */
330 {0x00, 0xFF, 0x80, 0x00}, /* TERM_ORANGE */
331 {0x00, 0xC0, 0x00, 0x00}, /* TERM_RED */
332 {0x00, 0x00, 0x80, 0x40}, /* TERM_GREEN */
333 {0x00, 0x00, 0x00, 0xFF}, /* TERM_BLUE */
334 {0x00, 0x80, 0x40, 0x00}, /* TERM_UMBER */
335 {0x00, 0x40, 0x40, 0x40}, /* TERM_L_DARK */
336 {0x00, 0xC0, 0xC0, 0xC0}, /* TERM_L_WHITE */
337 {0x00, 0xFF, 0x00, 0xFF}, /* TERM_VIOLET */
338 {0x00, 0xFF, 0xFF, 0x00}, /* TERM_YELLOW */
339 {0x00, 0xFF, 0x00, 0x00}, /* TERM_L_RED */
340 {0x00, 0x00, 0xFF, 0x00}, /* TERM_L_GREEN */
341 {0x00, 0x00, 0xFF, 0xFF}, /* TERM_L_BLUE */
342 {0x00, 0xC0, 0x80, 0x40} /* TERM_L_UMBER */
347 * Standard sound names
349 const concptr angband_sound_name[SOUND_MAX] =
421 * Standard music names
423 const concptr angband_music_basic_name[MUSIC_BASIC_MAX] =
450 * The array of "current_floor_ptr->grid_array grids" [MAX_WID][MAX_HGT].
451 * Not completely allocated, that would be inefficient
452 * Not completely hardcoded, that would overflow memory
455 floor_type *current_floor_ptr = &floor;
458 * The array of saved floors
460 saved_floor_type saved_floors[MAX_SAVED_FLOORS];
464 * Number of floor_id used from birth
466 FLOOR_IDX max_floor_id;
470 world_type *current_world_ptr = &world;
474 * Sign for current process used in temporal files.
475 * Actually it is the start time of current process.
477 u32b saved_floor_file_sign;
481 * Maximum number of towns
486 * The towns [max_towns]
488 town_type *town_info;
492 * The player's inventory [INVEN_TOTAL]
494 object_type *inventory;
498 * The size of "alloc_kind_table" (at most max_k_idx * 4)
500 s16b alloc_kind_size;
503 * The entries in the "kind allocator table"
505 alloc_entry *alloc_kind_table;
509 * The size of "alloc_race_table" (at most max_r_idx)
511 s16b alloc_race_size;
514 * The entries in the "race allocator table"
516 alloc_entry *alloc_race_table;
520 * Specify attr/char pairs for visual special effects
521 * Be sure to use "index & 0x7F" to avoid illegal access
523 TERM_COLOR misc_to_attr[256];
524 SYMBOL_CODE misc_to_char[256];
528 * Specify attr/char pairs for inventory items (by tval)
529 * Be sure to use "index & 0x7F" to avoid illegal access
531 TERM_COLOR tval_to_attr[128];
532 SYMBOL_CODE tval_to_char[128];
536 * Keymaps for each "mode" associated with each keypress.
538 concptr keymap_act[KEYMAP_MODES][256];
542 /*** Player information ***/
545 * Static player info record
550 * Pointer to the player info
552 player_type *p_ptr = &p_body;
555 * Pointer to the player tables
556 * (sex, race, class, magic)
558 const player_sex *sp_ptr;
559 const player_race *rp_ptr;
560 const player_class *cp_ptr;
561 const player_seikaku *ap_ptr;
562 const player_magic *mp_ptr;
566 * The last character rolled,
567 * holded for quick start
569 birther previous_char;
573 * The vault generation arrays
587 player_magic *m_info;
590 * The terrain feature arrays
592 feature_type *f_info;
597 * The object kind arrays
604 * The artifact arrays
606 artifact_type *a_info;
611 * The ego-item arrays
613 ego_item_type *e_info;
619 * The monster race arrays
621 monster_race *r_info;
629 dungeon_type *d_info;
634 concptr ANGBAND_SYS = "xxx"; //!< Hack -- The special Angband "System Suffix" This variable is used to choose an appropriate "pref-xxx" file
638 concptr ANGBAND_KEYBOARD = "JAPAN"; //!< Hack -- The special Angband "Keyboard Suffix" This variable is used to choose an appropriate macro-trigger definition
640 concptr ANGBAND_KEYBOARD = "0";
643 concptr ANGBAND_GRAF = "ascii"; //!< Hack -- The special Angband "Graphics Suffix" This variable is used to choose an appropriate "graf-xxx" file
644 concptr ANGBAND_DIR; //!< Path name: The main "lib" directory This variable is not actually used anywhere in the code
645 concptr ANGBAND_DIR_APEX; //!< High score files (binary) These files may be portable between platforms
646 concptr ANGBAND_DIR_BONE; //!< Bone files for player ghosts (ascii) These files are portable between platforms
647 concptr ANGBAND_DIR_DATA; //!< Binary image files for the "*_info" arrays (binary) These files are not portable between platforms
648 concptr ANGBAND_DIR_EDIT; //!< Textual template files for the "*_info" arrays (ascii) These files are portable between platforms
649 concptr ANGBAND_DIR_SCRIPT; //!< Script files These files are portable between platforms.
650 concptr ANGBAND_DIR_FILE; //!< Various extra files (ascii) These files may be portable between platforms
651 concptr ANGBAND_DIR_HELP; //!< Help files (normal) for the online help (ascii) These files are portable between platforms
652 concptr ANGBAND_DIR_INFO; //!< Help files (spoilers) for the online help (ascii) These files are portable between platforms
653 concptr ANGBAND_DIR_PREF; //!< Default user "preference" files (ascii) These files are rarely portable between platforms
654 concptr ANGBAND_DIR_SAVE; //!< Savefiles for current characters (binary)
655 concptr ANGBAND_DIR_USER; //!< User "preference" files (ascii) These files are rarely portable between platforms
656 concptr ANGBAND_DIR_XTRA; //!< Various extra files (binary) These files are rarely portable between platforms
660 * Here is a "pseudo-hook" used during calls to "get_item()" and
661 * "show_inven()" and "show_equip()", and the choice window routines.
663 OBJECT_TYPE_VALUE item_tester_tval;
667 * Here is a "hook" used during calls to "get_item()" and
668 * "show_inven()" and "show_equip()", and the choice window routines.
670 bool (*item_tester_hook)(object_type*);
675 * Current "comp" function for ang_sort()
677 bool (*ang_sort_comp)(vptr u, vptr v, int a, int b);
681 * Current "swap" function for ang_sort()
683 void (*ang_sort_swap)(vptr u, vptr v, int a, int b);
688 * Hack -- function hooks to restrict "get_mon_num_prep()" function
690 monsterrace_hook_type get_mon_num_hook;
691 monsterrace_hook_type get_mon_num2_hook;
695 * Hack -- function hook to restrict "get_obj_num_prep()" function
697 bool (*get_obj_num_hook)(KIND_OBJECT_IDX k_idx);
703 wilderness_type **wilderness;
709 building_type building[MAX_BLDG];
713 * Maximum number of quests
718 * Maximum number of monsters in r_info.txt
720 MONRACE_IDX max_r_idx;
723 * Maximum number of items in k_info.txt
725 KIND_OBJECT_IDX max_k_idx;
728 * Maximum number of vaults in v_info.txt
733 * Maximum number of terrain features in f_info.txt
738 * Maximum number of artifacts in a_info.txt
740 ARTIFACT_IDX max_a_idx;
743 * Maximum number of ego-items in e_info.txt
748 * Maximum number of dungeon in e_info.txt
750 DUNGEON_IDX max_d_idx;
762 char quest_text[10][80];
765 * Current line of the quest text
770 * Default spell color table (quark index)
772 s16b gf_color[MAX_GF];
775 * Flags for initialization
781 * The "highscore" file descriptor, if available.
783 int highscore_fd = -1;
785 bool can_save = FALSE; /* Game can be saved */
793 STR_OFFSET cap_nickname;
795 MONRACE_IDX battle_mon[4];
801 MONSTER_IDX pet_t_m_idx;
802 MONSTER_IDX riding_t_m_idx;
804 MONSTER_IDX kubi_r_idx[MAX_KUBI];
805 MONSTER_IDX today_mon;
818 bool generate_encounter;
820 concptr screen_dump = NULL;
822 /*** Terrain feature variables ***/
832 FEAT_IDX feat_explosive_rune;
833 FEAT_IDX feat_mirror;
836 FEAT_IDX feat_up_stair;
837 FEAT_IDX feat_down_stair;
838 FEAT_IDX feat_entrance;
841 FEAT_IDX feat_trap_open;
842 FEAT_IDX feat_trap_armageddon;
843 FEAT_IDX feat_trap_piranha;
846 FEAT_IDX feat_rubble;
849 FEAT_IDX feat_magma_vein;
850 FEAT_IDX feat_quartz_vein;
853 FEAT_IDX feat_granite;
854 FEAT_IDX feat_permanent;
857 FEAT_IDX feat_glass_floor;
860 FEAT_IDX feat_glass_wall;
861 FEAT_IDX feat_permanent_glass_wall;
864 FEAT_IDX feat_pattern_start;
865 FEAT_IDX feat_pattern_1;
866 FEAT_IDX feat_pattern_2;
867 FEAT_IDX feat_pattern_3;
868 FEAT_IDX feat_pattern_4;
869 FEAT_IDX feat_pattern_end;
870 FEAT_IDX feat_pattern_old;
871 FEAT_IDX feat_pattern_exit;
872 FEAT_IDX feat_pattern_corrupted;
875 FEAT_IDX feat_black_market;
879 FEAT_IDX feat_deep_water;
880 FEAT_IDX feat_shallow_water;
881 FEAT_IDX feat_deep_lava;
882 FEAT_IDX feat_shallow_lava;
883 FEAT_IDX feat_heavy_cold_zone;
884 FEAT_IDX feat_cold_zone;
885 FEAT_IDX feat_heavy_electrical_zone;
886 FEAT_IDX feat_electrical_zone;
887 FEAT_IDX feat_deep_acid_puddle;
888 FEAT_IDX feat_shallow_acid_puddle;
889 FEAT_IDX feat_deep_poisonous_puddle;
890 FEAT_IDX feat_shallow_poisonous_puddle;
893 FEAT_IDX feat_flower;
896 FEAT_IDX feat_mountain;
899 /* Unknown grid (not detected) */
900 FEAT_IDX feat_undetected;
907 FEAT_IDX feat_wall_outer;
908 FEAT_IDX feat_wall_inner;
909 FEAT_IDX feat_wall_solid;
910 FEAT_IDX feat_ground_type[100], feat_wall_type[100];
913 COMMAND_CODE now_message;
932 int snipe_type = SP_NONE;
933 bool reset_concent = FALSE; /* Concentration reset flag */
934 bool is_fired = FALSE;