自动数种子神器,续

s13989501950

1、将彩色图转换为灰度图像，再将灰度图像转换为计算机便于识别的二值图（即黑白图）。
转换前

转换后


2、运行PHP页面,页面代码如下:
<?php
header("Content-Type:text/html;charset=GBK");
$i=imagecreatefromjpeg("test1.jpg");//图片路径
$白色阔值=20;$黑色阔值=200;
$宽=imagesx($i);
$高=imagesy($i);

for ($y=0;$y<$高;$y++) {
for ($x=0;$x<$宽;$x++) {
$rgb = imagecolorat($i,$x,$y);
$r = ($rgb>>16) & 0xFF;
$g = ($rgb>>8) & 0xFF;
$b = $rgb & 0xFF;
if ($r<=$白色阔值 )$r=0;
if ($g<=$白色阔值 )$g=0;
if ($b<=$白色阔值 )$b=0;
if ($r>=$黑色阔值 )$r=255;
if ($g>=$黑色阔值 )$g=255;
if ($b>=$黑色阔值 )$b=255;
if($r==255){
$KEY=$x.','.$y;
$HD[$KEY]['种子']=1;
$HD[$KEY]['种子号']='';
$HD[$KEY]['种子大小']=1;
$HD[$KEY]['排序']='';
}
}
}
$计数=0;
for ($y=0;$y<$高;$y++) {
for ($x=0;$x<$宽;$x++) {
$KEY=$x.','.$y;
if($HD[$KEY]['种子']==1){
$zw='';$种子号='';
$KEYT=($x-1).','.($y-1);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x).','.($y-1);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x+1).','.($y-1);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x-1).','.($y);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x+1).','.($y);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x-1).','.($y+1);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x).','.($y+1);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
$KEYT=($x+1).','.($y+1);
if($HD[$KEYT]['种子号']!='')$种子号=$HD[$KEYT]['种子号'];
if($种子号==''){
++$计数;
$HD[$KEY]['种子号']=$计数;
$种子[$计数]['种子大小']=1;
$种子[$计数]['起点']=$KEY;
}else{
$HD[$KEY]['种子号']=$种子号;
$种子[$种子号]['种子大小']=$种子[$种子号]['种子大小']+1;
}
}
}
}
$种子数量=0;
for ($x=1; $x<=$计数; $x++) {
//print $x.' '.$种子[$x]['种子大小'].'<br>';
if($种子[$x]['种子大小']>=20)        ++$种子数量;
if($种子[$x]['种子大小']>=90) ++$种子数量;
}
print $种子数量;
?>


运行结果:
52

小奇石

沙发我的

xiaofox8

复制别人的帖子水分有意思么。

水之狂澜

感觉很神奇 这是专业种子卖家用的吧

s13989501950

xiaofox8 发表于 2018-3-18 14:25
复制别人的帖子水分有意思么。

图片复制别人的,算法刚写的

s13989501950

xiaofox8 发表于 2018-3-18 14:25
复制别人的帖子水分有意思么。

图片是复制别人的,代码自己写的,不知道这个算不算复制

s13989501950

xiaofox8 发表于 2018-3-18 14:25
复制别人的帖子水分有意思么。

哪个帖子,找到了我的肉肉都送你

qianyu710

牛人啊

柯基蠢

看着我就晕了

兩儀蘑菇魚

默默地表示不懂。。。不是应该出个小程序才算神器的吗