CGI : Info : Java Code : Preview : Tip & Technic
<!-- TWO STEPS TO INSTALL ARMOR PENETRATION CALCULATOR : 1. Paste the specified coding into the HEAD of the HTML document 2. Put the last code into the BODY of your HTML document --> <!-- STEP ONE: Copy this code into the HEAD your HTML document --> <HEAD> <SCRIPT LANGUAGE="JavaScript"> <!-- Original: Cut-N-Paste JavaScript from ISN Toolbox<!--Total Java Scripts 99 - Next Step Software--> <!-- Beginvar c1;var c2;var convert_to_degrees = (2*3.1415)/360.0;function compute_pen(c1,c2,r,ang) {if (is_number(r)) {new_pen = Math.pow((c1*Math.exp(-c2*range3)),0.7);if (is_number(ang)) {ang = parseInt(ang);ang = ang*convert_to_degrees;new_pen = new_pen*Math.pow(Math.cos(ang),1.5);}return Math.round(new_pen);} else {return ""; }}function is_number(a_string) {tc = a_string.charAt(0);if (tc == "0" || tc == "1" || tc == "2" || tc == "3" || tc == "4" || tc == "5" || tc == "6" || tc == "7" || tc == "8" || tc == "9") {return true;} else {return false; }}function compute_constants(form) {range1 =form.inputrange1.value;range2 =form.inputrange2.value;pen1 = form.pen1.value;pen2 =form.pen2.value;if (is_number(range1) && is_number(range2) && is_number(pen1) && is_number(pen2)) {range1 = parseInt(range1);range2 = parseInt(range2);pen1 = parseInt(pen1);pen2 = parseInt(pen2);ang1 = form.ang1.value;ang2 = form.ang2.value;if (is_number(ang1)) {ang1 = parseInt(ang1);ang1 = ang1 * convert_to_degrees;pen1 = pen1/Math.pow(Math.cos(ang1),1.5);}if (is_number(ang2)) {ang2 = parseInt(ang2);ang2 = ang2 * convert_to_degrees;pen2 = pen2/Math.pow(Math.cos(ang2),1.5);} c2 = Math.log(Math.pow(pen2,1.4286)/Math.pow(pen1,1.4286))/(-range2 + range1);temp = (range1*c2);c1 = Math.pow(pen1,1.4286) * Math.exp(temp);return true; } else {alert("You need to enter two different ranges and the penetration at those ranges.");return false; }}function armorpen(form) {if (compute_constants(form)) {range3 = form.computerange1.value;ang = form.c_ang_1.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen1.value = new_pen;range3 = form.computerange2.value;ang = form.c_ang_2.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen2.value = new_pen;range3 =form.computerange3.value;ang = form.c_ang_3.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen3.value = new_pen;range3 =form.computerange4.value;ang = form.c_ang_4.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen4.value = new_pen;range3 =form.computerange5.value;ang = form.c_ang_5.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen5.value = new_pen;range3 =form.computerange6.value;ang = form.c_ang_6.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen6.value = new_pen;range3 =form.computerange7.value;ang = form.c_ang_7.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen7.value = new_pen;range3 =form.computerange8.value;ang = form.c_ang_8.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen8.value = new_pen;range3 =form.computerange9.value;ang = form.c_ang_9.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen9.value = new_pen;range3 =form.computerange10.value;ang = form.c_ang_10.value;new_pen = compute_pen(c1,c2,range3,ang);form.computepen10.value = new_pen; }}// End --> </SCRIPT> <!-- STEP TWO: Copy this code into the BODY of your HTML document --> <BODY> <FORM> <H3>Gun Type</H3> <INPUT NAME="gunname" TYPE="text" SIZE="30"> <PRE> Range Penetration Angle</PRE> <INPUT NAME="inputrange1" TYPE="text" SIZE="10" VALUE = "500"> <INPUT NAME="pen1" TYPE="text" SIZE="10" > <INPUT NAME="ang1" TYPE="text" SIZE="10"> <BR> <INPUT NAME="inputrange2" TYPE="text" SIZE="10" VALUE = "1000"> <INPUT NAME="pen2" TYPE="text" SIZE="10" > <INPUT NAME="ang2" TYPE="text" SIZE="10"> <BR> <INPUT NAME="compute" TYPE="button" VALUE="Compute" onClick="armorpen(this.form)"> <BR> <HR> <INPUT NAME="computerange1" TYPE="text" SIZE="10" VALUE = "250"> <INPUT NAME="computepen1" TYPE="text" SIZE="10"> <INPUT NAME="c_ang_1" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange2" TYPE="text" SIZE="10" VALUE = "500"> <INPUT NAME="computepen2" TYPE="text" SIZE="10"> <INPUT NAME="c_ang_2" TYPE="text" SIZE="10"> <BR> <INPUT NAME="computerange3" TYPE="text" SIZE="10" VALUE = "750"> <INPUT NAME="computepen3" TYPE="text" SIZE="10"> <INPUT NAME="c_ang_3" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange4" TYPE="text" SIZE="10" VALUE = "1000"> <INPUT NAME="computepen4"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_4" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange5" TYPE="text" SIZE="10" VALUE = "1250"> <INPUT NAME="computepen5"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_5" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange6" TYPE="text" SIZE="10" VALUE = "1500"> <INPUT NAME="computepen6"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_6" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange7" TYPE="text" SIZE="10" VALUE = "1750"> <INPUT NAME="computepen7"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_7" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange8" TYPE="text" SIZE="10" VALUE = "2000"> <INPUT NAME="computepen8"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_8" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange9" TYPE="text" SIZE="10"> <INPUT NAME="computepen9"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_9" TYPE="text" SIZE="10"><BR> <INPUT NAME="computerange10" TYPE="text" SIZE="10"> <INPUT NAME="computepen10"TYPE="text" SIZE="10"> <INPUT NAME="c_ang_10" TYPE="text" SIZE="10"><BR> </FORM> <!-- Script Size: 5.69 KB -->
