ｸｲｽﾞ一覧 [ｸｲｽﾞ大陸]

No. 4≫ No.5 ≫No. 6

鉄子 2008/01/03 20:37

<HTML><BODY><FORM>
<TEXTAREA COLS=16 ROWS=16></TEXTAREA><BR>
例 1,333,44等<BR>YOU<INPUT TYPE="text" SIZE="16">
<INPUT TYPE="button" " VALUE="取除" onClick="onclk();">
</FORM>
<SCRIPT language="JavaScript">
ret=String.fromCharCode(13)+String.fromCharCode(10);
function onclk(){/////場合ワケが多くて説明しきれないので
//////////////////////必勝プログラム作りました。 (**)

//////////////////////囁きでお話した解説参考プログラム
b=document.forms[0].elements[1].value;
if (((s+e).indexOf(b,0)!=-1) &&(b!="")){
s=s.replace(b,"");e=e.replace(b,"");
if (e.indexOf("-4444_555_",0)==0){c="4";e=e.replace(c,"");};
if (e.indexOf("-444_5555_",0)==0){c="5";e=e.replace(c,"");};
if (e.indexOf("-444_55_",0)==0){c="4";e=e.replace(c,"");};
if (e.indexOf("-44_555_",0)==0){c="5";e=e.replace(c,"");};
if (s=="____"){
if (e.indexOf("-44_5_",0)==0){c="44";e=e.replace(c,"");};
if (e.indexOf("-4_55_",0)==0){c="55";e=e.replace(c,"");};
if (e.indexOf("-4444__",0)==0){c="444";e=e.replace(c,"");};
if (e.indexOf("-_5555_",0)==0){c="555";e=e.replace(c,"");};
if (e.indexOf("-444__",0)==0){c="44";e=e.replace(c,"");};
if (e.indexOf("-_555_",0)==0){c="55";e=e.replace(c,"");};
} else {
if (e.indexOf("-44_5_",0)==0){c="4";e=e.replace(c,"");};
if (e.indexOf("-4_55_",0)==0){c="5";e=e.replace(c,"");};
if (e.indexOf("-4__",0)==0){c="4";e=e.replace(c,"");};
if (e.indexOf("-_5_",0)==0){c="5";e=e.replace(c,"");};
if (e.indexOf("-4444__",0)==0){c="4444";e=e.replace(c,"");};
if (e.indexOf("-_5555_",0)==0){c="5555";e=e.replace(c,"");};
if (e.indexOf("-444__",0)==0){c="444";e=e.replace(c,"");};
if (e.indexOf("-_555_",0)==0){c="555";e=e.replace(c,"");};
if (e.indexOf("-4__",0)==0){c="4";e=e.replace(c,"");};
if (e.indexOf("-_5_",0)==0){c="5";e=e.replace(c,"");};
};
if (s.indexOf("__22_333_",0)==0){c="3";s=s.replace(c,"");};
if (s.indexOf("_1_22_33_",0)==0){c="1";s=s.replace(c,"");};
if (e=="-__"){
if (s.indexOf("__2_33_",0)==0){c="33";s=s.replace(c,"");};
if(s.indexOf("__22_3_",0)==0){c="22";s=s.replace(c,"");};
if(s.indexOf("_1_2_333_",0)==0){c="33";s=s.replace(c,"");};
if(s.indexOf("_1__333_",0)==0){c="333";s=s.replace(c,"");};
if(s.indexOf("_1_22__",0)==0){c="22";s=s.replace(c,"");};
if(s.indexOf("___33_",0)==0){c="3";s=s.replace(c,"");};
if(s.indexOf("__22__",0)==0){c="2";s=s.replace(c,"");};
} else {
if (s.indexOf("__2_33_",0)==0){c="3";s=s.replace(c,"");};
if (s.indexOf("__22_3_",0)==0){c="2";s=s.replace(c,"");};
if (s.indexOf("_1_2_333_",0)==0){c="333";s=s.replace(c,"");};
if (s.indexOf("_1__333_",0)==0){c="33";s=s.replace(c,"");};
if (s.indexOf("_1_22__",0)==0){c="2";s=s.replace(c,"");};
if (s.indexOf("___33_",0)==0){c="33";s=s.replace(c,"");};
if (s.indexOf("__22__",0)==0){c="22";s=s.replace(c,"");};
if (s.indexOf("_1___",0)==0){c="1";s=s.replace(c,"");};
if (s.indexOf("__2__",0)==0){c="2";s=s.replace(c,"");};
if (s.indexOf("___3_",0)==0){c="3";s=s.replace(c,"");};
};te();zu();};
document.forms[0].elements[1].value="";
document.forms[0].elements[1].focus();};
function te(){
g="YOU ["+b+"] "+ret+" I ["+c+"] "+ret;
document.forms[0].elements[0].value=g;};
function zu(){
d=(s+e).replace("-","");
while(d.indexOf("_",0)!=-1){ d=d.replace("_",ret);};
document.forms[0].elements[0].value+=d+ret;};
b="";c="5";te();s="_1_22_333_";e="-4444_5555_";zu();
</SCRIPT></BODY></HTML>

返信