1. C++ / Говнокод #12111

    +24

    1. 1
    QString("a=%1 b=%2").arg("[%1]").arg("Shit happens")

    Вы думаете, что результат будет "a=[%1] b=Shit happens"?
    Как бы не так! "a=[Shit happens] b=%2".

    Причем эта "фича" вполне документирована. Но документирована она не в самом первом описании arg'а, а только в arg(const QString &a1, const QString &a2), в доку по которому я естественно никогда не заглядывал...

    UPD: правильным вариантом будет QString("a=%1 b=%2").arg("[%1]", "Shit happens"), но тогда мы лишаемся поддержки форматирования, да и таким образом можно засунуть максимум 10 аргументов.

    bormand, 13 Ноября 2012

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

  2. 1C / Говнокод #12110

    −125

    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
    procedure setParameters(aq)
 спДекрет= Новый СписокЗначений;
 спДекрет.Добавить(Перечисления.СостоянияРаботникаОрганизации.ОтпускПоБеременностиИРодам);
 спДекрет.Добавить(Перечисления.СостоянияРаботникаОрганизации.ОтпускПоУходуЗаРебенком);
	
	
	aq.setParameter("Дат",КонецДня(НачПериода));
	aq.setParameter("Уволен",Перечисления.ПричиныИзмененияСостояния.Увольнение);
	aq.setParameter("Оклад",Перечисления.СпособыРасчетов.Оклад);
	aq.setParameter("МРП",Перечисления.СпособыРасчетов.КолМРП);
	aq.setParameter("Сумма",Перечисления.СпособыРасчетов.Сумма);
	aq.setParameter("Оклад",Перечисления.СпособыРасчетов.ПроцентОтОклада);
	aq.setParameter("Доход",Перечисления.СпособыРасчетов.ПроцентОтДоходов);
	aq.setParameter("ПодразделениеОрганизации",ПодразделениеОрганизации);
	aq.setParameter("ФизЛицо",Работник);
	aq.setParameter("Должность",Должность);
	aq.setParameter("ВидЗанятости",ВидЗанятости);
	aq.setParameter("ТарифныйРазряд",ТРазряд);
	
	aq.setParameter("ВРЭкология",ВРЭкология);
	
	//Декретники
	aq.setParameter("Декрет",спДекрет);
	//Состояние общее
	aq.setParameter("Состояние",Состояние);
	aq.setParameter("Сост",Состояние1);
endprocedure

procedure setБабло(Тз)
	Тз.Колонки.Добавить("id",new ОписаниеТипов("Строка"));
	Тз.Колонки.Добавить("Размер",new ОписаниеТипов("Число"));
endProcedure

...
	q=new Query;
	q.Текст="                                            //--------------------------------------------бабло
|Select  
|	ПлановыеНачисленияРаботниковОрганизацийСрезПоследнихКон.Размер,
|	ПлановыеНачисленияРаботниковОрганизацийСрезПоследнихКон.ФизЛицо.код id
|from
|	РегистрСведений.ПлановыеНачисленияРаботниковОрганизаций.СрезПоследних(
|			&Дат,
|			ВидРасчета.ЯвляетсяОсновнымНачислением
|				И Размер <> 0) КАК ПлановыеНачисленияРаботниковОрганизацийСрезПоследнихКон
|";
	
	setParameters(q);
	бабло=New ТаблицаЗначений;
	setБабло(бабло);
	rs=q.Выполнить().Выбрать();
	while rs.next() do
			s=бабло.Добавить();
   s.id=rs.id;
   s.Размер=rs.Размер;
enddo;
 бабло.Индексы.Добавить("id"); 
...

    Форматирование текста оставил как есть. Автор: Жуков А.П.

    Danik, 13 Ноября 2012

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

  3. C++ / Говнокод #12109

    +15

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    for(int y=0; y<height; ++y)
{
     for(int x=0; x<width; ++x)
         b[y,x] = a[y,x];
}

    LispGovno, 12 Ноября 2012

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

  4. Си / Говнокод #12108

    +136

    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
    typedef char C;typedef long I;
