<!--Copyright(C) by Takahito Yamada All rights reserved The original made by Taiji. Arranged by Takahito Yamada. -->
<!--
//
	var XX="変換前", YY="変換後", XXX=1, YYY=1;
//変換前
	function input(x){
		XX=x.value;
		if (XX=="mg") XXX=1/0.001;
		if (XX=="g") XXX=1/1;
		if (XX=="kg") XXX=1/1000;
		if (XX=="t") XXX=1/1000000;
//
		if (XX=="冢［東周］") XXX=1/12.6;
		if (XX=="寽［東周］") XXX=1/1260;
//
		if (XX=="銖［楚］") XXX=1/0.65;
		if (XX=="両［楚］") XXX=1/15.6;
		if (XX=="斤［楚］") XXX=1/250;
//
		if (XX=="銖［趙］") XXX=1/0.65;
		if (XX=="両［趙］") XXX=1/15.6;
		if (XX=="斤［趙］") XXX=1/250;
		if (XX=="石［趙］") XXX=1/30000;
//
		if (XX=="銖［魏・韓］") XXX=1/0.65;
		if (XX=="両［魏・韓］") XXX=1/15.6;
		if (XX=="釿［魏・韓］") XXX=1/31.5;
		if (XX=="斤［魏・韓］") XXX=1/250;
		if (XX=="鎰［魏・韓］") XXX=1/315;
//
		if (XX=="刀［中山］") XXX=1/12;
		if (XX=="石［中山］") XXX=1/9600;
//
		if (XX=="銖［秦］") XXX=1/0.69;
		if (XX=="両［秦］") XXX=1/15.8;
		if (XX=="斤［秦］") XXX=1/253;
		if (XX=="鈞［秦］") XXX=1/7590;
		if (XX=="石［秦］") XXX=1/30360;
//
		if (XX=="銖［前漢］") XXX=1/0.65;
		if (XX=="両［前漢］") XXX=1/15.5;
		if (XX=="斤［前漢］") XXX=1/248;
		if (XX=="鈞［前漢］") XXX=1/7440;
		if (XX=="石［前漢］") XXX=1/29760;
//
		if (XX=="銖［新］") XXX=1/0.62;
		if (XX=="両［新］") XXX=1/14.9;
		if (XX=="斤［新］") XXX=1/238;
		if (XX=="鈞［新］") XXX=1/7140;
		if (XX=="石［新］") XXX=1/28560;
//
		if (XX=="銖［後漢・三国・両晉］") XXX=1/0.57;
		if (XX=="両［後漢・三国・両晉］") XXX=1/13.8;
		if (XX=="斤［後漢・三国・両晉］") XXX=1/220;
		if (XX=="鈞［後漢・三国・両晉］") XXX=1/6600;
		if (XX=="石［後漢・三国・両晉］") XXX=1/26400;
//
		if (XX=="銖［南朝梁陳］") XXX=1/0.57;
		if (XX=="両［南朝梁陳］") XXX=1/13.8;
		if (XX=="斤［南朝梁陳］") XXX=1/220;
		if (XX=="鈞［南朝梁陳］") XXX=1/6600;
		if (XX=="石［南朝梁陳］") XXX=1/26400;
//
		if (XX=="銖［南朝齊］") XXX=1/0.859375;
		if (XX=="両［南朝齊］") XXX=1/20.625;
		if (XX=="斤［南朝齊］") XXX=1/330;
		if (XX=="鈞［南朝齊］") XXX=1/9900;
		if (XX=="石［南朝齊］") XXX=1/39600;
//
		if (XX=="銖［北魏・北齊］") XXX=1/1.14583;
		if (XX=="両［北魏・北齊］") XXX=1/27.5;
		if (XX=="斤［北魏・北齊］") XXX=1/440;
		if (XX=="鈞［北魏・北齊］") XXX=1/13200;
		if (XX=="石［北魏・北齊］") XXX=1/52800;
//
		if (XX=="銖［北周］") XXX=1/1.71875;
		if (XX=="両［北周］") XXX=1/41.25;
		if (XX=="斤［北周］") XXX=1/660;
		if (XX=="鈞［北周］") XXX=1/19800;
		if (XX=="石［北周］") XXX=1/79200;
//
		if (XX=="銖（開皇）［隋（大）］") XXX=1/1.72083;
		if (XX=="両（開皇）［隋（大）］") XXX=1/41.3;
		if (XX=="斤（開皇）［隋（大）］") XXX=1/661;
		if (XX=="鈞（開皇）［隋（大）］") XXX=1/19830;
		if (XX=="石（開皇）［隋（大）］") XXX=1/79300;
//
		if (XX=="銖（大業）［隋（小）］") XXX=1/0.57;
		if (XX=="両（大業）［隋（小）］") XXX=1/13.8;
		if (XX=="斤（大業）［隋（小）］") XXX=1/220;
		if (XX=="鈞（大業）［隋（小）］") XXX=1/6600;
		if (XX=="石（大業）［隋（小）］") XXX=1/26400;
//
		if (XX=="分［唐］") XXX=1/0.41;
		if (XX=="銭［唐］") XXX=1/4.13;
		if (XX=="両［唐］") XXX=1/41.3;
		if (XX=="斤［唐］") XXX=1/661;
		if (XX=="石［唐］") XXX=1/79320;
//
		if (XX=="分［宋・遼・金・西夏・元］") XXX=1/0.4;
		if (XX=="銭［宋・遼・金・西夏・元］") XXX=1/4;
		if (XX=="両［宋・遼・金・西夏・元］") XXX=1/40;
		if (XX=="斤［宋・遼・金・西夏・元］") XXX=1/633;
		if (XX=="石［宋・遼・金・西夏・元］") XXX=1/75960;
//
		if (XX=="分［明］") XXX=1/0.37;
		if (XX=="銭［明］") XXX=1/3.69;
		if (XX=="両［明］") XXX=1/36.9;
		if (XX=="斤［明］") XXX=1/590;
		if (XX=="石［明］") XXX=1/70800;
//
		if (XX=="分［清］") XXX=1/0.37;
		if (XX=="銭［清］") XXX=1/3.7;
		if (XX=="両［清］") XXX=1/37.3;
		if (XX=="斤［清］") XXX=1/596.8;
		if (XX=="石［清］") XXX=1/71616;
//
		if (XX=="斤［中華民国］") XXX=1/500;
		if (XX=="銭［中華民国］") XXX=1/3.13;
		if (XX=="両［中華民国］") XXX=1/31.25;
		if (XX=="公斤（kg）［中華民国］") XXX=1/1000;
//
		if (XX=="市銭［中華人民共和国］") XXX=1/5;
		if (XX=="市両［中華人民共和国］") XXX=1/50;
		if (XX=="市斤［中華人民共和国］") XXX=1/500;
//変換後
	}
	function output(y){
		YY=y.value;

		if (YY=="mg") YYY=1/0.001;
		if (YY=="g") YYY=1/1;
		if (YY=="kg") YYY=1/1000;
		if (YY=="t") YYY=1/1000000;
//
		if (YY=="冢［東周］") YYY=1/12.6;
		if (YY=="寽［東周］") YYY=1/1260;
//
		if (YY=="銖［楚］") YYY=1/0.65;
		if (YY=="両［楚］") YYY=1/15.6;
		if (YY=="斤［楚］") YYY=1/250;
//
		if (YY=="銖［趙］") YYY=1/0.65;
		if (YY=="両［趙］") YYY=1/15.6;
		if (YY=="斤［趙］") YYY=1/250;
		if (YY=="石［趙］") YYY=1/30000;
//
		if (YY=="銖［魏・韓］") YYY=1/0.65;
		if (YY=="両［魏・韓］") YYY=1/15.6;
		if (YY=="釿［魏・韓］") YYY=1/31.5;
		if (YY=="斤［魏・韓］") YYY=1/250;
		if (YY=="鎰［魏・韓］") YYY=1/315;
//
		if (YY=="刀［中山］") YYY=1/12;
		if (YY=="石［中山］") YYY=1/9600;
//
		if (YY=="銖［秦］") YYY=1/0.69;
		if (YY=="両［秦］") YYY=1/15.8;
		if (YY=="斤［秦］") YYY=1/253;
		if (YY=="鈞［秦］") YYY=1/7590;
		if (YY=="石［秦］") YYY=1/30360;
//
		if (YY=="銖［前漢］") YYY=1/0.65;
		if (YY=="両［前漢］") YYY=1/15.5;
		if (YY=="斤［前漢］") YYY=1/248;
		if (YY=="鈞［前漢］") YYY=1/7440;
		if (YY=="石［前漢］") YYY=1/29760;
//
		if (YY=="銖［新］") YYY=1/0.62;
		if (YY=="両［新］") YYY=1/14.9;
		if (YY=="斤［新］") YYY=1/238;
		if (YY=="鈞［新］") YYY=1/7140;
		if (YY=="石［新］") YYY=1/28560;
//
		if (YY=="銖［後漢・三国・両晉］") YYY=1/0.57;
		if (YY=="両［後漢・三国・両晉］") YYY=1/13.8;
		if (YY=="斤［後漢・三国・両晉］") YYY=1/220;
		if (YY=="鈞［後漢・三国・両晉］") YYY=1/6600;
		if (YY=="石［後漢・三国・両晉］") YYY=1/26400;
//
		if (YY=="銖［南朝梁陳］") YYY=1/0.57;
		if (YY=="両［南朝梁陳］") YYY=1/13.8;
		if (YY=="斤［南朝梁陳］") YYY=1/220;
		if (YY=="鈞［南朝梁陳］") YYY=1/6600;
		if (YY=="石［南朝梁陳］") YYY=1/26400;
//
		if (YY=="銖［南朝齊］") YYY=1/0.859375;
		if (YY=="両［南朝齊］") YYY=1/20.625;
		if (YY=="斤［南朝齊］") YYY=1/330;
		if (YY=="鈞［南朝齊］") YYY=1/9900;
		if (YY=="石［南朝齊］") YYY=1/39600;
//
		if (YY=="銖［北魏・北齊］") YYY=1/1.14583;
		if (YY=="両［北魏・北齊］") YYY=1/27.5;
		if (YY=="斤［北魏・北齊］") YYY=1/440;
		if (YY=="鈞［北魏・北齊］") YYY=1/13200;
		if (YY=="石［北魏・北齊］") YYY=1/52800;
//
		if (YY=="銖［北周］") YYY=1/1.71875;
		if (YY=="両［北周］") YYY=1/41.25;
		if (YY=="斤［北周］") YYY=1/660;
		if (YY=="鈞［北周］") YYY=1/19800;
		if (YY=="石［北周］") YYY=1/79200;
//
		if (YY=="銖（開皇）［隋（大）］") YYY=1/1.72083;
		if (YY=="両（開皇）［隋（大）］") YYY=1/41.3;
		if (YY=="斤（開皇）［隋（大）］") YYY=1/661;
		if (YY=="鈞（開皇）［隋（大）］") YYY=1/19830;
		if (YY=="石（開皇）［隋（大）］") YYY=1/79300;
//
		if (YY=="銖（大業）［隋（小）］") YYY=1/0.57;
		if (YY=="両（大業）［隋（小）］") YYY=1/13.8;
		if (YY=="斤（大業）［隋（小）］") YYY=1/220;
		if (YY=="鈞（大業）［隋（小）］") YYY=1/6600;
		if (YY=="石（大業）［隋（小）］") YYY=1/26400;
//
		if (YY=="分［唐］") YYY=1/0.41;
		if (YY=="銭［唐］") YYY=1/4.13;
		if (YY=="両［唐］") YYY=1/41.3;
		if (YY=="斤［唐］") YYY=1/661;
		if (YY=="石［唐］") YYY=1/79320;
//
		if (YY=="分［宋・遼・金・西夏・元］") YYY=1/0.4;
		if (YY=="銭［宋・遼・金・西夏・元］") YYY=1/4;
		if (YY=="両［宋・遼・金・西夏・元］") YYY=1/40;
		if (YY=="斤［宋・遼・金・西夏・元］") YYY=1/633;
		if (YY=="石［宋・遼・金・西夏・元］") YYY=1/75960;
//
		if (YY=="分［明］") YYY=1/0.37;
		if (YY=="銭［明］") YYY=1/3.69;
		if (YY=="両［明］") YYY=1/36.9;
		if (YY=="斤［明］") YYY=1/590;
		if (YY=="石［明］") YYY=1/70800;
//
		if (YY=="分［清］") YYY=1/0.37;
		if (YY=="銭［清］") YYY=1/3.7;
		if (YY=="両［清］") YYY=1/37.3;
		if (YY=="斤［清］") YYY=1/596.8;
		if (YY=="石［清］") YYY=1/71616;
//
		if (YY=="斤［中華民国］") YYY=1/500;
		if (YY=="銭［中華民国］") YYY=1/3.13;
		if (YY=="両［中華民国］") YYY=1/31.25;
		if (YY=="公斤（kg）［中華民国］") YYY=1/1000;
//
		if (YY=="市銭［中華人民共和国］") YYY=1/5;
		if (YY=="市両［中華人民共和国］") YYY=1/50;
		if (YY=="市斤［中華人民共和国］") YYY=1/500;

//
//実際の換算部分
	}
	function keisan(f){
		if (f.s.value=="")
			alert("入力されていません。");
		else {
		if (isNaN(f.s.value))
			alert("半角で数値を入力して下さい。");
		else {
		SS=eval("f.s.value");
		ZZZ=YYY/XXX*SS;
		if (ZZZ==0) k=0;
		else {
		h=Math.log(Math.abs(ZZZ))*Math.LOG10E;
		i=3-Math.round(h);
//		i=3-Math.floor(h);
		j=ZZZ*Math.pow(10,i);
		k=Math.round(j)/Math.pow(10,i);
		}
		f.result.value=f.s.value+" "+XX+" ＝ "+k+" "+YY;
		}
		}
	}
//-->