- 1
- 2
- 3
- 4
AnimationAnimator* AnimationAnimator::getThis()
{
return this;
}
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+66
AnimationAnimator* AnimationAnimator::getThis()
{
return this;
}
Я не знаю что это было, но теперь оно такое. Вызывается из трех мест. Мне страшно :С
+122
➜ git push
fatal: The current branch master has no upstream branch.
To push the current branch and set the remote as upstream, use
git push --set-upstream origin master
➜ fuck
git push --set-upstream origin master
Counting objects: 9, done.
...
Это прекрасно! https://github.com/nvbn/thefuck
−159
Запрос = Новый Запрос();
Запрос.МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц;
Запрос.Текст = "ВЫБРАТЬ
| Проекты.Ссылка КАК Проект, Проекты.Менеджер КАК Менеджер, Проекты.СтатусПроекта, Проекты.ТипПроекта, Проекты.ВидПродукции,
| Проекты.ДатаТретейПодписи, Проекты.ДатаНачалаСтадии, Проекты.РасчетнаяДатаОкончанияСтадии, Проекты.Приоритет
|ИЗ Справочник.Проекты КАК Проекты
|ГДЕ (Проекты.ДатаОтправкиТЗ >= &НачДата И Проекты.ДатаОтправкиТЗ <= &КонДата ИЛИ Проекты.ДатаОтправкиТЗ = ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0))
| И (&ВыбМенеджер = ЗНАЧЕНИЕ(Справочник.Сотрудники.ПустаяСсылка) ИЛИ Проекты.Менеджер = &ВыбМенеджер)
| И (&ВыбСтатусПроекта = ЗНАЧЕНИЕ(Перечисление.Статусы.ПустаяСсылка) ИЛИ Проекты.СтатусПроекта = &ВыбСтатусПроекта)
| И Проекты.ПометкаУдаления = &ЗначПометкиНаУдаление";
Запрос.УстановитьПараметр("НачДата",НачДата);
Запрос.УстановитьПараметр("КонДата",КонДата);
Запрос.УстановитьПараметр("ВыбМенеджер",ВыбМенеджер);
Запрос.УстановитьПараметр("ВыбСтатусПроекта",ВыбСтатусПроекта);
Запрос.УстановитьПараметр("ЗначПометкиНаУдаление",ложь);
ТЗ = Новый ТаблицаЗначений;
ТЗ.Колонки.Добавить("Менеджер");
ТЗ.Колонки.Добавить("Проект");
ТЗ.Колонки.Добавить("ТипПроекта");
ТЗ.Колонки.Добавить("ВидПродукции");
ТЗ.Колонки.Добавить("ДатаТретейПодписи");
ТЗ.Колонки.Добавить("ДатаНачалаСтадии");
ТЗ.Колонки.Добавить("РасчетнаяДатаОкончанияСтадии");
ТЗ.Колонки.Добавить("ПлановаяДатаОтправкиТЗ");
ТЗ.Колонки.Добавить("Статус"); //Статус проекта
ТЗ.Колонки.Добавить("Приоритет"); //Статус проекта
Результат = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = Результат.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если (ВыборкаДетальныеЗаписи.СтатусПроекта = Перечисления.Статусы.Выполнено) Тогда
Продолжить;
КонецЕсли;
Если ЗначениеЗаполнено(ВыборкаДетальныеЗаписи.РасчетнаяДатаОкончанияПроекта) = Ложь Тогда
Продолжить;
КонецЕсли;
Если СокрЛП(ВыборкаДетальныеЗаписи.ДатаОтправкиТЗ) = "01.01.0001 0:00:00" Тогда
если (ВыборкаДетальныеЗаписи.РасчетнаяДатаОкончанияПроекта-60*60*24*45 >= НачДата) и (ВыборкаДетальныеЗаписи.РасчетнаяДатаОкончанияПроекта-60*60*24*45<= КонДата) Тогда
Иначе
продолжить;
КонецЕсли;
КонецЕсли;
НоваяСтрока = ТЗ.Добавить();
НоваяСтрока.Проект = ВыборкаДетальныеЗаписи.Проект;
НоваяСтрока.Менеджер = ВыборкаДетальныеЗаписи.Менеджер;
НоваяСтрока.ВидПродукции = ВыборкаДетальныеЗаписи.ВидПродукции;
НоваяСтрока.ТипПроекта = ВыборкаДетальныеЗаписи.ТипПроекта;
НоваяСтрока.ДатаТретейПодписи = ВыборкаДетальныеЗаписи.ДатаТретейПодписи;
НоваяСтрока.РасчетнаяДатаОкончанияСтадии = ВыборкаДетальныеЗаписи.РасчетнаяДатаОкончанияСтадии;
НоваяСтрока.ДатаНачалаСтадии = ВыборкаДетальныеЗаписи.ДатаНачалаСтадии;
НоваяСтрока.Статус = ВыборкаДетальныеЗаписи.СтатусПроекта;
НоваяСтрока.ПлановаяДатаОтправкиТЗ = ВыборкаДетальныеЗаписи.РасчетнаяДатаОкончанияПроекта-60*60*24*45;//-45 дней
НоваяСтрока.Приоритет = ВыборкаДетальныеЗаписи.Приоритет;
КонецЦикла;
тз.Сортировать("Менеджер,ТипПроекта возр, Приоритет Убыв,Проект");
РФ = РеквизитФормыВЗначение("Отчет");
Макет = РФ.ПолучитьМакет("ПечатьПроектов");
ОбластьШапки = Макет.ПолучитьОбласть("Шапка");
ОбластьСтроки = Макет.ПолучитьОбласть("Строка");
ОбластьТипаПроекта = Макет.ПолучитьОбласть("ТипПроекта");
ОблатстьОтложенныхПроектов = Макет.ПолучитьОбласть("Отложенные");
ОбластьМенеджеры = Макет.ПолучитьОбласть("МЕНЕДЖЕР");
ТабДок = Новый ТабличныйДокумент;
ТабДок.Очистить();
ТабДок.Вывести(ОбластьШапки);
Если тз.Количество()>0 Тогда
ТекущийТипПроекта = 0; ТекущийМенеджер = 0; пн = 0;
Для Каждого ТекущаяСтрока Из тз Цикл
Если ТекущаяСтрока.Статус = Перечисления.Статусы.Отложено Тогда
продолжить;
КонецЕсли;
Если (ТекущийМенеджер = 0) или (ТекущийМенеджер <> ТекущаяСтрока.Менеджер) Тогда
ТекущийМенеджер = ТекущаяСтрока.Менеджер;
ОбластьМенеджеры.Параметры.тМенеджер = ТекущийМенеджер;
ТабДок.Вывести(ОбластьМенеджеры);
КонецЕсли;
Если (ТекущийТипПроекта = 0) или (ТекущийТипПроекта <> ТекущаяСтрока.ТипПроекта) Тогда
ТекущийТипПроекта = ТекущаяСтрока.ТипПроекта;
ОбластьТипаПроекта.Параметры.тТипПроекта = ТекущийТипПроекта;
ТабДок.Вывести(ОбластьТипаПроекта);
КонецЕсли;
пн = пн + 1;
ОбластьСтроки.Параметры.ПН = пн;
ОбластьСтроки.Параметры.тПроектАртикул = СокрЛП(ТекущаяСтрока.ВидПродукции) + Символы.ПС + СокрЛП(ТекущаяСтрока.проект.Наименование);
ОбластьСтроки.Параметры.тПроектРасшифровка = ТекущаяСтрока.проект;
ОбластьСтроки.Параметры.тПлановаяДатаОтправкиТЗ = формат(ТекущаяСтрока.ПлановаяДатаОтправкиТЗ,"ДФ=dd.MM.yyyy");//-45 дней от расчетной даты окончания
ОбластьСтроки.Параметры.тДатаТретейПодписи = СокрЛП(Формат(ТекущаяСтрока.ДатаТретейПодписи,"ДФ=dd.MM.yyyy"));
ТабДок.Вывести(ОбластьСтроки);
КонецЦикла;
Попытка
ТабДок.Области.Строка.АвтоВысотаСтроки = Истина;
ТабДок.АвтоМасштаб = Истина;
ТабДок.ПолеСправа = 0;
ТабДок.ПолеСлева = 0;
ТабДок.ПовторятьПриПечатиСтроки = ТабДок.Область(1,,2,);
ТабДок.ФиксацияСверху = 2;
Исключение
КонецПопытки;
КонецЕсли;
ТД = ТабДок;
ТД.Напечатать();
Серверная процедура в 8.2. Автор - "семёрочник-многостаночник". Переписываю и рыдаю...
Ужимал как мог, чтобы вместилось.
+160
$Result = MySQL_Query("SELECT name FROM users WHERE name='$Login'") or ("Can't execute query.");
if (MySQL_Num_Rows($Result))
{
echo "Account <b>".$Login."</b> is exists";
}
...
elseif ((StrLen($Pass) < 4) or (StrLen($Pass) > 10))
{
echo "Password must have more 4 and not more 10 symbols.";
}
elseif ((StrLen($Repass) < 4) or (StrLen($Repass) > 10))
{
echo "Repeat password must have more 4 and not more 10 symbols.";
}
elseif ((StrLen($Email) < 4) or (StrLen($Email) > 25))
{
echo "Email must have more 4 and not more 25 symbols.";
}
elseif ($Pass != $Repass)
{
echo "Password mismatch.";
}
Фрагмент регистрации из кода сайта MMO игры. Видимо die забыли и в итоге вся проверка фтопку. Так же там педантично кроме проверки несовпадения введенных паролей оба проверяют на длину и содержание символов (это еще можно описать заботой о юзвере).
+157
<?php
class smth {
protected static $MARK_UNDEFINED = 'Undefined';
protected static $MARK_F = 'ECTS-F';
protected static $MARK_FX = 'ECTS-FX';
protected static $MARK_E = 'ECTS-E';
protected static $MARK_D = 'ECTS-D';
protected static $MARK_C = 'ECTS-C';
protected static $MARK_B = 'ECTS-B';
protected static $MARK_A = 'ECTS-A';
protected function getECTSMark($rate, $current, $examRate)
{
$color = self::$MARK_UNDEFINED;
if ($current > 0) {
$percent = $rate / $current;
if ($examRate !== NULL AND $examRate < 22)
$color = self::$MARK_FX;
elseif ($percent < 0.31)
$color = self::$MARK_F;
elseif ($percent < 0.60)
$color = self::$MARK_FX;
elseif ($percent < 0.65)
$color = self::$MARK_E;
elseif ($percent < 0.71)
$color = self::$MARK_D;
elseif ($percent < 0.85)
$color = self::$MARK_C;
elseif ($percent < 0.95)
$color = self::$MARK_B;
else
$color = self::$MARK_A;
}
return $color;
}
}
Сижу и думаю, как это вообще можно как-то.. отговнокодить? О_о
+157
<?php
// БИБЛИОТЕКА PHP: функции для работы с XML
// ФУНКЦИЯ: установка значения
// &$strDoc - текст документа
// $strField - имя поля (в документе к именам полей нужно добавлять символ "1", например: Name1
// $strValue - значение поля
function DocXML_Value(&$strDoc, $strField, $strValue) {
// определение длины текста
if (!($intDoc = strlen($strDoc))) return;
// определение кода поля
$strCode = $strField."1";
// определение длины кода поля
if (!($intCode = strlen($strCode))) return;
// поиск поля
if (!($intPos = stripos($strDoc, $strCode))) return;
// преобразование значения в кодировку UTF-8
$strText = iconv("WINDOWS-1251", "UTF-8", $strValue);
// определение результата
$strDoc = Left($strDoc, $intPos).$strText.Right($strDoc, $intDoc-$intPos-$intCode);
}
// ФУНКЦИЯ: получение текста таблицы
// &$strDoc - исходный документ
// $strField - имя поля (в документе к именам полей нужно добавлять символ "1", например: Name1
function DocXML_Table(&$strDoc, $strField) {
// определение длины текста
if (!($intDoc = strlen($strDoc))) return '';
// определение кода поля
$strCode = ">".$strField."1<";
// определение длины кода поля
if (!($intCode = strlen($strCode))) return '';
// поиск поля
if (!($intPos = stripos($strDoc, $strCode))) return '';
// поиск тега <w:tbl> до поля
if (!($intBegin = strripos(Left($strDoc, $intPos),'<w:tbl>'))) return '';
// поиск тега </w:tbl> после поля
if (!($intEnd = stripos($strDoc, '</w:tbl>', $intPos))) return '';
// определение результата
$strRes = Left(Right($strDoc,$intDoc-$intBegin),$intEnd-$intBegin+strlen('</w:tbl>'));
// определение результата
return $strRes;
}
// ФУНКЦИЯ: получение текста шаблона строки
// &$strTable - текст таблицы
// $strField - имя поля (в документе к именам полей нужно добавлять символ "1", например: Name1
function DocXML_Row(&$strTable, $strField) {
// определение длины текста
if (!($intTable = strlen($strTable))) return '';
// определение кода поля
$strCode = ">".$strField."1<";
// определение длины кода поля
if (!($intCode = strlen($strCode))) return '';
// поиск поля
if (!($intPos = stripos($strTable, $strCode))) return '';
// поиск тега <w:tr> до поля
if (!($intBegin = strripos(Left($strTable, $intPos),'<w:tr>'))) return '';
// поиск тега </w:tr> после поля
if (!($intEnd = stripos($strTable, '</w:tr>', $intPos))) return '';
// определение результата
return Left(Right($strTable,$intTable-$intBegin),$intEnd-$intBegin+strlen('</w:tr>'));
}
// ФУНКЦИЯ: замена строки в таблице
// &$strTable - текст таблицы
// $strField - имя поля (в документе к именам полей нужно добавлять символ "1", например: Name1
// $strRow - текст строки
function DocXML_RowSet(&$strTable, $strField, $strRow) {
// определение длины текста
if (!($intTable = strlen($strTable))) return;
// определение кода поля
$strCode = ">".$strField."1<";
// определение длины кода поля
if (!($intCode = strlen($strCode))) return;
// поиск поля
if (!($intPos = stripos($strTable, $strCode))) return;
// поиск тега <w:tr> до поля
if (!($intBegin = strripos(Left($strTable, $intPos),'<w:tr>'))) return;
// поиск тега </w:tr> после поля
if (!($intEnd = stripos($strTable, '</w:tr>', $intPos))) return;
// определение результата
$strTable = Left($strTable, $intBegin).Right($strTable, $intTable-$intEnd-strlen('</w:tr>'));
}
// ФУНКЦИЯ: добавление строки в таблицу
// &$strTable - текст таблицы
// $strRow - текст строки
function DocXML_RowAdd(&$strTable, $strRow) {
// определение длины текста
if (!($intTable = strlen($strTable))) return;
// определение результата
$strTable = Left($strTable, $intTable-strlen('</w:tbl>')).$strRow.'</w:tbl>';
}
Взято с SQL.ru http://www.sql.ru/forum/1141421/pomogite-prochitat-xml
+133
STEAMROOT="$(cd "${0%/*}" && echo $PWD)")
...
rm -rf "$STEAMROOT/"*
http://www.opennet.ru/opennews/art.shtml?num=41469
эпик фейл
#юмор
#идиоты
+144
++++++[->++<].<+,
ГОВНОКОДЕРЫ, Я СЕГОДНЯ ШЁЛ КОРОЧЕ ПО ПОДВОРОТНЕ И УВИДЕЛ АСМЕРА В МАЙКЕ "ASM 4EVER", НУ Я ПОДСКОЧИЛ И РЕЗКО ПЕРЕЕБАЛ ЕМУ В ЩЩИ С ВЕРТУШКИ И ПОЯСНИЛ ЕГО КРИКОМ "НЕ ЛЮБЛЮ ПРОГРАММНЫЕ ПРЕРЫВАНИЯ", ПОТОМУ ЧТО Я УГОРЕЛ ПО ++++++[->++<].<+, ПАЦАНЫ ДУХ СТАРОЙ ШКОЛЫ ЖИВЁТ ТОЛЬКО В СТЕКЕ РАЗМЕРНОСТЬЮ 30 000 БАЙТ, ГДЕ ЕБАШАТСЯ ПО КАНОНАМ РАЗРАБОТКИ, ГДЕ ПАЦАНЫ ЖИВУТ ОГРАНИЧЕННОЙ ПАМЯТЬЮ, ОДНОПОТОЧНОСТЬЮ И ЕБУТ СИСТЕМУ ОКРУЖЕНИЯ В РОТ! ТОЛЬКО ОДНА ПРОЦЕДУРА ++++++[->++<].<+, ТОЛЬКО АСКИ!!! ЮНИТИ УЛЬТРАХАРДКОР АСКИ!!! пацаны ебашьте ютф, фу, асмеров, дрочеров на компил
+198
org 100h ; DOS, чёрной пеленой покрытый DOS...
delGovnocode:
mov eax,govnokod ; Помещаем в EAX говнокод
xor eax,eax ; Обнуляем EAX
govnokod db "AllGovnocodeInTheWorld" ; говнокод
Самый эффективный способ уничтожения говнокода, который является говнокодом.
+54
// Блок кода с выходом по break
#define BLOCK for (int _count = 1; _count--;)
bool Result::commit()
{
BLOCK {
mysql_query(db->mysql, "BEGIN");
if (!saveBasePart())
break;
if (getCategory() != NULL) {
if (!saveCustomValues())
break;
}
mysql_query(db->mysql, "COMMIT");
return true;
}
mysql_query(db->mysql, "ROLLBACK");
return false;
}