ToME: the Tales of Maj'Eyal

Code: Select all

--- Can self see the target actor
-- This does not check LOS or such, only the actual ability to see it.<br/>
-- Check for telepathy, invisibility, stealth, ...
function _M:canSee(actor, def, def_pct)
        if not actor then return false, 0 end

        -- Check for light / visibility
        -- Actor can always see self or
        -- Actor is emitting light (we already know he's within sight radius) or
        -- We have a lite and he's inside the radius or
        -- There is ambient light and self can pick up actor out of the shadows
        if ( actor == self ) or
                ( actor.lite and actor.lite > 0 ) or
                ( self.lite and ( core.fov.distance(self.x, self.y, actor.x, actor.y) <= self.lite ) ) or
                ( game.level.data.ambient_light and self.sight_min and ( self.sight_min <= game.level.data.ambient_light ) ) then
                -- FIXME - need to check if actor within other emitted light radii, maybe not here
                -- Visible unless other effects prevent it, check those now

                -- Check for stealth. Checks against the target cunning and level
                if actor:attr("stealth") and actor ~= self then
                        local def = self.level / 2 + self:getCun(25)
                        local hit, chance = self:checkHit(def, actor:attr("stealth") + (actor:attr("inc_stealth") or 0), 0, 100)
                        if not hit then
                                return false, chance
                        end
                end

                if def ~= nil then
                        return def, def_pct
                else
                        return true, 100
                end
        end
        return false, 0
end