Преобразование картинки BL Webmoney в текст
Преобразование картинки BL Webmoney в текст
Скрипт позволяет выводить BL (бизнес уровень) WebMoney в виде текста.
Сам скрипт:
Код:
<?php
/************************************************** *********************
(C)2008 DarkWeb - http://darkweb.ru
запуск скрипта по примеру http://www.darkweb.ru/bl.php?id=651479970248
wmid (651479970248) подставляем необходимый и вынимаем своей функцией
************************************************** **********************/
function itfalse($x)
{
global $se; $ok=0;
for ($j = 3; $j < 15; $j++)
{
if ($se[$x][$j] == 40) { $ok++; }
} return $ok;
}
function iscount2($x,$y)
{
if (($x == 7) and ($y == 7)) { return 0; }
if (($x == 1) and ($y == 0)) { return 1; }
if (($x == 3) ) { return 2; }
if (($x == 2) and ($y == 6)) { return 3; }
if (($x == 2) and ($y == 1)) { return 4; }
if (($x == 6) and ($y == 5)) { return 5; }
if (($x == 7) and ($y == 4)) { return 6; }
if (($x == 1) and ($y == 2)) { return 7; }
if (($x == 6) and ($y == 6)) { return 8; }
if (($x == 4)) { return 9; }
}
function iscount($x,$y) //1 2 digit
{
if ( ($x == 1) and ($y == 0) ) { return 1; }
if (($x == 5) and ($y == 4)) { return 2; }
if (($x == 2) and ($y == 7)) { return 3; }
if (($x == 2) and ($y == 10)) { return 4; }
if (($x == 7) and ($y == 5)) { return 5; }
if (($x == 8) and ($y == 5)) { return 6; }
if (($x == 1) and ($y == 3)) { return 7; }
if (($x == 7) and ($y == 7)) { return 8; }
if (($x == 5) and ($y == 8)) { return 9; }
if (($x == 8) and ($y == 8)) { return 0; }
}
$wmid = file_get_contents('http://stats.wmtransfer.com/Levels/pWMIDLevel.aspx?wmid='.$_GET['id'].'&w=35&h=18&bg=0XDBE2E9');
$img = imagecreatefromstring($wmid);
for ($i = 4; $i < 35; $i++)
{
for ($j = 3; $j < 15; $j++)
{
$se[$i][$j] = (imagecolorat ($img, $i, $j));
}
}
$is = false;
$w = '';
if ( (itfalse(4) ==6 ) and (itfalse(5) ==7 ) and (itfalse(6) ==1 ) and (itfalse(7) ==2 ) and (itfalse(8) == 7 ) )
{
$is = true;
$w='no';
}
if (!( itfalse(18) or itfalse(20) or itfalse(19) or ($is) ) )
{
//one digit
$p1 = itfalse(23,$se);
$p2 = itfalse(28,$se);
$w = (iscount($p1, $p2));
$is = true;
}
if ( ! ( itfalse(13) or itfalse(14) or itfalse(12) or ($is) ) )
{
//two digit
$p1 = itfalse(17,$se);
$p2 = itfalse(22,$se);
$w = (iscount($p1, $p2));
$p1 = itfalse(25,$se);
$p2 = itfalse(30,$se);
$w .= (iscount($p1, $p2));
$is = true;
}
if (!( itfalse(7) or itfalse(8) or itfalse(6) or ($is) ) )
{
//tree digit
$p1 = itfalse(11,$se);
$p2 = itfalse(16,$se);
$w = (iscount2($p1, $p2));
$p1 = itfalse(18,$se);
$p2 = itfalse(23,$se);
$w.=(iscount2($p1, $p2));
$p1 = itfalse(25,$se);
$p2 = itfalse(30,$se);
$w.= (iscount2($p1, $p2));
$is = true;
}
if ($is == false)
{
$p1 = itfalse(6,$se);
$p2 = itfalse(11,$se);
$w = (iscount2($p1, $p2));
$p1 = itfalse(13,$se);
$p2 = itfalse(18,$se);
$w.= (iscount2($p1, $p2));
$p1 = itfalse(20,$se);
$p2 = itfalse(25,$se);
$w.= (iscount2($p1, $p2));
$p1 = itfalse(27,$se);
$p2 = itfalse(32,$se);
$w.= (iscount2($p1, $p2));
}
echo($w);
?>
(C)2008 DarkWeb - http://darkweb.ru
Всем удачи и приятного времяпровождения =) С уважением, zerokko, скопиастил этот пост на просторах сети... :rolleyes: |
