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

    В номинации:
    За время:
  2. Python / Говнокод #26269

    −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
    def raboficate(sents: Sequence[Sequence[str]]) -> Sequence[str]:
        RABOWORDS = (
            ('много', '.'),
            ('малость', '.'),
            ('зачем', '?')
        )
    
        sents_rab = []
        for sent in sents:
            raboword = random.choice(RABOWORDS)
            sents_rab.append([raboword[0]] + sent + [raboword[1]])
        return sents_rab

    Массовое зомбирование сознания при помощи «Python».
    https://github.com/gost-gk/raboscript

    В помощь начинающим рабомантам и кобенаторам нашим отделом по датамайнингу бигдаты был надатамайнен, почищен и приведён к удобоваримому виду (все слова/знаки препинания разделены пробелами, мусор убран) самый длинный фанфик по «Mass Effect»: https://mega.nz/#!XdFyzahR!_rXcsCBWyyrnl69feQMpCi238ACNp euO-Zz9nn2E-FQ (сорок мегабайт отборной психозы!).
    Также аналитическим отделом был найден пакет «pymorphy2», с помощью которого наши инженеры надеются довести рабоскрипт до идеала.

    gost, 15 Декабря 2019

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

    +145

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    var lst = new List<string>();
    foreach (String parameterName in parameters.Keys) // parameters это Dictionary<String, Object>
    {
    	lst.Add(parameterName + ": " + parameters[parameterName].ToString());
    }

    Долгий вариант перебора словаря: перебор ключей в цикле и на каждой итерации получение по ключу значения из словаря

    vldalx, 08 Июля 2015

    Комментарии (136)
  4. Куча / Говнокод #14744

    +101

    1. 1
    2. 2
    3. 3
    Запилил расширение выкашивающее "коней", "царей" и прочую нечисть.
    
    http://gvforum.ru/viewtopic.php?pid=1911#p1911

    Vasiliy, 20 Февраля 2014

    Комментарии (136)
  5. Куча / Говнокод #8462

    +125

    1. 1
    http://lurkmore.ru/govnokod.ru

    Неужели у нас наконец-то будет статья?

    C_Plus_Plus_Govno, 09 Ноября 2011

    Комментарии (136)
  6. Куча / Говнокод #28122

    0

    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
    Бесконечный оффтоп имени kcalbа #1
    K C A L B K C A L B
    C C               C C
    A   +             A   +
    L     +           L     +
    B       K C A L B K C A L B
    K       C         K       C
    C       A         C       A
    A       L         A       L
    L       B         L       B
    K C A L K K C A L B       K
      C     C           C     C
        +   A             +   A
          + L               + L
            K C A L B K C A L B

    kcalbCube, 18 Апреля 2022

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

    −105

    1. 1
    2. 2
    Покуда уголовники, вроде Bormand будут незабаненны,
    уникальность контента Вашего сайта будет стремится к нулю.

    Админ! Забань борманда!

    blackray, 14 Ноября 2018

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

    +120

    1. 1
    Криптотред. Отладка шифроскрипта и приватный чатик

    1024--, 24 Июля 2015

    Комментарии (135)
  9. JavaScript / Говнокод #6438

    +157

    1. 1
    2. 2
    3. 3
    4. 4
    $('fb').innerHTML =  '<iframe src="http://www.facebook.com/plugins/like.php?href=' +
    		href +
    		'&layout=button_count&show_faces=false&action=like&font=arial' +
    		'&colorscheme=light&height=21&ref=under_buy_button&utm_source=facebook-likebutton" scrolling="no" frameborder="0" ' + 'style="border:none;width:160px;overflow:hidden;height:21px" allowTransparency="true"></iframe>';

    http://rozetka.com.ua/ - самый продвинутый интернет-магазин Украины.

    Skull, 21 Апреля 2011

    Комментарии (135)
  10. JavaScript / Говнокод #25131

    0

    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
    // https://dev.to/saigowthamr/how-to-reverse-a-string-in-javascript-3i9c
    
    // In this tutorial, we are going to learn three different ways to reverse a string
    // in JavaScript by using the reverse method, reduce method.
    
    // First way
    
    const str = "hello"
    
    str.split('').reverse().join('')
    
    //"olleh"
    
    
    // We used split method to split the string into an array of individual strings then chain it to reverse method.
    // Second way
    
    const str = "hello"
    
    [...str].reduce((prev,next)=>next+prev)
    
    //"olleh"
    
    // First, we spread the string using spread operator and reverse the string using the reduce method
    // Third way
    
    
    function reverseString(str){
    
      const arr = [...str]
      let reverse= "";
    
      while(arr.length){
         reverse = reverse + arr.pop()
      }
    
      return reverse
    }
    
    // I mostly like the Second way to reverse a string using reduce method.
    
    // Happy coding...

    Это видимо такой вид соревнований, типа как вкрутить лампочку в патрон наиболее упоротым и неочевидным способом. Нахрена это нужно обычному программисту? Может это такой способ ручной обфускации? Тогда понятно

    j123123, 29 Ноября 2018

    Комментарии (134)
  11. Pascal / Говнокод #13750

    +165

    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
    Пишу менеджер автозапусков:
    
    type
      tregkey = class
        rootkey: hkey;
        keyname: string;
        param: string;
        value: string;
        function Rootkeyname:string;
      end;
    
    procedure TForm1.UpdateAutoruns;
    var
      i: integer;
      lst: tlistitem;
      rlist: tobjectlist;
      keyname: string;
      tregobj:tregkey;
    begin
      rlist := tobjectlist.create;
      ListView4.items.clear;
      try
        regread(windows.HKEY_CURRENT_USER, 'Software\Microsoft\Windows\CurrentVersion\Run',rlist);
        regread(windows.HKEY_CURRENT_USER,
          'Software\Microsoft\Windows\CurrentVersion\RunOnce', rlist);
        regread(windows.HKEY_CURRENT_USER,
          'Software\Microsoft\Windows\CurrentVersion\RunServices', rlist);
        regread(windows.HKEY_CURRENT_USER,
          'HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Run', rlist);
        regread(windows.HKEY_CURRENT_USER,
          'HKEY_CURRENT_USER\Software\Microsoft\ Windows NT\CurrentVersion\Windows', rlist);
        regread(windows.HKEY_LOCAL_MACHINE,
          'Software\Microsoft\Windows\CurrentVersion\Run', rlist);
        regread(windows.HKEY_LOCAL_MACHINE,
          'Software\Microsoft\Windows\CurrentVersion\RunOnce', rlist);
        regread(windows.HKEY_LOCAL_MACHINE,
          'Software\Microsoft\Windows\CurrentVersion\RunServices', rlist);
        regread(windows.HKEY_LOCAL_MACHINE,
          'Software\Microsoft\Windows\CurrentVersion\RunServicesOnce', rlist);
        regread(windows.HKEY_LOCAL_MACHINE,
          'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\ Windows\CurrentVersion\RunOnceEx', rlist);
        for i := rlist.Count - 1 downto 0 do
        begin
          tregobj:=tregkey(rlist[i]);
          lst := ListView4.items.Add;
          keyname := format('%s\%s\%s', [tregobj.Rootkeyname,tregobj.keyname, tregobj.param]);
          lst.Caption :=keyname;
          lst.SubItems.AddObject(tregobj.value,tregobj);
        end;
      finally
        rlist.Free;
      end;
    end;
    
    
    
    В итоге этот код
    
    procedure TForm1.sBitBtn20Click(Sender: TObject);
    var
      i:integer;
      reg:tregistry;
    begin
        for i:= listview4.Items.Count -1 downto 0 do
        showmessage(tregkey(listview4.Items[i].subitems.Objects[0]).rootkeyname);
    end;
    
    либо вызывает ошибку доступа либо пустой messagebox. 
    В чем лажа? Я тупо не вижу ошибки.

    Stertor, 07 Сентября 2013

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