typedef struct a{I t,r,d[3],p[2];}*A;
#define P printf
#define R return
#define V1(f) A f(w)A w;
#define V2(f) A f(a,w)A a,w;
#define DO(n,x) {I i=0,_n=(n);for(;i<_n;++i){x;}}
I *ma(n){R(I*)malloc(n*4);}mv(d,s,n)I *d,*s;{DO(n,d[i]=s[i]);}
tr(r,d)I *d;{I z=1;DO(r,z=z*d[i]);R z;}
A ga(t,r,d)I *d;{A z=(A)ma(5+tr(r,d));z->t=t,z->r=r,mv(z->d,d,r);R z;}
V1(iota){I n=*w->p;A z=ga(0,1,&n);DO(n,z->p[i]=i);R z;}
V2(plus){I r=w->r,*d=w->d,n=tr(r,d);A z=ga(0,r,d);
 DO(n,z->p[i]=a->p[i]+w->p[i]);R z;}
V2(from){I r=w->r-1,*d=w->d+1,n=tr(r,d);
 A z=ga(w->t,r,d);mv(z->p,w->p+(n**a->p),n);R z;}
V1(box){A z=ga(1,0,0);*z->p=(I)w;R z;}
V2(cat){I an=tr(a->r,a->d),wn=tr(w->r,w->d),n=an+wn;
 A z=ga(w->t,1,&n);mv(z->p,a->p,an);mv(z->p+an,w->p,wn);R z;}
V2(find){}
V2(rsh){I r=a->r?*a->d:1,n=tr(r,a->p),wn=tr(w->r,w->d);
 A z=ga(w->t,r,a->p);mv(z->p,w->p,wn=n>wn?wn:n);
 if(n-=wn)mv(z->p+wn,z->p,n);R z;}
V1(sha){A z=ga(0,1,&w->r);mv(z->p,w->d,w->r);R z;}
V1(id){R w;}V1(size){A z=ga(0,0,0);*z->p=w->r?*w->d:1;R z;}
pi(i){P("%d ",i);}nl(){P("\n");}
pr(w)A w;{I r=w->r,*d=w->d,n=tr(r,d);DO(r,pi(d[i]));nl();
 if(w->t)DO(n,P("< ");pr(w->p[i]))else DO(n,pi(w->p[i]));nl();}

C vt[]="+{~<#,";
A(*vd[])()={0,plus,from,find,0,rsh,cat},
 (*vm[])()={0,id,size,iota,box,sha,0};
I st[26]; qp(a){R a>='a'&&a<='z';}qv(a){R a<'a';}
A ex(e)I *e;{I a=*e;
 if(qp(a)){if(e[1]=='=')R st[a-'a']=ex(e+2);a= st[ a-'a'];}
 R qv(a)?(*vm[a])(ex(e+1)):e[1]?(*vd[e[1]])(a,ex(e+2)):(A)a;}
noun(c){A z;if(c<'0'||c>'9')R 0;z=ga(0,0,0);*z->p=c-'0';R z;}
verb(c){I i=0;for(;vt[i];)if(vt[i++]==c)R i;R 0;}
I *wd(s)C *s;{I a,n=strlen(s),*e=ma(n+1);C c;
 DO(n,e[i]=(a=noun(c=s[i]))?a:(a=verb(c))?a:c);e[n]=0;R e;}

main(){C s[99];while(gets(s))pr(ex(wd(s)));}

    http://www.kuro5hin.org/story/2002/8/30/175531/763

    Taken from Roger Hui's An Implementation of J.

    One summer weekend in 1989, Arthur Whitney visited Ken Iverson at Kiln Farm and produced — on one page and in one afternoon — an interpreter fragment on the AT&T 3B1 computer. I studied this interpreter for about a week for its organization and programming style; and on Sunday, August 27, 1989, at about four o'clock in the afternoon, wrote the first line of code that became the implementation described in this document.

    Arthur's one-page interpreter fragment is as follows:

    Read inside for the most beautiful code you have ever seen.

    bazhenovc, 12 Ноября 2012

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

  5. Pascal / Говнокод #12107

    +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
    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
    Procedure TForm1.CreateObjects(Column, Row: Integer); // Процедура создания кнопок (ячеек).
