/* Interesting quest */
if ((quest[i].type == QUEST_TYPE_KILL_NUMBER) ||
+ (quest[i].type == QUEST_TYPE_TOWER) ||
(quest[i].type == QUEST_TYPE_KILL_ALL))
break;
}
break;
}
+ case QUEST_TYPE_TOWER:
+ {
+ int number_mon = 0;
+
+ if (!is_hostile(m_ptr)) break;
+
+ /* Count all hostile monsters */
+ for (i2 = 0; i2 < cur_wid; ++i2)
+ for (j2 = 0; j2 < cur_hgt; j2++)
+ if (cave[j2][i2].m_idx > 0)
+ if (is_hostile(&m_list[cave[j2][i2].m_idx]))
+ number_mon++;
+
+ if ((number_mon - 1) == 0)
+ {
+ if (record_fix_quest) do_cmd_write_nikki(NIKKI_FIX_QUEST_C, i, NULL);
+
+ quest[i].status = QUEST_STATUS_STAGE_COMPLETED;
+ /* completed */
+ if((quest[QUEST_TOWER1].status == QUEST_STATUS_STAGE_COMPLETED) &&
+ (quest[QUEST_TOWER2].status == QUEST_STATUS_STAGE_COMPLETED) &&
+ (quest[QUEST_TOWER3].status == QUEST_STATUS_STAGE_COMPLETED))
+ {
+ quest[QUEST_TOWER1].status = QUEST_STATUS_COMPLETED;
+ quest[QUEST_TOWER1].complev = (byte)p_ptr->lev;;
+
+#ifdef JP
+msg_print("¥¯¥¨¥¹¥È¤òãÀ®¤·¤¿¡ª");
+#else
+ msg_print("You just completed your quest!");
+#endif
+ msg_print(NULL);
+ }
+ }
+ break;
+ }
}
}
/* Create stairs down */
- cave_set_feat(y, x, FEAT_MORE);
+ cave_set_feat(y, x, feat_down_stair);
/* Remember to update everything */
p_ptr->update |= (PU_FLOW);
monster_race *r_ptr = &r_info[m_ptr->r_idx];
- bool visible = (m_ptr->ml || (r_ptr->flags1 & RF1_UNIQUE));
+ bool visible = ((m_ptr->ml && !p_ptr->image) || (r_ptr->flags1 & RF1_UNIQUE));
u32b mo_mode = 0L;
a_idx = ART_FUNDIN;
chance = 5;
break;
+
+ case MON_ROBIN_HOOD:
+ a_idx = ART_ROBIN_HOOD;
+ chance = 5;
+ break;
}
if ((a_idx > 0) && ((randint0(100) < chance) || p_ptr->wizard))
if (is_pet(m_ptr) || p_ptr->inside_battle || p_ptr->inside_arena)
number = 0; /* Pets drop no stuff */
if (!drop_item && (r_ptr->d_char != '$')) number = 0;
+
+ if((r_ptr->flags2 & (RF2_MULTIPLY)) && (r_ptr->r_akills > 1024))
+ number = 0; /* Limit of Multiply monster drop */
/* Hack -- handle creeping coins */
coin_type = force_coin;
/* Use (average maxhp * 2) as a denominator */
if (!(r_ptr->flags1 & RF1_FORCE_MAXHP))
- s64b_mul(&div_h, &div_l, 0, r_ptr->hdice * (r_ptr->hside + 1));
+ s64b_mul(&div_h, &div_l, 0, r_ptr->hdice * (ironman_nightmare ? 2 : 1) * (r_ptr->hside + 1));
else
- s64b_mul(&div_h, &div_l, 0, r_ptr->hdice * r_ptr->hside * 2);
+ s64b_mul(&div_h, &div_l, 0, r_ptr->hdice * (ironman_nightmare ? 2 : 1) * r_ptr->hside * 2);
/* Special penalty in the wilderness */
if (!dun_level && (!(r_ptr->flags8 & RF8_WILD_ONLY) || !(r_ptr->flags1 & RF1_UNIQUE)))
if (r_ptr->flags6 & RF6_HEAL) expdam = (expdam+1) * 2 / 3;
get_exp_from_mon(expdam, &exp_mon);
+
+ /* Genocided by chaos patron */
+ if (!m_ptr->r_idx) m_idx = 0;
}
/* Redraw (later) if needed */
set_superstealth(FALSE);
}
+ /* Genocided by chaos patron */
+ if (!m_idx) return TRUE;
+
/* Hurt it */
m_ptr->hp -= dam;
if (r_ptr->r_akills < MAX_SHORT) r_ptr->r_akills++;
/* Recall even invisible uniques or winners */
- if (m_ptr->ml || (r_ptr->flags1 & RF1_UNIQUE))
+ if ((m_ptr->ml && !p_ptr->image) || (r_ptr->flags1 & RF1_UNIQUE))
{
/* Count kills this life */
if ((m_ptr->mflag2 & MFLAG2_KAGE) && (r_info[MON_KAGE].r_pkills < MAX_SHORT)) r_info[MON_KAGE].r_pkills++;
return (FALSE);
}
+bool change_panel_xy(int y, int x)
+{
+ int dy = 0, dx = 0;
+ int wid, hgt;
+
+ /* Get size */
+ get_screen_size(&wid, &hgt);
+
+ if (y < panel_row_min) dy = -1;
+ if (y > panel_row_max) dy = 1;
+ if (x < panel_col_min) dx = -1;
+ if (x > panel_col_max) dx = 1;
+
+ if (!dy && !dx) return (FALSE);
+
+ return change_panel(dy, dx);
+}
+
/*
* Given an row (y) and col (x), this routine detects when a move
static void target_set_prepare(int mode)
{
int y, x;
+ int min_hgt, max_hgt, min_wid, max_wid;
+
+ if (mode & TARGET_KILL)
+ {
+ /* Inner range */
+ min_hgt = MAX((py - MAX_RANGE), 0);
+ max_hgt = MIN((py + MAX_RANGE), cur_hgt - 1);
+ min_wid = MAX((px - MAX_RANGE), 0);
+ max_wid = MIN((px + MAX_RANGE), cur_wid - 1);
+ }
+ else /* not targetting */
+ {
+ /* Inner panel */
+ min_hgt = panel_row_min;
+ max_hgt = panel_row_max;
+ min_wid = panel_col_min;
+ max_wid = panel_col_max;
+ }
/* Reset "temp" array */
temp_n = 0;
/* Scan the current panel */
- for (y = panel_row_min; y <= panel_row_max; y++)
+ for (y = min_hgt; y <= max_hgt; y++)
{
- for (x = panel_col_min; x <= panel_col_max; x++)
+ for (x = min_wid; x <= max_wid; x++)
{
cave_type *c_ptr;
temp_x[1] = tmp;
}
}
+void target_set_prepare_look(){
+ target_set_prepare(TARGET_LOOK);
+}
/*
num = MIN(999, exp_adv_frac);
/* Display the number */
- sprintf(buf,"%03ld", num);
+ sprintf(buf,"%03ld", (long int)num);
}
+bool show_gold_on_floor = FALSE;
+
/*
* Examine a grid, return a keypress.
*
screen_save();
/* Display */
+ show_gold_on_floor = TRUE;
(void)show_floor(0, y, x, &min_width);
+ show_gold_on_floor = FALSE;
/* Prompt */
#ifdef JP
if (!(c_ptr->info & CAVE_MARK) && !player_can_see_bold(y, x))
{
/* Forget feature */
- feat = FEAT_NONE;
+ feat = feat_none;
}
f_ptr = &f_info[feat];
{
cptr name;
+ /* Hack -- special handling for quest entrances */
+ if (have_flag(f_ptr->flags, FF_QUEST_ENTER))
+ {
+ /* Set the quest number temporary */
+ int old_quest = p_ptr->inside_quest;
+ int j;
+
+ /* Clear the text */
+ for (j = 0; j < 10; j++) quest_text[j][0] = '\0';
+ quest_text_line = 0;
+
+ p_ptr->inside_quest = c_ptr->special;
+
+ /* Get the quest text */
+ init_flags = INIT_NAME_ONLY;
+
+ process_dungeon_file("q_info.txt", 0, 0, 0, 0);
+
+#ifdef JP
+ name = format("¥¯¥¨¥¹¥È¡Ö%s¡×(%d³¬ÁêÅö)", quest[c_ptr->special].name, quest[c_ptr->special].level);
+#else
+ name = format("the entrance to the quest '%s'(level %d)", quest[c_ptr->special].name, quest[c_ptr->special].level);
+#endif
+
+ /* Reset the old quest number */
+ p_ptr->inside_quest = old_quest;
+ }
+
/* Hack -- special handling for building doors */
- if (have_flag(f_ptr->flags, FF_BLDG) && !p_ptr->inside_arena)
+ else if (have_flag(f_ptr->flags, FF_BLDG) && !p_ptr->inside_arena)
{
- name = building[f_ptr->power].name;
+ name = building[f_ptr->subtype].name;
}
else if (have_flag(f_ptr->flags, FF_ENTRANCE))
{
{
name = town[c_ptr->special].name;
}
- else if (p_ptr->wild_mode && (feat == FEAT_FLOOR))
+ else if (p_ptr->wild_mode && (feat == feat_floor))
{
#ifdef JP
name = "ƻ";
/* Hack -- special introduction for store & building doors -KMW- */
if (have_flag(f_ptr->flags, FF_STORE) ||
+ have_flag(f_ptr->flags, FF_QUEST_ENTER) ||
(have_flag(f_ptr->flags, FF_BLDG) && !p_ptr->inside_arena) ||
have_flag(f_ptr->flags, FF_ENTRANCE))
{
if (c_ptr->mimic) sprintf(f_idx_str, "%d/%d", c_ptr->feat, c_ptr->mimic);
else sprintf(f_idx_str, "%d", c_ptr->feat);
#ifdef JP
- sprintf(out_val, "%s%s%s%s[%s] %x %s %d %d %d (%d,%d)", s1, name, s2, s3, info, c_ptr->info, f_idx_str, c_ptr->dist, c_ptr->cost, c_ptr->when, y, x);
+ sprintf(out_val, "%s%s%s%s[%s] %x %s %d %d %d (%d,%d) %d", s1, name, s2, s3, info, c_ptr->info, f_idx_str, c_ptr->dist, c_ptr->cost, c_ptr->when, y, x, travel.cost[y][x]);
#else
sprintf(out_val, "%s%s%s%s [%s] %x %s %d %d %d (%d,%d)", s1, s2, s3, name, info, c_ptr->info, f_idx_str, c_ptr->dist, c_ptr->cost, c_ptr->when, y, x);
#endif
cave_type *c_ptr;
int wid, hgt;
-
-
+
/* Get size */
get_screen_size(&wid, &hgt);
y = temp_y[m];
x = temp_x[m];
+ /* Set forcus */
+ change_panel_xy(y, x);
+
if (!(mode & TARGET_LOOK)) prt_path(y, x);
/* Access */
#endif
}
-
+
/* Describe and Prompt */
- while (!(query = target_set_aux(y, x, mode, info)));
+ while (TRUE){
+ query = target_set_aux(y, x, mode, info);
+ if(query)break;
+ }
/* Cancel tracking */
/* health_track(0); */
bool get_rep_dir(int *dp, bool under)
{
int dir;
+ cptr prompt;
/* Initialize */
(*dp) = 0;
#endif /* ALLOW_REPEAT -- TNB */
+ if (under)
+ {
+ prompt = _("Êý¸þ ('.'¸µ, ESC¤ÇÃæÃÇ)? ", "Direction ('.' at feet, Escape to cancel)? ");
+ }
+ else
+ {
+ prompt = _("Êý¸þ (ESC¤ÇÃæÃÇ)? ", "Direction (Escape to cancel)? ");
+ }
+
/* Get a direction */
while (!dir)
{
char ch;
/* Get a command (or Cancel) */
-#ifdef JP
-if (!get_com("Êý¸þ (ESC¤ÇÃæÃÇ)? ", &ch, TRUE)) break;
-#else
- if (!get_com("Direction (Escape to cancel)? ", &ch, TRUE)) break;
-#endif
+ if (!get_com(prompt, &ch, TRUE)) break;
+ /* Look down */
+ if ((under) && ((ch == '5') || (ch == '-') || (ch == '.')))
+ {
+ dir = 5;
+ }
+ else
+ {
+ /* Look up the direction */
+ dir = get_keymap_dir(ch);
- /* Look up the direction */
- dir = get_keymap_dir(ch);
-
- /* Oops */
- if (!dir) bell();
+ /* Oops */
+ if (!dir) bell();
+ }
}
/* Prevent weirdness */
return (TRUE);
}
-
void gain_level_reward(int chosen_reward)
{
object_type *q_ptr;
/*
+ * XAngband: determine if a given location is "interesting"
+ * based on target_set_accept function.
+ */
+static bool tgt_pt_accept(int y, int x)
+{
+ cave_type *c_ptr;
+
+ /* Bounds */
+ if (!(in_bounds(y, x))) return (FALSE);
+
+ /* Player grid is always interesting */
+ if ((y == py) && (x == px)) return (TRUE);
+
+ /* Handle hallucination */
+ if (p_ptr->image) return (FALSE);
+
+ /* Examine the grid */
+ c_ptr = &cave[y][x];
+
+ /* Interesting memorized features */
+ if (c_ptr->info & (CAVE_MARK))
+ {
+ /* Notice stairs */
+ if (cave_have_flag_grid(c_ptr, FF_LESS)) return (TRUE);
+ if (cave_have_flag_grid(c_ptr, FF_MORE)) return (TRUE);
+
+ /* Notice quest features */
+ if (cave_have_flag_grid(c_ptr, FF_QUEST_ENTER)) return (TRUE);
+ if (cave_have_flag_grid(c_ptr, FF_QUEST_EXIT)) return (TRUE);
+ }
+
+ /* Nope */
+ return (FALSE);
+}
+
+
+/*
+ * XAngband: Prepare the "temp" array for "tget_pt"
+ * based on target_set_prepare funciton.
+ */
+static void tgt_pt_prepare(void)
+{
+ int y, x;
+
+ /* Reset "temp" array */
+ temp_n = 0;
+
+ if (!expand_list) return;
+
+ /* Scan the current panel */
+ for (y = 1; y < cur_hgt; y++)
+ {
+ for (x = 1; x < cur_wid; x++)
+ {
+ /* Require "interesting" contents */
+ if (!tgt_pt_accept(y, x)) continue;
+
+ /* Save the location */
+ temp_x[temp_n] = x;
+ temp_y[temp_n] = y;
+ temp_n++;
+ }
+ }
+
+ /* Target the nearest monster for shooting */
+ ang_sort_comp = ang_sort_comp_distance;
+ ang_sort_swap = ang_sort_swap_distance;
+
+ /* Sort the positions */
+ ang_sort(temp_x, temp_y, temp_n);
+}
+
+/*
* old -- from PsiAngband.
*/
bool tgt_pt(int *x_ptr, int *y_ptr)
{
char ch = 0;
- int d, x, y;
+ int d, x, y, n;
bool success = FALSE;
int wid, hgt;
x = px;
y = py;
+ if (expand_list)
+ {
+ tgt_pt_prepare();
+ n = 0;
+ }
+
#ifdef JP
-msg_print("¾ì½ê¤òÁª¤ó¤Ç¥¹¥Ú¡¼¥¹¥¡¼¤ò²¡¤·¤Æ²¼¤µ¤¤¡£");
+ msg_print("¾ì½ê¤òÁª¤ó¤Ç¥¹¥Ú¡¼¥¹¥¡¼¤ò²¡¤·¤Æ²¼¤µ¤¤¡£");
#else
msg_print("Select a point and press space.");
#endif
else success = TRUE;
break;
+
+ /* XAngband: Move cursor to stairs */
+ case '>':
+ case '<':
+ if (expand_list && temp_n)
+ {
+ int dx, dy;
+ int cx = (panel_col_min + panel_col_max) / 2;
+ int cy = (panel_row_min + panel_row_max) / 2;
+
+ n++;
+
+ while(n < temp_n) /* Skip stairs which have defferent distance */
+ {
+ cave_type *c_ptr = &cave[temp_y[n]][temp_x[n]];
+
+ if (ch == '>')
+ {
+ if (cave_have_flag_grid(c_ptr, FF_LESS) ||
+ cave_have_flag_grid(c_ptr, FF_QUEST_ENTER))
+ n++;
+ else
+ break;
+ }
+ else /* if (ch == '<') */
+ {
+ if (cave_have_flag_grid(c_ptr, FF_MORE) ||
+ cave_have_flag_grid(c_ptr, FF_QUEST_EXIT))
+ n++;
+ else
+ break;
+ }
+ }
+
+ if (n == temp_n) /* Loop out taget list */
+ {
+ n = 0;
+ y = py;
+ x = px;
+ verify_panel(); /* Move cursor to player */
+
+ /* Update stuff */
+ p_ptr->update |= (PU_MONSTERS);
+
+ /* Redraw map */
+ p_ptr->redraw |= (PR_MAP);
+
+ /* Window stuff */
+ p_ptr->window |= (PW_OVERHEAD);
+
+ /* Handle stuff */
+ handle_stuff();
+ }
+ else /* move cursor to next stair and change panel */
+ {
+ y = temp_y[n];
+ x = temp_x[n];
+
+ dy = 2 * (y - cy) / hgt;
+ dx = 2 * (x - cx) / wid;
+ if (dy || dx) change_panel(dy, dx);
+ }
+ }
+ break;
+
default:
/* Look up the direction */
d = get_keymap_dir(ch);
else if (spell_exp < SPELL_EXP_MASTER) return EXP_LEVEL_EXPERT;
else return EXP_LEVEL_MASTER;
}
+
+
+/*
+ * Display a rumor and apply its effects
+ */
+
+int rumor_num(char *zz, int max_idx)
+{
+ if (strcmp(zz, "*") == 0) return randint1(max_idx - 1);
+ return atoi(zz);
+}
+
+cptr rumor_bind_name(char *base, cptr fullname)
+{
+ char *s, *v;
+
+ s = strstr(base, "{Name}");
+ if (s)
+ {
+ s[0] = '\0';
+ v = format("%s%s%s", base, fullname, (s + 6));
+ }
+ else
+ {
+ v = base;
+ }
+
+ return v;
+}
+
+void display_rumor(bool ex)
+{
+ bool err;
+ int section = 0;
+ char Rumor[1024];
+
+ if (ex)
+ {
+ if (randint0(3) == 0) section = 1;
+ }
+
+#ifdef JP
+ err = get_rnd_line_jonly("rumors_j.txt", section, Rumor, 10);
+ if (err) strcpy(Rumor, "±³¤Î±½¤â¤¢¤ë¡£");
+#else
+ err = get_rnd_line("rumors.txt", section, Rumor);
+ if (err) strcpy(Rumor, "Some rumors are wrong.");
+#endif
+
+ err = TRUE;
+
+ if (strncmp(Rumor, "R:", 2) == 0)
+ {
+ char *zz[4];
+ cptr rumor_msg = NULL;
+ cptr rumor_eff = NULL;
+ char fullname[1024] = "";
+
+ if (tokenize(Rumor + 2, 3, zz, TOKENIZE_CHECKQUOTE) == 3)
+ {
+ if (strcmp(zz[0], "ARTIFACT") == 0)
+ {
+ int a_idx, k_idx;
+ object_type forge;
+ object_type *q_ptr = &forge;
+ artifact_type *a_ptr;
+
+ while (1)
+ {
+ a_idx = rumor_num(zz[1], max_a_idx);
+
+ a_ptr = &a_info[a_idx];
+ if (a_ptr->name) break;
+ }
+
+ k_idx = lookup_kind(a_ptr->tval, a_ptr->sval);
+ object_prep(q_ptr, k_idx);
+ q_ptr->name1 = a_idx;
+ q_ptr->ident = IDENT_STORE;
+ object_desc(fullname, q_ptr, OD_NAME_ONLY);
+ }
+ else if (strcmp(zz[0], "MONSTER") == 0)
+ {
+ int r_idx;
+ monster_race *r_ptr;
+
+ while(1)
+ {
+ r_idx = rumor_num(zz[1], max_r_idx);
+ r_ptr = &r_info[r_idx];
+ if (r_ptr->name) break;
+ }
+
+ strcpy(fullname, r_name + r_ptr->name);
+
+ /* Remember this monster */
+ if (!r_ptr->r_sights)
+ {
+ r_ptr->r_sights++;
+ }
+ }
+ else if (strcmp(zz[0], "DUNGEON") == 0)
+ {
+ int d_idx;
+ dungeon_info_type *d_ptr;
+
+ while (1)
+ {
+ d_idx = rumor_num(zz[1], max_d_idx);
+ d_ptr = &d_info[d_idx];
+ if (d_ptr->name) break;
+ }
+
+ strcpy(fullname, d_name + d_ptr->name);
+
+ if (!max_dlv[d_idx])
+ {
+ max_dlv[d_idx] = d_ptr->mindepth;
+#ifdef JP
+ rumor_eff = format("%s¤Ëµ¢´Ô¤Ç¤¤ë¤è¤¦¤Ë¤Ê¤Ã¤¿¡£", fullname);
+#else
+ rumor_eff = format("You can recall to %s.", fullname);
+#endif
+ }
+ }
+ else if (strcmp(zz[0], "TOWN") == 0)
+ {
+ int t_idx;
+ s32b visit;
+
+ while(1)
+ {
+ t_idx = rumor_num(zz[1], NO_TOWN);
+ if (town[t_idx].name) break;
+ }
+
+ strcpy(fullname, town[t_idx].name);
+
+ visit = (1L << (t_idx - 1));
+ if ((t_idx != SECRET_TOWN) && !(p_ptr->visit & visit))
+ {
+ p_ptr->visit |= visit;
+#ifdef JP
+ rumor_eff = format("%s¤Ë¹Ô¤Ã¤¿¤³¤È¤¬¤¢¤ëµ¤¤¬¤¹¤ë¡£", fullname);
+#else
+ rumor_eff = format("You feel you have been to %s.", fullname);
+#endif
+ }
+ }
+
+ rumor_msg = rumor_bind_name(zz[2], fullname);
+ msg_print(rumor_msg);
+ if (rumor_eff)
+ {
+ msg_print(NULL);
+ msg_print(rumor_eff);
+ }
+ err = FALSE;
+ }
+ /* error */
+#ifdef JP
+ if (err) msg_print("¤³¤Î¾ðÊó¤Ï´Ö°ã¤Ã¤Æ¤¤¤ë¡£");
+#else
+ if (err) msg_print("This information is wrong.");
+#endif
+ }
+ else
+ {
+ msg_format("%s", Rumor);
+ }
+}
OSDN Git Service
