Бормотухи.НЕТ

Вернуться   Бормотухи.НЕТ > Web-мастеру > vBulletin 3.х
Расширенный поиск

vBulletin 3.х Раздел о vBulletin и всем что касается этого скрипта

Ответ
 
Опции темы Поиск в этой теме
Старый 28.05.2009, 23:21 Вверх   #1
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо vbCredits - денежная система на форуме и все примочки к ней

vbCredits - это отдельная тема заслуживающая особого внимания в связи с тем что данный хак очень круто развит и позволяет ввсести денежную систему на форуме, а эту систему можно привязывать к другим модам, таким как казино, карты на булки, аркаде и т.д.
  • Заработок кредитов
    • Двадцать четыре действия, имеющие право на вознаграждение
      • Введение
    • Регистрация, Стимуляция, Подписка, и т.д.
    • Реферралы
    • Зарплата
      • Определяемая временным интервалом
    • Активность
    • Настраиваемая
    • День рождения
    • Подарок репутации
      • Возможность интеграции с силой репутации
    • Получение репутации
      • Возможность умножения пунктов репутации
    • Нарушение
      • Возможность умножения пунктов нарушения
    • Новая тема
    • Оценка темы
      • Возможность умножения оценки
    • Написание сообщений
    • Написание сообщений в собственной теме
    • Размер сообщения
      • Умножение на все символы или слова
      • Возможность отделения ВВ-кодов
      • Определяемый максимум
    • Просмотр вашей темы
      • Возможность отключения просмотров гостями
    • Оценка вашей темы
    • Ответ в вашей теме
    • Просмотр вашего профиля
    • Создание опроса
    • Голосование в опросе
    • Загрузка вложения
    • Отправка ЛС
    • Календарное событие
    • Изображение в профиле
    • Поля в профиле
    • Возможность умножение на количество полей
    • Возможность установки минимум полей в профиле
    • Десятичные значения для кредитов и процентов
    • Протокол для отрицательного балланса
    • Пересчёт награждения, когда изменяется действие
    • Отрицательный множитель награждения
      • Когда такие действия отменяется, например удаляется сообщение
    • Форумные исключения
      • Двенадцать применяемых действий к пользовательским группам
      • ACP Инструмент для конфигурирования нескольких сразу
      • Начисление в форумах могут быть отключены
  • Отображение кредитов
    • Каждому, Приват, Никому
      • Разрешения пользовательским группам просматривать все приватные суммы
    • Отображения Глобального, Групп пользователей, Форум
    • Блокировка пользовательской группы от всей системы
    • Обновление суммы в навбаре посредством AJAX
    • Отображение / Вкладов, Наличных, или вместе
    • Список богатейших пользователей
      • Возможность исключения группы пользователей из списка
    • Отображение кредитов в списке пользователей
  • Расширенная реферральная система
    • Подтверждение через время, сообщения и репутацию
    • Стимул для кредитов рефферри
    • Количество реферралов за реферральное очко
    • Ограничение реферральных очков
    • Реферральные очки умножаются на все реферральные бонусы взятые вместе
    • ARB увеличивает ВСЕ другие награды
  • Система награждений за сообщение
    • Тема и ли профиль посредством AJAX
    • Взможность снятия с центрального счёты форума
      • Заполняется исходя из налоговой ставки, выплат и т.д.
    • Ежедневно, Пользователь, ограничение темы
    • Возможность отмены отрицательных вознаграждений
    • Отключение по пользовательским группам, форумам
    • Модерация пользовательский групп, форумов
    • Возможность общественного отображения наград в теме
  • Журнал переводов
    • Отображение ВСЕХ подарков, наград, платежей, победителей и т.д
    • Возможность разбиения на страницы
    • Разрешение пользовательской группе на просмотр ВСЕХ пользовательских переводов
    • Определение оповещания через ЛС
    • Комментарии и причины, позволяющие ВВ-коды
  • Подарки
    • Возможность комментариев и отправки анонимно
    • Время основывается на ограничениях пользователя
    • Процент с подарков
    • Плата за обработку протокола
    • Модерация и отмена подарков
  • Лотереи
    • Неограниченные параллельные лотереи
    • Raffle / Lottery типы
    • Статические / Увеличивающиеся джек-поты
    • Стоимость за один лотерейный билет
    • Максимум активных билетов
    • Минимум / Максимум билетов проданных за лотерею
    • Периодические лотереи
    • Скидки группам пользователей
    • Настраиваемые название и дата
    • Исключённые группы пользователей
    • Выборочно победитель на PHP
    • Возможность выбора лотерейного числа
    • Налог с выигрыша
    • Время для перевода в архив завершённых лотерей
    • Повторить период для неподходящей лотереи
  • Сберегательные счета
    • Подтверждеие доступа может зависеть от времени, сообщений, репутации
    • Минимальная процентная ставка
    • Выплата банковских переводов
    • Обрабатывающиеся вклады
    • Преждевременный вывод средств
    • Интервалы ставки
    • Максимум вкладов для пользовательской группы
    • настраиваемые процентные ставки для группы пользователей
    • Модерация вкладов
  • Займы
    • Модерация займов
    • Максимальное количество займов и их сумма
    • Минимальная сумма займа
    • Минимальные платежи в день выплат
    • Несвоевременная выплата
    • Автоматические периодические платежи
    • Необходимая оценка для погашения кредита
    • Порог хорошей и плохой оценки кредитоспособности
    • Блокировка возможности расходов если кредитоспособность ниже плохой отметки
    • Перевод пользователей, когда преодолён порог.
      • Вознаграждение или наказание пользователей с новыми оценками или способностями
  • Административные утилиты
    • Массовое обновление групп пользователей
      • Выбор шаблона пользовательской группы для копирования настроек
      • Выбор несколько целевых групп пользователей
      • Конфигурация ВСЕХ настроек и наград групп пользователей
    • Массовое обновление кредитов
      • Премия задним числом пользователей на основе настроек
      • Возможность использования статических наград всем пользователям
      • Возможность использования сброса всех групп пользователей
      • Указание и выбор пользовательских групп и наград для пересчёта
    • Модификация аккуанта полоьзователя исходя из критериев
      • Сначала поиск пользователей используя известные настройки
      • Возможность поиска пользователй по суммам вкладов или наличных
      • Возможность непосредственного изменения количества пользователей
        • Возможность применения лёгкой в использовании пользовательской формулы
          • Использование простой математики, цифр и переменных
            • Дни регистрации
            • Стоимость сообщения
            • Репутация
            • Очки нарушения
            • Суммы наличных и вкладов
  • Абсолютное качество
    • Всё легко отключается / ничем не ограничивается
    • Не изменяет систему vB или других хаков
    • Полностью на фразах
    • Полная админ помощь
    • WOL Locations
    • Включает хаки
    • Уникальный плагин для оптимизации
    • Использует Bitfields и Datastore
    • Ведеие сессии
    • Включает поддержку TMS
    • Не нужно редактировать файлы

Переведено:
  • Админ панель
  • Пользовательская часть
  • Справка в админ панели
  • Установка
Исправлено множество ошибок:
  • Некоторые орфографические ошибки
  • Некоторые смысловые ошибки
  • Некоторые синтаксические ошибки

Хак версии vbCredits 1.4 rc2:
(Должен подойти и на 3.8.х серию)

Скачать хак:
++++++++++++++++++++++++

Хайд-магазин на базе vbcredits для 3.8.4 (русифицироанный)
Установка vBCredits под v3.8.4

Последний раз редактировалось Serberg; 07.02.2010 в 19:26..
  Ответить с цитированием
3 пользователя(ей) сказали cпасибо:
Старый 28.05.2009, 23:33 Вверх   #2
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

хайд-магазин на базе vbcredits

Хак полностью руссифицирован !!!

В общем это можно назвать как магазин или как - денежный хайд
Можно использовать как для фрилансеров. Хак был проверен на скриптах форума: 3.7.5 PL1 и на 3.8.2. В данной вариации были профиксены 3 бага - которые были раньше.

Скриншоты:
Нажми для просмотра


Полный манул по установке и описание настройки хака находятся внутри архива.

Скачать хак all vbcredits

ПРОДОЛЖЕНИЕ НА 2й странице)))

Демо: http://shop-scripts.ru/showthread.php?t=1078



Последний раз редактировалось Serberg; 26.03.2010 в 22:20..
  Ответить с цитированием
6 пользователя(ей) сказали cпасибо:
Старый 28.05.2009, 23:44 Вверх   #3
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Интеграция v3 Arcade в vbcredits

Интеграция v3 Arcade в vbcredits

Английская версия ставится по верх установленной. Добавляются доп поля в БД и доп меню в админке.

Скриншоты:
Нажми для просмотра


