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

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• Oтзывы

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

1. PHP (5706)
2. C++ (2739)
3. Куча (2360)
4. JavaScript (2030)
5. C# (1928)
6. Java (1502)
7. Си (1115)
8. Pascal (647)
9. Python (583)
10. 1C (538)
11. SQL (432)
12. ActionScript (292)
13. Objective C (202)
14. bash (198)
15. Perl (194)
16. Assembler (146)
17. Ruby (145)
18. VisualBasic (138)
19. Lua (49)
20. Go (31)
21. Swift (27)
22. Haskell (26)
23. Kotlin (14)

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

   В номинации:

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

   За время:

   • за сегодня
   • за неделю
   • за месяц
   • за всё время

2. Pascal / Говнокод #2981

   +92

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11
   12. 12
   13. 13
   14. 14
   15. 15
   16. 16
   17. 17
   18. 18
   19. 19
   20. 20
   21. 21
   22. 22
   23. 23
   24. 24
   25. 25
   26. 26
   27. 27
   28. 28
   29. 29
   30. 30
   31. 31
   32. 32
   33. 33
   34. 34
   35. 35
   36. 36
   37. 37
   38. 38
   39. 39
   40. 40
   41. 41
   42. 42
   43. 43
   44. 44

   {Обнуление сумм}
   
       sum1:=0;
       sum2:=0;
       sum3:=0;
       sum4:=0;
       sum5:=0;
       sum6:=0;
       sum7:=0.001;
       sum8:=0.001;
       giga1:=0;
       giga2:=0;
       sum9:=0;
       sum10:=0;
       sum11:=0;
       sum12:=0;
       sum13:=0;
       sum14:=0;
       sum15:=0;
       sum16:=0;
   
       for i:=0 to cnt do begin
       sum1:=sum1+TNP[i]; sum2:=sum2+TNO[i]; //Подсчёт "Прямого" и "Обратного"
       sum3:=sum3+TNP[i]-TNO[i]; //Подсчёт "Израсходовано воды"
       sum4:=sum4+PAR[i]; //Подсчёт "Израсходовано пара"
       sum5:=sum5+Tpar[i]; //Подсчёт "температуры пара"
       sum6:=sum6+Ppar[i]; //Подсчёт "давления пара"
       sum7:=sum7+Tprm[i]; //Подсчёт "температуры прямого"
       sum8:=sum8+Tobr[i]; //Подсчёт "температуры обратного"
       sum10:=sum10+Qvoz[i]; //Подсчёт "Израсходовано воздуха"
       sum11:=sum11+Tvoz[i]; //Подсчёт "температуры воздуха"
       sum12:=sum12+Pvoz[i]; //Подсчёт "давление воздуха"
       sum13:=sum13+Qhzv[i]; //Подсчёт "Израсходовано хоз. воды"
       sum14:=sum14+Qthv[i]; //Подсчёт "Израсходовано тех. воды"
       sum15:=sum15+Thzv[i]; //Подсчёт "Температуры. хоз воды"
       sum16:=sum16+Tthv[i]; //Подсчёт "Температуры. тех воды"
   
    // giga1:= (sum1 * 1000) * (660 * 0.000001) /  (sum7/sum8) ; // расчёт гигакалорий для отопления
    // giga1:= (sum1 * 1000) * (660 * 0.000001); // расчёт гигакалорий для отопления
   
       giga1:= (sum3 / 3.04); // расчёт гигакалорий для отопления
   
       giga2:= (sum4 * 1000) * (660 * 0.000001); // расчёт гигакалорий для пара
       end;    end;    end;

   ka3ax, 10 Апреля 2010

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

3. Pascal / Говнокод #2353

   +92

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11
   12. 12
   13. 13
   14. 14
   15. 15
   16. 16
   17. 17
   18. 18
   19. 19
   20. 20
   21. 21

   {$R-}
   fal:=true;
   ty:= length(mas1);
   while(fal=true)  do
     for j:=0 to kp-1 do
     begin
       for i:=i+k+j to length(mas2)-1 do
       begin
         while mas2[i+k]= ty do
         begin
           s:=s+c[i,j];
           inc(k);
         end;
       end;
       nl:=mas1[ty-1];
       if nl=0 then
         mas_Mj[ty]:=0
       else
         mas_Mj[ty-1][j]:=s/nl;
       s:=0;
     end;

   TAX, 30 Декабря 2009

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

