https://www.tcconsulting.co.jp/cvc/js/alliance.js

1var scr1 = [];
2var scr2 = [];
3var ara1 = [];
4var ara2 = [];
5var ara_wei = []
6var ara1_wval = []
7var ara2_wval = []
8var ara_sum;
9var mtv1 = 100;
10var mtv2 = 100;
11var mtv1_wval = []
12var mtv2_wval = []
13var mtv_min = [0.8, 0.6, 0.4];
14var mtv_max = [1.2, 1.4, 1.6];
15var add_scl = 3;
16var rslt;
17var comp_value, comp_max, comp_ratio; // 相互補完強度
18var add_value, add_max, add_ratio; // 加算値
19var mul_value = []; // 加算相乗値
20var mul_max = [];
21var mul_ratio = [];
22
23function get_input(){
24  var i;
25  
26  // get scores
27  for(i=0; i<8; i++){
28    scr1[i] = document.getElementById("score1"+(i+1)).value;
29    scr2[i] = document.getElementById("score2"+(i+1)).value;
30  }
31  
32  // get areas
33  ara_sum = 0;
34  ara_max = 0;
35  for(i=0; i<7; i++){
36    ara1[i] = 0;
37    ara2[i] = 0;
38    if(document.getElementById("area1"+(i+1)).checked) {ara1[i] = 1};
39    if(document.getElementById("area2"+(i+1)).checked) {ara2[i] = 1};
40    ara_wei[i] = document.getElementById("weight"+(i+1)).value;
41    ara1_wval[i] = ara1[i] * ara_wei[i];
42    ara2_wval[i] = ara2[i] * ara_wei[i];
43    ara_sum += ara1_wval[i] + ara2_wval[i]
44    ara_max += ara_wei[i] * 2;
45  }
46  
47  // get motivations
48  mtv1 = document.getElementById("motiv1").value;
49  mtv2 = document.getElementById("motiv2").value;
50  for(i=0; i<3; i++){
51    mtv1_wval[i] = ((mtv_max[i]-mtv_min[i])/100.0) * mtv1 + mtv_min[i];
52    mtv2_wval[i] = ((mtv_max[i]-mtv_min[i])/100.0) * mtv2 + mtv_min[i];
53  }
54  
55  add_scl = document.getElementById("scale").value;
56}
57
58function calc_comp(){
59  var vector = [];
60  var plus = 0;
61  var minus = 0;
62  
63  for(i=0; i<8; i++){
64    vector[i] = scr1[i] - scr2[i];
65    if(vector[i]>0) plus += vector[i];
66    else minus += vector[i];
67  }
68  comp_max = Math.sqrt(2*Math.pow((4*8/2),2));
69  comp_value = Math.sqrt(2*Math.pow((4*8/2),2)) - Math.sqrt( Math.pow((4*8/2-plus),2) + Math.pow((-4*8/2-minus),2) );
70  comp_ratio = comp_value / comp_max;
71}
72
73function calc_add(){
74  add_value = comp_value + (comp_max/8) * add_scl * (ara_sum/ara_max);
75  add_max = comp_max + (comp_max/8) * add_scl * (ara_max/ara_max);
76  add_ratio = add_value / add_max;
77}
78
79function calc_mul(){
80  for(i=0; i<3; i++){
81    mul_value[i] = mtv1_wval[i] * mtv2_wval[i] * add_value;
82    mul_max[i] = mtv_max[i] * mtv_max[i] * add_max;
83    mul_ratio[i] = mul_value[i] / mul_max[i];
84  }
85}
86
87function output(){
88  rslt.innerHTML += "<h2>算出結果</h2>";
89  rslt.innerHTML += "<p>相互補完強度 = " + comp_value + "</p>";
90  rslt.innerHTML += "<p>相互補完強度係数 = " + comp_ratio + "</p>";
91  rslt.innerHTML += "<p>加算値 = " + add_value + "</p>";
92  rslt.innerHTML += "<p>加算係数 = " + add_ratio + "</p>";
93  rslt.innerHTML += "加算相乗値(0.8-1.2) = " + mul_value[0] + "<br>";
94  rslt.innerHTML += "加算相乗値(0.6-1.4) = " + mul_value[1] + "<br>";
95  rslt.innerHTML += "加算相乗値(0.4-1.6) = " + mul_value[2] + "<br>";
96  rslt.innerHTML += "アライアンス係数(0.8-1.2) = " + mul_ratio[0] + "<br>";
97  rslt.innerHTML += "アライアンス係数(0.6-1.4) = " + mul_ratio[1] + "<br>";
98  rslt.innerHTML += "アライアンス係数(0.4-1.6) = " + mul_ratio[2] + "<br>";
99}
100
101function debug(){
102  rslt.innerHTML += "debug information<br>";
103  rslt.innerHTML += "score1:" + scr1 + "<br>";
104  rslt.innerHTML += "area1:" + ara1 + "<br>";
105  rslt.innerHTML += "area1(w):" + ara1_wval + "<br>";
106  rslt.innerHTML += "motiv1:" + mtv1 + "<br>";
107  rslt.innerHTML += "motiv1(w):" + mtv1_wval + "<br>";
108  rslt.innerHTML += "score2:" + scr2 + "<br>";
109  rslt.innerHTML += "area2:" + ara2 + "<br>";
110  rslt.innerHTML += "area2(w):" + ara2_wval + "<br>";
111  rslt.innerHTML += "motiv2:" + mtv2 + "<br>";
112  rslt.innerHTML += "motiv2(w):" + mtv2_wval + "<br>";
113  rslt.innerHTML += "add scale:" + add_scl + "<br>";
114  rslt.innerHTML += "area wei:" + ara_wei + "<br>";
115  rslt.innerHTML += "area sum:" + ara_sum + "<br>";
116  rslt.innerHTML += "area max:" + ara_max + "<br>";
117}
118
119function ally(){
120  rslt = document.getElementById("result");
121  rslt.innerHTML = "";
122  get_input();
123  calc_comp();
124  calc_add();
125  calc_mul();
126  output();
127  //ebug();
128}