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

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

В номинации:

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

За время:

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

0

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

procedure TOstatkiForm.FormCreate(Sender: TObject);
begin
  OstatkiTovarList:=TStringList.Create;

  btnShowToConvert.Enabled := False;
  grpToConvert.Visible := False;

  zqrToConvert.SQL.Text := 'select null::integer ostid,' + #13#10 +
                                  'null::integer tovarid,' + #13#10 +
                                  'null::bigint kt,' + #13#10 +
                                  'null::varchar nt,' + #13#10 +
                                  'null::numeric cen,' + #13#10 +
                                  'null::integer edizmerid,' + #13#10 +
                                  'null::varchar name_u,' + #13#10 +
                                  'null::date income_period,' + #13#10 +
                                  'null::varchar ss,' + #13#10 +
                                  'null::numeric ost_doc,' + #13#10 +
                                  'null::numeric gsum' + #13#10 +
                           'where 1=2';
end;

Без комментариев

Baiumka, 12 Января 2022

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

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

0

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

procedure TForm9.FormShow(Sender: TObject);
var i_vx,o_dt,o_kt: real;
begin
  Form9.Caption:='Èòîãî ïî æóðíàëó';
  r_:='select sum(sma) as ism from '+t_ss;
  with DM.ZQ_all do
  begin
    Close;
    SQL.Clear;
    SQL.Add(r_);
    SQL.Add('where ch=1 and gd*100+ms<:rgd*100+:rms');
    Params.ParamByName('rgd').Value :=t_gd;
    Params.ParamByName('rms').Value :=t_ms;
    Open;
    first;
    if Eof=true then i_vx:=0 else i_vx:=Fieldbyname('ism').asfloat;

    Close;
    SQL.Clear;
    SQL.Add(r_);
    SQL.Add('where ch=2 and gd*100+ms<:rgd*100+:rms');
    Params.ParamByName('rgd').Value :=t_gd;
    Params.ParamByName('rms').Value :=t_ms;
    Open;

    first;
    if not Eof=true then  i_vx:=i_vx - Fieldbyname('ism').asfloat;
    LEdit1.Text:=Format('%10.2f',[i_vx]);
    Close;
    SQL.Clear;
    SQL.Add(r_);
    SQL.Add('where ch=1 and gd*100+ms=:rgd*100+:rms');
    Params.ParamByName('rgd').Value :=t_gd;
    Params.ParamByName('rms').Value :=t_ms;
    Open;
    first;
    if Eof=true then o_dt:=0 else o_dt:=Fieldbyname('ism').asfloat;
    LEdit2.Text:=Format('%10.2f',[o_dt]);
    Close;
    SQL.Clear;
    SQL.Add(r_);
    SQL.Add('where ch=2 and gd*100+ms=:rgd*100+:rms');
    Params.ParamByName('rgd').Value :=t_gd;
    Params.ParamByName('rms').Value :=t_ms;
    Open;
    first;
    if Eof=true then o_kt:=0 else o_kt:=Fieldbyname('ism').asfloat;
    Close;
    LEdit3.Text:=Format('%10.2f',[o_kt]);
    LEdit4.Text:=Format('%10.2f',[i_vx+o_dt-o_kt]);
  end;

end;

Baiumka, 06 Января 2022

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

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

−6

1
2
3

Подписывайтесь на канал Говнокода в телеграме:

https://t.me/GovnokodChannel

guest6, 14 Ноября 2021

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

Куча / Говнокод #27803

−2

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

a     G    a      G C         G C
Deszcze niespokojne      potargaly sad
a               G     F      G    a
 А my na tej wojnie ladnych pare lat
      a                       b      a          b
Do domu wrocimy, w piecu napalimy, nakarmimy psa
       a                     B7 e           B7     e    a E7 a
Przed noca zdazymy, tylko zwyciezymy, a to wazna gra
a       G      a  G C               G  C
Na niebie obloki,     po wsiach pelno bzu,
a                   G       F     G       a
 Gdziez ten swiat daleki, pelen dobrych snow
      a                           b     a             b
Powrocimy wierni my czterej pancerni, "Rudy" i nasz pies
        a                  B7    e         B7     e
My czterej pancerni powrocimy wierni po wiosenny bez.

HE_OTBE4Au_YE6KY, 07 Ноября 2021

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

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

−2

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

#include <iostream>
#include <cmath>
#include <signal.h>

#define lovu struct
#define cpp ptrdiff_t
struct forever{};