4. C++ / Говнокод #1428

   +92

   1. 1
   2. 2
   3. 3
   4. 4
   5. 5
   6. 6
   7. 7
   8. 8

   if (a > 5)
     ...
   else if (a < 5)
     ...
   else if (i == 5)
     ...
   else
     printf ("Сегодня плохой день!");

   Плохой день)))

   guest, 27 Июля 2009

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

5. PHP / Говнокод #1237

   +92

   1. 1
   2. 2
   3. 3

   header('Location: '.$_SERVER['REQUEST_URI']);
   exit();
   die();

   на всякий случай :)

   guest, 21 Июня 2009

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

6. Куча / Говнокод #1831

   +91.8

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11
   12. 12
   13. 13
   14. 14
   15. 15
   16. 16
   17. 17
   18. 18
   19. 19
   20. 20
   21. 21
   22. 22
   23. 23
   24. 24
   25. 25
   26. 26
   27. 27
   28. 28
   29. 29
   30. 30
   31. 31
   32. 32
   33. 33
   34. 34
   35. 35
   36. 36
   37. 37
   38. 38
   39. 39
   40. 40
   41. 41
   42. 42
   43. 43
   44. 44
   45. 45
   46. 46

   /*Items text color & size */
   #horizontal-multilevel-menu li a,
   #horizontal-multilevel-menu li:hover li a,
   #horizontal-multilevel-menu li.jshover li a,
   #horizontal-multilevel-menu li:hover li:hover li a,
   #horizontal-multilevel-menu li.jshover li.jshover li a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover li a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover li a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover li:hover li a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover li.jshover li a
   {
   	color: black;
   }
   
   /*Items text color & size selected item*/
   #horizontal-multilevel-menu li.item-selected a,
   #horizontal-multilevel-menu li:hover li.item-selected a,
   #horizontal-multilevel-menu li.jshover li.item-selected a,
   #horizontal-multilevel-menu li:hover li:hover li.item-selected a,
   #horizontal-multilevel-menu li.jshover li.jshover li.item-selected a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li.item-selected a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.item-selected a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover li.item-selected a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover li.item-selected a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover li:hover li.item-selected a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover li.jshover li.item-selected a
   {
   	color: #ffffff;
   }
   
   /*Items text color & size: hover*/
   #horizontal-multilevel-menu li:hover li:hover a,
   #horizontal-multilevel-menu li.jshover li.jshover a,
   #horizontal-multilevel-menu li:hover li:hover li:hover a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover a,
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover a
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover li:hover a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover li.jshover a
   #horizontal-multilevel-menu li:hover li:hover li:hover li:hover li:hover li:hover a,
   #horizontal-multilevel-menu li.jshover li.jshover li.jshover li.jshover li.jshover li.jshover a
   {
   	color: #ffffff;
   }

   во. супер. битрикс. css многоуровневого, рекурсивно формируемого меню (во всяком случае я так надеюсь). я его у них честно спиздил... и почти все переписал. ахтунг.

   gorky, 11 Сентября 2009

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

7. Pascal / Говнокод #1531

   +91.8

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10

   ...
         if DM.LastCOID <> -1 then
         begin
           if Pos(IntToStr(DM.LastCOID), Label1.Caption) <= 0 then
           begin
             Label1.Caption := 'Телефон: ' + '(' + IntToStr(DM.LastCOID) + ')';
             DataSet['CHANNELOUTERID'] := IntToStr(DM.LastCOID);
           end;
         end;
   ...

   LastCOID - номер внешней линии, который отображается в лейбле Label1 и заносится в поле базы. Как и чем думал автор вставляя второе условие? Самое главное, для чего? В итоге, софтина иногда пропускала сохранение LastCOID в БД, тем самым портя статистику и настроение клиента.

   ybinzu, 11 Августа 2009

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