Var
  i, j, iLeft, iTop, iRow : Integer; // Переменные, отвечающие за расположение ячеек на форме. (Кроме iRow, она содержит номер ячейки по горизонтали.)
  SpeedButton : array of TSpeedButton; // Собственно, сам массив с ячейками.
  cColumn : Char; // Номер ячейки по вертикали.
  iMine : ShortInt; // Дополнительная переменная кол-ва бомб на поле.
BEGIN
{Присваиваем начальные значения переменным. :7:}
  iLeft := 0; // Начальная позиция по горизонтали.
  iTop := 5; // Начальная позиция по вертикали.
  iRow := 1; // Номер ячейки по горизонтали.
  iMine := MineCount; // Кол-во мин на поле.
  cColumn := 'A'; // Номер ячейки по вертикали.
  SetLength(SpeedButton, Row+1); // Массив с ячейками.
{------------------------------------------ :7:}

{Создаём новые списки. :8:}
  FObjectList := TObjectList.Create; // Список с объектами.
  Form2.FMineList := TStringList.Create(); // Список с номерами мин на поле.
{--------------------- :8:}

{Главный цикл создания игрового поля :9:}
  For i := 1 to Column do // Запускаем цикл создания по вертикали.
   Begin
    For j:=1 to Row do // Теперь тоже самое по горизонтали.
     bEgin
       SpeedButton[j] := TSpeedButton.Create(Self); // Создаём очередную ячейку на поле.
       SpeedButton[j].Parent := GamePanel; // Этим параметром указываем, что ячейка принадлежит первой форме.
       SpeedButton[j].Top := iTop; // Задаём расположение ячейки по вертикали.
       SpeedButton[j].Name := cColumn + IntToStr(iRow); // Задаём имя ячейки.
       SpeedButton[j].Flat := True; // Используем св-во кнопок не отображаться на рисунке.
       SpeedButton[j].Font.Color := clBlue; // Делаем цвет текста синим.
       SpeedButton[j].Font.Style := [fsBold]; // Делаем шрифт жирным.
       SpeedButton[j].OnClick := SpeedButton1.OnClick; // Указываем, какая процедура будет вызываться при клике на ячейку.
       SpeedButton[j].OnMouseDown := SpeedButton1.OnMouseDown; // Указываем, какая процедура будет вызываться при нажатии на ячейку.
       SpeedButton[j].Left := iLeft+8; // Задаём расположение ячейки по горизонтали, смещая её на 8 пикселей вправо.
       {Устанавливаем бомбу в ячейку. :10:}
         If (iMine <> 0) and (SpeedButton[j].Name <> 'A1') then // Если кол-во бомб не превышено, то...
          beGin
           Randomize; // Генерируем список ПСЧ.
           SpeedButton[j].Tag := Random(2); // Случайным образом задаём, будет ли бомба находится в ячейке.
           If SpeedButton[j].Tag = 1 then
            begin
             Form2.FMineList.Add(SpeedButton[j].Name); // Добавляем новую запись в массив бомб.
             Dec(iMine); // Уменьшаем счетчик мин на единицу.
            end;
          enD;
       {----------------------------- :10:}
         FObjectList.Add(SpeedButton[j]);// Добавляем новую запись в массив ячеек.
         iLeft := iLeft + 24; //Увеличиваем расстояние между ячейками.
         If iRow = Row then iRow := 1 // Если номер следующей ячейки по горизонтали неправильный, то меняем его на 1.
          Else Inc(iRow); // Иначе увеличиваем номер.
     eNd;
    cColumn := Char(Ord(cColumn) + 1); // Увеличиваем номер ячейки по вертикали.
    iTop := iTop + 24; // Увеличиваем положение ячейки по вертикали.
    iLeft := 0; // Обнуляем позицию ячейки по горизонтали.
   End;
{----------------------------------- :9:}

  ImageList1.GetBitmap(0, (FindComponent('A1') as TSpeedButton).Glyph); // Загружаем спрайт в первую ячейку.
  Form2.FMineList.SaveToFile('OUTPUT.TXT'); // Сохраняем расположение мин в файл.
  MineCountLabel.Caption := IntToStr(Form2.FMineList.Count); // Показываем колво мин на поле.
