Untitled

<body><script>n=["赤皮","白皮","爪*2","爪*1","毒袋","毒腺","クチ","竜玉","チケ","古守","堅骨","修羅","瑠璃","カ大","カ小","堅玉","さび","尖玉"];p=[16,27,38,53,67,77,89,94,99,4,24,44,58,63,68,81,86,99];b="\r\n";function r(s){return(s*176%65363)}function w(t,l){x="SEED,報酬,古";s=e=[1,15,5,13,4,3,9,12,26,18,163,401,6,2,489,802,1203][t-1];do{x+=b+(z=s)+',"';o=0;for(c=2;c<16;c=(c-1&8)+9){for(x+=c>7?b+"光守":"チケ 赤皮";c&7&&((z=r(z))%32<l||c<4||c==9);++c){z=r(z);for(i=(c>>3)*9;z%100>p[i];++i);x+=" "+n[i];i^9||++o}}x+='",'+o}while((s=r(s))^e);v="ng"+t+"sfnkg".charAt(l-13>>2)+".csv";f=new ActiveXObject("Scripting.FileSystemObject").CreateTextFile(v,!1);f.Write(x);f.Close();alert(v)}q=document;for(j=0;j<3;++j){q.write("<br>"+["激運","幸運","通常"][j]);for(i=1;i<18;++i)q.write("　<butto"+'n onclick="w('+i+","+[29,26,22][j]+')">T'+i+"</button>")}</script></body>