#fuer gnuplot zum Selbstspielen...

#anpassen:
rmin=16
rmax=300




#bleibt so:

vorwiderstand=sqrt(rmin * rmax)
u=1.0
i(r) = u / (r + vorwiderstand)
u(r) = i(r) * r
p(r) = i(r) * u(r)
pmax=p(vorwiderstand)
rel_leistung_db(x)=10*log(p(x)/pmax)



ttt=sprintf("Vorwiderstand %.2f Ohm\nLast %.2f bis %.2f Ohm", vorwiderstand, rmin, rmax)
set title ttt
set xlabel 'Last in Ohm'
set ylabel 'rel. Leistung in dB'
set grid
set xrange[rmin:rmax]
set logscale x
set xtics (10, 16, 20, 30, 40, 50, 60, 70, 80, "" 90, 100, 120, 150, 200, 300)
#set xtics add 
set terminal svg
set output 'foo.svg'

plot rel_leistung_db(x) with lines notitle