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
117
118
119
120
121
122
123
124
125
126
127
128
|
#undef cquest
#define cquest (quest[QUEST_WOLVES])
bool quest_wolves_gen_hook(char *fmt)
{
int x, y, i;
int xstart = 2;
int ystart = 2;
if (p_ptr->inside_quest != QUEST_WOLVES) return FALSE;
/* Just in case we didnt talk the the mayor */
if (cquest.status == QUEST_STATUS_UNTAKEN)
cquest.status = QUEST_STATUS_TAKEN;
/* Start with perm walls */
for (y = 0; y < cur_hgt; y++)
{
for (x = 0; x < cur_wid; x++)
{
cave_set_feat(y, x, FEAT_PERM_SOLID);
}
}
dun_level = quest[p_ptr->inside_quest].level;
/* Set the correct monster hook */
set_mon_num_hook();
/* Prepare allocation table */
get_mon_num_prep();
init_flags = INIT_CREATE_DUNGEON;
process_dungeon_file(NULL, "wolves.map", &ystart, &xstart, cur_hgt, cur_wid, TRUE);
dungeon_flags2 |= DF2_NO_GENO;
/* Place some random wolves */
for (i = damroll(4, 4); i > 0; )
{
int flags;
y = rand_int(21) + 3;
x = rand_int(31) + 3;
flags = f_info[cave[y][x].feat].flags1;
if (!(flags & FF1_PERMANENT) && (flags & FF1_FLOOR))
{
place_monster_one(y, x, 196, 0, magik(50), MSTATUS_ENEMY);
--i;
}
}
/* Place some random wargs */
for (i = damroll(4, 4); i > 0; )
{
int flags;
y = rand_int(21) + 3;
x = rand_int(31) + 3;
flags = f_info[cave[y][x].feat].flags1;
if (!(flags & FF1_PERMANENT) && (flags & FF1_FLOOR))
{
place_monster_one(y, x, 257, 0, magik(50), MSTATUS_ENEMY);
--i;
}
}
process_hooks_restart = TRUE;
return TRUE;
}
bool quest_wolves_death_hook(char *fmt)
{
int i, mcnt = 0;
if (p_ptr->inside_quest != QUEST_WOLVES) return FALSE;
/* Process the monsters (backwards) */
for (i = m_max - 1; i >= 1; i--)
{
/* Access the monster */
monster_type *m_ptr = &m_list[i];
/* Ignore "dead" monsters */
if (!m_ptr->r_idx) continue;
if (m_ptr->status <= MSTATUS_ENEMY) mcnt++;
}
/* Nobody left ? */
if (mcnt <= 1)
{
quest[p_ptr->inside_quest].status = QUEST_STATUS_COMPLETED;
del_hook(HOOK_MONSTER_DEATH, quest_wolves_death_hook);
del_hook(HOOK_GEN_QUEST, quest_wolves_gen_hook);
process_hooks_restart = TRUE;
cmsg_print(TERM_YELLOW, "Lothlorien is safer now.");
return (FALSE);
}
return FALSE;
}
bool quest_wolves_finish_hook(char *fmt)
{
s32b q_idx;
q_idx = get_next_arg(fmt);
if (q_idx != QUEST_WOLVES) return FALSE;
c_put_str(TERM_YELLOW, "Thank you for killing the pack of wolves!", 8, 0);
c_put_str(TERM_YELLOW, "You can use the hut as your house as a reward.", 9, 0);
/* Continue the plot */
*(quest[q_idx].plot) = QUEST_SPIDER;
return TRUE;
}
bool quest_wolves_init_hook(int q_idx)
{
if ((cquest.status >= QUEST_STATUS_UNTAKEN) && (cquest.status < QUEST_STATUS_FINISHED))
{
add_hook(HOOK_MONSTER_DEATH, quest_wolves_death_hook, "wolves_monster_death");
add_hook(HOOK_QUEST_FINISH, quest_wolves_finish_hook, "wolves_finish");
add_hook(HOOK_GEN_QUEST, quest_wolves_gen_hook, "wolves_geb");
}
return (FALSE);
}
|