Преобразование картинки BL Webmoney в текст

Преобразование картинки BL Webmoney в текст​

Скрипт позволяет выводить BL (бизнес уровень) WebMoney в виде текста.

Сам скрипт:

Code:

<?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, скопиастил этот пост на просторах сети...

 

А зачем?

 

Как сабж почему бы и нет???))) Трафа меньше, хоть не на много Можно для сравнения БЛ юзать например))) Была бы фантазия, можно было бы доделать под свои нужды =)))

 

ну например на сайте фирмы

 

Когда BL картинкой, адрес которой сервер вебманей, к ней и доверие как к показателю BL. А текст я могу любой написать
Так что скрипт просто чтобы показать как работать с картинкой... Может даже с простой капчёй.

 

Эх, если б еще с комментами код...

 

wildshaman, угу =))) В принципе код легкий))) А я выложил в таком состоянии, в каком скопиастил =)))

 

Мне, если честно, не понятен код, хотя всегда интересовался таким...

 

/showpost.php?p=1103212&postcount=617
у меня сделано по другому. посмотри, может понятнее будет.