フォロー記事投稿  
 投稿者:まなべ  投稿日:2008年07月29日(火)05時58分56秒      

工場長さんのところで使われてた文字絵方式の投稿コードを簡易版にして付けてみました
画像に比べて解析は容易ですがわざわざこれを突破する専用のルーチン組む情熱がある
スパマーは許してもいいような気がします
しばらくこれで動かして問題なければv3.07ってことにしましょう
今回の追加は環境設定の書き込みチェックに
$useAAcode = 1;          # 文字絵投稿コードを使用する場合は1、使用しない場合は0
投稿フォームに
	if($useAAcode == 1){
		$codeB=substr($code -4 4);
		$codeA=substr($code 0 -4);
		@AAcode=split(// $codeB);
		foreach(@AAcode){
if ($_==1){
$l1.='  ■ ';
$l2.='  ■ ';
$l3.='  ■ ';
$l4.='  ■ ';
$l5.='  ■ ';
}
elsif ($_==2){
$l1.='■■■ ';
$l2.='  ■ ';
$l3.='■■■ ';
$l4.='■   ';
$l5.='■■■ ';
}
elsif ($_==3){
$l1.='■■■ ';
$l2.='  ■ ';
$l3.='■■■ ';
$l4.='  ■ ';
$l5.='■■■ ';
}
elsif ($_==4){
$l1.='■ ■ ';
$l2.='■ ■ ';
$l3.='■■■ ';
$l4.='  ■ ';
$l5.='  ■ ';
}
elsif ($_==5){
$l1.='■■■ ';
$l2.='■   ';
$l3.='■■■ ';
$l4.='  ■ ';
$l5.='■■■ ';
}
elsif ($_==6){
$l1.='■■■ ';
$l2.='■   ';
$l3.='■■■ ';
$l4.='■ ■ ';
$l5.='■■■ ';
}
elsif ($_==7){
$l1.='■■■ ';
$l2.='  ■ ';
$l3.=' ■  ';
$l4.='■   ';
$l5.='■   ';
}
elsif ($_==8){
$l1.='■■■ ';
$l2.='■ ■ ';
$l3.='■■■ ';
$l4.='■ ■ ';
$l5.='■■■ ';
}
elsif ($_==9){
$l1.='■■■ ';
$l2.='■ ■ ';
$l3.='■■■ ';
$l4.='  ■ ';
$l5.='■■■ ';
}
elsif ($_==0){
$l1.='■■■ ';
$l2.='■ ■ ';
$l3.='■ ■ ';
$l4.='■ ■ ';
$l5.='■■■ ';
}
		}
	}

および

	if($useAAcode == 1){
		print <<"EOF";
<input type=hidden name=\"codeA\" value=\"$codeA\">
<small><pre>$l1
$l2
$l3
$l4
$l5</pre></small>
投稿コード <input type=text name=\"codeB\" size=10><small> (上の数字を半角で書き写してください)</small><br><br>
EOF
	}
	else{
		print "<input type=hidden name=\"code\" value=\"$code\">\n";
	}

投稿記録処理に

	# 投稿コードチェック
	if($useAAcode == 1){ $FORM{'code'} = $FORM{'codeA'}.$FORM{'codeB'}; }

以上です


※引用文中のURLはcheckboxの状態を問わずリンクに自動変換されません。アップロード画像は引用されません。

投稿者
メール
題名 
画像 (GIF JPG PNG 幅1920x1920px サイズ1024KBまで)

内容 適当に改行を入れてください。画像と内容が両方とも無い状態で投稿ボタンを押すとリロードになります。

投稿コード (下の4桁の数字を記入してください)
■■■ ■■■ ■ ■ ■■■ 
■ ■ ■ ■ ■ ■ ■ ■ 
■ ■ ■ ■ ■■■ ■ ■ 
■ ■ ■ ■   ■ ■ ■ 
■■■ ■■■   ■ ■■■ 
URL自動Link  


あやしいわーるど@じょしあな + TeamMIZUIRO v3.10d