Инструкция по установке:
Нажми для просмотра
Сделайте на всяк случай БЭКАП форума

1) Импортируйте продукт product-credits_v3arcade.xml

2)По мануалу сделайте замены в файлах и шаблоне.

3) Обновите F5 админ-панельку.

4) Настройки произведите для игр their costs и jackpots.

================================
Файл: arcade.php
================================
НАЙТИ:

Код:
// Use the correct flash code depending on the game system.
switch ($game['system'])
{
case 0: // v3 Arcade Legacy Title
case 10: // iB Arcade Legacy Title (The same for the time being)
eval('$flashcode = "' . fetch_template('arcade_v3game') . '";');
break;
}
Если вы не найдете, то:

Код:
// Use the correct flash code depending on the game system.
switch ($game['system'])
{
case 0:
// v3 Arcade Legacy Title
eval('$flashcode = "' . fetch_template('arcade_v3game') . '";');
break;
case 10:
// iB Arcade Legacy Title (The same for the time being)
eval('$flashcode = "' . fetch_template('arcade_v3game') . '";');
break;
}
ДОБАВИТЬ НИЖЕ:

Код:
if ($vbulletin->options['credits_enabled'] AND $vbulletin->userinfo['userid'] AND !empty($game['cost']) AND ($vbulletin->userinfo['credits_v3_pass'] <= TIMENOW OR intval($_GET['pay'])))
{
$game['cost'] *= $vbulletin->userinfo['permissions']['credit_v3_discount'];
$addtojackpot = $game['cost'];
$game['cost'] *= (1 + $vbulletin->options['credits_v3_tax']);

if ($vbulletin->userinfo['credits'] < $game['cost'] OR !($vbulletin->userinfo['credits_canget'] OR $vbulletin->userinfo['credits_canspend']))
{
eval(standard_error(fetch_error('credits_v3_notenoughplay', $vbphrase['credits'])));
}
if ($game['jptype'])
{
$db->query_write("UPDATE " . TABLE_PREFIX . "arcade_games SET jackpot = jackpot + $addtojackpot WHERE gameid = " . $game['gameid']);
}

$db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits - " . $game['cost'] . " WHERE userid = " . $vbulletin->userinfo['userid']);
$db->query_write("INSERT INTO " . TABLE_PREFIX . "credits_v3session (gameid, userid) VALUES (" . $game['gameid'] . ", " . $vbulletin->userinfo['userid'] . ")");
}
НАЙТИ:

Код:
if ($highscore==1 && $vbulletin->userinfo['userid']!=$game['highscorerid'])
{
if ($vbulletin->options['neweventonhighscore'])
{
// Add a new news item, since there's a new champion for this game.
$db->query_write("INSERT INTO " . TABLE_PREFIX . "arcade_news (newstext, newstype, datestamp) VALUES ('" . addslashes(construct_phrase($vbphrase['x_is_the_new_champion'], $vbulletin->userinfo['username'], $game['title'], $game['gameid'])) . "', 'auto', " . TIMENOW . ")");
}

($hook = vBulletinHook::fetch_hook('arcade_new_champion')) ? eval($hook) : false;

// Break the bad news the next guy/gal.
$highnotify = true;
}
ДОБАВИТЬ НИЖЕ:

Код:
if ($vbulletin->options['credits_enabled'] AND $vbulletin->userinfo['userid'] AND ($vbulletin->userinfo['credits_canget'] OR $vbulletin->userinfo['credits_canspend']) AND $highscore AND $highscore <= $vbulletin->options['credits_v3_minrank'])
{
$db->query_write("DELETE FROM " . TABLE_PREFIX . "credits_v3session WHERE userid = " . $vbulletin->userinfo['userid'] . " AND gameid = " . $game['gameid']);

if ($db->affected_rows())
{
switch ($vbulletin->options['credits_v3_jptype'])
{
case 'rank':
$winamount = $game['jackpot'] / $highscore;
break;
case 'score':
$winamount = $game['jackpot'] * $highscore;
break;
case 'static':
$winamount = $game['jackpot'];
break;
}
if ($game['jptype'])
{
if ($winamount > $game['jackpot'])
{
$winamount = $game['jackpot'];
}

$db->query_write("UPDATE " . TABLE_PREFIX . "arcade_games SET jackpot = jackpot - $winamount WHERE gameid = " . $game['gameid']);
}

$db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits + $winamount WHERE userid = " . $vbulletin->userinfo['userid']);
}
}
НАЙТИ:

Код:
// Can this user play?
if (!($permissions['arcadepermissions'] & $vbulletin->bf_ugp['arcadepermissions']['canplayarcade']))
{
print_no_permission();
}
ЗАМЕНИТЬ КОД НА:

Код:
// Can this user play?
if (!($permissions['arcadepermissions'] & $vbulletin->bf_ugp['arcadepermissions']['canplayarcade']))
{
if ($vbulletin->options['credits_enabled'] AND $vbulletin->userinfo['userid'] AND ($vbulletin->userinfo['credits_canget'] OR $vbulletin->userinfo['credits_canspend']) AND $vbulletin->userinfo['permissions']['credit_v3_accesscost'])
{
if (!$vbulletin->userinfo['credits_v3_access'])
{
eval(standard_error(fetch_error('credits_v3_buyaccess', $vbulletin->session->vars['sessionurl'], vb_number_format($vbulletin->userinfo['permissions']['credit_v3_accesscost'], $vbulletin->options['credits_decimals']), $vbphrase['credits'])));
}
}
else
{
print_no_permission();
}
}
================================
Файл: admincp/arcadeadmin.php
================================
НАЙТИ:

Код:
// vbBux Integration
if ($vbulletin->options['vbbux_pointsfield'])
{
print_input_row($vbphrase['game_cost'], 'cost', $game['cost']);
}
ЗАМЕНИТЬ КОД НА:

Код:
if ($vbulletin->options['credits_enabled'])
{
print_table_break();
print_column_style_code(array('width: 70%', 'width: 30%'));
print_table_header($vbphrase['credit_settings']);
print_input_row($vbphrase['credits_v3_costacp'], 'cost', $game['cost']);
print_select_row($vbphrase['credits_v3_jptypeacp'], 'jptype', array($vbphrase['credits_v3_static'], $vbphrase['credits_v3_raising']), $game['jptype']);
print_input_row($vbphrase['credits_v3_jackpotacp'], 'jackpot', $game['jackpot']); 
}
НАЙТИ:

Код:
'cost' => TYPE_NUM
ЗАМЕНИТЬ КОД НА:

Код:
'cost' => TYPE_NUM,
'jptype' => TYPE_BOOL,
'jackpot' => TYPE_NUM
НАЙТИ:

Код:
cost='" . $vbulletin->GPC['cost'] . "'
ЗАМЕНИТЬ КОД НА:

Код:
cost='" . $vbulletin->GPC['cost'] . "',
jptype='" . $vbulletin->GPC['jptype'] . "',
jackpot='" . $vbulletin->GPC['jackpot'] . "'
НАЙТИ:

Код:
'isreverse' => TYPE_ARRAY_UINT,
ДОБАВИТЬ НИЖЕ:

Код:
'cost' => TYPE_ARRAY_NUM,
'jptype' => TYPE_ARRAY_BOOL,
'jackpot' => TYPE_ARRAY_NUM,
НАЙТИ:

Код:
isreverse='" . $vbulletin->GPC['isreverse'][$id] . "',
ДОБАВИТЬ НИЖЕ:

Код:
cost='" . $vbulletin->GPC['cost'][$id] . "',
jptype='" . $vbulletin->GPC['jptype'][$id] . "',
jackpot='" . $vbulletin->GPC['jackpot'][$id] . "',
НАЙТИ:

Код:
print_yes_no_row($vbphrase['use_reverse'], "isreverse[$game[gameid]]", $game['isreverse']);
ДОБАВИТЬ НИЖЕ:

Код:
if ($vbulletin->options['credits_enabled'])
{
print_input_row($vbphrase['credits_v3_costacp'], "cost[$game[gameid]]", $game['cost']);
print_select_row($vbphrase['credits_v3_jptypeacp'], "jptype[$game[gameid]]", array($vbphrase['credits_v3_static'], $vbphrase['credits_v3_raising']), $game['jptype']);
print_input_row($vbphrase['credits_v3_jackpotacp'], "jackpot[$game[gameid]]", $game['jackpot']); 
}
================================
Шаблон: arcade_game_bit
================================
НАЙТИ:

Код:
<if condition="$show['fav']">
<img src="$vboptions[arcadeimages]/subfav.gif" align="absmiddle" id="fav_$game[gameid]" class="point" onclick="dofav($game[gameid])" alt="$vbphrase[sub_favorite]" border="0" />
<else />
<img src="$vboptions[arcadeimages]/addfav.gif" align="absmiddle" id="fav_$game[gameid]" class="point" onclick="dofav($game[gameid])" alt="$vbphrase[add_favorite]" border="0" />
</if>
ДОБАВИТЬ НИЖЕ:

