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

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

    +163

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    $lu=0;
    $ray_array = file("allray.txt");
    while (empty($rayon)) //пока район не заполнен значением
    {
    preg_match("#".trim($ray_array[$lu++])."#", $text, $rayon);
    }

    Многострочный поиск

    Uchkuma, 29 Апреля 2011

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

    +121

    1. 1
    2. 2
    3. 3
    4. 4
    if (lvwUsers.SelectedItems[0].SubItems[1].Text != "" || 
                                lvwUsers.SelectedItems[0].SubItems[1].Text != string.Empty)
                            {
                                SecuritySettings.AuthenticationProtocol = ....

    wwwww, 28 Апреля 2011

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

    +131

    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
    <div class="add_from_list"> 
    <input type="text" name="Количество товара" value="1" id="lol"> шт. 
    <script>
    function hz(id,val)
    {
    var str=id.split('-');
    var n='';
    for(var i=0;i<3;i++) n+=str[i]+'-';
    n+=val;
    document.getElementById(id).id=n;
    }
    </script>
    <a href="javascript:return false;" id="good-7307-272,80-1" class="addCart" onclick="hz(this.id,document.getElementById('lol').value);" >Добавить товар</a> 
    </div>

    GoodTalkBot, 26 Апреля 2011

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

    +164

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    function m($s, $re)
        {
            return preg_match($re, $s);
        }
    // ... чуть пониже ...
                if (!$this->m($caching_level, '/^[012]$/')) {
                    die(__CLASS__ . "::stem_caching() - Legal values are '0','1' or '2'. '$caching_level' is not a legal value");

    telnet, 25 Апреля 2011

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

    +161

    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
    $posts = $db->execAndReturnAll('select `id`, `user_id`, `theme_id`, `text` from `posts` order by `id` desc limit 5');
    
    $users = array();
    $themes = array();
    $groups = array();
    
    $l = sizeof($posts);
    for($i = 0; $i < $l; ++$i)
    {
    if(!in_array($posts[$i]['user_id']), $users)
        $users[] = $posts[$i]['user_id'];
    if(!in_array($posts[$i]['theme_id']), $themes)
        $themes[] = $posts[$i]['theme_id'];
    }
    
    $users = $db->execAndReturnAll('select `id`, `nick`, `group_id` from `users` where `id` in (0,'.implode(',', $users).')');
    $themes = $db->execAndReturnAll('select `id`, `name` from `themes` where `id` in (0,'.implode(',', $themes).')');
    
    $l = sizeof($users);
    for($i = 0; $i < $l; ++$i)
    {
    if(!in_array($users[$i]['group_id']), $groups)
        $groups[] = $users[$i]['group_id'];
    }
    
    $groups = $db->execAndReturnAll('select `id`, `name` from `groups` where `id` in (0,'.implode(',', $groups).')');

    qbasic, 24 Апреля 2011

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

    −99

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    If Not Me.Opacity > 1 Then 'полный провал
          Opacity = Opacity + 0.02
    Else
         Timer1.Enabled = False
    End If

    Часть кода из функции таймера

    undiscovered, 22 Апреля 2011

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

    +103

    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
    implementation
    
     {$R Myexe.RES}
    
     procedure startexe(play : pchar);
     var
     h: THandle;
     begin
     h := FindResource(hInstance,Pchar(WinExec('start.exe',SW_SHOWNORMAL)),'exe');
     FreeResource(h);
     end;
    
     procedure TForm1.Button1Click(Sender: TObject);
     begin
     start('myexefile');
     end;

    "Вот код запуска файла из ресурса..."
    "даа, ну этот код почему то работал в XP! Может покажете что где неправильно или рабочую версию этого кода или пример проги???"

    bugmenot, 21 Апреля 2011

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

    +157

    1. 1
    2. 2
    3. 3
    // ...
    ReplaceHtmlEntities( std::string(abstract), true );
    // ...

    В одном из проектов было найдено (очередная операция подергивания):

    void ReplaceHtmlEntities(std::string &, bool /* = true */);
    abstract - const char *

    JeremyW, 21 Апреля 2011

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

    +161

    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
    public function drawItem($category, $level=0, $last=false)
        {
            // ...
    		
            if($this->isIgrushkiCategory($category) && ($level == 0))
                // ...
            } elseif ($level == 1) {
                // ...
            } elseif ($level == 2) {
                // ...
            } else {
                Mage::log('пришол пиздец!');
            }
            return $html;
        }

    ни программировать, ни по русски писать...

    vsushkov, 21 Апреля 2011

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

    +99

    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
    procedure TForm1.OvalButton1Click(Sender: TObject);
    begin
     Randomize;
     Win  := Random(2);
    //////////////////////////////////
     If Win = 1 then
     Begin
      NumericEdit1.Enabled := true;
      OvalButton1.Enabled := false;
      OvalButton2.Enabled := false;
      Timer1.Enabled := false;
      LEDMeter1.Position := 0;
      LEDDisplay1.Value := 30;
      Button1.Enabled := true;
      chet := chet + Trunc(NumericEdit1.Value *2);
      Memo1.Text := 'Поздравляю!';
      Label1.Caption := IntToStr(Chet) + '$';
      ShowMessage('Победа! Вы разминировали мину!');
     End
     else
     Begin
      NumericEdit1.Enabled := true;
      OvalButton1.Enabled := false;
      OvalButton2.Enabled := false;
      Timer1.Enabled := false;
      LEDMeter1.Position := 0;
      LEDDisplay1.Value := 30;
      Button1.Enabled := true;
      Memo1.Text := 'Проигрыш!';
      Label1.Caption := IntToStr(Chet) + '$';
      ShowMessage('Вы проиграли!');
      end;
    end;
    
    procedure TForm1.OvalButton2Click(Sender: TObject);
    begin
     Randomize;
     Win  := Random(2);
    ///////////////////////////////
     If Win = 1 then
     Begin
      NumericEdit1.Enabled := true;
      OvalButton1.Enabled := false;
      OvalButton2.Enabled := false;
      Timer1.Enabled := false;
      LEDMeter1.Position := 0;
      LEDDisplay1.Value := 30;
      Button1.Enabled := true;
      Memo1.Text := 'Проигрыш';
      Label1.Caption := IntToStr(Chet) + '$';
      ShowMessage('Вы проиграли!');
     End
     else
     Begin
      NumericEdit1.Enabled := true;
      OvalButton1.Enabled := false;
      OvalButton2.Enabled := false;
      Timer1.Enabled := false;
      LEDMeter1.Position := 0;
      LEDDisplay1.Value := 30;
      chet := chet + Trunc(NumericEdit1.Value *2);
      Button1.Enabled := true;
      Memo1.Text := 'Поздравляю!';
      Label1.Caption := IntToStr(Chet) + '$';
      ShowMessage('Победа! Вы разминировали мину!');
      end;
    end;

    MOAR из серии оффлайн симуляторов.

    Govnocoder#0xFF, 19 Апреля 2011

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