Лучший говнокод за всё время

Лучший говнокод

В номинации:

Лучший рейтинг
Самый комментируемый

За время:

1C / Говнокод #22734

−98

1
2

Если НоменклатураКонтрагентов.Наличие=Перечисления.ДаНет.Да тогда
....

Создан новый элемент перечисления "ДаНет" на который ссылается измерение регистра сведений. Джордж Буль продолжает медленно крутиться...

FesenkoA, 03 Апреля 2017

Комментарии (5)

1C / Говнокод #21843

−51

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19

...
ОбластьВесСтр = ТабличныйДокумент.Область(2, й - 4);
ОбластьВесСтр.Текст = "Вес:";
НовСтр.СтрокаВес = 3;
НовСтр.СтолбецВес = й - 4;
ТабличныйДокумент.Область(3, й-4, 4, й-4).Объединить();
...
к = й - 5;
Пока к > 4 Цикл
	ТабличныйДокумент.Область(2, к, 4, к).Объединить();
	к = к - 1;
КонецЦикла;
...
ОбластьСтолбецВесШт = ТабличныйДокумент.Область(ВысотаТаблицы + 1, 13 + Добавка);
ОбластьСтолбецВесШт.Текст = Формат(окр(ВесЕд, 3), "ЧЦ=10; ЧДЦ=3; ЧГ=0");
...
ОбластьИзменение = ТабличныйДокумент.Область(ВысотаТаблицы + 1, 15 + Добавка - й);
ОбластьИзменение.Текст = Формат(Изменение, "ЧЦ=10; ЧДЦ=2; ЧН=0; ЧГ=0") + "%";
...

Ну вы поняли... Зачем использовать по нормальному макет, когда можно использовать 300 вложенных циклов с счетчиками й, к, м и т.д.?
При чем макет то размечен более менее, но там области перезаписываются и вобще дичь какая то происходит. Добавить колонку в результат просто нереально.
Квинтесенция говнокода.

Jet, 16 Декабря 2016

Комментарии (5)

1C / Говнокод #21791

−35

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26

Функция ПредопределенныйЭлемент(Знач ПолноеИмяПредопределенного) Экспорт
	
	ИмяПредопределенного = ВРег(ПолноеИмяПредопределенного);
	
	Точка = СтрНайти(ИмяПредопределенного, ".");
	ИмяКоллекции = Лев(ИмяПредопределенного, Точка - 1);
	ИмяПредопределенного = Сред(ИмяПредопределенного, Точка + 1);
	
	Точка = СтрНайти(ИмяПредопределенного, ".");
	ИмяТаблицы = Лев(ИмяПредопределенного, Точка - 1);
	ИмяПредопределенного = Сред(ИмяПредопределенного, Точка + 1);
	
	ТекстЗапроса = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1 Ссылка ИЗ &ПолноеИмяТаблицы ГДЕ ИмяПредопределенныхДанных = &ИмяПредопределенного";
	ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ПолноеИмяТаблицы", ИмяКоллекции + "." + ИмяТаблицы);
	
	Запрос = Новый Запрос(ТекстЗапроса);
	Запрос.УстановитьПараметр("ИмяПредопределенного", ИмяПредопределенного);

	Результат = Запрос.Выполнить();
	Если Не Результат.Пустой() Тогда
		Возврат Результат.Выгрузить()[0].Ссылка;
	КонецЕсли;
	
	Возврат Неопределено;
	
КонецФункции

Видимо, таким образом разработчики стандартных подсистем решили бороться с ошибкой платформы, когда при попытке получения некорректного значения падает рабочий процесс.
Клин-клином, говнокод-говнокодом.

UncleFedor, 06 Декабря 2016

Комментарии (5)

1C / Говнокод #21546

−100

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19

ЗапросПоДате = Новый Запрос;
ЗапросПоДате.Текст = "ВЫБРАТЬ
	|	МАКСИМУМ(НачислениеБонусов.Дата) КАК Дата
	|ИЗ
	|	Документ.НачислениеБонусов КАК НачислениеБонусов
	|ГДЕ
	|	НачислениеБонусов.Контрагент = &Контрагент
	|	И НачислениеБонусов.Дата < &Дата";
ЗапросПоДате.Параметры.Вставить("Контрагент",ЭтотОбъект.Контрагент);
ЗапросПоДате.Параметры.Вставить("Дата",ЭтотОбъект.Дата);
Результат =	ЗапросПодате.Выполнить().Выбрать();
Если Результат.Следующий() Тогда
	ДатаПоследнегоНачисления = Результат.Дата;
Иначе
	ДатаПоследнегоНачисления = Дата(2000,01,01);
КонецЕсли;
Если ДатаПоследнегоНачисления = Null Тогда
	ДатаПоследнегоНачисления = Дата(2000,01,01);
КонецЕсли;

