File: csim.lua

package info (click to toggle)
crawl 2%3A0.33.1-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 95,264 kB
  • sloc: cpp: 358,145; ansic: 27,203; javascript: 9,491; python: 8,359; perl: 3,327; java: 2,667; xml: 2,191; makefile: 1,830; sh: 611; objc: 250; cs: 15; sed: 9; lisp: 3
file content (29 lines) | stat: -rw-r--r-- 988 bytes parent folder | download | duplicates (6)
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
-- a crude constriction escape simulator

local niters = 10000
local mons = {  [1]="ball python",
                [5]="naga",
                [10]="naga_warrior",
                [15]="nagaraja",
                [23]="tentacled_monstrosity"
            }

for hd,mon in pairs(mons) do
    crawl.stderr(string.format("Against %s HD %d", mon, hd))
    crawl.stderr("| str |   1   |   2   |   3   |   4   |   5   |   6   |   7   |   8   |")
    for str = 3, 27, 3 do
        local line = string.format("|  %02d |", str)
        for turns = 1, 8 do
            local escape = 0
            for i = 1, niters do
                if crawl.roll_dice(4+turns, 8 + crawl.div_rand_round(str, 4))
                   >= crawl.roll_dice(5, 8 + crawl.div_rand_round(hd, 4)) then
                    escape = escape + 1
                end
            end
            line = line .. string.format(" %5.1f |", escape * 100 / niters)
        end
        crawl.stderr(line)
    end
    crawl.stderr("")
end