function Button1_onclick() {

var work
var shiz
work = new Array(5);
shiz = new Array(5);

// 瓦種類  tile=瓦 work=労務(1=切妻・2=寄棟・3=入母屋・4=下棟付入母屋) shiz=資材(1=切妻・2=寄棟・3=入母屋・4=下棟付入母屋) 

// 陶器瓦
if (document.mainform.Radio1.checked) {
           tile=9750 ; 
           work[1]=8250 ; work[2]=9500 ; work[3]=9000 ; work[4]=11500 ;
           shiz[1]=1750 ; shiz[2]=2250 ; shiz[3]=2250 ; shiz[4]=3600 ;} 

// いぶし瓦
if (document.mainform.Radio2.checked) {
           tile=10750 ;
           work[1]=8250 ; work[2]=9500 ; work[3]=9000 ; work[4]=11500 ;
           shiz[1]=1750 ; shiz[2]=2250 ; shiz[3]=2250 ; shiz[4]=3600 ;} 
           
// トライ
if (document.mainform.Radio3.checked) {
           tile=9200 ;
           work[1]=7900 ; work[2]=8500 ; work[3]=8200 ; work[4]=8500 ;
           shiz[1]=2700 ; shiz[2]=2900 ; shiz[3]=2900 ; shiz[4]=2900 ;} 

// エスパニカ
if (document.mainform.Radio4.checked) {
           tile=12500 ;
           work[1]=9500 ; work[2]=11000 ; work[3]=10500 ; work[4]=11000 ;
           shiz[1]=2500 ; shiz[2]=2700 ; shiz[3]=2700 ; shiz[4]=2700 ;} 

// セラルーフ
if (document.mainform.Radio5.checked) {
           tile=6750 ;
           work[1]=5750 ; work[2]=7000 ; work[3]=6500 ; work[4]=7000 ;
           shiz[1]=1500 ; shiz[2]=1750 ; shiz[3]=1750 ; shiz[4]=1750 ;} 

tubo = document.mainform.Text1.value;

//　屋根形状 
if (document.mainform.Radio20.checked) { yane=1 ; tubo=tubo*1.4; } // 切妻
if (document.mainform.Radio21.checked) { yane=2 ; tubo=tubo*1.6; } // 寄棟
if (document.mainform.Radio22.checked) { yane=3 ; tubo=tubo*1.8; } // 入母屋
if (document.mainform.Radio23.checked) { yane=4 ; tubo=tubo*2.0; } // 入母屋下り付き


// 
var total=tile*tubo+shiz[yane]*tubo+work[yane]*tubo;


//　結果
document.mainform.Text2.value=Math.ceil(total);
document.mainform.Text3.value=Math.ceil(total+300000);

}

function window_onload() {


if(document.domain != "www.yamashiro-jp.com"){document.write("Violation of copyright .The making origin is sakurasystem.  http://www.sakurasystem.jp");}
}