Difference between revisions of "APC Houses Javascript code snippet"

Revision as of 19:13, 8 April 2016

<SCRIPT LANGUAGE="JavaScript">  function sector(n, ph, ecl, az) { var dasc, kv, a; kv = ATan(Tan(ph) * Tan(ecl) * Cos(az)/(1 + Tan(ph) * Tan(ecl) * Sin(az))); dasc = ATan(Sin(kv) / Tan(ph)); if (n<8) {a = kv + az + pi/2 + (n - 1) * (pi/2 - kv) / 3;} else {a = kv + az + pi/2 + (n - 13) * (pi/2 + kv) / 3;} return gra(ATan2(Tan(dasc) * Tan(ph) * Sin(az) + Sin(a), Cos(ecl) * (Tan(dasc) * Tan(ph) * Cos(az) + Cos(a)) + Sin(ecl) * Tan(ph) * Sin(az - a))); } // done hiding from old browsers --> </SCRIPT> </HEAD> <BODY onLoad="exampledata(); compute(document.form);"> <TABLE class="overlay" width="100%"> <TR><TD> <BR> <FORM NAME="form"> <UL> <H3> Enter the appropriate values here </H3> </UL> <FONT size="+1"> <PRE> G.Lat <INPUT TYPE="text" NAME="nPh" SIZE=20> <INPUT TYPE="button" VALUE=" Reset form " OnClick="resetform(this.form)"> E <INPUT TYPE="text" NAME="ne" SIZE=20> <INPUT TYPE="button" VALUE=" Example data " OnClick="exampledata(this.form); compute(this.form);"> ARMC <INPUT TYPE="text" NAME="naz" SIZE=20> <INPUT TYPE="button" VALUE=" Calculate " OnClick="compute(this.form)"> </PRE> </FONT> <UL> <H3> APC Cusps </H3> </UL> <FONT size="+1"> <PRE> 1 <INPUT TYPE="text" NAME="cusp1" SIZE=20> 7 <INPUT TYPE="text" NAME="cusp7" SIZE=20> 2 <INPUT TYPE="text" NAME="cusp2" SIZE=20> 8 <INPUT TYPE="text" NAME="cusp8" SIZE=20> 3 <INPUT TYPE="text" NAME="cusp3" SIZE=20> 9 <INPUT TYPE="text" NAME="cusp9" SIZE=20> 4 <INPUT TYPE="text" NAME="cusp4" SIZE=20> 10 <INPUT TYPE="text" NAME="cusp10" SIZE=20> 5 <INPUT TYPE="text" NAME="cusp5" SIZE=20> 11 <INPUT TYPE="text" NAME="cusp11" SIZE=20> 6 <INPUT TYPE="text" NAME="cusp6" SIZE=20> 12 <INPUT TYPE="text" NAME="cusp12" SIZE=20> </PRE> </FONT>

@@ Line 1: / Line 1: @@
 <html>
-<textarea columns=40 >
+<textarea columns="30" rows="40">
 <SCRIPT LANGUAGE="JavaScript">
 <!-- hide this script tag's contents from old browsers

Difference between revisions of "APC Houses Javascript code snippet"

Revision as of 19:13, 8 April 2016

Navigation menu

Personal tools

Namespaces

Variants

Views

More

Search

Navigation

Tools