罪と罰++二律背反

	# 国データ読み込み
	&cdata_open;
		# 機種別設定
		if($mv_mode eq 'mv'){
		if($ENV{'HTTP_USER_AGENT'}=~/DoCoMo/) {$type_from="I";}
		elsif($ENV{'HTTP_USER_AGENT'} =~/^KDDI\-/i){$type_from="EZ";}
		elsif($ENV{'HTTP_USER_AGENT'} =~/J-PHONE/ ){$type_from="J";}
		else{$type_from="M";}
		}
		if($mv_mode eq 'pc'){
			$type_from="PC";
		}
	$id_p = $id;
	$pw_p = $pw;
	$next_lv	= int(($lv*$lv)*10);
	$max_sol	= $g_p[$rank];
	$sol_lv		= 1		if($sol_lv<1);
	$sol_lv		= 1000	if($sol_lv>1000);
	$max_hp		= 99999	if($max_hp>99999);
	$max_mp		= 99999	if($max_mp>99999);
		# 現在のプレイヤー抽出
		if($player_now>=$time-$DAT{'la'}){
			if($mv_mode eq 'pc'){
				$now_nm .= ($DAT{'sogo'}) ? qq|<div style="color:$color[$DAT{'camp'}]">$DAT{'nm'} [$sogo_p[$DAT{'sogo'}]] [$cmp[$DAT{'camp'}]] [From $DAT{'type_from'}]</div>| : qq|<div style="color:$color[$DAT{'camp'}]">$DAT{'nm'} [$cmp[$DAT{'camp'}]] [From $DAT{'type_from'}]</div>| ;
			}else{
				$now_nm .= ($DAT{'sogo'}) ? "$DAT{'nm'} [$sogo_p[$DAT{'sogo'}]]/" : "$DAT{'nm'}/" ;
			}
			$now_nm_cnt++;


  • Vodafone
    MOT


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