成分解析2015

名前(Twitterユーザ名(@以降の半角英数字))等から、成分を解析します。
名前を入力し、「成分を解析する」ボタンを押してみてください。

[insert_php]
$in=”;
extract($_GET);
extract($_POST);
extract($_COOKIE);
extract($_SERVER);

echo ‘

 

‘;
if($in !=””){
$are = array(
‘血’,
‘理論’,
‘成功の鍵’,
‘心の壁’,
‘言葉’,
‘お菓子’,
‘ミスリル’,
‘濃硫酸’,
‘マイナスイオン’,
‘気の迷い’,
‘祝福’,
‘カテキン’,
‘白インク’,
‘黒インク’,
‘株’,
‘雪の結晶’,
‘陰謀’,
‘野望’,
‘回路’,
‘月の光’,
‘鍛錬’,
‘白い何か’,
‘赤い何か’,
‘利益’,
‘玉露’,
‘果物’,
‘時間’,
‘アルコール’,
‘スライム’,
‘睡眠薬’,
‘柳の樹皮’,
‘苦労’,
‘歌’,
‘税金’,
‘着色料’,
‘保存料’,
‘媚び’,
‘魂の炎’,
‘知恵’,
‘知識’,
‘情報’,
‘純金’,
‘波動’,
‘蛇の抜け殻’,
‘海水’,
‘鉛’,
‘毒物’,
‘犠牲’,
‘宇宙の意思’,
‘花崗岩’,
‘罠’,
‘乙女心’,
‘度胸’,
‘勢い’,
‘不思議’,
‘希望’,
‘魔法’,
‘カルシウム’,
‘鉄の意志’,
‘記憶’,
‘夢’,
‘信念’,
‘呪詛’,
‘真空’,
‘嘘’,
‘欲望’,
‘見栄’,
‘大人の都合’,
‘覚悟’,
‘汗と涙(化合物)’,
‘小麦粉’,
‘電力’,
‘運’,
‘勇気’,
‘明太子’,
‘大阪のおいしい水’,
‘怨念’,
‘元気玉’,
‘毒電波’,
‘電波’,
‘愛’,
‘食塩’,
‘砂糖’,
‘根性’,
‘気合’,
‘努力’,
‘ビタミン’,
‘ハッタリ’,
‘世の無常さ’,
‘厳しさ’,
‘ツンデレ’,
‘むなしさ’,
‘やらしさ’,
‘やましさ’,
‘やさしさ’,
‘かわいさ’,
‘華麗さ’,
‘優雅さ’,
‘微妙さ’,
‘下心’,
‘砂’,
‘芝’,
‘フォース’,
‘汚水’,
‘醤油’,
‘片栗粉’,
‘コスモ’,
‘マグネシウム’,
‘純銀’,
‘砂’,
‘芝’,
‘フォース’,
‘汚水’,
‘醤油’,
‘片栗粉’,
‘コスモ’,
‘マグネシウム’
);
$out = crc32($in);
if($out < 0)$out = $out * -1; $out2 = crc32($out); if($out2 < 0)$out2 = $out2 * -1; $out3 = crc32($out2); if($out3 < 0)$out3 = $out3 * -1; $out4 = crc32($out3); if($out4 < 0)$out4 = $out4 * -1; $out = sprintf("%d%d%d%d", $out, $out2, $out3, $out4); for($i=0;$i<9;$i++){ $sei[$i]=substr($out,$i*4,4); } $ch1_ico = floor($out[3].$out[2]) + 1; $per = array_fill(0,200,0); $per[0]=floor(substr($sei[0],0,2))+1; $mon[0]=floor(substr($sei[0],2,2)); $kei=0; $kei+=$per[0]; sort($sei); if($kei<100){ for($i=1;$i<8;$i++){ $per[$i]=floor(substr($sei[$i],0,2))+1; $mon[$i]=floor(substr($sei[$i],2,2)); $kei+=$per[$i]; if($kei>=100){
$per[$i]=$per[$i]-($kei-100);
break;
}
}
if($kei<100){ $i++; $per[$i]=floor($zan=100-$kei); $mon[$i]=floor(substr($sei[$i],2,2)); } }else{ $i=0; } rsort($per); echo "


\n”;
echo “

\n「”.$in.”」の成分解析結果
\n”;
for($k=0;$k<9;$k++){ if($per[$k]=="")$per[$k]=0; } echo "

    \n”;
    $flg=0;
    $k=substr(crc32($in),2,1);
    $work = array_fill(0,200,0);
    $ch1_n = array_fill(0,10,’ ’);
    $ch1_s = array_fill(0,10,0);
    $twitter_h=””;
    for($j=0;$j<=$i;$j++){ if($work[$mon[$j]]==1){ $mon[$j]=100+$k; $k++; } $work[$mon[$j]]=1; if($per[$j] == 100){ echo "
  • “.$in.”すべて“.$are[$mon[$j]].” で出来ています。
  • \n”;
    }else if($per[$j] == 50 && $flg == 0){
    echo “

  • “.$in.”半分“.$are[$mon[$j]].” で出来ています。
  • \n”;
    $flg=1;
    }else if($per[$j] == 50 && $flg == 1){
    echo “

  • “.$in.”もう半分“.$are[$mon[$j]].” で出来ています。
  • \n”;
    }else{
    echo “

  • “.$in.”“.$per[$j].”%“.$are[$mon[$j]].” で出来ています。
  • \n”;
    }
    $twitter_h .= $are[$mon[$j]].”:”.$per[$j].”% “;
    $ch1_n[$j]=$are[$mon[$j]];
    $ch1_s[$j]=$per[$j];

    }
    echo “

\n”;

$twitter = “「”.$in.”」は、”.$twitter_h.”で出来ています。 #成分診断2015 http://goo.gl/uFEmtK”;
$twitter_e = urlencode($twitter);

echo ‘

 診断結果をつぶやく!

‘.”\n”;
echo ‘

 コピペ用
 

\n”;

$f=fopen(“/home/evian/evian.wp.xdomain.jp/public_html/wp-content/uploads/2015/09/buffalin.txt”,”a”);
flock($f,LOCK_EX);
$fi=$twitter.”\n”;
fputs($f,$fi);
fclose($f);

}

function make_seed() {
list($usec, $sec) = explode(‘ ‘, microtime());
return (float) $sec + ((float) $usec * 100000);
}
[/insert_php]

Posted by admin