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

    В номинации:
    За время:
  2. Куча / Говнокод #17774

    +124

    1. 1
    <script src="/js/js.js" type="text/javascript"></script>

    Я так и не понял. Что же интересно может делать файл js.js в папке js? Ума не могу приложить :\

    volter9, 13 Марта 2015

    Комментарии (7)
  3. 1C / Говнокод #17737

    −121

    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
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    КодТек = Каст(ID);
    
    Возвр = "{";
    
    ТекПользоваетель Контрагенты.НайтиПоКоду(КодТек);
    Если ТекПользователь = Контрагенты.ПустаяСсылка тогда
    		возврат 1;//Пользователь не найден
    конецЕсли;
    
    ТекЛев = Контрагенты.НайтиПоКоду(ТекПользователь.ЛеваяНога);
    
    Если не ТекЛев = Контрагенты.ПустаяСсылка тогда
    		Возвр=Возвр+"""cur_left"":{"+
    			"""id"":"""+ТекЛев.ID+""","+
    			"""last_name"":"""+ТекЛев.Фамилия+""","+
    			"""first_name"":"""+ТекЛев.Имя+""","+
    			"""middle_name"":"""+ТекЛев.Отчество+"""},";
    		
    		ТекЛевЛев = Контрагенты.НайтиПоКоду(ТекЛев.ЛеваяНога);
    
    		Если не ТекЛевЛев = Контрагенты.ПустаяСсылка тогда
    				Возвр=Возвр+"""cur_left_left"":{"+
    					"""id"":"""+ТекЛевЛев.ID+""","+
    					"""last_name"":"""+ТекЛевЛев.Фамилия+""","+
    					"""first_name"":"""+ТекЛевЛев.Имя+""","+
    					"""middle_name"":"""+ТекЛевЛев.Отчество+"""},";
    		конецЕсли;
    			
    		ТекЛевПрв = Контрагенты.НайтиПоКоду(ТекЛев.ПраваяНога);
    
    		Если не ТекЛевПрв = Контрагенты.ПустаяСсылка тогда
    				Возвр=Возвр+"""cur_left_right"":{"+
    					"""id"":"""+ТекЛевПрв.ID+""","+
    					"""last_name"":"""+ТекЛевПрв.Фамилия+""","+
    					"""first_name"":"""+ТекЛевПрв.Имя+""","+
    					"""middle_name"":"""+ТекЛевПрв.Отчество+"""},";
    		конецЕсли;
    конецЕсли;
    
    
    ТекПрв = Контрагенты.НайтиПоКоду(ТекПользователь.ПраваяНога);
    
    Если не ТекПрв = Контрагенты.ПустаяСсылка тогда
    		Возвр=Возвр+"""cur_right"":{"+
    			"""id"":"""+ТекПрв.ID+""","+
    			"""last_name"":"""+ТекПрв.Фамилия+""","+
    			"""first_name"":"""+ТекПрв.Имя+""","+
    			"""middle_name"":"""+ТекПрв.Отчество+"""},";
    		
    		ТекПрвЛев = Контрагенты.НайтиПоКоду(ТекПрв.ЛеваяНога);
    
    		Если не ТекПрвЛев = Контрагенты.ПустаяСсылка тогда
    				Возвр=Возвр+"""cur_right_left"":{"+
    					"""id"":"""+ТекПрвЛев.ID+""","+
    					"""last_name"":"""+ТекПрвЛев.Фамилия+""","+
    					"""first_name"":"""+ТекПрвЛев.Имя+""","+
    					"""middle_name"":"""+ТекПрвЛев.Отчество+"""},";
    		конецЕсли;
    			
    		ТекПрвПрв = Контрагенты.НайтиПоКоду(ТекПрв.ПраваяНога);
    
    		Если не ТекПрвПрв = Контрагенты.ПустаяСсылка тогда
    				Возвр=Возвр+"""cur_right_right"":{"+
    					"""id"":"""+ТекПрвПрв.ID+""","+
    					"""last_name"":"""+ТекПрвПрв.Фамилия+""","+
    					"""first_name"":"""+ТекПрвПрв.Имя+""","+
    					"""middle_name"":"""+ТекПрвПрв.Отчество+"""},";
    		конецЕсли;
    конецЕсли;
    
    
    ДлСтр = ДлинаСтроки(Возвр);
    
    Если ДлСтр=1 тогда 
    	возврат 2;//Ноги пусты
    иначе
    	Возрв = Лев(Возвр, ДлСтр-1)+"}";
    	возврат Возвр;
    конецЕсли;

    1С - хорошая среда. В этой среде очень просто и весело писать говнокод, причем с вполне серьезной мордой.

    Rijen, 05 Марта 2015

    Комментарии (7)
  4. C++ / Говнокод #17730

    +51

    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
    #if defined(alignas) /* check C++ keywords */ \ 
    || defined(alignof) \ 
    || defined(asm) \ 
    || defined(auto) \ 
    || defined(bool) \ 
    
    <...snip...>
    
    || defined(virtual) \ 
    || defined(void) \ 
    || defined(volatile) \ 
    || defined(wchar_t) \ 
    || defined(while) 
    #error keyword defined before including C++ standard header 
    #endif /* defined... */

    Из заголовочных файлов VS 2012.

    http://www.viva64.com/en/b/0146/

    someone, 05 Марта 2015

    Комментарии (7)
  5. Python / Говнокод #17729

    −113

    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
    user8@linux ~ $ python
    Python 2.7.5 (default, Feb 10 2014, 02:34:23) 
    [GCC 4.7.3] on linux2
    Type "help", "copyright", "credits" or "license" for more information.
    >>> import math
    >>> 1-3*(math.exp(1)-2)/math.exp(1)
    0.207276647028654
    >>> 1-4*(1-3*(math.exp(1)-2)/math.exp(1))
    0.17089341188538398
    >>> 1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))
    0.14553294057308008
    >>> 1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))
    0.1268023565615195
    >>> 1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))))
    0.11238350406936348
    >>> 1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))))
    0.10093196744509214
    >>> 1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))))))
    0.09161229299417073
    >>> 1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))))))
    0.0838770700582927
    >>> 1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))))))))
    0.07735222935878028
    >>> 1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))))))))
    0.07177324769463667
    >>> 1-13*(1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))))))))))
    0.06694777996972334
    >>> 1-14*(1-13*(1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))))))))))
    0.06273108042387321
    >>> 1-15*(1-14*(1-13*(1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))))))))))))
    0.059033793641901866
    >>> 1-16*(1-15*(1-14*(1-13*(1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))))))))))))
    0.05545930172957014
    >>> 1-17*(1-16*(1-15*(1-14*(1-13*(1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1)))))))))))))))
    0.05719187059730757
    >>> 1-18*(1-17*(1-16*(1-15*(1-14*(1-13*(1-12*(1-11*(1-10*(1-9*(1-8*(1-7*(1 - 6*(1 - 5*(1-4*(1-3*(math.exp(1)-2)/math.exp(1))))))))))))))))
    -0.029453670751536265

    Дано рекуррентное соотношение: x 1 = 1 e , x k = 1 − kx k−1 , k = 2, 3, 4, . . .
    Напишите программу, которая вычисляет первые 15 чисел с точностью float и выводит их на экран

    xXx_KaKaXa2002_xXx, 05 Марта 2015

    Комментарии (7)
  6. PHP / Говнокод #17701

    +156

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    function GetDataArray($qs)
    {
        $res = array();
        $q = mysql_query($qs);
        if ($q) {
            while ($row  = mysql_fetch_array($q)) {
                array_push($res,$row);
            }
        }
        return $res;
    }

    Других путей получить массив записей наверно для автора нет

    stechkh, 26 Февраля 2015

    Комментарии (7)
  7. JavaScript / Говнокод #17696

    +157

    1. 1
    2. 2
    3. 3
    var t1 = "http://www.mno";
    var t2 = ".ru/new_an";
    $("#mnganketa").attr("href", t1+"go"+t2+"keta/name.html?range=877");

    Замена ссылки=)

    only4int, 25 Февраля 2015

    Комментарии (7)
  8. Куча / Говнокод #17677

    +132

    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
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    83. 83
    84. 84
    85. 85
    86. 86
    87. 87
    88. 88
    89. 89
    90. 90
    91. 91
    92. 92
    93. 93
    94. 94
    95. 95
    96. 96
    97. 97
    98. 98
    99. 99
    @echo off
    setlocal EnableDelayedExpansion
    setlocal EnableExtensions
    
    set /a _2=20
    set /a _1=600
    set /a _0=800
    call :mandelbrot _3 0 _0 _1 _2
    echo | set /p ^=!_3!
    
    goto :EOF
    :mandelbrot
    set width_%~2=!%~3!
    set height_%~2=!%~4!
    set max_%~2=!%~5!
    set /a row_%~2=0
    :WHILE_6
    if !row_%~2! LSS !height_%~2! (
      set /a col=0
      :WHILE_5
      if !col! LSS !width_%~2! (
        set /a c_re=^(^(^(!col! - ^(!width_%~2! / 2^)^) * 4^) / !width_%~2!^)
        set /a c_im=^(^(^(!row_%~2! - ^(!height_%~2! / 2^)^) * 4^) / !width_%~2!^)
        set /a x=0
        set /a y=0
        set /a iteration=0
        set /a _9_%~2=0
        if !iteration! LSS !max_%~2! (
          set /a _8_%~2=1
        ) else (
          set /a _8_%~2=0
        )
        set /a _18_%~2=^(1 + %~2^)
        call :or _19_%~2 !_18_%~2! _8_%~2 _9_%~2
        set _10_%~2=!_19_%~2!
        set /a _4_%~2=2
        set _3_%~2=!y!
        set /a _20_%~2=^(1 + %~2^)
        call :pow _21_%~2 !_20_%~2! _3_%~2 _4_%~2
        set _5_%~2=!_21_%~2!
        set /a _1_%~2=2
        set _0_%~2=!x!
        set /a _22_%~2=^(1 + %~2^)
        call :pow _23_%~2 !_22_%~2! _0_%~2 _1_%~2
        set _2_%~2=!_23_%~2!
        set /a _24_%~2=^(1 + %~2^)
        call :plus _25_%~2 !_24_%~2! _2_%~2 _5_%~2
        set _6_%~2=!_25_%~2!
        if !_6_%~2! LEQ 4 (
          set /a _7_%~2=1
        ) else (
          set /a _7_%~2=0
        )
        set /a _26_%~2=^(1 + %~2^)
        call :and _27_%~2 !_26_%~2! _7_%~2 _10_%~2
        set _11_%~2=!_27_%~2!
        :WHILE_4
        if !_11_%~2! EQU 1 (
          set /a x_new=^(^(^(!x! * !x!^) - ^(!y! * !y!^)^) + !c_re!^)
          set /a y=^(^(^(2 * !x!^) * !y!^) + !c_im!^)
          set x=!x_new!
          set /a iteration=^(!iteration! + 1^)
          goto WHILE_4
        )
        if !iteration! LSS !max_%~2! (
          set _14_%~2=!white!
          set _13_%~2=!row_%~2!
          set _12_%~2=!col!
          set /a _30_%~2=^(1 + %~2^)
          call :putpixel _31_%~2 !_30_%~2! _12_%~2 _13_%~2 _14_%~2
          echo | set /p ^=!_31_%~2!
        ) else (
          set _17_%~2=!black!
          set _16_%~2=!row_%~2!
          set _15_%~2=!col!
          set /a _28_%~2=^(1 + %~2^)
          call :putpixel _29_%~2 !_28_%~2! _15_%~2 _16_%~2 _17_%~2
          echo | set /p ^=!_29_%~2!
        )
        set /a col=^(!col! + 1^)
        goto WHILE_5
      )
      set /a row_%~2=^(!row_%~2! + 1^)
      goto WHILE_6
    )
    
    goto :EOF
    :and
    set a_%~2=!%~3!
    set b_%~2=!%~4!
    rem emulation of &&
    if !a_%~2! EQU 1 (
      if !b_%~2! EQU 1 (
        set %~1=1
        goto :EOF
      )
    )
    set %~1=0
    goto :EOF

    Мандельброт (без записи в картинку) на Batch

    asm0dey, 22 Февраля 2015

    Комментарии (7)
  9. PHP / Говнокод #17614

    +156

    1. 1
    2. 2
    $dateStart = "2015-01-01";
    $dateEnd = date("Y-m-d", strtotime(date("Y-m-01", strtotime(date("Y-m-d", strtotime("+1 month", strtotime($dateStart))))) . " -1 day"));

    Вычисляем последний день месяца

    chumoleg, 10 Февраля 2015

    Комментарии (7)
  10. PHP / Говнокод #17607

    +166

    1. 1
    $this->log->log($log);

    DIX315, 09 Февраля 2015

    Комментарии (7)
  11. 1C / Говнокод #17596

    −120

    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
    Функция Счет(УсловныйКодСчета, СоответствиеСчетов = Неопределено) Экспорт
    	
    	ПС = ПланыСчетов.Хозрасчетный;
    	Результат = ПС.ПустаяСсылка();
    	
    	Если УсловныйКодСчета = "01" Тогда
    		Результат = ПС.ОсновныеСредства;
    	ИНачеЕсли УсловныйКодСчета = "01.01" Тогда
    		Результат = ПС.ОСвОрганизации;
    	ИначеЕсли УсловныйКодСчета = "01.08" Тогда
    		Результат = ПС.ОСБезГосРегистрации;
    	ИначеЕсли УсловныйКодСчета = "01.09" Тогда
    		Результат = ПС.ВыбытиеОС;
    	ИначеЕсли УсловныйКодСчета = "02" Тогда
    		Результат = ПС.АмортизацияОсновныхСредств;
    //Далее идет подобный треш более чем на 500 строк
    
            ИначеЕсли УсловныйКодСчета = "008" Тогда
    		Результат = ПС.ОбеспеченияОбязательствПолученные;
    	ИначеЕсли УсловныйКодСчета = "009" Тогда
    		Результат = ПС.ОбеспеченияОбязательствВыданные;
    	ИначеЕсли УсловныйКодСчета = "011" Тогда
    		Результат = ПС.ОсновныеСредстваСданныеВАренду;
    	Иначе
    		ОписаниеОшибки = НСтр("ru='Не определен счет с условным кодом %1 в соответствии счетов'");
    		ОписаниеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ОписаниеОшибки, УсловныйКодСчета);
    		ВызватьИсключение ОписаниеОшибки;
    	КонецЕсли;
    	
    	Возврат Результат;
    	
    КонецФункции
    
    //СоответствиеСчетов так нигде и не используется :(

    Типовая Бухгалтерия КОРП 3.0, модуль ЗаполнениеБухгалтерскойОтчетностиИтоги

    planaric, 07 Февраля 2015

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