Функции языка запросов???

Asaharu, 24 Октября 2016

Комментарии (5)

C# / Говнокод #21366

−234

001
002
003
004
005
006
007
008
009
010
011
012
013
014
015
016
017
018
019
020
021
022
023
024
025
026
027
028
029
030
031
032
033
034
035
036
037
038
039
040
041
042
043
044
045
046
047
048
049
050
051
052
053
054
055
056
057
058
059
060
061
062
063
064
065
066
067
068
069
070
071
072
073
074
075
076
077
078
079
080
081
082
083
084
085
086
087
088
089
090
091
092
093
094
095
096
097
098
099
100

Public Class Form1
    Dim x01, x02, f01, f02, f01i, f02i, x11, x12, f12, f11, f11i, f12i, x21, x22, z1, z2, f21, f22, f21i, f22i, x31, x32 As Double
    Dim f31, f32, f31i, f32i, x41, x42, f41, f42, f41i, f42i, x51, x52, f51, f52, f51i, f52i, x61, x62, f61, f62, f61i, f62i, x71, x72 As Double
    Dim f71, f72, f71i, f72i, x81, x82, f81, f82, f81i, f82i, x91, x92, f91, f92, f91i, f92i, x101, x102, f101, f102, f101i, f102i, x111, x112, f111, f112, f111i, f112i, x121, x122 As Double
    Dim f121, f122, f121i, f122i, x131, x132, f131, f132, f131i, f132i, x141, x142, f141, f142, f141i, f142i, x151, x152, f151, f152, f151i, f152i, x161, x162, f161, f162, f161i, f162i, x171, x172 As Double
    Dim f171, f172, f171i, f172i, x181, x182, f181, f182, f181i, f182i, x191, x192, f191, f192, f191i, f192i, x201, x202, f201, f202, f201i, f202i, x211, x222, f211, f212, f211i, f212i, x221, x212, f221, f222, f221i, f222i, x231, x232 As Double
    Dim f231, f232, f231i, f232i, x241, x242, f241, f242, f241i, f242i, x251, x252, f251, f252, f251i, f252i, x261, x262, f261, f262, f261i, f262i, x271, x272, f271, f272, f271i, f272i, x281, x282, f281, f282, f281i, f282i, x291, x292 As Double
    Dim f291, f292, f291i, f292i, x301, x302, f301, f302, f301i, f302i, x311, x312, f311, f312, f311i, f312i, x321, x322 As Double
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        x01 = TextBox1.Text
        x02 = TextBox2.Text
 
        f01 = x01 - 0.5 * Math.Sin(0.3 * Math.Cos(x01) / 3) - 1
        f02 = -x02 + 0.3 * Math.Cos((0.5 * Math.Sin(x02 / 3) + 1))
        f01i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x01)) / 3) * Math.Sin(x01)
        f02i = 1 + (0.3 * Math.Sin(0.5 * Math.Sin(x02)) / 3) * (Math.Cos(x02) / 3) * 0.5 / 3
        x11 = x01 + f01 / f01i
        x12 = x02 + f02 / f02i
 
        Label7.Text = "x11= " & x11
        Label8.Text = "x12= " & x12
 
 
        f11 = x11 - 0.5 * Math.Sin(0.3 * Math.Cos(x11) / 3) - 1
        f12 = -x12 + 0.3 * Math.Cos((0.5 * Math.Sin(x12 / 3) + 1))
        f11i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x11)) / 3) * Math.Sin(x11)
        f12i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x12)) / 3) * (Math.Cos(x12) / 3) * 0.5 / 3
        x21 = x11 + f11 / f11i
        x22 = x12 + f12 / f12i
        Label9.Text = "x21= " & x21
        Label10.Text = "x22= " & x22
 
 
 
        f21 = x21 - 0.5 * Math.Sin(0.3 * Math.Cos(x21) / 3) - 1
        f22 = -x22 + 0.3 * Math.Cos((0.5 * Math.Sin(x22 / 3) + 1))
        f21i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x21)) / 3) * Math.Sin(x21)
        f22i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x22)) / 3) * (Math.Cos(x22) / 3) * 0.5 / 3
        x31 = x21 + f21 / f21i
        x32 = x22 + f22 / f22i
        Label15.Text = "x31= " & x31
        Label16.Text = "x32= " & x32
 
 
 
        f31 = x31 - 0.5 * Math.Sin(0.3 * Math.Cos(x31) / 3) - 1
        f32 = -x32 + 0.3 * Math.Cos((0.5 * Math.Sin(x32 / 3) + 1))
        f31i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x31)) / 3) * Math.Sin(x31)
        f32i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x32)) / 3) * (Math.Cos(x32) / 3) * 0.5 / 3
        x41 = x31 + f31 / f31i
        x42 = x32 + f32 / f32i
        Label17.Text = "x41= " & x41
        Label18.Text = "x42= " & x42
 
 
 
        f41 = x41 - 0.5 * Math.Sin(0.3 * Math.Cos(x41) / 3) - 1
        f42 = -x42 + 0.3 * Math.Cos((0.5 * Math.Sin(x42 / 3) + 1))
        f41i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x41)) / 3) * Math.Sin(x41)
        f42i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x42)) / 3) * (Math.Cos(x42) / 3) * 0.5 / 3
        x51 = x41 + f41 / f41i
        x52 = x42 + f42 / f42i
        Label19.Text = "x51= " & x51
        Label20.Text = "x52= " & x52
 
 
 
        f51 = x51 - 0.5 * Math.Sin(0.3 * Math.Cos(x51) / 3) - 1
        f52 = -x52 + 0.3 * Math.Cos((0.5 * Math.Sin(x52 / 3) + 1))
        f51i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x51)) / 3) * Math.Sin(x51)
        f52i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x52)) / 3) * (Math.Cos(x52) / 3) * 0.5 / 3
        x61 = x51 + f51 / f51i
        x62 = x52 + f52 / f52i
        Label21.Text = "x61= " & x61
        Label22.Text = "x62= " & x62
 
 
        f61 = x61 - 0.5 * Math.Sin(0.3 * Math.Cos(x61) / 3) - 1
        f62 = -x62 + 0.3 * Math.Cos((0.5 * Math.Sin(x62 / 3) + 1))
        f61i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x61)) / 3) * Math.Sin(x61)
        f62i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x62)) / 3) * (Math.Cos(x62) / 3) * 0.5 / 3
        x71 = x61 - f61 / f61i
        x72 = x62 + f62 / f62i
        Label23.Text = "x61= " & x71
        Label24.Text = "x62= " & x72
 
 
        f71 = x71 - 0.5 * Math.Sin(0.3 * Math.Cos(x71) / 3) - 1
        f72 = -x62 + 0.3 * Math.Cos((0.5 * Math.Sin(x72 / 3) + 1))
        f71i = 1 + 0.5 * (Math.Cos(0.3 * Math.Cos(x71)) / 3) * Math.Sin(x71)
        f72i = 1 - (0.3 * Math.Sin(0.5 * Math.Sin(x72)) / 3) * (Math.Cos(x72) / 3) * 0.5 / 3
        x81 = x71 + f71 / f71i
        x82 = x72 - f72 / f72i
        Label25.Text = "x81= " & x81
        Label26.Text = "x82= " & x82
 
 
 
        f81 = x81 - 0.5 * Math.Sin(0.3 * Math.Cos(x81) / 3) - 1
        f82 = -x82 + 0.3 * Math.Cos((0.5 * Math.Sin(x82 / 3) + 1))