8. Pascal / Говнокод #2882

   +91.2

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11
   12. 12
   13. 13
   14. 14

   {  Длинная арифметика. 
       [0] - длина числа
       [1..1000] - цифры в системе с основанием 10000, записанные в обратном порядке
   }
   type TLong = array[0..1000] of integer;
   
   procedure Add(A,B:TLong;var C:TLong);
   {Здесь идет процедура сложения в столбик - ничего интересного}
   procedure MulByShort(A:TLong;B:integer;var C:TLong); {умножение длинного на короткое}
       var i:integer;
   begin
       initByZero(C);{инициализация C нулями}
       for i:=1 to B do Add(C,A,C);
   end;

   Найдено в решении олимпиадной задачи на FreePascal. Обратите внимание на особо остроумный алгоритм умножения: надо же до такого додуматься. Также интересно, чем мотивирована передача массивов по значению.

   frp, 28 Марта 2010

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

9. Pascal / Говнокод #1880

   +91.1

   1. 01
   2. 02
   3. 03
   4. 04
   5. 05
   6. 06
   7. 07
   8. 08
   9. 09
   10. 10
   11. 11
   12. 12
   13. 13
   14. 14
   15. 15
   16. 16
   17. 17
   18. 18
   19. 19

   s := TStringList.Create;
     LocalIniFile.ReadSection(sPad, s);
     for x := 0 to ActionListMenu.ActionCount - 1 do
     begin
       for y := 0 to 9 do
       begin
         for z := 0 to s.Count - 1 do
         begin
           if (Length(s[z]) <> Length('Tag0')) and (s[z] = 'Tag' + IntToStr(ActionListMenu[x].Tag + y)) then
           begin
             try
               ActionListMenu[x].Execute;
             except
             end;
           end;
         end;
       end;
     end;
     s.Free;

   Эм, ну комментарии излишни?

   Drone, 22 Сентября 2009

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

10. Pascal / Говнокод #17484

    +91

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17

    <? die;
    
    if($_GET['tn'])
    {
    	if(($i = $conf['settings'][$s = "{$arg['modpath']}=>img"]) && ($img = explode(",", $i))){ $tn = array_combine($img, $img); }else{
    		$tn = array($_GET['tn']=>preg_replace('/[^0-9a-z_]/', '', $_GET['tn']));
    	} $sql = "SELECT `". mpquot($_GET['fn'] ? $_GET['fn'] : "img"). "` FROM {$conf['db']['prefix']}{$arg['modpath']}_{$tn[$_GET['tn']]} WHERE id=".(int)$_GET['id'];
    	$file_name = mpopendir("include")."/".($fn = mpql(mpqw($sql), 0, ($_GET['fn'] ? $_GET['fn'] : "img")));
    	if(!array_search(array_pop(explode('.', $file_name)), array(1=>"jpg", "jpeg", "png", "gif"))){
    		$file_name = mpopendir("img/ext/". array_pop(explode('.', $file_name)). ".png");
    	}
    }else{
    	$file_name = mpopendir("modules/{$arg['modpath']}/img/". basename($_GET['']));
    } header ("Content-type: image/". array_pop(explode('.', $file_name)));
    echo mprs($file_name, $_GET['w'], $_GET['h'], $_GET['c']);
    
    ?>

    это не шуууутки мы встретились в маршруууутке

    deconf, 20 Января 2015

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

11. C# / Говнокод #17470

    +91

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5

    private static int NumberOfLeadingSpaces(string str)
    {
        str = str.TrimEnd();
        return str.Length - str.Trim().Length;
    }

    Из моего проекта. Так я писал код 1.5 год назад.
    Вместо того, чтобы пройтись циклом с начала строки, пока не встретиться символ, не являющийся пробелом.

    Janycz, 18 Января 2015

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

• ← влево
• вправо →

• 1572
• …
• 511
• 510
• 509
• 508
• 507
• 506
• 505
• 504
• 503
• …
• 1