END;

Function TForm1.CheckMove(X,Y : ShortString): Boolean; // Функция проверки валидности ячейки. Она должна находится рядом с текущей.
Var
 iXod, iAlf : Integer; // Вспомогательные переменные.
BEGIN
 result := false; // Презумпция вины :)
 iXod := Abs(StrToInt(Y) - StrToInt(dPos.yInt)); // Получаем расстояние до текущей ячейки по горизонтали.
 iAlf := Abs(Ord(dPos.xChr) - Ord(X[1])); // Получаем расстояние до текущей ячейки по вертикали.
 If ((iXod <= 1) and (iAlf <= 1)) and ((iXod <> 0) or (iAlf <> 0)) then result := true; // И если оно не больше одного, то разрешаем ход.
END;

Procedure TForm1.SpeedButton1Click(Sender: TObject); // Главная процедура нажатия на кнопку(ячейку).
Var
  i : Integer; // Счётчик цикла.
  cObject : TSpeedButton; // Сам объект.
  Str, j : String; // Вспомогательная переменная имени ячейки.
  Count : Integer; // Вспомогательная переменная. (стр. 160)
BEGIN
{Подготавливаем переменные :1:}
  cObject := TSpeedButton(Sender); // Получаем ячейку, на которую кликнули.
  Str := cObject.Name; // Присваиваем вспомогательной переменной имя задействованной ячейки.
  dClick.xAlf := Str[1]; // Присваиваем переменной первый символ задействованной ячейки по вертикали.
  dClick.yFlt := Copy(Str, 2, Length(Str)); // Получаем номер ячейки по горизонтали.
{------------------------- :1:}
...

    По просьбам желающих. Код некогда созданной мною игрушки Сапёр. Отдельный прикол, это как потом все эти кнопки удаляются.

    Govnocoder#0xFF, 12 Ноября 2012

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

  6. C++ / Говнокод #12106

    +16

    1. 1
    2. 2
    3. 3
    struct WideParams
{
    WideParams(size_t CountParameters...):

    Посоны, это бомба. Вот что я обнаружил в проекте.

    LispGovno, 12 Ноября 2012

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

  7. Куча / Говнокод #12105

    +127

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    if(Normal(Pawn.Acceleration) Dot Vect(1,0,0) > 0)
      {
         tempRot.Yaw = 0;
         Pawn.SetRotation(tempRot);
      }

    Из туториала по UDK. Почему просто не написать Pawn.Acceleration > 0 ?

    tirinox, 12 Ноября 2012

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

  8. C++ / Говнокод #12104

    +19

    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
    //generate the new objects
    EnterCriticalSection(&csWinEvent);
    value arr = alloc_array(windowStates.size());
    int i=0;
    for(
        std::tr1::unordered_map<int,windowState>::const_iterator it = windowStates.begin();
        it!=windowStates.end();
        ++it )
    {
        value o = alloc_empty_object();
        //int hwnd
        //int x,y,w,h
        //int minimized,maximized,restored,closed
        alloc_field(o, val_id("hwnd"), alloc_int(it->first));
        alloc_field(o, val_id("window"), *(value*)GetWindowLongPtr((HWND)it->first,GWLP_USERDATA)  );
        alloc_field(o, val_id("x"), alloc_int(it->second.x));
        alloc_field(o, val_id("y"), alloc_int(it->second.y));
        alloc_field(o, val_id("w"), alloc_int(it->second.w));
        alloc_field(o, val_id("h"), alloc_int(it->second.h));
        alloc_field(o, val_id("minimized"), alloc_int(it->second.minimized));
        alloc_field(o, val_id("maximized"), alloc_int(it->second.maximized));
        alloc_field(o, val_id("restored"), alloc_int(it->second.restored));
        alloc_field(o, val_id("closed"), alloc_int(it->second.closed));
        val_array_set_i(arr,i,o);
        ++i;
    }
    windowStates.clear();
    LeaveCriticalSection(&csWinEvent);

