HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
   
 
 
Опции темы Поиск в этой теме Опции просмотра

Преобразование картинки BL Webmoney в текст
  #1  
Старый 10.06.2009, 12:19
zerokko
Познающий
Регистрация: 28.03.2009
Сообщений: 52
С нами: 9011530

Репутация: 32
По умолчанию Преобразование картинки 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, скопиастил этот пост на просторах сети...

Последний раз редактировалось zerokko; 10.06.2009 в 12:29.. Причина: добавлен копирайт
 
Ответить с цитированием
 



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[php] Новичкам: задаем вопросы _Great_ PHP 16396 17.06.2010 21:19
Что-то типа статьи по Html. Allen Болталка 8 03.03.2006 21:38



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.