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
129
130
131
132
|
-- Whats shops can buy what
store_buy_list
{
["General Store"] =
{
TV_CORPSE,
TV_FOOD,
TV_LITE,
TV_FLASK,
TV_SPIKE,
TV_SHOT,
TV_ARROW,
TV_BOLT,
TV_DIGGING,
TV_CLOAK,
TV_BOTTLE,
},
["Armoury"] =
{
TV_BOOTS,
TV_GLOVES,
TV_CROWN,
TV_HELM,
TV_SHIELD,
TV_CLOAK,
TV_SOFT_ARMOR,
TV_HARD_ARMOR,
TV_DRAG_ARMOR,
},
["Weaponsmith"] =
{
TV_SHOT,
TV_BOLT,
TV_ARROW,
TV_BOOMERANG,
TV_BOW,
TV_DIGGING,
TV_HAFTED,
TV_POLEARM,
TV_SWORD,
TV_AXE,
TV_MSTAFF,
},
-- We use a function because we want to restrict to blessed weapons and god spells
["Temple"] = function (obj)
if obj.tval == TV_DRUID_BOOK then return TRUE
elseif obj.tval == TV_BOOK and obj.sval == 255 and (can_spell_random(obj.pval) == SKILL_SPIRITUALITY) then return TRUE
elseif obj.tval == TV_SCROLL then return TRUE
elseif obj.tval == TV_POTION2 then return TRUE
elseif obj.tval == TV_POTION then return TRUE
elseif obj.tval == TV_HAFTED then return TRUE
elseif obj.tval == TV_POLEARM and is_blessed(obj) == TRUE then return TRUE
elseif obj.tval == TV_SWORD and is_blessed(obj) == TRUE then return TRUE
elseif obj.tval == TV_AXE and is_blessed(obj) == TRUE then return TRUE
elseif obj.tval == TV_BOOMERANG and is_blessed(obj) == TRUE then return TRUE
end
end,
["Alchemy shop"] =
{
TV_SCROLL,
TV_POTION2,
TV_POTION,
TV_BATERIE,
TV_BOTTLE,
},
-- We use a function because we dont want god spells
["Magic shop"] = function (obj)
local buy =
{
[TV_SYMBIOTIC_BOOK] = TRUE,
[TV_AMULET] = TRUE,
[TV_RING] = TRUE,
[TV_STAFF] = TRUE,
[TV_WAND] = TRUE,
[TV_ROD] = TRUE,
[TV_ROD_MAIN] = TRUE,
[TV_SCROLL] = TRUE,
[TV_POTION2] = TRUE,
[TV_POTION] = TRUE,
[TV_MSTAFF] = TRUE,
[TV_RANDART] = TRUE,
}
if obj.tval == TV_BOOK and obj.sval == 255 and (can_spell_random(obj.pval) == SKILL_MAGIC) then return TRUE
elseif obj.tval == TV_BOOK and obj.sval ~= 255 then return TRUE
elseif buy[obj.tval] == TRUE then return TRUE
end
end,
-- Black markets wants ALL!
["Black Market"] = function (obj)
return TRUE
end,
["Book Store"] =
{
TV_BOOK,
TV_SYMBIOTIC_BOOK,
TV_MUSIC_BOOK,
TV_DAEMON_BOOK,
TV_DRUID_BOOK,
},
["Pet Shop"] =
{
TV_EGG,
},
}
-- Take care to have Magic shop/Temple have specific spells only
add_hooks
{
[HOOK_STORE_STOCK] = function (index, name, level)
if name == "Magic shop" then
-- Books
if magik(20) == TRUE then
object_prep(obj_forge, lookup_kind(TV_BOOK, 255))
local spell = get_random_spell(SKILL_MAGIC, 20)
if spell > -1 then
obj_forge.pval = spell
return TRUE, obj_forge
end
end
elseif name == "Temple" then
if magik(20) == TRUE then
object_prep(obj_forge, lookup_kind(TV_BOOK, 255))
local spell = get_random_spell(SKILL_SPIRITUALITY, 20)
if spell > -1 then
obj_forge.pval = spell
return TRUE, obj_forge
end
end
end
end,
}
|