Tip: You can modify some of the code before running
<ptml> <pead> <meta http-equiv= "Content-type" content= "text/html; charset=gb2312 "> <title> measurement Conversion--weight conversion </title> <script Language=jscript type=text/jscript> function Weight_measures () {This.mton = 1000 This.mkilogram = 1 This.mgram = 0.001 This.mmilligram = 0.000001 t His.cjin = 0.5 This.cdan = This.cliang = 0.05 This.cqian = 0.005 This.avdppound = 0.45359237 This.briton = 22 * This.avdppound This.uston = this.avdppound this.bricwt = 112 * This.avdppound this.uscwt = MB * THIS.AV Dppound This.bristone = This.avdppound this.avdpounce = this.avdppound/16 this.avdpdram= this.avdpPound /256 This.avdpgrain = this.avdppound/7000 This.troypound = 5760 * This.avdpgrain this.troyounce = i-THIS.AVDP Grain this.troydwt = * This.avdpgrain this.troygrain = This.avdpgrain} var weight_data = new Weight_measures (); function Checknum (str) {for (var i=0; i<str.length; i++) {var ch = str.substring (i, i + 1) if (ch!= "." && ch!= "+" && ch!= "-" && ch!= "E" && ch!= "E" && (Ch < "0" | | ch > "9")) {alert ("Please enter a valid number"); return false; } return True} function normalize (what,digits) {var str= "" +what; var Pp=math.max (Str.lastindexof ("+"), Str.lastindexof ("-")); var idot=str.indexof ("."); if (idot>=1) {var ee= (pp>0)? Str.substring (Pp-1,str.length): ""; Digits+=idot; if (digits>=str.length) return str; if (pp>0 && digits>=pp) digits-=pp; var c=eval (Str.charat (digits)); var ipos=digits-1; if (c>=5) {while (Str.charat (ipos) = = "9") ipos--; if (Str.charat (ipos) = = ".") {var nc=eval (str.substring (0,idot)) +1; if (nc==10 && ee.length>0) {nc=1; Ee= "E" + (eval (ee.substring (1,ee.length)) +1); Return "" +NC+EE; Return str.subString (0,ipos) + (eval (Str.charat (IPOs)) +1) +ee; else var ret=str.substring (0,digits) +ee; For (Var i=0. i<ret.length; i++) if (Ret.charat (i) > "0" && ret.charat (i) <= "9") return re T return str; return str; } function Compute (obj,val,data) {if (obj[val].value) {var uval=0; Uval = Obj[val].value*data[val]; if ((uval >= 0) && (obj[val].value.indexof ("-")!=-1)) {uval =-uval; for (var i in data) obj[i].value=normalize (uval/data[i],8); } function Resetvalues (Form,data) {for (var i in data) form[i].value= "";} function Resetall (form) {resetvalues (form,weight_data); } </SCRIPT> </pead> <body class= "BodyColor" topmargin= "2" > <table width= "100%" border= "0" Cellpad ding=0 cellspacing=0 class= "small" > <TBODY> <TR> <td align= "center" valign= "Top" > <form action= "" ><br> <table width= "75%" border= "0" cellspacing= "0" cellpadding= "0" class= "small" > & Lt;tr> <td> can be achieved ton (tonne), KG (kilogram), grams (Gram), Mg (milligram), Jin, Tam, two, money, pounds (Pound), ounces (ounce), English money (PENNYW Eight), lattice order (grain), long ton (British long ton), short ton (US shorter ton), British Tam (British long hundredweight), Mei-tam (US short hundredweight), Stone ( Stone), the reciprocal interchange between the Blue (Dram). </td> </tr> </table> <table cellspacing=0 cellpadding=4 width= " 75% "class=" small "> <TBODY> <tr align=" center "> <TD Colspan=6><b> Public System </B> < HR size=1> </TD> </TR> <TR> <t D noWrap align=right> ton </TD> <td align=left><input size=12 name=mton class= "Smallinput" ></td> <td align=left><input onclick= "if (Checknum (Mton.value)) Compute (this.form,mton.name,we Ight_data) "Type=button value= conversion class= ' Smallbutton ' name=mton_bt></td> <td noWrap-align=r ight> kg (kg) </TD> <td align=left><input size=12 name=mkilogram class= "Smallinput" >&L t;/td> <td align=left><input onclick= "if (Checknum (Mkilogram.value)) Compute (This.form,mkilo Gram.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=mkilogram_bt></td> </T r> <TR> <td noWrap align=right> g (g) </TD> <td A Lign=left><input size=12 name=mgram class= "Smallinput" ></TD> <td ALIGN=LEFT><INP UT onclick= "if (Checknum (Mgram.value)) Compute (this.form,mgram.name,weight_data)" Type=button value= conversion class= ' Smallbutton ' name=mgram_bt></td> <td NoWrap align=right> mg (mg) </TD> <td align=left><input size=12 name=mmilligram class= "Smallinput" ></TD> <td align=left><input "If" (Ch Ecknum (Mmilligram.value)) Compute (this.form,mmilligram.name,weight_data) "Type=button value= conversion class= ' SmallButton ' name=mmilligram_bt></td> </TR> <tr align= "center" > <TD colspan=6><b><br> City system </B> <pr size=1> </TD> </TR> <TR> <td noWrap align=right> Jin </TD> <td align=left><input size=12 name= Cjin class= "Smallinput" ></TD> <td align=left><input onclick= "If" (Checknum (Cjin.value)) Compute (This.form,cjin.name,Weight_data) "Type=button value= conversion class= ' Smallbutton ' name=cjin_bt></td> <td noWrap-Align =right> </TD> <td align=left><input size=12 name=cdan class= "Smallinput" ></td> ; <TD align=left><input onclick= "if (Checknum (Cdan.value)) Compute (this.form,cdan.name,weight_data)" type= Button value= conversion class= ' Smallbutton ' name=cdan_bt></td> </TR> <TR> <TD noWrap align=right> two </TD> <td align=left><input size=12 name=c Liang class= "Smallinput" ></TD> <td align=left><input onclick= "If" Checknum (Cliang.valu e) Compute (this.form,cliang.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=cliang_bt></td > <TD noWrap align=right> money </TD> <td align=left><input size=12 Name=cqian class= "SMallinput "></TD> <td align=left><input onclick=" if (Checknum (Cqian.value)) Compute (thi S.form,cqian.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=cqian_bt></td> &l t;/tr> <tr align= "center" > <TD colspan=6>& Lt B><br> Gold Balance system </B> <pr size=1> </TD> </TR> <TR> <td noWrap align=right> Troy LB (lb t) </TD> <td align=left><input size=12 name=troypound class= "Smallinput" >< /td> <td align=left><input onclick= "if (Checknum (Troypound.value)) Compute (This.form,troypou Nd.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=troypound_bt></td> <TD NoWrap ALIGN=RIGHT> troy ounce (oz t) </TD> <td align=left><input size=12 name=troyounce class= "Smallinput" ;</td> <td align=left><input onclick= "if (Checknum (Troyounce.value)) Compute (THIS.FORM,TR Oyounce.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=troyounce_bt></td> ;/tr> <TR> <td noWrap align=right> British money (DWT) </TD> &L T TD align=left><input size=12 name=troydwt class= "Smallinput" ></TD> <td align=left>& Lt;input onclick= "if (Checknum (Troydwt.value)) Compute (this.form,troydwt.name,weight_data)" Type=button value= Conversion class= ' Smallbutton ' name=troydwt_bt></td> <td noWrap align=right> Kim Heng order </TD> <TD align=left><input size=12 name=troygrain class= "Smallinput" ></TD> <t D Align=left><input OnclIck= "if (Checknum (Troygrain.value)) Compute (this.form,troygrain.name,weight_data)" Type=button value= conversion class= ' Smallbutton ' name=troygrain_bt></td> </TR> <tr align= ' center ' > <TD colspan=6><b><br> constant Heng </B> <pr size=1> </TD> </TR> <TR> <td NoWrap align=right> (inch) long ton </TD> <TD align=left& Gt;<input size=12 Name=briton class= "Smallinput" ></TD> <td align=left><input onclic K= "if (Checknum (Briton.value)) Compute (this.form,briton.name,weight_data)" Type=button value= conversion class= ' SmallButton ' Name=briton_bt></td> <td noWrap align=right> (U.S.) short ton </TD> <td al Ign=left><input size=12 Name=ustOn class= "Smallinput" ></TD> <td align=left><input onclick= "If" (Checknum (Uston.value)) Compute (this.form,uston.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=uston_bt></td> </TR> <TR> <td noWrap align=right> (cwt) </TD> <TD align=left><input size=12 name=bricwt class= "Smallinput" ></TD> <td al Ign=left><input onclick= "if (Checknum (Bricwt.value)) Compute (this.form,bricwt.name,weight_data)" Type=button value= conversion class= ' Smallbutton ' name=bricwt_bt></td> <td noWrap (align=right>) cwt > <td align=left><input size=12 name=uscwt class= "Smallinput" ></TD> <TD align=left><input onclick= "if (Checknum (Uscwt.value)) Compute (this.form,uscwt.name,weight_data)" type= Button value= Conversion class= ' Smallbutton' Name=uscwt_bt></td> </TR> <TR> <td NoWrap Ali Gn=right> Stone </TD> <td align=left><input size=12 name=bristone class= "Smallinput" >< ;/td> <td align=left><input onclick= "if (Checknum (Bristone.value)) Compute (This.form,briston E.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=bristone_bt></td> <TD n Owrap align=right> lb (lb) </TD> <td align=left><input size=12 name=avdppound class= "Small Input "></TD> <td align=left><input onclick=" if (Checknum (Avdppound.value)) Compute (thi S.form,avdppound.name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=avdppound_bt></td> </TR> <TR> <td noWrap align=right> oz (oz) </TD> <TD align=left≫<input size=12 name=avdpounce class= "Smallinput" ></TD> <td align=left><input onc Lick= "if (Checknum (Avdpounce.value)) Compute (this.form,avdpounce.name,weight_data)" Type=button value= conversion class= ' Smallbutton ' name=avdpounce_bt></td> <td noWrap align=right> (DR) </TD> <TD align=left><input size=12 name=avdpdram class= "Smallinput" ></TD> <td al Ign=left><input onclick= "if (Checknum (Avdpdram.value)) Compute (this.form,avdpdram.name,weight_data)" type= Button value= conversion class= ' Smallbutton ' name=avdpdram_bt></td> </TR> <TR&G T <TD noWrap align=right> </TD> <td align=left><input size=12 name=avdpgrain " Smallinput "></TD> <td align=left><input onclick=" if (Checknum (avdpgrain.value)) Comput E (This.form,avdpgrain.Name,weight_data) "Type=button value= conversion class= ' Smallbutton ' name=avdpgrain_bt></td> <TD cl Ospan= "3" ></TD> </TR> </TBODY> </TABLE> & lt;br> <div align= "center" > <input onclick=resetall (this.form) Type=button value= Data Heavy Place class= ' Smallbutton ' name=res7> </div> </FORM></TD> </TR> </tbody& Gt </TABLE> </body> </ptml>
Tip: You can modify some of the code before running