cyberforum.ru/pascalabc/thread844601.html

d_fomenok, 07 Октября 2016

Комментарии (5)

PHP / Говнокод #20920

+545

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20

<?php
/**
 * Объединяет массивы, сохраняя элементы присутствующие лишь в одном из массивов
 * + сортирует без сохранения ключей
 * @param array $a1
 * @param array $a2
 * @return array
 */
function array_xor_merge($a1, $a2) {
	$allr	 = array_merge($a1, $a2);
	$allp	 = array_flip($allr);
	foreach (array_count_values($allr) as $key => $cnt) {
		if ($cnt > 1) {
			unset($allp[$key]);
		}
	}
	$res = array_flip($allp);
	sort($res);
	return $res;
}

Rijen, 22 Августа 2016

Комментарии (5)

Python / Говнокод #20869

+1345

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22

# Далее перечислены все флаги, с помощью которых выбирается то или иное поведение различных копий сайтов.
#
# INSTANCE_SPECIFIC_DJANGO_DEBUG
#     В какое значение установить DEBUG переменную Джанго (желтые страницы с ошибками 500).
#     True - показывать желтые страницы (для копий программистов)
#     False - не показывать (вместо этого показаь 500.html шаблон) - для боевой копии
#
# INSTANCE_SPECIFIC_DJANGO_DEBUG_STATIC
#     Надо ли в Урл Паттернс Джанги добавить media и static и обслуживать их Джангой
#     True - да, используется для копии сайта программистов
#     False - нет, используется для демонстрационной и боевой копии
#     (там nginx обрабатывает статику и STATIC_URL в этом случае будет такой чтобы указывать на nginx)

# Все копии программистов. Что значает эта секция см. комменты чуть выше.
if INSTANCE_ROOT.startswith('/var/www/elin_800'):
    INSTANCE_SPECIFIC_DJANGO_DEBUG = True
    INSTANCE_SPECIFIC_DJANGO_DEBUG_STATIC = True

