var base_price=[13358,4298,129,3696],
// 比重
gold=[19.13,18.43,17.61,17.49,16.03,15.44,14.84,14.39,13.94,13.59,12.91,12.6,12.29,11.86,11.42,11.22,10.91,10.5,10.3,10.09],
platinum=[21.24,19.84,18.61,17.53,16.56,15.70],
silver=[10.45,10.41,10.3,10.15,10.07,9.99,9.90,9.82,9.75,9.67],
palladium=[12.0,11.8],
metal_dim=[gold,platinum,silver,palladium],
// レート
gold_rate=[0.95,0.75,0.75,0.75,0.75,0.70,0.70,0.45,0.45,0.45,0.45,0.3,0.25,0.2,0.1,0,0,0,0,0],
platinum_rate=[0.95,0.9,0.8,0.8,0.7,0.6],
silver_rate=[0.95,0.75,0.70,0.45,0.45,0.45,0.4,0.3,0.1,0.1],
palladium_rate=[0.95,0.75],
rate_dim=[gold_rate,platinum_rate,silver_rate,palladium_rate],
// 素材名
metal_name=["Gold","Platinum","Silver","Palladium"],
gold_name=["K24 Au1000","K23 Au965","K22 Au916","K21 Au900","K20 Au835","K19 Au793","K18 Au750","K17 Au705","K16 Au666","K15 Au625","K14 Au585","K13 Au543","K12 Au500","K11 Au458","K10 Au416","K9 Au375","K8 Au333","K7 Au292","K6 Au251","K5 Au210"],
platinum_name=["Pt1000","Pt950","Pt900","Pt850","Pt800","Pt700"],
silver_name=["Sv1000","Sv950","Sv925","Sv800","Sv750","Sv700","Sv650","Sv600","Sv550","Sv500"],
palladium_name=["Pd1000","Pd950"],
name_dim=[gold_name,platinum_name,silver_name,palladium_name];
function $(n){return document.getElementById(n);}
function pmols(){
$("pm_main").className="fadein";
$("pm_main").style.visibility="visible";
// セレクトメニュー
var n="";
}
function calc(){
var sg="0.00",rate=0,base=0,
mt=$("metal_type").value, // 種別
wt=$("weight").value, // 重量値
vl=$("volume"), // 体積
vol=vl.value, // 体積値
spg=$("specific_gravity"), // 比重
dig=$("dignity"); // 品位
dig.value="Unknown";
if(isNaN(wt)||wt<0){$("weight").value="0.00";}
if(isNaN(vol)||vol<0){vl.value="0.00";}
if(mt<100){
// 体積のマニュアル入力モード
vl.style.backgroundColor="";
if(wt>0&&vol>0){sg=~~((wt/vol)*100)/100;} // 比重の算出(小数点第2位で切り捨て)
spg.value=sg;
}else{
// 比重の自動入力モード
vl.style.backgroundColor="dimgray";
vl.value="0.00";
for(m=0;m<4;m++){
var mn=metal_dim[m]
for(i=0;im*100+99){
var mn=metal_dim[m];
for(i=mr.length;i>=0;i--){
if(sg>=mn[i]&&sg<=mn[0]+0.5){dig.value=name_dim[m][i];rate=mr[i];}
}
base=base_price[m];
}
}
$("purchase_price").value=~~(base*rate*wt);
$("market_price").value=~~(base/0.8*wt);// 市場値を算出
}