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
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
|
------------------------------------------------------------------------------
-- lm_timed.lua:
-- Lua timed map feature markers.
------------------------------------------------------------------------------
crawl_require('dlua/lm_tmsg.lua')
crawl_require('dlua/lm_1way.lua')
TimedMarker = util.subclass(OneWayStair)
TimedMarker.CLASS = "TimedMarker"
function TimedMarker:new(props)
props = props or { }
local tmarker = OneWayStair.new(self, props)
if not props.msg then
error("No messaging object provided (msg = nil)")
end
props.high = props.high or props.low or props.turns or 1
props.low = props.low or props.high or props.turns or 1
props.high_short = props.high_short or props.low_short or props.turns_short or
props.high/10 or 1
props.low_short = props.low_short or props.high_short or props.turns_short or
props.low/10 or 1
local dur = crawl.random_range(props.low, props.high, props.navg or 1)
local dur_short = crawl.random_range(props.low_short, props.high_short,
props.navg or 1)
if fnum == dgn.feature_number('unseen') then
error("Bad feature name: " .. feat)
end
tmarker.started = false
tmarker.dur = dur * 10
tmarker.dur_short = dur_short * 10
if props.single_timed then
-- Disable LOS timer by setting it as long as the primary timer.
tmarker.dur_short = tmarker.dur
end
tmarker.msg = props.msg
props.msg = nil
return tmarker
end
function TimedMarker:activate(marker, verbose)
self.super.activate(self, marker, verbose)
self.msg:init(self, marker, verbose)
dgn.register_listener(dgn.dgn_event_type('entered_level'), marker)
dgn.register_listener(dgn.dgn_event_type('player_los'), marker, marker:pos())
dgn.register_listener(dgn.dgn_event_type('turn'), marker)
end
function TimedMarker:property(marker, pname)
return self.super.property(self, marker, pname)
end
function TimedMarker:start()
if not self.started then
self.started = true
end
end
function TimedMarker:start_short(marker)
self:start()
if self.dur_short < self.dur then
self.dur = self.dur_short
end
end
function TimedMarker:disappear(marker, x, y)
dgn.remove_listener(marker)
self.super.disappear(self, marker, x, y)
end
function TimedMarker:timeout(marker, verbose)
local x, y = marker:pos()
local yx, yy = you.pos()
if x == yx and y == yy and you.taking_stairs() then
if verbose then
crawl.mpr( dgn.feature_desc_at(x, y, "The") .. " vanishes " ..
"just as you enter it!")
return
end
end
if verbose then
if you.see_cell(marker:pos()) then
crawl.mpr( util.expand_entity(self.props.entity, self.props.disappear) or
dgn.feature_desc_at(x, y, "The") .. " disappears!")
else
crawl.mpr("The walls and floor vibrate strangely for a moment.")
end
end
self:disappear(marker, x, y)
end
function TimedMarker:event(marker, ev)
if self.super.event(self, marker, ev) then
return true
end
self.ticktype = self.ticktype or dgn.dgn_event_type('turn')
if ev:type() == dgn.dgn_event_type('entered_level') then
self:start()
self.msg:event(self, marker, ev)
elseif ev:type() == dgn.dgn_event_type('player_los') then
self:start_short(marker)
elseif ev:type() == self.ticktype then
self.dur = self.dur - ev:ticks()
self.msg:event(self, marker, ev)
if self.dur <= 0 then
self:timeout(marker, true)
return true
end
end
end
function TimedMarker:describe(marker)
local feat = self.props.floor or 'floor'
return feat .. "/" .. tostring(self.dur)
end
function TimedMarker:read(marker, th)
TimedMarker.super.read(self, marker, th)
self.started = file.unmarshall_boolean(th)
self.dur = file.unmarshall_number(th)
self.dur_short = file.unmarshall_number(th)
self.msg = lmark.unmarshall_marker(th)
setmetatable(self, TimedMarker)
return self
end
function TimedMarker:write(marker, th)
TimedMarker.super.write(self, marker, th)
file.marshall(th, self.started)
file.marshall(th, self.dur)
file.marshall(th, self.dur_short)
lmark.marshall_marker(th, self.msg)
end
function timed_marker(pars)
return TimedMarker:new(pars)
end
|