# Демонстрационная копия. Что значает эта секция см. комменты чуть выше.
elif INSTANCE_ROOT == '/var/www/dev.example.ru':
    INSTANCE_SPECIFIC_DJANGO_DEBUG = False
    INSTANCE_SPECIFIC_DJANGO_DEBUG_STATIC = False

Файл настроек джанги, доставшийся мне от аутсорсера

defaultvoice, 19 Августа 2016

Комментарии (5)

Java / Говнокод #20866

+2591

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

KeyFactory keyFactory = new KeyFactory();
KeyObj keyObj = keyFactory.getKeyObj(wParam);
keyObj.doStuff();


class VK_F11 extends KeyObj {
   boolean val;
   public void doStuff() {
      val = !val;
   }
}

class VK_F12 extends KeyObj {
   boolean val;
   public void doStuff() {
      val = !val;
   }
}

class KeyFactory {
   public KeyObj getKeyObj(int param) {
      switch(param) {
         case VK_F11:
            return new VK_F11();
         case VK_F12:
            return new VK_F12();
      }
      throw new KeyNotFoundException("Key " + param + " was not found!");
   }
}

Казалось бы, что может быть проще работы с GPIO?

CYB3R, 19 Августа 2016

Комментарии (5)

PHP / Говнокод #20436

+3

1
2

$arParams["SET_TITLE"] = $arParams["SET_TITLE"]!="N";
$arParams["SET_LAST_MODIFIED"] = $arParams["SET_LAST_MODIFIED"]==="Y";

news.detail - cтандартный компонент Битрикса

pgood, 27 Июля 2016

Комментарии (5)

1C / Говнокод #20379

−94

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

Область.Параметры.месяц 	= МесяцДляГрафика;
Область.Параметры.первое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("01", ДатаДляПечатиКалендаря));
Область.Параметры.второе 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("02", ДатаДляПечатиКалендаря));
Область.Параметры.третье 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("03", ДатаДляПечатиКалендаря));
Область.Параметры.четвертое = ПеревестиВКалендарПредставл(ОпрДеньНедели("04", ДатаДляПечатиКалендаря));
Область.Параметры.пятое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("05", ДатаДляПечатиКалендаря));
Область.Параметры.шестое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("06", ДатаДляПечатиКалендаря));
Область.Параметры.седьмое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("07", ДатаДляПечатиКалендаря));
Область.Параметры.восьмое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("08", ДатаДляПечатиКалендаря));
Область.Параметры.девятое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("09", ДатаДляПечатиКалендаря));
Область.Параметры.десятое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("10", ДатаДляПечатиКалендаря));
Область.Параметры.одиннадцатое 		= ПеревестиВКалендарПредставл(ОпрДеньНедели("11", ДатаДляПечатиКалендаря));
Область.Параметры.двенадцатое 		= ПеревестиВКалендарПредставл(ОпрДеньНедели("12", ДатаДляПечатиКалендаря));
Область.Параметры.тринадцатое 		= ПеревестиВКалендарПредставл(ОпрДеньНедели("13", ДатаДляПечатиКалендаря));
Область.Параметры.четырнадцатое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("14", ДатаДляПечатиКалендаря));
Область.Параметры.пятнадцатое 		= ПеревестиВКалендарПредставл(ОпрДеньНедели("15", ДатаДляПечатиКалендаря));
Область.Параметры.шестнадцатое 		= ПеревестиВКалендарПредставл(ОпрДеньНедели("16", ДатаДляПечатиКалендаря));
Область.Параметры.семнадцатое  		= ПеревестиВКалендарПредставл(ОпрДеньНедели("17", ДатаДляПечатиКалендаря));
Область.Параметры.восемнадцатое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("18", ДатаДляПечатиКалендаря));
Область.Параметры.девятнадцатое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("19", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатое		 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("20", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьпервое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("21", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьвторое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("22", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьтретье	= ПеревестиВКалендарПредставл(ОпрДеньНедели("23", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьчетвертое = ПеревестиВКалендарПредставл(ОпрДеньНедели("24", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьпятое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("25", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьшестое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("26", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьседьмое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("27", ДатаДляПечатиКалендаря));
Область.Параметры.двадцатьвосьмое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("28", ДатаДляПечатиКалендаря));
Попытка
	Область.Параметры.двадцатьдевятое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("29", ДатаДляПечатиКалендаря));
	Область.Параметры.тридцатое			= ПеревестиВКалендарПредставл(ОпрДеньНедели("30", ДатаДляПечатиКалендаря));
	Область.Параметры.тридцатьпервое 	= ПеревестиВКалендарПредставл(ОпрДеньНедели("31", ДатаДляПечатиКалендаря));
Исключение
КонецПопытки;

Выводим на печать дни недели для каждого дня месяца

CMblCL, 14 Июля 2016

Комментарии (5)

Говнокод: по колено в коде.