    Casts ;]

    petersvp, 12 Ноября 2012

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

  9. PHP / Говнокод #12103

    +65

    1. 1
    $query = $this->db->query("SELECT DISTINCT *, pd.name AS name, p.image, m.name AS manufacturer, (SELECT price FROM " . DB_PREFIX . "product_discount pd2 WHERE pd2.product_id = p.product_id AND pd2.customer_group_id = '" . (int)$customer_group_id . "' AND pd2.quantity = '1' AND ((pd2.date_start = '0000-00-00' OR pd2.date_start < NOW()) AND (pd2.date_end = '0000-00-00' OR pd2.date_end > NOW())) ORDER BY pd2.priority ASC, pd2.price ASC LIMIT 1) AS discount, (SELECT price FROM " . DB_PREFIX . "product_special ps WHERE ps.product_id = p.product_id AND ps.customer_group_id = '" . (int)$customer_group_id . "' AND ((ps.date_start = '0000-00-00' OR ps.date_start < NOW()) AND (ps.date_end = '0000-00-00' OR ps.date_end > NOW())) ORDER BY ps.priority ASC, ps.price ASC LIMIT 1) AS special, (SELECT points FROM " . DB_PREFIX . "product_reward pr WHERE pr.product_id = p.product_id AND customer_group_id = '" . (int)$customer_group_id . "') AS reward, (SELECT ss.name FROM " . DB_PREFIX . "stock_status ss WHERE ss.stock_status_id = p.stock_status_id AND ss.language_id = '" . (int)$this->config->get('config_language_id') . "') AS stock_status, (SELECT wcd.unit FROM " . DB_PREFIX . "weight_class_description wcd WHERE p.weight_class_id = wcd.weight_class_id AND wcd.language_id = '" . (int)$this->config->get('config_language_id') . "') AS weight_class, (SELECT lcd.unit FROM " . DB_PREFIX . "length_class_description lcd WHERE p.length_class_id = lcd.length_class_id AND lcd.language_id = '" . (int)$this->config->get('config_language_id') . "') AS length_class, (SELECT AVG(rating) AS total FROM " . DB_PREFIX . "review r1 WHERE r1.product_id = p.product_id AND r1.status = '1' GROUP BY r1.product_id) AS rating, (SELECT COUNT(*) AS total FROM " . DB_PREFIX . "review r2 WHERE r2.product_id = p.product_id AND r2.status = '1' GROUP BY r2.product_id) AS reviews, p.sort_order FROM " . DB_PREFIX . "product p LEFT JOIN " . DB_PREFIX . "product_description pd ON (p.product_id = pd.product_id) LEFT JOIN " . DB_PREFIX . "product_to_store p2s ON (p.product_id = p2s.product_id) LEFT JOIN " . DB_PREFIX . "manufacturer m ON (p.manufacturer_id = m.manufacturer_id) WHERE p.product_id = '" . (int)$product_id . "' AND pd.language_id = '" . (int)$this->config->get('config_language_id') . "' AND p.status = '1' AND p.date_available <= NOW() AND p2s.store_id = '" . (int)$this->config->get('config_store_id') . "'");

    Opencart, catalog/model/catalog/product.php

    Они что издеваются? А я-то думаю что у меня ложит mysql сервер на колени...

    fooser, 12 Ноября 2012

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

  10. Java / Говнокод #12102

    +71

    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
    class ........... {
    BigDecimal t;
...
    public boolean t_is_zero(){
        BigDecimal zero = new BigDecimal(0);

        if(this.t == zero)
            return true;
        else
            return false;
    }
...
}

    для операции сравнения была создана новая переменная как эквивалент )

    azv, 12 Ноября 2012

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