¡Ö½õ¤±¤Æ¥À¡¼¥ê¥ó¡ª¡ª¡×¤ò¾§¤¨¤Æ¤ß¤ë¡£
°Ê²¼´Ê°×¼«µë·×»»µ¡ÍѤγ°Éô¥¹¥¯¥ê¥×¥Èexpkeisan.js¤ÎÃæ¤Î¥½¡¼¥¹¡£
/* ¶¯°ú¤Ê¶õÇò¥Á¥§¥Ã¥¯¡ÊÎɤ¤»Ò¤Ï¥Þ¥Í¤·¤Ê¤¤¤è¤¦¤Ë¡Ë */
function spChe(str){
var ans;
if (( str == "" ) || ( str == " " ) || ( str == " " )
|| ( str == " " ) || ( str == " " ) || ( str == " " )
|| ( str == "¡¡" ) || ( str == "¡¡¡¡" ) || ( str == "¡¡¡¡¡¡" )
|| ( str == "¡¡¡¡¡¡¡¡" ) || ( str == "¡¡¡¡¡¡¡¡¡¡" ))
{ ans = "err1"; }
return(ans);
}
/* ¿¦¤ÈLv¤Ë¹ç¤ï¤»¤ÆÉ¬Í׷и³ÃͤòÆÉ¤ß¹þ¤ßÊÖ¤¹
¡Ê¼¡¤ÎLv¤Ë¤Ê¤ë¤¿¤á¤ÎɬÍ׷и³ÃÍ¡Ë*/
function expSyoku(varSy, numLv, numSw){
var ans;
if (varSy == "s1") {
if (numSw <= 0) { ans = baes_t(numLv); }
else{ ans = nobi_t(numLv); }
} else if (varSy == "s2") {
if (numSw <= 0) { ans = baes_t(numLv); }
else{ ans = itizi_t(numLv); }
} else if (varSy == "s3") {
if (numSw <= 0) { ans = baes_t(numLv); }
else{ ans = snobi_t(numLv); }
} else if (varSy == "s4") {
if (numSw <= 0) { ans = baes_t(numLv); }
else{ ans = nizi_t(numLv); }
} else if (varSy == "s5") {
if (numSw <= 0) { ans = s_baes_t(numLv); }
else{ ans = s_nobi_t(numLv); }
} else if (varSy == "s6") {
if (numSw <= 0) { ans = s_baes_t(numLv); }
else{ ans = s_itizi_t(numLv); }
} else if (varSy == "s7") {
if (numSw <= 0) { ans = s_baes_t(numLv); }
else{ ans = s_nizi_t(numLv); }
} else {
ans = "err1";
}
return(ans);
}
/* ̤žÀ¸BaesLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function baes_t(b_exp){
var arr, ans, num;
num = parseFloat(b_exp);
arr = new Array(
0, 9, 16, 25, 36,
77, 112, 153, 200, 253,
//
320, 385, 490, 585, 700,
830, 970, 1120, 1260, 1420,
//
1620, 1860, 1990, 2240, 2504,
2950, 3426, 3934, 4474, 6889,
//
7995, 9174, 10425, 11748, 13967,
15775, 17678, 19677, 21773, 30543,
//
34212, 38065, 42102, 46323, 53026,
58419, 64041, 69892, 75973, 102468,
//
115254, 128692, 142784, 157528, 178184,
196300, 215198, 234879, 255341, 330188,
//
365914, 403224, 442116, 482590, 536948,
585191, 635278, 687211, 740988, 925400,
//
1473746, 1594058, 1718928, 1848355, 1982340,
2230113, 2386162, 2547417, 2713878, 3206160,
//
3681024, 4022472, 4377024, 4744680, 5125440,
5767272, 6204000, 6655464, 7121664, 7602600,
//
9738720, 11649960, 13643520, 18339300, 23836800,
35658000, 48687000, 58135000, 99999999, 0);
if ((1 <= num) && (num <= 99)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}
/* žÀ¸BaesLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function s_baes_t(b_exp){
var arr, ans, num;
num = parseFloat(b_exp);
arr = new Array(
0, 10, 18, 28, 40,
85, 123, 168, 220, 278,
//
400, 481, 613, 731, 875,
1038, 1213, 1400, 1575, 1775,
//
2268, 2604, 2786, 3136, 3506,
4130, 4796, 5508, 6264, 9645,
//
12392, 14220, 16159, 18209, 21649,
24451, 27401, 30499, 33748, 47342,
//
58160, 64711, 71573, 78749, 90144,
99312, 108870, 118816, 129154, 174196,
//
213220, 238080, 264150, 291427, 329640,
363155, 398116, 434526, 472381, 610848,
//
731828, 806448, 884232, 965180, 1073896,
1170382, 1270556, 1374422, 1481976, 1850800,
//
3389616, 3666333, 3953534, 4251217, 4559382,
5129260, 5488173, 5859059, 6241919, 7374168,
//
9570662, 10458427, 11380262, 12336168, 13326144,
14994907, 16130400, 17304200, 18516326, 19766760,
//
29216160, 34949880, 40930560, 55017900, 71510400,
106974000, 146061000, 174405000, 343210000, 0);
if ((1 <= num) && (num <= 99)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}
/* ¥Î¡¼¥Ó¥¹JobLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function nobi_t(j_exp){
var arr, ans, num;
num = parseFloat(j_exp);
arr = new Array(0, 10, 18, 28, 40, 91, 151, 205, 268, 340, 0);
if ((1 <= num) && (num <= 10)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}
/* 1¼¡¿¦JobLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function itizi_t(j_exp){
var arr, ans, num;
num = parseFloat(j_exp);
arr = new Array(
0, 30, 43, 58, 76,
116, 180, 220, 272, 336,
//
520, 604, 699, 802, 948,
1125, 1668, 1937, 2226, 3040,
//
3988, 5564, 6272, 7021, 9114,
11473, 15290, 16891, 18570, 23229,
//
28359, 36478, 39716, 43088, 52417,
62495, 78160, 84175, 90404, 107611,
//
125915, 153941, 191781, 204351, 248352,
286212, 386371, 409795, 482092, 509596, 0);
if ((1 <= num) && (num <= 50)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}
/* ¥¹¥Ñ¥Î¥ÓJobLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function snobi_t(j_exp){
var arr, ans, num;
num = parseFloat(j_exp);
arr = new Array(
0, 30, 43, 58, 76,
116, 180, 220, 272, 336,
//
520, 604, 699, 802, 948,
1125, 1668, 1937, 2226, 3040,
//
3988, 5564, 6272, 7021, 9114,
11473, 15290, 16891, 18570, 23229,
//
28359, 36478, 39716, 43088, 52417,
62495, 78160, 84175, 90404, 107611,
//
125915, 153941, 191781, 204351, 248352,
286212, 386371, 409795, 482092, 509596,
//
982092, 992092, 1002092, 1012092, 1022092,
1032092, 1042092, 1052092, 1062092, 1072092,
//
1082092, 1092092, 1102092, 1112092, 1122092,
1132092, 1142092, 1152092, 1162092, 1172092, 0);
if ((1 <= num) && (num <= 70)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}
/* 2¼¡¿¦JobLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function nizi_t(j_exp){
var arr, ans, num;
num = parseFloat(j_exp);
arr = new Array(
0, 144, 184, 284, 348,
603, 887, 1096, 1598, 2540,
//
3676, 4290, 4946, 6679, 9492,
12770, 14344, 16005, 20642, 27434,
//
35108, 38577, 42206, 52708, 66971,
82688, 89544, 96669, 117821, 144921,
//
174201, 186677, 199584, 238617, 286366,
337147, 358435, 380376, 447685, 526989,
//
610246, 644736, 793535, 921810, 1106758,
1260955, 1487304, 1557657, 1990632, 2083386, 0);
if ((1 <= num) && (num <= 50)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}
/* žÀ¸¥Î¥ÓJobLvɬÍ׷и³ÃͤòÊÖ¤¹ */
function s_nobi_t(j_exp){
var arr, ans, num;
num = parseFloat(j_exp);
arr = new Array(0, 11, 20, 31, 44, 100, 166, 226, 295, 374, 0);
if ((1 <= num) && (num <= 10)){
ans = arr[num];
} else {
ans = "err1";
}
arr.length = 0;
return(ans);
}