User:CommanderC/mr.gp
# 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