User:CommanderC/mr.gp

From CrawlWiki
Jump to: navigation, search

# Magic resistance saving throw
a=100.0
f(x)= x<0? x/(a*a)+1/a : (-1)*x/(a*a)+1/a
fdist(x)= x<0 ? x*x/(2*a*a)+x/a+1/2.0 : 1/2.0 - x*x/(2*a*a) + x/a
set key off
set grid
set xtics a/10
set ytics 0.1
set xlabel "Enchantment power - MR"
set ylabel "Success probability"
#plot [-a:a] [0:1/a] f(x)
set term png
set output "magic_resistance.png"
plot [-a:a] [0:1] fdist(x) lw 2
#pause -1