1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
#undef cquest
#define cquest (quest[QUEST_NAZGUL])
bool_ quest_nazgul_gen_hook(char *fmt)
{
int m_idx, x = 1, y = 1, tries = 10000;
s32b small;
small = get_next_arg(fmt);
if ((cquest.status != QUEST_STATUS_TAKEN) || (small) || (p_ptr->town_num != 1)) return (FALSE);
/* Find a good position */
while (tries)
{
/* Get a random spot */
y = randint(cur_hgt - 4) + 2;
x = randint(cur_wid - 4) + 2;
/* Is it a good spot ? */
/* Not in player los */
if ((!los(p_ptr->py, p_ptr->px, y, x)) && cave_empty_bold(y, x)) break;
/* One less try */
tries--;
}
/* Place the nazgul */
m_allow_special[test_monster_name("Uvatha the Horseman")] = TRUE;
m_idx = place_monster_one(y, x, test_monster_name("Uvatha the Horseman"), 0, FALSE, MSTATUS_ENEMY);
if (m_idx) m_list[m_idx].mflag |= MFLAG_QUEST;
m_allow_special[test_monster_name("Uvatha the Horseman")] = FALSE;
return FALSE;
}
bool_ quest_nazgul_finish_hook(char *fmt)
{
object_type forge, *q_ptr;
s32b q_idx;
q_idx = get_next_arg(fmt);
if (q_idx != QUEST_NAZGUL) return FALSE;
c_put_str(TERM_YELLOW, "I believe he will not come back! Thank you.", 8, 0);
c_put_str(TERM_YELLOW, "Some time ago a ranger gave me this.", 9, 0);
c_put_str(TERM_YELLOW, "I believe it will help you on your quest.", 10, 0);
q_ptr = &forge;
object_prep(q_ptr, lookup_kind(TV_FOOD, SV_FOOD_ATHELAS));
q_ptr->found = OBJ_FOUND_REWARD;
q_ptr->number = 6;
object_aware(q_ptr);
object_known(q_ptr);
q_ptr->ident |= IDENT_STOREB;
(void)inven_carry(q_ptr, FALSE);
/* End the plot */
*(quest[q_idx].plot) = QUEST_NULL;
del_hook(HOOK_QUEST_FINISH, quest_nazgul_finish_hook);
process_hooks_restart = TRUE;
return TRUE;
}
bool_ quest_nazgul_dump_hook(char *fmt)
{
if (cquest.status >= QUEST_STATUS_COMPLETED)
{
fprintf(hook_file, "\n You saved Bree from a dreadful Nazgul.");
}
return (FALSE);
}
bool_ quest_nazgul_forbid_hook(char *fmt)
{
s32b q_idx;
q_idx = get_next_arg(fmt);
if (q_idx != QUEST_NAZGUL) return (FALSE);
if (p_ptr->lev < 30)
{
c_put_str(TERM_WHITE, "I fear you are not ready for the next quest, come back later.", 8, 0);
return (TRUE);
}
return (FALSE);
}
bool_ quest_nazgul_death_hook(char *fmt)
{
s32b r_idx, m_idx;
m_idx = get_next_arg(fmt);
r_idx = m_list[m_idx].r_idx;
if (cquest.status != QUEST_STATUS_TAKEN) return (FALSE);
if (r_idx != test_monster_name("Uvatha the Horseman")) return (FALSE);
cquest.status = QUEST_STATUS_COMPLETED;
del_hook(HOOK_MONSTER_DEATH, quest_nazgul_death_hook);
process_hooks_restart = TRUE;
return (FALSE);
}
bool_ quest_nazgul_init_hook(int q_idx)
{
if ((cquest.status >= QUEST_STATUS_TAKEN) && (cquest.status < QUEST_STATUS_FINISHED))
{
add_hook(HOOK_MONSTER_DEATH, quest_nazgul_death_hook, "nazgul_death");
add_hook(HOOK_WILD_GEN, quest_nazgul_gen_hook, "nazgul_gen");
add_hook(HOOK_QUEST_FINISH, quest_nazgul_finish_hook, "nazgul_finish");
}
add_hook(HOOK_CHAR_DUMP, quest_nazgul_dump_hook, "nazgul_dump");
add_hook(HOOK_INIT_QUEST, quest_nazgul_forbid_hook, "nazgul_forbid");
return (FALSE);
}
|