//Copyright 1999 mhSoft
//berechne frequenzkurve
//
function gfreqcurve()
{
BS_breit = screen.width;
arr=new Array(40);
if((eval(document.ber.vb.value.length) == 0 ) ||
(eval(document.ber.fb.value.length) == 0 ) ||
(eval(document.ber.qts.value.length) == 0 ) ||
(eval(document.ber.fs.value.length) == 0 ) ||
(eval(document.ber.vas.value.length) == 0 )) { alert("een van de velden is niet ingevuld...");
//(eval(document.ber.ql.value.length) == 0 )) { alert("een van de velden is niet ingevuld...");
}
else
{
fvb = eval(document.ber.vb.value);
ffb = (eval(document.ber.fb.value));
fqts = (eval(document.ber.qts.value));
ffs = (eval(document.ber.fs.value));
fvas = (eval(document.ber.vas.value));
fql = 7; //(eval(document.ber.ql.value));
start = 10;
stop = 205;
stap = 5;
a = (ffb / ffs) * (ffb / ffs);
b = (a / fqts) + (ffb / (fql * ffs));
c = 1 + a +(ffb / (fql * (ffs * fqts))) + (fvas / fvb)
d = (1 / fqts) + (ffb / (fql * ffs));
i = 1;
for (var zaehler=start/stap; zaehler <=stop/stap; zaehler++)
{
ffs2=ffs;
w = zaehler*stap / ffs2;
u = w * w;
x = u * u;
e = x / Math.sqrt((x - c * u + a) * (x - c * u + a) + (b * w - d * u * w) * (b * w - d * u * w));
e = 20 * Math.log(e)/Math.LN10;
db = e;
freq = zaehler*stap;
//convert num to string
freq = freq.toString();
freq = freq.substring(0,5);
tekst = e;
tekst = tekst.toString();
tekst = tekst.substring(0,5);
e = tekst;
arr[i]=e;
i = i + 1;
}
breite = screen.width;
hoehe = screen.height;
xpos = ((breite - 640)/2);
ypos = ((hoehe - 320)/2);
Para = 'WIDTH=640,HEIGHT=360,screenX='+xpos+',screenY='+ypos+',status=yes,toolbar=no,menubar=no,scrollbars=no';
myWin=open('','newWindow',Para);
myWin.document.open();
myWin.document.write('Frequency Response');
myWin.document.write('');
myWin.document.write('');
myWin.document.write('');
myWin.document.write('
Close Window');
myWin.document.write('
');
myWin.document.write('');
myWin.document.write('');
}
}