#counter
         if($count==0){$head= "<td><table border=1 $aligngyaku><tr>\n";}
         elsif($count==4){$tail= "</tr><tr>";}
         elsif($count==9){$tail= "</tr></table></td></tr></table>";}
         elsif($count==100){
                 my $border="";
                 if($name ne ""){$border="border=1";}
                 $head="<table><tr><td width =160><table $border $align><tr>";
                 $tail="</tr></table></td>";
         }
 
         print <<"EOL";
         $head
         <td bgcolor ="$color" width="140" onMouseover="opentext($msg)" onMouseout="opentext('')">
         <font size = "1">$naisen $gaisen</font><br>
         <b>$name </b><br>
         $locate <br>
         <font size = 2>$bikou </font><br>
         <div align="right"><font size = 1>$koushin</font></div></td>
         $tail

----
- gyaku_flgを出す --  &new{2009-04-22 (水) 12:35:28};

#comment
----
-[[メモメモ]]


トップ   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS