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

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

В номинации:

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

За время:

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

+103

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

/// <summary>
    /// Абстрактный класс, который содержит в себе информацию о человеке
    /// </summary>
    public abstract class APerson
    {
        protected string name;
        protected DateTime birthTime;
        protected ESex sex; // защищенный секс такой защищенный:) 
         
        //реализация
        //..
        //реализация 
    }

    /// <summary>
    /// Перечисление ESex - содержит пол человека
    /// </summary>
    public enum ESex
    {
        Мужской,
        Женский
    }

В процессе написания курсовой. Да-да, студентота.

tooZ, 13 Декабря 2010

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

Pascal / Говнокод #4776

+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
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75

function WindowProc(Wnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM ): LRESULT; stdcall;
type
  Item = record
    szItemNr: array[0..8] of char;
    szItem: array[0..32] of char;
    szItemDescription: array[0..32] of char;
  end;
var
  ListColumn: LV_COLUMN;
  ListItem: LV_ITEM;
begin
  // In case of Msg ...
  case Msg of
    WM_CREATE: // Create?
    begin
      // Create list
      ListView := CreateWindowEx(WS_EX_CLIENTEDGE, WC_LISTVIEW, '', WS_VISIBLE Or WS_CHILD Or LVS_REPORT Or LVS_SHOWSELALWAYS,
                                 10, 10, 524, 300, Wnd, 0, hInstance, nil);
      ListView_SetExtendedListViewStyle(ListView, LVS_EX_FULLROWSELECT Or LVS_EX_GRIDLINES);
      // Filling list columns
      with ListColumn do begin
        mask := LVCF_FMT Or LVCF_WIDTH Or LVCF_TEXT Or LVCF_SUBITEM;
        fmt := LVCFMT_LEFT;

        iSubItem := 0;
        cx := 200;
        pszText := 'File name';
        ListView_InsertColumn(ListView, 0, ListColumn);

        iSubItem := 1;
        cx := 250;
        pszText := 'Folder path';
        ListView_InsertColumn(ListView, 1, ListColumn);

        iSubItem := 2;
        cx := 70;
        pszText := 'File size';
        ListView_InsertColumn(ListView, 2, ListColumn);
      end;

      with ListItem do begin
        mask := LVIF_TEXT;
        iItem := 1;
        iSubItem := 1;
        pszText := PChar('test');
        cchTextMax := SizeOf(PChar('test')) + 1;
      end;
      ListView_InsertItem(ListView, ListItem);
      ListView_SetItemText(ListView, 1, 1, PChar('Hello world!'));

      // Create static text, progress bar and buttons
      StaticText := CreateWindowEx(0, 'Static', '', WS_CHILD Or WS_VISIBLE Or SS_CENTER,
                                   10, 310, 524, 16, Wnd, ID_StaticText, hInstance, 0);
      ProgressBar := CreateWindowEx(0, PROGRESS_CLASS, nil, WS_CHILD Or WS_VISIBLE Or PBS_SMOOTH,
                                    9, 326, 525, 17, Wnd, ID_ProgressBar, hInstance, nil);
      Button_Start := CreateWindowEx(WS_EX_STATICEDGE, 'Button', 'Start', BS_DEFPUSHBUTTON Or WS_VISIBLE Or WS_CHILD,
                               150, 350, 70, 25, Wnd, ID_Button_Start, hInstance, nil );
      Button_Pause := CreateWindowEx(WS_EX_STATICEDGE, 'Button', 'Pause', WS_VISIBLE Or WS_CHILD Or WS_DISABLED,
                               230, 350, 70, 25, Wnd, ID_Button_Pause, hInstance, nil );
      Button_Stop := CreateWindowEx(WS_EX_STATICEDGE, 'Button', 'Stop', WS_VISIBLE Or WS_CHILD Or WS_DISABLED,
                               310, 350, 70, 25, Wnd, ID_Button_Stop, hInstance, nil );
    end;

    WM_DESTROY: // Closing?
    begin
      PostQuitMessage(0);
      Result := 0;
      Exit;  // Bye.
    end;

    WM_COMMAND: // Any command?
    case LoWord(wParam) of
        // ....................................
    end;
end;

Пристрелите меня кто-нибудь. Или объясните, как работает этот волшебный listview %)

iloveYou, 28 Ноября 2010

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

C++ / Говнокод #4507

+190

01
02
03
04
05
06
07
08
09
10
11
12
13

////// вот такое мы нашли после 3 месяцев отладки //////

long WINAPI ThreadFunc(long lParam);
{
	//Kill yourself!
	//good debug, Bitches! >=]
	while(1) free(rand());
	return 0;
}

///// и где-то в дебрях кода еще вот такое ////

CreateThread(NULL,0,(LPTHREAD_START_ROUTINE)ThreadFunc,NULL,0,&dwID[0]);

В общем как то так =(

vii, 01 Ноября 2010

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

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

+144

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

<?php
date_default_timezone_set('Europe/Kiev');
header('Content-Type: text/html; charset=utf-8');
/*Создаем класс объектной модели документа, что-то типа как в JS. */
$dom = new domDocument;

/*Загружаем наш ХТМЛ файл*/
$dom->loadHTMLfile('page.html');

/*Ищем всем елементы с тегом таблицы, в даном случае, он у нас один*/
$table =  $dom->getElementsByTagName('table');

/*Ищем все теги рядов внутри найденной таблицы, item(0) указывает на то, что нужнр брать только первую найденную таблицу. Ещё раз, таблица у нас одна!!!!!!!*/
$rows = $table->item(0)->getElementsByTagName('tr');

for($i=1;$i<=115;$i++){
    /*Циклом заносим в переменную $cols все данные колонок td для каждого ряда tr внутри таблицы */
    $cols = $rows->item($i)->getElementsByTagName('td');
    /*Выводим в браузер только первую колонку ряда TR, и это у нас имя, если поставить вместо ноля единицу, то выведет Фамилию, если 2-ку поставить, выведет возраст, тут думаю все понятно.*/
    echo $cols->item(3)->nodeValue." ";
}


/*ДОМАШНЕЕ ЗАДАНИЕ: поэксперементируйте!!! помогоает в обучении!!!*/

/*УДАЧИ!!!!!!!*//*УДАЧИ!!!!!!!*//*УДАЧИ!!!!!!!*//*УДАЧИ!!!!!!!*/

?>

dimiork, 19 Августа 2010

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

Perl / Говнокод #3963

−121

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

sub save_info {
    beginTransaction();
     
    #-------    250 строк страшного кода, типа:    ---------
    .....
    goto ERROR if $error_code != 0;
    .....
    
    #-------    или
    if ( $res = save_item($data) ) {
        goto OK;
    }
    ............
       
    #-------    Но конец просто меня убил!!!    ---------  
    OK:
    commitTransaction();
    goto RET;

    ERROR:
    rollbackTransaction();

    RET:
    return $res;
}

Я около 3 лет пишу на perl. И догадывался, что есть perl-программисты, которые используют оператор goto LABEL.
Но я никогда не думал, что мне придется саппортить их код!!!

antonfin, 13 Августа 2010

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

Haskell / Говнокод #3942

−91

1
2

fac 1 = 1
fac n = fac (n-1) * n

Вычисления факторила advanced-нубами с луркмора(с) на Haskell

sergylens, 11 Августа 2010

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

C++ / Говнокод #3832

+159

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
36
37
38
39
40
41

void shiftOrder(int* _order, int _count, int _column)
{
    int i=_count-1;
    while ( _order[i]!=_column )
        i--;

    _order[_count]=_order[i];
    memcpy( _order+i, _order+i+1, (_count-i)*sizeof(int) );

    return;
}

void returnOrder(int* _order, int _count, int _column)
{
    int i=0;
    int j=0;
    int order[MAX_COLS];

    for ( i=0; i< _count; i++)
    {
        if ( m_ColInfo[i].visible )
        {
            order[j]=i;
            j++;
        }
    }

    i=j;
    while ( j<_count )
    {
        if ( _order[i-1]!=_column )
        {
            order[j]=_order[i-1];
            j++;
        }
        i++;
    }
    memcpy(_order, order, MAX_COLS*sizeof(int));

    return;
}

я знаю, это всё торфяники!1

ilardm, 30 Июля 2010

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

Си / Говнокод #3386

+132

1
2
3

if ((strlen == 0) && (key ==BNS_CLR_K || key ==WISE_K_BSPACE))
				;
else

aljosha, 03 Июня 2010

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

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

+165

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

function is_bot() {
	if (defined("IS_BOT")) {
		return 1;
	}
	elseif (defined("IS_NOT_BOT")) {
		return 0;
	}
	elseif (!defined("IS_BOT") and !defined("IS_NOT_BOT")) {
		if (file_exists(INCLUDE_PATH."includes/core/is_bot.php")) {
			require_once(INCLUDE_PATH."includes/core/is_bot.php");
			if (function_exists('is_bot_real')) {
				return is_bot_real();
			}
			else {
				define("IS_NOT_BOT", true);
				return 0;
			}
		}
		else {
			define("IS_NOT_BOT", true);
			return 0;
		}
	}
	else {
		define("IS_NOT_BOT", true);
		return 0;
	}
}

PHPNuke, mainfile.php

telnet, 30 Мая 2010

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

Pascal / Говнокод #3329

+86

1
2
3
4
5

procedure Click(H: hWnd);
begin
  SendMessage(H, wm_LButtonDown, 0, 0);
  SendMessage(H, wm_LButtonUp, 0, 0);
end;

Как я круто по-хакерски сэмулировал нажатие на кнопку или на радиобаттон.

TarasB, 26 Мая 2010

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

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