2009-10-27 18:49:26 [修正]
計算 (MARCO) function keisan(){
var dmy = document.F1.tanka;
if(dmy.length) {
for(i=0;i
var tan = eval(document.F1.tanka[i].value);
var sur = 0;
if(isNaN(document.F1.suryo[i].value)==false){
sur = eval(document.F1.suryo[i].value);
sur = Math.round(sur * 100);
sur = sur / 100;
document.F1.suryo[i].value = sur;
}
var kot = 0;
if(isNaN(document.F1.koutu[i].value)==false){
kot = eval(document.F1.koutu[i].value);
}
var cho = 0;
if(isNaN(document.F1.chosei[i].value)==false){
cho = eval(document.F1.chosei[i].value);
}
var war = eval(document.F1.waribiki[i].value);
var bur = eval(document.F1.buritu[i].value);
var wrk = (tan * sur - war) * bur;
document.F1.kingaku[i].value = Math.ceil(wrk);
var kei = eval(document.F1.kingaku[i].value) + kot + cho;
if(document.F1.zeikbn[i].value==0){
kin = Math.ceil(kei * 100 / 105);
zei = kei - kin;
}else{
kin = kei;
zei = parseInt(kei*0.05);
}
document.F1.siharai[i].value = kin;
document.F1.syohizei[i].value = zei;
}
} else {
var tan = eval(document.F1.tanka.value);
var sur = 0;
if(isNaN(document.F1.suryo.value)==false){
sur = eval(document.F1.suryo.value);
sur = Math.round(sur * 100);
sur = sur / 100;
document.F1.suryo.value = sur;
}
var kot = 0;
if(isNaN(document.F1.koutu.value)==false){
kot = eval(document.F1.koutu.value);
}
var cho = 0;
if(isNaN(document.F1.chosei.value)==false){
cho = eval(document.F1.chosei.value);
}
var war = eval(document.F1.waribiki.value);
var bur = eval(document.F1.buritu.value);
var wrk = (tan * sur - war) * bur;
document.F1.kingaku.value = Math.ceil(wrk);
var kei=eval(document.F1.kingaku.value) + kot + cho;
if(document.F1.zeikbn.value==0){
kin = Math.ceil(kei * 100 / 105);
zei = kei - kin;
}else{
kin = kei;
zei = parseInt(kei*0.05);
}
document.F1.siharai.value = kin;
document.F1.syohizei.value = zei;
}
}