lovu forever hactehbka(void) {return {};}
int love(void) {return 0;}
void bacbka(void) {}
auto bormand = (cpp(hactehbka) + cpp(bacbka)) != cpp(love);
int main(void)
{
    if(bormand)
        kill(bormand, SIGINT);

    auto sad = cpp(bacbka) - cpp(love),
        chance = cpp(love) - cpp(hactehbka),
        never = cpp(bacbka) - cpp(hactehbka);
    auto usocute = [chance, never, sad](void) -> void
    {
        putchar(sad * (chance - never / chance / 2) - sad / chance);
        putchar(sad * (chance - never / chance / 2) + sad / chance);
    };
    auto mydear = [chance, sad, never](void) -> void
    {
        putchar(sad * chance / (never / chance) + never / chance / 2 + (never + cpp(love) / (never / chance) - cpp(hactehbka) / (never / chance)) + never - (never / chance * 1.5));
        putchar(9 * chance + never / chance);
        putchar(std::abs(cpp(signal) - cpp(hactehbka) + chance * 2 + never * 3 + sad - 9) / std::pow(never / chance, 3));
    };

    putchar(sad * (chance - never / chance / 2));
    usocute();
    putchar(never * (chance - never / chance) + sad - (sad / (cpp(love) - cpp(hactehbka))) * (never / chance * 1.5));
    mydear();
    putchar(chance * 10 + never / chance);
    usocute();
    putchar((chance + never / chance / 2) * 10 + (never / chance) * 2);
    auto ohyes = 69.8886;
    putchar(ohyes);
    putchar(chance * 10 + never / chance);
    putchar(chance + never / chance / 2);
    putchar(never * (chance - never / chance) + sad - (sad / (cpp(love) - cpp(hactehbka))) * (never / chance * 1.5));
    mydear();
    for(auto&& c : {1.5f, 3.f, 6.5f})
        putchar(ohyes + M_PI + never / chance * c);
    putchar(ohyes);
    putchar(chance + never / chance * 1.5);
    return 0;
}

BACbKA, 05 Ноября 2021

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

JavaScript / Говнокод #27784

0

01
02
03
04
05
06
07
08
09
10
11

interface Surface {
	n: number;
}

let shiny: Surface = {
	n: 10.0
}

function main() {
	print(shiny.n);
}

шах и мат С/C++ девелоперам :) (постов не будет - сайт все блокирует)

ASD_77, 02 Ноября 2021

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

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

+2

01
02
03
04
05
06
07
08
09
10

// a.h
inline struct $q1 {unsigned a;} $q1i;

// main.cpp
#include "a.h"
int main(int argc, char** args) 
{
    $q1i.a = argc; 
    return $q1i.a;
};

у некоторых линукс-юзеров может упасть на этапе линковки

digitalEugene, 31 Октября 2021

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

Куча / Говнокод #27718

0

1

Не сочтите за ханжество, но когда же прекратится этот содом?

забаньте пидора!

MaaKut, 12 Октября 2021

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

Куча / Говнокод #27698

0

1
2

"Эффективный C. Профессиональное программирование"  Роберт Сикорд.
Фуфел или новая "белая книга" ?

gne4do, 02 Октября 2021

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

Куча / Говнокод #27640

0

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

-module(pqueue).

-export([ in/3
        , out/1
        , new/0
        , close/1
        ]).

-type prio() :: non_neg_integer().

-record(priority_queue,
        { tab :: ets:tid()
        }).

-define(size, {size, size}).
-define(seqno(PRIO), {seqno, PRIO}).

-opaque t() :: #priority_queue{}.

-export_type([ prio/0
             , t/0
             ]).

-spec new() -> t().
new() ->
  Tab = ets:new(pqueue_tab, [ordered_set]),
  ets:insert(Tab, {?size, 0}),
  #priority_queue{tab = Tab}.

-spec close(t()) -> ok.
close(#priority_queue{tab = Tab}) ->
  true = ets:delete(Tab),
  ok.

-spec in(term(), prio(), t()) -> ok.
in(Val, Prio, #priority_queue{tab = Tab}) when Prio >= 0 ->
  Key = {get_next_seqno(Tab, Prio), Prio},
  true = ets:insert_new(Tab, {Key, Val}),
  ets:update_counter(Tab, ?size, {2, 1}, {?size, 0}),
  ok.

-spec out(t()) -> {value, term()} | empty.
out(#priority_queue{tab = Tab}) ->
  case ets:first(Tab) of
    Key = {SeqNo, _Prio} when is_integer(SeqNo) ->
      Val = ets:lookup_element(Tab, Key, 2),
      ets:update_counter(Tab, ?size, {2, -1}),
      ets:delete(Tab, Key),
      {value, Val};
    _ ->
      empty
  end.

%% This function generates keys that go in sequence for each
%% individual priority level, but interleave for different priority
%% levels. Keys with lower priority are more sparse, so they are
%% consumed less often in the total sequence
get_next_seqno(Tab, Prio) ->
  Delta = Prio + 1,
  Key = ?seqno(Prio),
  ets:update_counter(Tab, Key, {2, Delta}, {Key, 0}).

Творение безумца или гения.

CHayT, 02 Сентября 2021

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

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

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

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

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

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

Куча / Говнокод #27803

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

JavaScript / Говнокод #27784

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

Куча / Говнокод #27718

Куча / Говнокод #27698

Куча / Говнокод #27640