>>251
ealis_wri.cgiのsub new_messageの始め辺りに下を挿入。

#iconランダム設定
&init_sozai();
if(!$FORM{'icon'} && $#ICOPALET > 0){
srand(time);
$random_icon = int(rand($#ICOPALET)/2);
$FORM{'icon'} = $ICOPALET[$random_icon*2];
}