fork download
  1. <html>
  2. <head>
  3. <title>練成ベース皮算用</title>
  4. </head>
  5. <body onload="Load();">
  6. <script type="text/javascript">
  7. <!--
  8. var Base =new Item(0,0,0,0,0,"Base");
  9. var HQ = new Item(0,0,0,0,0,"HQ");
  10. var Mat = new Item(0,0,0,0,0,"Mat");
  11.  
  12. var BaseList = new Array();
  13. var MatList = new Array();
  14. function Load(){
  15. MakeBaseList();
  16. MakeMatList();
  17. Base.ToZero();
  18. HQ.ToZero();
  19. Mat.ToZero();
  20. }
  21.  
  22. function Item(Ph,Fi,Co,Po,En,Info){
  23. this.Ph = Ph;
  24. this.Fi = Fi;
  25. this.Co = Co;
  26. this.Po = Po;
  27. this.En = En;
  28. this.Info =Info;
  29.  
  30. this.ToZero= function(){
  31. this.Ph = 0;
  32. this.Fi = 0;
  33. this.Co = 0;
  34. this.Po = 0;
  35. this.En = 0
  36. this.Info = "";
  37. }
  38. }
  39.  
  40.  
  41. function MakeBaseList(){
  42. //alert("BaseList!");
  43. BaseList = new Array();
  44. BaseList["None"] = new Item(0,0,0,0,0, "None");
  45. BaseList["Plate"] = new Item(5,3,2,3,2, "Plate");
  46. BaseList["Chain"] = new Item(4,4,4,1,2, "Chain");
  47. BaseList["Ring"] = new Item(3,3,1,5,3, "Ring");
  48. BaseList["Leather"] = new Item(2,4,3,3,3, "Leather");
  49. BaseList["Stud"] = new Item(2,4,3,3,4, "Stud");
  50. BaseList["Bone"] = new Item(3,3,4,2,4, "Bone");
  51. BaseList["Leaf"] = new Item(2,3,2,4,4, "Leaf");
  52. BaseList["Hide"] = new Item(3,3,4,3,2, "Hide");
  53. BaseList["Wood"] = new Item(5,3,2,3,2, "Wood");
  54. BaseList["Scale"] = new Item(3,3,3,3,3, "Scale");
  55. BaseList["GargPlate"] = new Item(8,6,5,6,5, "GargishPlate\nガーゴイル専用");
  56. BaseList["GargLeather"] = new Item(5,6,7,6,6, "GargishLeather\nガーゴイル専用");
  57. BaseList["GargStone"] = new Item(6,6,4,8,6, "GargishStone\nガーゴイル専用");
  58. }
  59.  
  60.  
  61.  
  62.  
  63. function MakeMatList(){
  64. //alert("MatList!");
  65. MatList = new Array();
  66. MatList["None"] = new Item(0,0,0,0,0, "None");
  67. MatList["Iron"] = new Item(0,0,0,0,0, "Iron");
  68. MatList["Dull"] = new Item(6,0,0,0,0, "Dull Copper\n装備条件-20%\n耐久値+50%");
  69. MatList["Shadow"] = new Item(2,1,0,0,5, "Shadow\n耐久+100%");
  70. MatList["Copper"] = new Item(1,1,0,5,2, "Copper");
  71. MatList["Bronze"] = new Item(3,0,5,1,1, "Bronze");
  72. MatList["Gold"] = new Item(1,1,2,0,2, "Gold\n幸運+40\n装備条件-30");
  73. MatList["Agapite"] = new Item(2,3,2,2,2, "Agapite");
  74. MatList["Verite"] = new Item(3,3,2,3,1, "Verite");
  75. MatList["Valorite"] = new Item(4,0,3,3,3, "Valorite\n耐久+50%");
  76.  
  77. MatList["RedScale"] = new Item( 0,10,-3, 0, 0, "RedScale");
  78. MatList["YellowScale"] = new Item(-3, 0, 0, 0, 0, "YellowScale\n幸運+20");
  79. MatList["GreenScale"] = new Item( 0,-3, 0,10, 0, "GreenScale");
  80. MatList["BlueScale"] = new Item( 0, 0, 0,-3,10, "BlueScale");
  81. MatList["WhiteScale"] = new Item(-3, 0,10, 0, 0, "WhiteScale");
  82. MatList["BlackScale"] = new Item(10, 0, 0, 0,-3, "BlackScale");
  83.  
  84. MatList["Leather"] = new Item(0,0,0,0,0, "Leather");
  85. MatList["Spined"] = new Item(5,0,0,0,0, "Spined");
  86. MatList["Honed"] = new Item(2,3,2,2,2, "Honed");
  87. MatList["Barbed"] = new Item(2,1,2,3,4, "Barbed");
  88.  
  89. MatList["Wood"] = new Item(0,0,0,0,0, "Wood");
  90. MatList["Oak"] = new Item(3,3,0,2,3, "Ork\n耐久+50\n幸運+40");
  91. MatList["Ash"] = new Item(2,0,4,1,6, "Ash\n重量-25");
  92. MatList["Yew"] = new Item(6,3,3,0,3, "Yew\nHP回復+1");
  93. MatList["Heart"] = new Item(2,3,2,7,2, "HeartWood\n幸運40 or 耐久+50% or 装備条件-20% or 重量-50% or 命中+5% or 武器ダメージ+10% or 瞑想化");
  94. MatList["Blood"] = new Item(3,8,1,3,3, "BloodWood\nHP回復+2");
  95. MatList["Frost"] = new Item(2,1,8,3,4, "FrostWood");
  96. }
  97.  
  98. function CalcHQBouns(){
  99.  
  100. HQ.Ph = parseInt(HQPh.value);
  101. HQ.Fi = parseInt(HQFi.value);
  102. HQ.Co = parseInt(HQCo.value);
  103. HQ.Po = parseInt(HQPo.value);
  104. HQ.En = parseInt(HQEn.value);
  105.  
  106. var N =HQ.Ph + HQ.Fi + HQ.Co + HQ.Po + HQ.En;
  107. var HQR = parseInt(HQRes.value);
  108. var str ="" + (HQR - N);
  109. if(HQR-N <0) str = "<font color=red>" + (HQR-N) + "</font>"
  110.  
  111. HQBouns.innerHTML = str;
  112. HQ.Info = "HQBounus is " + N + " Point used!"
  113. if(HQR-N<0) HQ.Info += "\nit is Over the " + Math.abs(HQR-N) + " Point";
  114. WriteResult(Base,HQ,Mat);
  115. }
  116. function SetBaseItems(Obj){
  117. BPh.value = Obj.Ph;
  118. BFi.value = Obj.Fi;
  119. BCo.value = Obj.Co;
  120. BPo.value = Obj.Po;
  121. BEn.value = Obj.En;
  122.  
  123. WriteResult(Base,HQ,Mat);
  124. }
  125. function SetMatItems(Obj){
  126. MTPh.value = Obj.Ph;
  127. MTFi.value = Obj.Fi;
  128. MTCo.value = Obj.Co;
  129. MTPo.value = Obj.Po;
  130. MTEn.value = Obj.En;
  131.  
  132. WriteResult(Base,HQ,Mat);
  133. }
  134. function WriteResult(Base,HQ,Mat){
  135. var Ph = Base.Ph + HQ.Ph + Mat.Ph;
  136. var Fi = Base.Fi + HQ.Fi + Mat.Fi;
  137. var Co = Base.Co + HQ.Co + Mat.Co;
  138. var Po = Base.Po + HQ.Po + Mat.Po;
  139. var En = Base.En + HQ.En + Mat.En;
  140. RPh.value = Ph;
  141. RFi.value = Fi;
  142. RCo.value = Co;
  143. RPo.value = Po;
  144. REn.value = En;
  145.  
  146. TotalPoint.value = Ph+Fi+Co+Po+En;
  147.  
  148. info.value = Base.Info+"\n"+Mat.Info+"\n"+HQ.Info+"\n";
  149.  
  150. }
  151.  
  152. // -->
  153. </script>
  154. <center>
  155. <h1>練成ベース皮算用</h1>
  156. <hr>
  157. <table border="1">
  158. <tr><td>抵抗</td><td>ベース</td><td>素材</td><td>HQボーナス</td><td></td><td>結果</td></tr>
  159.  
  160. <tr><td></td>
  161. <td>
  162. <select name="BaseArmor" onchange="SetBaseItems((Base = BaseList[BaseArmor.value]));">
  163. <option value=None>-Select-
  164. <option value=Plate>Platemail
  165. <option value=Chain>Chainmail
  166. <option value=Ring>Ringmail
  167. <option value=Scale>Scale
  168. <option value=Leather>Leather
  169. <option value=Stud>Stud
  170. <option value=Bone>Bone
  171. <option value=Leaf>Leaf
  172. <option value=Hide>Hide
  173. <option value=Wood>Wood
  174. <option value=GargPlate>Plate(Gargoyle)
  175. <option value=GargLeather>Learther(Gargoyle)
  176. <option value=GargStone>Stone(Gargoyle)
  177.  
  178. </select>
  179. </td>
  180. <td>
  181. <select name="Material" onchange="SetMatItems(Mat = MatList[Material.value]);">
  182. <option value="None">-Select-
  183. <option value="Iron">Iron
  184. <option value="Dull">Dull Copper
  185. <option value="Shadow">Shadow
  186. <option value="Copper">Copper
  187. <option value="Bronze">Bronze
  188. <option value="Gold">Gold
  189. <option value="Agapite">Agapite
  190. <option value="Verite">Verite
  191. <option value="Valorite">Valorite
  192. <option value="RedScale">RedScale
  193. <option value="YellowScale">YellowScale
  194. <option value="GreenScale">GreenScale
  195. <option value="BlueScale">BlueScale
  196. <option value="WhiteScale">WhiteScale
  197. <option value="BlackScale">BlackScale
  198. <option value="Leather">Leather
  199. <option value="Spined">Spined
  200. <option value="Honed">Honed
  201. <option value="Barbed">Baebed
  202. <option value="Wood">Wood
  203. <option value="Oak">Oak
  204. <option value="Ash">Ash
  205. <option value="Yew">Yew
  206. <option value="Heart">HeartWood
  207. <option value="Blood">BloodWood
  208. <option value="Frost">FrostWood
  209. </select>
  210. </td>
  211.  
  212. <td>
  213. <select name="ArmsLore" onchange="HQRes.value = ArmsLore.value; CalcHQBouns(); ">
  214. <option value=0>-Select-
  215. <option value=15>Non Armslore
  216. <option value=20>GM Armslore
  217. </select>
  218. <br>
  219. <input type=text value=15 name=HQRes onchange="CalcHQBouns();"></input>
  220. </td>
  221.  
  222. <td></td>
  223.  
  224. <td></td>
  225. </tr>
  226. <tr> <td>
  227. <center>
  228. 物理<br>
  229. 炎<br>
  230. 冷気<br>
  231. 毒<br>
  232. エネ<br>
  233. </center>
  234. </td>
  235. <td>
  236. <input type=text value=0 name=BPh></input><br>
  237. <input type=text value=0 name=BFi></input><br>
  238. <input type=text value=0 name=BCo></input><br>
  239. <input type=text value=0 name=BPo></input><br>
  240. <input type=text value=0 name=BEn></input><br>
  241. </td>
  242. <td>
  243. <input type=text value=0 name=MTPh></input><br>
  244. <input type=text value=0 name=MTFi></input><br>
  245. <input type=text value=0 name=MTCo></input><br>
  246. <input type=text value=0 name=MTPo></input><br>
  247. <input type=text value=0 name=MTEn></input><br>
  248. </td>
  249. <td>
  250. <input type=text value=0 name=HQPh onchange="CalcHQBouns();"></input><br>
  251. <input type=text value=0 name=HQFi onchange="CalcHQBouns();"></input><br>
  252. <input type=text value=0 name=HQCo onchange="CalcHQBouns();"></input><br>
  253. <input type=text value=0 name=HQPo onchange="CalcHQBouns();"></input><br>
  254. <input type=text value=0 name=HQEn onchange="CalcHQBouns();"></input><br>
  255. </td>
  256. <td>
  257. </td>
  258. <td> <input type=text value=0 name=RPh></input><br>
  259. <input type=text value=0 name=RFi></input><br>
  260. <input type=text value=0 name=RCo></input><br>
  261. <input type=text value=0 name=RPo></input><br>
  262. <input type=text value=0 name=REn></input><br>
  263. </td>
  264. </tr>
  265. <tr>
  266. <td></td>
  267. <td></td>
  268. <td></td>
  269.  
  270. <td><div id=HQBouns></div></td>
  271. <td></td>
  272. <td><input type=text value=0 name=TotalPoint></input></td>
  273. </table>
  274. <b>Info</b><br>
  275. <textarea cols=72 rows=8 name=info></textarea>
  276. </center>
  277. <hr>
  278. <p align="right">
  279. <b>Copyright 2012 by Yakitori</b><br>
  280. <b>Win7 HomeP 64bit + IE9 64bit</b><br>
  281. <b>2012/02/20</b><br>
  282. </p>
  283. </body>
  284. </html>
Not running #stdin #stdout 0s 0KB
stdin
Standard input is empty
stdout
Standard output is empty