罪と罰++二律背反


  • }elsif($flg==1 && $id eq $aid){  # 落札済み&出品者
    		$log .= qq|落札され代金を受け取りました<br>\n|;
    
    		if($itype==13){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $di_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
    		}elsif($itype==15){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $dp_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
                   }elsif($itype==16){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $du_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
    		}elsif($itype==17){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $syou_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
                   }elsif($itype==18){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $skill_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
    		}elsif($itype==19){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $skill_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
                   }elsif($itype==20){
    		$wr_mes=qq|$date $UNM{$raku} が落札した $db_data[$item_no][1] の代金を$cmp[$camp]の$nm が受け取りました<br>|; &hist_write;
    		}
    
    		$gold+=$kakaku; # 資金受け取り
    		$auc_ary[$_]="";
    		&re_auc_list;
    		&auc_write;


トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2012-06-08 (金) 00:28:36 (2693d)