Method code for $climate.advance()

[Turn on line numbering]

---

arg current, season, dependancies;
var dists, i, w, d, fuzz;

fuzz = 3;
dists = ._probabilities(current, season, fuzz);
dists = dists.sort(dists.slice(2));
for i in (dependancies) {
    d = i[1].get_setting("weather-time", $realm);
    dists += i[2] * d[3]._probabilities(d[1], d[2], fuzz) / 100;
}
w = random(10000);
i = 1;
d = 0;
while (i <= dists.length() && (d += dists[i][2]) < w)
    i++;
if (i > dists.length())
    i--;
return dists[i][1];

// $#Edited: 14 Oct 97 17:31 $miro
// $#Edited: 24 Jan 02 21:16 $brandon

---

["// Miroslav Silovic ", "// Created 12-Aug-1996 as a part of ColdCore, see: @help Credit"]