query('SELECT short_name, full_name, info FROM clans where owner_id = ?i', $user->id)->fetch_object();
$clanFullName = $_POST['clan_full_name'] ?? '';
$clanShortName = $_POST['clan_short_name'] ?? '';
$clanInfo = $_POST['clan_info'] ?? '';
$userBank = new \Battles\Bank($user->id);
if ($clanFullName && $clanShortName && $clanInfo && !$userClan) {
$eff = db::c()->query('SELECT 1 FROM users_effects WHERE type = 20 AND owner_id = ?i', $user->id);
$name_check = db::c()->query('SELECT owner_id FROM clans WHERE full_name = "?s" OR short_name = "?s"', $clanFullName, $clanShortName);
$errorMessage = [];
if (Config::$clan_register_lock) {
$errorMessage[10] = 'Регистрация кланов закрыта!
';
}
if ($user->align) {
$errorMessage[0] = 'Вы уже имеете направленность!.
';
}
if ($user->clan) {
$errorMessage[1] = 'Вы уже состоите в клане!.
';
}
if (Config::$clan_register_cost >= $userBank->getMoney()) {
$errorMessage[2] = 'Не хватает денег на регистрацию клана.
';
}
if (!$eff) {
$errorMessage[3] = 'Нет проверки.
';
}
if (!$name_check) {
$errorMessage[4] = 'Клан с такими данными уже существует.
';
}
if (!$errorMessage || $user->admin) {
try {
db::c()->query('INSERT INTO clans (owner_id, full_name, short_name, info) VALUES (?i,"?s","?s","?s")', $user->id, $clanFullName, $clanShortName, $clanInfo);
$userBank->setMoney($userBank->getMoney() - Config::$clan_register_cost);
Battles\Bank::setBankMoney($userBank->getMoney(), $user->id, 'clanRegister');
// Заглушка для отображения данных по только что зарегистрированному клану, когда запрос в базу в начале файла ещё не проходит.
$userClan = new stdClass();
$userClan->full_name = $clanFullName;
$userClan->short_name = $clanShortName;
$userClan->info = $clanInfo;
unset($clanShortName, $clanFullName, $clanInfo);
echo 'Заявка на регистрацию клана подана.';
} catch (Throwable $exception) {
echo 'Ошибка записи в базу!
' . $exception . '
';
}
} else {
foreach ($errorMessage as $error) {
echo sprintf('%s', $error);
}
}
}
\Battles\Template::header(\Battles\Rooms::$roomNames[30]);
\Battles\Template::buildingTop(\Battles\Rooms::$roomNames[30], 'strah');
if ($userClan): ?>
Для регистрации клана необходимо иметь:
- Проверку на чистоту. У вас её нет.
- 10000 кредитов на банковском счёте. У вас на счету getMoney() ?>.
Поле информации не обазательное. Но его содержимое может серьёзно повысить шансы на регистрацию клана.
Заявку на регистрацию подает глава клана.