Код:
<if condition="$vbulletin->options['credits_enabled']">
<br /><span class="smallfont">
<if condition="$show['override']">
<a href="arcade.php?$session[sessionurl]do=play&gameid=$game[gameid]&pay=1"><phrase 1="$game[cost]" 2="$game[jackpot]" 3="$vbphrase[credits]">$vbphrase[credits_v3_override]</phrase></a>
<else />
$vbphrase[credits_v3_cost]: <b>$game[cost]</b> $vbphrase[credits_v3_jackpot]: <b>$game[jackpot]</b>
</if>
</span>
</if>



Вложения
Тип файла: rar product-credits_v3arcade.rar (4.5 Кб, 6 просмотров)

Последний раз редактировалось Serberg; 07.02.2010 в 19:08..
  Ответить с цитированием
2 пользователя(ей) сказали cпасибо:
Старый 28.05.2009, 23:50 Вверх   #4
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Интеграция ibProArcade с vbcredits

Интеграция ibProArcade с vbcredits

Английская версия.

Перед установкой сделайте бэкап базы на всяк случай.
  • Загружаете все файлы из папки upload к себе на хост
  • Импортируйте продукт product-credits_ibproarcade.xml
  • Произведите замены в файлах
  • Обновите настройки для групп пользователей

Инструкция по установке:
Нажми для просмотра
================================
Файл: arcade.php
================================
НАЙТИ:
--------------------------------
$specialtemplates = array();
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$specialtemplates = array('credits_central');
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("SELECT t.nbtries, t.demare, t.datestarted, t.cost, t.numplayers, g.gtitle, g.gname, g.gid, g.decpoints, g.highscore_type FROM ibf_tournaments as t, ibf_games_list as g WHERE t.gid = g.gid AND t.tid=".$tid." LIMIT 0, 1");
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$DB->query("SELECT t.*, g.gtitle, g.gname, g.gid, g.decpoints, g.highscore_type FROM ibf_tournaments as t, ibf_games_list as g WHERE t.gid = g.gid AND t.tid = $tid LIMIT 0, 1");
--------------------------------
НАЙТИ:
--------------------------------
$tinfo['jackpottxt'] = "";
if ( (floatval($tinfo['cost']) > 0) && (($vbulletin->options['vbbux_enabled'] == 1) && ($vbulletin->options['vbbux_arcadeintegration'] == 1)) )
{
$tinfo['jackpottxt'] = $ibforums->lang['tourney_jackpot1']."<b>".$tinfo['cost']."</b><br />";
$tinfo['jackpottxt'].= $ibforums->lang['tourney_jackpot2']."<b>".(floatval($tinfo['cost'])*intval($tinfo['numplayers']))."</b><br />";
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$tinfo['jackpottxt'] = '<div>' . construct_phrase($GLOBALS['vbphrase']['credits_ibp_tournyinfo'], vb_number_format($tinfo['cost'], $vbulletin->options['credits_decimals']), $GLOBALS['vbphrase']['credits'], vb_number_format($tinfo['jackpot'], $vbulletin->options['credits_decimals'])) . '</div>';
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("SELECT t.numplayers,t.datestarted,t.tid,g.gtitle,g.gid,t.champion FROM ibf_tournaments as t, ibf_games_list as g WHERE champion = '' AND t.gid = g.gid AND demare>0 ORDER BY datestarted DESC");
while($row = $DB->fetch_row()) {
$row['link'] = "<a href='".$ibforums->base_url."act=Arcade&amp;do=viewtourney&amp;tid=".$row['tid']."'>".$ibforums->lang['view_tourney']."</a>";
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$DB->query("SELECT t.*, g.gtitle, g.gid FROM ibf_tournaments as t, ibf_games_list as g WHERE champion = '' AND t.gid = g.gid AND demare > 0 ORDER BY datestarted DESC");

while ($row = $DB->fetch_row())
{
$row['link'] = '<a href="' . $ibforums->base_url . 'act=Arcade&amp;do=viewtourney&amp;tid=' . $row['tid'] . '">' . $ibforums->lang['view_tourney'] . '</a>';
$row['jackpot'] = vb_number_format($row['jackpot'], $vbulletin->options['credits_decimals']);
--------------------------------
НАЙТИ:
--------------------------------
if ($costhtmlstart!="")
{
// add the costs to HTML and format it
$value = $vbulletin->options['vbbux_decimalplaces'];
if (($vbversion != "3.0") && ($NATIVEMODE==0))
{
($hook = vBulletinHook::fetch_hook('ibproarcade_view_tourney_getcosts')) ? eval($hook) : false;
}
$costhtmlstart .= vb_number_format($row['cost'], $value);
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
if ($vbversion != '3.0' AND !$NATIVEMODE)
{
($hook = vBulletinHook::fetch_hook('ibproarcade_view_tourney_getcosts')) ? eval($hook) : false;
}
--------------------------------
НАЙТИ:
--------------------------------
$selected['sort']['gtitle']="";
$selected['sort']['gcount']="";
$selected['sort']['gwords']="";
$selected['sort']['g_rating']="";
$selected['sort']['added']="";
$selected['order']['ASC']="";
$selected['order']['DESC']="";

// make sure the setting is clean and has a valid value
if (!in_array($this->arcade->settings['g_display_sort'],array('gtitle','gcount','gwords','g_rating','added')))
{
$this->arcade->settings['g_display_sort'] = "gtitle";
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$selected = array(
'sort' => array(
'gtitle' => '',
'gcount' => '',
'gwords' => '',
'g_rating' => '',
'added' => '',
'cost' => '',
'jackpot' => ''
),
'order' => array(
'ASC' => '',
'DESC' => ''
)
);

if (!in_array($this->arcade->settings['g_display_sort'], array('gtitle', 'gcount', 'gwords', 'g_rating', 'added', 'cost', 'jackpot')))
{
$this->arcade->settings['g_display_sort'] = 'gtitle';
}
--------------------------------
НАЙТИ:
--------------------------------
// detect vBplaza
if (($vbulletin->options['vbbux_enabled'] == 1) && ($vbulletin->options['vbbux_arcadeintegration'] == 1))
{
$the_game['ibprostyle_info1']=" <fieldset>
<legend><b>{$ibforums->lang['gb_jackpot_title']}</b></legend>
<span class=\"smallfont\"><center>";
$the_game['ibprostyle_info2']=" </center></span></fieldset>";
$the_game['v3style_info']="<br />";

$the_game['cost_info'] = $ibforums->lang['costs_pgame']."<b>".$the_game['cost']."</b><br />";

if ($the_game['jackpot_type']=='-1')
{
// raising Jackpot, so display it in GameBit!
$the_game['jackpot_info'] = $ibforums->lang['gb_win_jackpot_raising']."<b>".$the_game['jackpot']."</b>";
}
else
{
// static Jackpot
$the_game['jackpot_info'] = $ibforums->lang['gb_win_jackpot_static']."<b>".$the_game['jackpot']."</b>";
}
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
if ($vbulletin->options['credits_enabled'])
{
$the_game['ibprostyle_info1'] = '<fieldset><legend><b>' . $vbphrase['credits'] . '</b></legend><span class="smallfont"><center>';
$the_game['ibprostyle_info2'] = '</center></span></fieldset>';
$the_game['v3style_info'] = '<b>' . $vbphrase['credits'] . ':</b><br />';
$the_game['cost_info'] = $vbphrase['credits_ibp_playcost'] . ': <b>' . $the_game['cost'] . '</b><br />';
$the_game['jackpot_info'] = $vbphrase['jackpot'] . ': <b>' . $the_game['jackpot'] . '</b>' . $the_game['pass_extra'];
}
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("SELECT gid, mid, lid FROM ibf_games_league WHERE gid=".$gid." AND mid=".$lboard['mid']." AND position=0");
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
if ($vbulletin->userinfo['credits_canearn'] AND $ctr <= $vbulletin->options['credits_ibp_minrank'] AND $lboard['score'] == $player_score AND $vbulletin->userinfo['credits_ibp_paid'])
{
$paidout = false;

if ($vbulletin->options['credits_ibp_buffer'])
{
$topcurrent = $vbulletin->db->query_read("SELECT * FROM " . TABLE_PREFIX . "games_scores WHERE gid = " . $gid . " ORDER BY score " . ( $ginfo['highscore_type'] == 'high' ? 'DESC' : 'ASC' ) . ", timespent ASC LIMIT " . $vbulletin->options['credits_ibp_minrank']);

while ($topscore = $vbulletin->db->fetch_array($topcurrent))
{
if ($topscore['datescored'] != ( empty($gtime) ? TIMENOW : $gtime ) AND $topscore['name'] == $vbulletin->userinfo['username'] AND $topscore['datescored'] + $vbulletin->options['credits_ibp_buffer'] > TIMENOW)
{
$paidout = true;
break;
}
}

$vbulletin->db->free_result($topcurrent);
}
switch ($vbulletin->options['credits_ibp_jptype'])
{
case 'rank':
$winamount = $ginfo['jackpot'] / $ctr;
break;
case 'score':
$winamount = $ginfo['jackpot'] * $points;
break;
case 'static':
$winamount = $ginfo['jackpot'];
break;
}
if ($winamount)
{
if ($ginfo['jackpot_type'] == 'raising')
{
if ($winamount > $ginfo['jackpot'])
{
$winamount = $ginfo['jackpot'];
}

$vbulletin->db->query_write("UPDATE " . TABLE_PREFIX . "games_list SET jackpot = jackpot - $winamount WHERE gid = $gid");
}

$wintax = $vbulletin->options['credits_ibp_tax'] * $winamount;
$vbulletin->userinfo['credits_ibp_paid'] = false;
$amount = $winamount - $wintax;
$vbulletin->db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits + $amount WHERE userid = " . $vbulletin->userinfo['userid']);
$vbulletin->db->query_write("INSERT INTO " . TABLE_PREFIX . "credits_transactions (touserid, action, comment, amount, timestamp) VALUES (" . $vbulletin->userinfo['userid'] . ", 'ibp_game', '" . $vbulletin->db->escape_string(construct_phrase($GLOBALS['vbphrase']['credits_ibp_game_desc'], vb_number_format($player_score, 0), $ginfo['gtitle'])) . "', $amount, " . TIMENOW . ")");
build_datastore('credits_central', $vbulletin->credits_central + $wintax, false);
}
}
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("SELECT name,id FROM ibf_members WHERE id='".$winner."' LIMIT 1");
$name = $DB->fetch_row();
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$tourn = $vbulletin->db->query_first("SELECT * FROM " . TABLE_PREFIX . "tournaments WHERE tid = " . $tid);
$name = $vbulletin->db->query_first("SELECT *, username AS name FROM " . TABLE_PREFIX . "user WHERE userid = " . $winner);

if ($tourn['jackpot'])
{
$oldtourn = $vbulletin->db->query_first("SELECT user.* FROM " . TABLE_PREFIX . "tournaments AS tourn LEFT JOIN " . TABLE_PREFIX . "user AS user ON(tourn.champion = user.username) WHERE user.credits_canspend = 1 AND tourn.champion != '' AND tourn.tid = " . $tid);

if ($oldtourn['userid'] != $winner)
{
$wintax = $vbulletin->options['credits_ibp_tax'] * $tourn['jackpot'];
$amount = $tourn['jackpot'] - $wintax;

if (!empty($oldtourn['userid']))
{
$vbulletin->db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits - $amount WHERE userid = " . $oldtourn['userid']);
$vbulletin->db->query_write("DELETE FROM " . TABLE_PREFIX . "credits_transactions WHERE touserid = " . $oldtourn['userid'] . " AND action = 'ibp_tourn' AND amount = $amount ORDER BY timestamp DESC LIMIT 1");
}
else if ($wintax)
{
build_datastore('credits_central', $vbulletin->credits_central + $wintax, false);
}
if ($name['credits_canearn'])
{
$vbulletin->db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits + $amount WHERE userid = " . $winner);
$vbulletin->db->query_write("INSERT INTO " . TABLE_PREFIX . "credits_transactions (touserid, action, comment, amount, timestamp) VALUES (" . $winner . ", 'ibp_tourn', '" . $vbulletin->db->escape_string(construct_phrase($GLOBALS['vbphrase']['credits_ibp_tourn_desc'], vb_number_format(( $vbulletin->userinfo['userid'] == $winner ? $savearray[1] : $opponentinfo['rungscore'] ), 0), $gameinfo['gtitle'])) . "', $amount, " . TIMENOW . ")");
}
}
}
--------------------------------
НАЙТИ:
--------------------------------
'cost' => $costs,
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
'jackpot' => $joincost,
'jackpot_type' => 'raising',
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("SELECT creat, gid, demare, numplayers, cost FROM ibf_tournaments WHERE tid = '".$tid."' LIMIT 1");
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$DB->query("SELECT * FROM ibf_tournaments WHERE tid = " . $tid . " LIMIT 1");


================================
Файл: arcade/modules/mod_arcade.php
================================
НАЙТИ:
--------------------------------
$validsort = array('gtitle','gcount','gwords','g_rating','added');
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
$validsort = array('gtitle', 'gcount', 'gwords', 'g_rating', 'added', 'cost', 'jackpot');
--------------------------------
НАЙТИ:
--------------------------------
if ($arcadepass_expire!="")
{
$the_links = "<span class='smallfont' style='color: red;'><b>".$ibforums->lang['arcade_pass'].$arcadepass_expire."</b></span><br />".$the_links;
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
if ($vbulletin->userinfo['userid'] AND $vbulletin->userinfo['creditperms']['credit_ibp_passcost'])
{
$the_links = '<span class="smallfont"><b>' . ( $vbulletin->userinfo['credits_ibp_pass'] > TIMENOW ? construct_phrase($GLOBALS['vbphrase']['credits_ibp_passexpires'], vbdate($vbulletin->options['dateformat'] . ', ' . $vbulletin->options['timeformat'], $vbulletin->userinfo['credits_ibp_pass']), $GLOBALS['vbphrase']['credits']) : construct_phrase($GLOBALS['vbphrase']['credits_ibp_buypass'], vb_number_format($vbulletin->userinfo['creditperms']['credit_ibp_passcost'], $vbulletin->options['credits_decimals']), $GLOBALS['vbphrase']['credits'], $vbulletin->session->vars['sessionurl']) ) . '</b></span><br />' . $the_links;
}


================================
Файл: arcade/skins/skin_Arcade.php AND/OR skin_v3Arcade.php
================================
НАЙТИ:
--------------------------------
<tr>
<td width="100%" align="center" class="thead" colspan="5">{$ibforums->lang['active_tournaments']}</td>
</tr>
<tr>
<td width="20%" align="center" class="tcat">{$ibforums->lang['legend_of_zelda']}</td>
<td width="20%" align="center" class="tcat">{$ibforums->lang['tourney_title']}</td>
<td width="20%" align="center" class="tcat">{$ibforums->lang['num_of_players']}</td>
<td width="20%" align="center" class="tcat">{$ibforums->lang['your_status']}</td>
<td width="20%" align="center" class="tcat">{$ibforums->lang['date_started']}</td>
</tr>
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
<tr>
<td width="100%" align="center" class="thead" colspan="6">{$ibforums->lang['active_tournaments']}</td>
</tr>
<tr>
<td width="17%" align="center" class="tcat">{$ibforums->lang['legend_of_zelda']}</td>
<td width="18%" align="center" class="tcat">{$ibforums->lang['tourney_title']}</td>
<td width="17%" align="center" class="tcat">{$ibforums->lang['num_of_players']}</td>
<td width="16%" align="center" class="tcat">{$ibforums->lang['your_status']}</td>
<td width="16%" align="center" class="tcat">{$ibforums->lang['date_started']}</td>
<td width="16%" align="center" class="tcat">{$GLOBALS['vbphrase']['jackpot']}</td>
</tr>
--------------------------------
НАЙТИ:
--------------------------------
<td align='center' nowrap='nowrap' class='alt1'>{$rowinfo['datestarted']}</td>
</tr>
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
<td align='center' nowrap='nowrap' class='alt1'>{$rowinfo['datestarted']}</td>
<td align='center' nowrap='nowrap' class='alt1'>{$rowinfo['jackpot']}</td>
</tr>
--------------------------------
НАЙТИ ДВАЖДЫ:
--------------------------------
<option value="added" {$selected['sort']['added']}>{$ibforums->lang['dateadded']}</option>
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
<option value="cost" {$selected['sort']['cost']}>{$GLOBALS['vbphrase']['credits_ibp_playcost']}</option>
<option value="jackpot" {$selected['sort']['jackpot']}>{$GLOBALS['vbphrase']['jackpot']}</option>


================================
Файл: admincp/arcade.php
================================
НАЙТИ:
--------------------------------
$sortextra = "";
if (($IN['sort']=="dateasc") || ($IN['sort']=="datedesc") || ($IN['sort']=="timesplayed") || ($IN['sort']=="inactive") || ($IN['sort']=="costs") || ($IN['sort']=="jpraise") || ($IN['sort']=="jpstatic"))
{
if ($IN['sort']=="dateasc") { $sortextra = "added ASC,"; }
if ($IN['sort']=="datedesc") { $sortextra = "added DESC,"; }
if ($IN['sort']=="timesplayed") { $sortextra = "gcount DESC,"; }
if ($IN['sort']=="costs") { $sortextra = "cost DESC,"; }

if ($IN['sort']=="jpraise")
{
$sortextra = "jackpot DESC,";
if ($query_extra=="") { $query_extra ="WHERE jackpot_type='-1'";}
else { $query_extra.=" AND jackpot_type='-1'";}
}

if ($IN['sort']=="jpstatic")
{
$sortextra = "jackpot_type DESC,";
if ($query_extra=="") { $query_extra ="WHERE jackpot_type<>'-1'";}
else { $query_extra.=" AND jackpot_type<>'-1'";}
}
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
switch ($IN['sort'])
{
case 'dateasc':
$sortextra = 'added ASC,';
break;
case 'datedesc':
$sortextra = 'added DESC,';
break;
case 'timesplayed':
$sortextra = 'gcount DESC,';
break;
case 'cost':
$sortextra = 'cost DESC,';
break;
case 'jackpot':
$sortextra = 'jackpot DESC,';
break;
}
--------------------------------
НАЙТИ:
--------------------------------
if ($IN['opt_jackpottype']==1)
{
if ($IN['select_jackpottype']==0)
{
// static Jackpot
if ($staticjp)
{
$db_string = $DB->compile_db_update_string( array ( 'jackpot_type' => $IN['select_jackpotstatic'] ) );
}
else
{
$db_string = $DB->compile_db_update_string( array ( 'jackpot_type' => '0' ));
}
}
else
{
// raising Jackpot
$db_string = $DB->compile_db_update_string( array ( 'jackpot_type' => '-1' ) );
}
$DB->query("UPDATE ibf_games_list SET ".$db_string." WHERE gid IN ".$cat_string);
}
else
{
// no changes on Jackpot-Type, so finally store static value if that was changed
if ($staticjp)
{
// check if Jackpot-Type of that Game isn't set to RAISING (done via Query)
$db_string = $DB->compile_db_update_string( array ( 'jackpot_type' => $staticjackpot ) );
$DB->query("UPDATE ibf_games_list SET ".$db_string." WHERE jackpot_type<>'-1' AND gid IN ".$cat_string);
}
}
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
if ($IN['opt_jackpottype'])
{
$DB->query("UPDATE ibf_games_list SET " . $DB->compile_db_update_string(array('jackpot_type' => $IN['select_jackpottype'])) . " WHERE gid IN " . $cat_string);
}
--------------------------------
НАЙТИ ДВАЖДЫ:
--------------------------------
if( (!is_numeric($costs)) || ($costs < 0) )
{
$costs = 0;
}

if (($jackpottype<0) || ($jackpottype>1))
{
$jackpottype = 1;
}

if( (!is_numeric($jackpot)) || ($jackpot < 0) )
{
$jackpot = 0;
}

if( (!is_numeric($static)) || ($static < 0) )
{
$static = 0;
}

if ($jackpottype == 1)
{
// if raising Jackpot set the Jackpot itself to Zero
$jackpottype = "-1";
}
else
{
// static Jackpot
$jackpottype = $static;
}
--------------------------------
ЗАМЕНИТЬ НА В ОБОИХ:
--------------------------------
$costs = $vbulletin->input->clean_gpc('r', 'cost', TYPE_UNUM);
$jackpottype = $vbulletin->input->clean_gpc('r', 'jackpottype', TYPE_NOHTML);
$jackpot = $vbulletin->input->clean_gpc('r', 'jackpot', TYPE_UNUM);
--------------------------------
НАЙТИ:
--------------------------------
'cost' => $costs,
--------------------------------
ЗАМЕНИТЬ НА:
--------------------------------
'cost' => $vbulletin->input->clean_gpc('r', 'costs', TYPE_UNUM),
'jackpot_type' => $vbulletin->input->clean_gpc('r', 'jackpottype', TYPE_NOHTML),
'jackpot' => $vbulletin->input->clean_gpc('r', 'jackpot', TYPE_UNUM) + ( $vbulletin->input->clean_gpc('r', 'jackpottype', TYPE_NOHTML) == 'raising' ? (sizeof($match) - 1) * $vbulletin->input->clean_gpc('r', 'costs', TYPE_UNUM) : 0 ),
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("INSERT INTO ibf_tournament_players (" .$db_string['FIELD_NAMES']. ") VALUES (". $db_string['FIELD_VALUES'] .")");
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
$vbulletin->db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits - " . $vbulletin->input->clean_gpc('r', 'costs', TYPE_UNUM) . " WHERE userid = $key");
--------------------------------
НАЙТИ:
--------------------------------
print_table_header($ibforums->lang['acp_tourney_edituser']);
print_description_row($ibforums->lang['acp_tourney_editusertxt']."<input type='text' name='username' value='' size='32' class='textinput' readonly='readonly'>");
print_input_row($ibforums->lang['acp_tourney_replace'], 'replaceid', '', 0);
print_submit_row($ibforums->lang['acp_replace'], 0);
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
$tourn = $vbulletin->db->query_first("SELECT * FROM " . TABLE_PREFIX . "tournaments WHERE tid = " . $IN['tid']);
print_form_header('credits_admin', 'ibp_tourn');
print_table_header($vbphrase['credits_ibp_settings']);
construct_hidden_code('tournament', $IN['tid']);
print_input_row($vbphrase['credits_ibp_acp_entrance'], 'costs', $tourn['cost']);
print_select_row($vbphrase['credits_ibp_acp_jackpot_type_tourn'], 'jackpottype', array('raising' => $vbphrase['raising'], 'static' => $vbphrase['static']), $tourn['jackpot_type']);
print_input_row($vbphrase['credits_ibp_acp_jackpot_value_tourn'], 'jackpot', $tourn['jackpot']);
print_submit_row();


================================


Вложения
Тип файла: zip vBCredits with ibProArcade.zip (9.6 Кб, 3 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:05..
  Ответить с цитированием
Cказали cпасибо:
Старый 28.05.2009, 23:54 Вверх   #5
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Интеграция vbcredits с хаком Post Thanks

Интеграция vbcredits с хаком Post Thanks

Интегрируется с любой версией хака где нада кликать спасибо. Так вот, если кликнул спасибо, то получаешь 0.10 центов или 0.10 кредита (у кого на что настроено).


Вложения
Тип файла: rar product-credits_post_thanks.rar (2.0 Кб, 22 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:06..
  Ответить с цитированием
4 пользователя(ей) сказали cпасибо:
Старый 28.05.2009, 23:56 Вверх   #6
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Интеграция vbcredits с хаком букмейкерской конторы vBookie

Интеграция vbcredits с хаком букмейкерской конторы vBookie

Для установки нужно просто импортировать продукт и все.


Вложения
Тип файла: zip product-credits_bookie.zip (1.1 Кб, 7 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:06..
  Ответить с цитированием
Cказали cпасибо:
Старый 28.05.2009, 23:59 Вверх   #7
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

Интеграция vbcredits с хаком vBArmy - vBulletin Army System

Перед началом установки сделайте бэкапп форума, затем следуйте инструкции:
Нажми для просмотра
================================
Файл: (forums)/armysystem/att_include.php
================================
Найти:
--------------------------------
if ($this->value['entries']) {
$this->value['entries'] .= ", $field = '$value'";
} else {

$this->value['entries'] = "$field = '$value'";
}
--------------------------------
Добавить ниже:
--------------------------------
if ($field == 'gold') $this->credits = $value;
--------------------------------
Найти:
--------------------------------
if (!$this->value['where']) {
$this->value['where'] = "WHERE $field = '$value'";
} else {

$this->value['where'] .= " and $field = '$value'";
}
--------------------------------
Добавить ниже:
--------------------------------
if ($field == 'userid') $this->userid = $value;
if ($field == 'id') $this->gameid = $value;
--------------------------------
Найти:
--------------------------------
if($type==count){
--------------------------------
Добавить выше:
--------------------------------
if ($this->value['table'] == 'as_user')
{
if (substr($type, 0, 6) == 'select' AND $this->userid)
{
$this->value['field'] .= ( $this->value['field'] ? ', ' : '' ) . "(SELECT credits FROM " . TABLE_PREFIX . "user WHERE userid = " . $this->userid . ") AS gold";
unset($this->userid);
}
if ($type == 'update' AND $this->gameid AND isset($this->credits))
{
$vbulletin->db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = " . $this->credits . " WHERE userid = (SELECT userid FROM " . TABLE_PREFIX . "as_user WHERE id = " . $this->gameid . ")");
unset($this->gameid, $this->credits);
}
}


================================




Последний раз редактировалось Serberg; 01.06.2009 в 21:06..
  Ответить с цитированием
Cказали cпасибо:
Старый 29.05.2009, 00:09 Вверх   #8
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Интеграция vbcredits с хаком Inferno Quiz

Интеграция vbcredits с хаком Inferno Quiz

Inferno Quiz - это это викторина, ты задаешь вопросы они отвечают, анализируются результаты... и т.д.

Работать должен на всей линейке 3.6.х - 3.8.х

Перед установкой делайте всегда бэкап - на всяк случай.

Инструкция по установке:
Нажми для просмотра
1) Импортировать product-credits_quiz.xml

2) Отредактировать файлы

================================
Файл: quiz.php
================================
НАЙТИ:
--------------------------------
$bbcode_parser =& new vB_BbCodeParser($vbulletin, fetch_tag_list());
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
if ($vbulletin->userinfo['credits'] < $Quiz['credit_cost'])
{
eval(standard_error(fetch_error('credits_quiz_notenough', vb_number_format($Quiz['credit_cost'], $vbulletin->options['credits_decimals']), $vbphrase['credits'])));
}

$db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits - " . $Quiz['credit_cost'] . " WHERE userid = " . $vbulletin->userinfo['userid']);
--------------------------------
НАЙТИ:
--------------------------------
$Report .= "[/list]\n\nYour overall score was: {$Overall}%";
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
$prize = $Quiz['credit_prize'];

if ($Quiz['credit_multiply'])
{
$prize *= ($Overall / 100);
}

$db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits + $prize WHERE userid = " . $vbulletin->userinfo['userid']);
$Report .= "\n" . construct_phrase($vbphrase['credits_prizestring'], vb_number_format($prize, $vbulletin->options['credits_decimals']), $vbphrase['credits']);


================================
Файл: admincp/admin_quiz.php
================================
НАЙТИ:
--------------------------------
Print_My_DDM("Allow users who have finished the quiz to view the correct answers?","q_viewanswer",$viewanswer,-1);
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
print_input_row($vbphrase['credit_cost'], 'credit_cost', 0);
print_input_row($vbphrase['credit_prize'], 'credit_prize', 0);
print_yes_no_row($vbphrase['credit_multiply'], 'credit_multiply', 1);
--------------------------------
НАЙТИ:
--------------------------------
Print_My_DDM("Allow users who have finished the quiz to view the correct answers?","q_viewanswer",$viewanswer,$quiz['q_viewanswer']);
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
print_input_row($vbphrase['credit_cost'], 'credit_cost', $quiz['credit_cost']);
print_input_row($vbphrase['credit_prize'], 'credit_prize', $quiz['credit_prize']);
print_yes_no_row($vbphrase['credit_multiply'], 'credit_multiply', $quiz['credit_multiply']);
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("delete from ".TABLE_PREFIX."quiz_submissions where sid='{$sub['sid']}'");
--------------------------------
ДОБАВИТЬ НИЖЕ:
--------------------------------
$subuser = fetch_userinfo($sub['s_from']);
$db->query_write("UPDATE " . TABLE_PREFIX . "user SET credits = credits + " . $vbulletin->usergroupcache[$subuser['usergroupid']]['credit_makequiz'] . " WHERE userid = " . $subuser['userid']);
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("insert into ".TABLE_PREFIX."quiz
(q_name,q_state,q_perms,q_start,q_end,q_autoend,q_timelimit,q_viewanswer,q_desc,q_forcat,q_image)
values
('{$q_name}',{$q_state},'{$Perms}',".time().",{$End_Time},{$q_autoend},{$q_timelimit},{$q_viewanswer},'{$q_desc}',$q_forcat,'{$q_image}')");
--------------------------------
ЗАМЕНИТЬ ЭТИМ:
--------------------------------
$vbulletin->input->clean_array_gpc('r', array(
'credit_cost' => TYPE_NUM,
'credit_prize' => TYPE_NUM,
'credit_multiply' => TYPE_BOOL
));

$db->query_write("
INSERT INTO " . TABLE_PREFIX . "quiz
(
q_name,
q_state,
q_perms,
q_start,
q_end,
q_autoend,
q_timelimit,
q_viewanswer,
q_desc,
q_forcat,
q_image,
credit_cost,
credit_prize,
credit_multiply
)
VALUES
(
'$q_name',
$q_state,
'$Perms',
" . TIMENOW . ",
$End_Time,
$q_autoend,
$q_timelimit,
$q_viewanswer,
'$q_desc',
$q_forcat,
'$q_image',
" . $vbulletin->GPC['credit_cost'] . ",
" . $vbulletin->GPC['credit_prize'] . ",
" . $vbulletin->GPC['credit_multiply'] . "
)
");
--------------------------------
НАЙТИ:
--------------------------------
$DB->query("update ".TABLE_PREFIX."quiz
set q_name='{$q_name}',q_state={$q_state},q_perms='{$Perms}',q_end={$End_Time},q_autoend={$q_autoend},q_timelimit={$q_timelimit},q_viewanswer={$q_viewansw er},q_desc='{$q_desc}',q_forcat=$q_forcat,q_image='{$q_image}'
where qid='{$quiz['qid']}'");
--------------------------------
ЗАМЕНИТЬ ЭТИМ:
--------------------------------
$vbulletin->input->clean_array_gpc('r', array(
'credit_cost' => TYPE_NUM,
'credit_prize' => TYPE_NUM,
'credit_multiply' => TYPE_BOOL
));

$db->query_write("
UPDATE " . TABLE_PREFIX . "quiz SET
q_name = '$q_name',
q_state = $q_state,
q_perms = '$Perms',
q_end = $End_Time,
q_autoend = $q_autoend,
q_timelimit = $q_timelimit,
q_viewanswer = $q_viewanswer,
q_desc = '$q_desc',
q_forcat = $q_forcat,
q_image = '$q_image',
credit_cost = " . $vbulletin->GPC['credit_cost'] . ",
credit_prize = " . $vbulletin->GPC['credit_prize'] . ",
credit_multiply = " . $vbulletin->GPC['credit_multiply'] . "
WHERE
qid = $quiz[qid]
");


================================



Вложения
Тип файла: rar product-credits_quiz.rar (1.7 Кб, 6 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:06..
  Ответить с цитированием
Cказали cпасибо:
Старый 29.05.2009, 00:26 Вверх   #9
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Интеграция vbcredits с хаком Timed Registration Incentive

Интеграция vbcredits с хаком Timed Registration Incentive

1) Отредактируйте значения в upload/plugins/credits_drive.php, сохраните и залейте на хост

2) Создайте новый модуль в админке (продукты и модули):
Местоположение модуля: register_addmember_complete
Заголовок: Award Users Extra Credits During Registration Drive
Код PHP модуля : include(DIR . '/plugins/credits_drive.php');


Вложения
Тип файла: zip vbcredits and Timed Registration Incentive.zip (1.3 Кб, 2 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:06..
  Ответить с цитированием
2 пользователя(ей) сказали cпасибо:
Старый 29.05.2009, 00:36 Вверх   #10
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Система приема заявок на вывод денег из vbcredits

Система приема заявок на выплату денег для vbcredits



Инструкция по установке на русском языке находится в архиве вместе с хаком.
Вложения
Тип файла: zip vbcredits_post.zip (12.5 Кб, 41 просмотров)

Последний раз редактировалось Serberg; 07.02.2010 в 19:08..
  Ответить с цитированием
2 пользователя(ей) сказали cпасибо:
Старый 01.06.2009, 20:50 Вверх   #11
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

Привязка казино к vbcredits




1. Сделать замену с файлах: product-******.xml, UPLOAD\admincp\******_settings.php, readme.txt
========
найти везде
========

Код:
******_cash
==========
заменить везде
==========

Код:
credits
Т.е. как пример должно выглядеть:
Код:
ДО: $query = "ALTER TABLE ". TABLE_PREFIX . "user ADD ******_cash integer default 250";
Код:
ПОСЛЕ: $query = "ALTER TABLE ". TABLE_PREFIX . "user ADD credits integer default 250";
****** - это слово на английском "казино"

2. Начать установку согласно инструкции в readme.txt

Предварительно необходимо установить vbcredits (русская версия)



Последний раз редактировалось Serberg; 07.02.2010 в 19:04..
  Ответить с цитированием
Cказали cпасибо:
Старый 01.06.2009, 20:53 Вверх   #12
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

Реальные деньги в системе vbcredits

Использование модуля платежной системы Robokassa (webmoney, yandex-money, RBKmoney, moneymail и другие) для пополнения лицевого счета в vbcredits

Нажми для просмотра
1. Необходимо зарегистрироваться на сайте РОБОКАССЫ - http://robokassa.ru



2. Создать файл 2.php скопировать этот код и отредактировать данные mysql_connect & $mrh_pass2 по завершении залить на хост в папку includes (/includes/2.php)

PHP код:
<?
if(isset($_REQUEST['OutSum']))
{
mysql_connect("localhost""имя_владельца_db""pass_db")
or die (
"<FONT COLOR=\"#FF0000\"><B>Error:</B></FONT> Unable to connect to the database.");
mysql_select_db("имя_вашей_db")
or die (
"<FONT COLOR=\"#FF0000\"><B>Error:</B></FONT> Databases do not exist.");
mysql_query("SET NAMES cp1251");

$mrh_pass2 "robopass_#2";
// registration info (пароль #2 в робокассе)

//current date
$tm=getdate(time()+9*3600);
$date="$tm[year]-$tm[mon]-$tm[mday] $tm[hours]:$tm[minutes]:$tm[seconds]";

// read parameters
$out_summ $_REQUEST["OutSum"];
$inv_id $_REQUEST["InvId"];
$shp_item $_REQUEST["Shp_item"];
$crc $_REQUEST["SignatureValue"];

$crc strtoupper($crc);

$my_crc strtoupper(md5("$out_summ:$inv_id:$mrh_pass2:Shp_item=$shp_item"));

if (
$my_crc !=$crc)
{
  echo 
"bad sign\n";
  
//exit();
}
        
// save order info to file
$f=@fopen("order.txt","a+") or
          die(
"error");
fputs($f,"order_num :$inv_id;Summ :$out_summ;Date :$date\n");
fclose($f);

$query19 mysql_query("SELECT *  FROM `schet` WHERE `id` = $inv_id");
$dow mysql_fetch_array($query19);
$userid $dow['userid'];
$credits $dow['kredit'];
$db mysql_query("UPDATE `user` SET `credits` = `credits` + '".$credits."' WHERE `userid` = '".$userid."'");
echo 
"OK$inv_id\n";

}
?>
3. Создать файл 3.php скопировать этот код и отредактировать данные $dengit & $mrh_pass1 & $mrh_login и загрузить на хост в папку includes (/includes/3.php)

PHP код:
<?
$dat
=date ('Y-m-d'time()+(3600*24*$i));
echo 
$dat;

function 
plati()
{
if(isset(
$_POST['addproect']))
{
$kredit=$_POST['kredit'];
$id=$_POST['id'];

$sql mysql_query("INSERT INTO `schet` (userid, kredit) VALUES ('".$id."', '".$kredit."')");

$dengi=$kredit*35//курс бакса 1$ = 35 rub

$mrh_login "robologin";  // логин ваш в робокассе
$mrh_pass1 "robopass_#1";  // registration info (пароль #1 в робокассе)
$inv_id mysql_insert_id();
$inv_desc "popolnenie licevogo scheta na summu $kredit USD";
$out_summ $dengi;
$shp_item 1;
$in_curr "PCR";
$culture "en";
$encoding "utf-8";
$crc  md5("$mrh_login:$out_summ:$inv_id:$mrh_pass1:Shp_item=$shp_item");

$rank "<html><script language=JavaScript ".
      
"src='https://www.roboxchange.com/mrh_summpreview.asp?".
      
"MrchLogin=$mrh_login&OutSum=$out_summ&InvId=$inv_id&IncCurrLabel=$in_curr".
      
"&Desc=$inv_desc&SignatureValue=$crc&Shp_item=$shp_item".
      
"&Culture=$culture&Encoding=$encoding'></script></html>";
}

return 
$rank;
}
?>
4. Создать новый файл order.txt и установить атрибуты на него 666 или 777) и загрузить на хост в папку includes (/includes/order.txt) - это лог пополнений лицевых счетов...

5. В админке создать новый модуль.
продукт: vbulletin
Местоположение модуля : global_start
Заголовок : oplata
Код PHP модуля :

PHP код:
require_once(DIR '/includes/3.php');

$crek plati(); 
6. Найти шаблон и отредактировать его - credits_purchase.
Весь код шаблона заменить этим и отредактироваль линки на src= + по желании перевести с транслита на кириллицу.

Код:
<table class="tborder" cellpadding="$stylevar[cellpadding]" cellspacing="$stylevar[cellspacing]" border="0" width="100%" align="center">
<tr>
    <td class="tcat">Popolnit' schet</td>
</tr>
<tr>
    <td class="panelsurround" align="center">
    <div class="panel">
        <div align="$stylevar[left]">

    <table cellpadding="0" cellspacing="$stylevar[formspacer]" border="0" width="100%" align="center">
    <tr>
        <td width="67%" valign="center" rowspan="2">
            <div align="center"><strong>Popolnenie Vashego licevogo scheta, posredstvom sistemy avtomaticheskogo processinga jelektronnyh valjut - "ROBOKASSY"</strong></div>

<form name="send" action="credits.php?do=manage#purchase" method="post"><input type="hidden" name="id" value="$bbuserinfo[userid]">
<p align="center"> Vvedite summu $vbphrase[credits]: <input name="kredit" type="text" value="0" size="10">
<input type="submit" value="Popolnit'" name="addproect"></p>
</form>
<br />
$crek
<p><img title="ROBOXchange Cash Register" src="http://yoursite.com/images/merchant/ban_robox.gif" alt="ROBOXchange Cash Register" align="left" border="0" vspace="10" width="75" height="72" hspace="10">Servis Roboxchange.com nachal dejstvovat' v 2002 godu i pervym nachal obmenivat' jelektronnye valjuty avtomaticheski i mgnovenno. V nastojawee vremja Roboxchange.com javljaetsja mirovym liderom avtomaticheskogo processinga jelektronnyh valjut, kak po chislu operacij, tak i po summarnomu ob#emu tranzakcij.</p>
                            <p align="right"><img src="http://yoursite.com/images/payment.jpg" alt=""></p>

        </td>
    </tr>
    </table>

        </div>
    </div>
    </td>
</tr>
</table>

<br />
7. В phpmyadmin сделать SQL запрос для вашей БД"

Код:
DROP TABLE IF EXISTS `schet`;
CREATE TABLE `schet` (
  `id` int(11) NOT NULL auto_increment,
  `userid` int(11) NOT NULL,
  `kredit` int(11) NOT NULL,
  PRIMARY KEY  (`id`)
) ENGINE=MyISAM AUTO_INCREMENT=209 /*!40101 DEFAULT CHARSET=cp1251 */;

INSERT INTO `schet` VALUES
(200, 1, 0),
(201, 1, 0),
(202, 0, 0),
(203, 0, 10),
(204, 0, 23),
(205, 0, 100),
(206, 0, 100),
(207, 1, 10),
(208, 1, 6546);


Общий вид должен быть приблизительно таким:



Демо: http://shop-scripts.ru/showthread.php?t=1078



Последний раз редактировалось Serberg; 07.02.2010 в 19:04..
  Ответить с цитированием
3 пользователя(ей) сказали cпасибо:
Старый 01.06.2009, 20:57 Вверх   #13
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо

Это конвертер vbBux / vbPlaza в vbcredits - т.е. будут фигурировать уже кредиты (у нас это $ - если внимательно смотреть посты выше)

Что нада: vBCredits v1.4 и vbBux / vbPlaza

В архиве лежат 2 файла, импортируйте тот, который сооттветствует версии вашего vBPlaza, т.е. файл 1 для vBPlaza 1.xx и 2 соответсвенно для vBPlaza 2.xx


Вложения
Тип файла: zip vBPlaza Converters.zip (1.4 Кб, 5 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:08..
  Ответить с цитированием
Cказали cпасибо:
Старый 01.06.2009, 21:03 Вверх   #14
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо

Это конвертер очков (points) из хака uCash & Ushop в кредиты (credits или USD).

Требования: vBCredits v1.4 и uCash & Ushop v2.00 Beta 1

По завершении проверить и удалить uCash & Ushop или настроить vbcredits

Это конвертер очков (points) из хака Gold! в кредиты (credits или USD).

Требования: vBCredits v1.4 и Gold! v1.0.3

Это конвертер очков (points) из хака vBPoints в кредиты (credits или USD).

Требования: vBCredits v1.4 и vBPoints v1.0.0 B 4

P.S. vBPoints v1.0.0 B 4 - немецкий хак

Это конвертер очков (points) из хака IBank в кредиты (credits или USD).
Требования: vBCredits v1.4 и IBank v1.1.0

Это конвертер очков (points) из хака ICash в кредиты (credits или USD).
Требования: vBCredits v1.4 и ICash v1.0.2

Это конвертер очков (points) из хака vCash (vBookie) в кредиты (credits или USD).
Требования: vBCredits v1.4 и vBookie v1.0.7

Это конвертер очков (points) из хака RPG Inferno (v3) в кредиты (credits или USD).
Требования: vBCredits v1.4 и RPG Inferno v3.0.0 Gold


Вложения
Тип файла: rar product-credits_bookiehack.rar (558 байт, 1 просмотров)
Тип файла: rar product-credits_gold.rar (604 байт, 1 просмотров)
Тип файла: rar product-credits_ibank.rar (551 байт, 1 просмотров)
Тип файла: rar product-credits_icash.rar (601 байт, 2 просмотров)
Тип файла: rar product-credits_rpg_inferno.rar (606 байт, 1 просмотров)
Тип файла: rar product-credits_ucs.rar (788 байт, 1 просмотров)
Тип файла: rar product-credits_vbpoints.rar (550 байт, 2 просмотров)

Последний раз редактировалось Serberg; 01.06.2009 в 21:08..
  Ответить с цитированием
Cказали cпасибо:
Старый 07.02.2010, 04:32 Вверх   #15
Местный житель
 
Аватар для hajmer
hajmer вне форума
Доп. информация
По умолчанию

Цитата Сообщение от Serberg Посмотреть сообщение
vbCredits - это отдельная тема заслуживающая особого внимания в связи с тем что данный хак очень круто развит и позволяет ввсести денежную систему на форуме, а эту систему можно привязывать к другим модам, таким как казино, карты на булки, аркаде и т.д.

[
Хак версии vbCredits 1.4 rc2:
(Должен подойти и на 3.8.х серию)
А где собственно сами файлы для данного модуля-продукта, выложен только продукт.

При заливке продукста , мне пишет
In order to upgrade or install vBCredits, you must upload credits_installer.php to the plugins folder within your forum directory!
не достающие файлы нашел тут http://rapidshare.com/files/13741774...ev1__vb3.7.zip

Поиск по форуму результатов не дал, по файлам...

Последний раз редактировалось hajmer; 07.02.2010 в 05:47..
  Ответить с цитированием
Cказали cпасибо:
Старый 07.02.2010, 19:27 Вверх   #16
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

hajmer, долил все в первый пост + добавил магазин для 3.8.4
  Ответить с цитированием
Старый 15.09.2010, 13:47 Вверх   #17
Новичок
 
Аватар для cjcrazy
cjcrazy вне форума
Доп. информация
По умолчанию

для версии 3,8,6 подойдёт этот хак?
  Ответить с цитированием
Старый 15.09.2010, 14:20 Вверх   #18
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

Цитата Сообщение от cjcrazy Посмотреть сообщение
для версии 3,8,6 подойдёт этот хак?
Думаю что да. Попробовать то никто не запрещает.
  Ответить с цитированием
Старый 28.12.2010, 16:23 Вверх   #19
Местный житель
 
Аватар для hajmer
hajmer вне форума
Доп. информация
По умолчанию Большая нагрузка на сервер, флуд DDOS

Ахтунг!.
Всем , внимание !. есть очень серьезная бага и тд проблема.
Особенно если ваши пользователи будут заходить под браузером Opera/
Попросту говоря нагрузят вашь ресурс и задосят...
Я не знаю с чем это связано, но примерно 5 месяцев назат появилась данная проблема, видимо с выходами новых релизов.
Ниже описание проблемы, и ее решение....
Огромное спасибо ребятам из http://my.opera.com/russian/forums/
и http://operafan.net/forum/ кто помог разобраться в данной проблеме.
==================================================
Проблема:
Множество исходящих запросов на web сервер форума из-за браузера OPERA
Ситуация такая.
С лета этого года, на обслуживаемом мною вэб портале- форуме vbulletin , заметил большие нагрузки.
Нагрузки были схожи как ddos , но странность была в том, что это оказались зарегестрированными пользователями, которые использовали в качестве браузера ОПЕРУ!.
Если человек коннектится к веб серверу и тд форуму, от него начинает исходить массовый флуд!.

входящий трафик на форум с переодичностью примерно в 1 секунду

tcp in 178.18.*.*:1031
tcp in 178.18.*.*:1032
tcp in 178.18.*.*:1033
и так примено до 100-500 бывает запросов подряд, пока не зависает сервер..
При этом, у клиента, выглядит так, то же не лутчим образом


Uploaded with ImageShack.us
Самое интересное, что в других браузера ФАЕРФОК , ИЕ, ТАКОГО НЕТ!!!!
Пробовали 10 разных пользователей, РЕЗУЛЬТАТ ТОТ ЖЕ!

==================
Решение проблемы
Как сказал Алекс Кверти , проблемы была в reload_credits ...
В vbulletin за данную фунцию отвечал хак - vbcredits , я не стал разбираться в каком месте проблему, так как довольно емкий , разбросан по разным шаблонам. Решил попросту его УДАЛИТЬ.
Всем еще раз спасибо.
  Ответить с цитированием
2 пользователя(ей) сказали cпасибо:
Старый 20.02.2011, 12:10 Вверх   #20
Новичок
 
Аватар для OLEgator007
OLEgator007 вне форума
Доп. информация
По умолчанию

Поставил себе на форум, но при создании сообщения с денежным хайдом выдает такую ошибку:

Вот файл class_bbcode.php
Очень надеюсь на вашу помощь!
  Ответить с цитированием
Старый 20.02.2011, 20:20 Вверх   #21
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

OLEgator007, погуглить по теме не пробовал ? Файл class_bbcode.php тут 100 пудоф не причем.
  Ответить с цитированием
Старый 07.09.2011, 13:00 Вверх   #22
Новичок
 
Аватар для DeusEx
DeusEx вне форума
Доп. информация
По умолчанию

Уже очень давно ищу что-то вроде форумных денег. Ничего путного найти не могу. Что сейчас актуально для версии форума 3.8.7?
  Ответить с цитированием
Старый 07.09.2011, 14:15 Вверх   #23
Пользователь
 
Аватар для MEW
MEW вне форума
Доп. информация
По умолчанию

Цитата Сообщение от Serberg Посмотреть сообщение
хайд-магазин на базе vbcredits

Хак полностью руссифицирован !!!

В общем это можно назвать как магазин или как - денежный хайд
Можно использовать как для фрилансеров. Хак был проверен на скриптах форума: 3.7.5 PL1 и на 3.8.2. В данной вариации были профиксены 3 бага - которые были раньше.
А этот магазин пойдёт вместе с vBCredits v2.1 Gold?
И ещё - что значит вообще фраза "хайд-магазин"? Это собственно магазин, или что-то не совсем то?
  Ответить с цитированием
Старый 09.11.2011, 15:56 Вверх   #24
Опытный пользователь
 
Аватар для Livecheg
Livecheg вне форума
Доп. информация
По умолчанию

Сегодня утром получил такое "счастливое" письмо.

Привет [...], вы только что получили 99,999,999,999,999,996,881,384,047,029,926,983,435 ,371,269,061,279,689,406,644,211,752,791,525,136,6 70,645,395,254,002,395,395,884,805,259,264 Мнт от [...].

Слудующий комментарий был сделан:
Вы можете посмотреть этот перевод в вашем Записи денежных переводов.

Убедитесь, что вы использовали это с умом, и отличного вам дня.
Пользователь был зарегистрирован вечером,за такое короткое время невозможно было сделать такое кол-во мнт...
Значит есть какая-то лазейка,подскажите как убрать?И с чем это связано?
  Ответить с цитированием
Старый 17.02.2012, 22:49 Вверх   #25
Опытный пользователь
 
Аватар для AggreSSor
AggreSSor вне форума
Доп. информация
По умолчанию

Скачал отсюда http://www.bormotuhi.net/showpost.ph...&postcount=250 ENG импортируется нормально, а русский никак не хочет, выдает "указан несуществующий файл".

С этой темы пришлось русский перекодировать в UTF-8.

А каким образом можно организовать на форуме систему подарков, которые можно купить и подарить другим пользователям через эту систему?

Последний раз редактировалось AggreSSor; 17.02.2012 в 23:11..
  Ответить с цитированием
Ответ

Метки
gold!, plaza, vbcredits, вбкредит, голд, денежная система, кредитс, кредиты, плаза, поды vbcredits

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как настроить vBcredits Deluxe 2.0 v2? Darkside vBulletin 4.x 0 30.06.2011 20:04
вопрос по vbCredits - денежная система d.i.e.g.o vBulletin 3.х 4 22.11.2010 20:27
Apply the Fix for Old vBulletins.txt for your installation of vBCredits to work on this version ... Oneyros vBulletin 3.х 4 15.08.2010 21:52
Примочки для SLAED CMS Serberg Разные скрипты 1 12.04.2009 13:49
Примочки для Photoshop.... Serberg Photoshop (Фотошоп) 3 24.10.2008 23:14


Текущее время: 23:46. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2024, vBulletin Solutions, Inc. Перевод: zCarot
 

Время генерации страницы 0.54841 секунды с 13 запросами