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

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

В номинации:

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

За время:

VisualBasic / Говнокод #26971

+2

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

REM I'm trying to do some simple webscraping in OpenOffice (I usually work in Excel but I'm trying to port 
REM something over for a coworker that doesn't have Excel). 
REM However, when I try to run something very similar to this, it keeps giving me this BASIC runtime error 1.

Sub Macro1
    Dim explorer As Object
    Set explorer = CreateObject("InternetExplorer.Application")
    explorer.Visible = True
    explorer.navigate("www.yahoo.com")
    
    Const READYSTATE_COMPLETE As Long = 4
    Do While explorer.Busy Or explorer.readyState <> READYSTATE_COMPLETE
    Loop

    dim page as object
    set page = explorer.Document
    
    dim mailButton as object
    set mailButton = page.GetElementByID("ybar-navigation-item-mail") 'this is the line the error occurs on
    mailButton.Click
End Sub

а чего бы нам не краулить сайты, запуская IE через BASIC в экселе

https://stackoverflow.com/questions/64010764/is-webscraping-with-openoffice-basic-even-possible

Fike, 22 Сентября 2020

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

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

+2

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

Definition read_t key cont : Thread :=
      call tx_context <- get_tx_context;
      call cell <- get_cell key tx_context;
      match cell.(cell_write) with
      | Some v =>
          do _ <- log (read key v);
          cont v
      | None =>
          do v <- read_d key;
          let tx_context' := set tx_cells <[key := cell]> tx_context in
          do _ <- pd_set tx_context';
          do _ <- log (read key v);
          cont v
      end.

Continuations are like violence, if they don't work then you're not using enough of them.

CHayT, 16 Сентября 2020

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

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

+2

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

public function getFlagCode()
{
    $code = $this->_storeManager->getStore()->getCode();

    switch ($code) {
        case 'us':
            return 'us';
            break;
        case 'eu':
            return 'eu';
            break;
        default;
            return 'ww';
    }
}

denistrator, 14 Сентября 2020

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

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

+2

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

Хрюкни #5
             ._     __,
              |\,../'\
            ,'. .     `.
           .--         '`.
          ( `' ,          ;
          ,`--' _,       ,'\
         ,`.____            `.
        /              `,    |
       '                \,   '
       |                /   /`,
       `,  .           ,` ./  |
       ' `.  ,'        |;,'   ,@
 ______|     |      _________,_____jv______
        `.   `.   ,'
         ,'_,','_,
         `'   `'

#1: (vanished) https://govnokod.xyz/_26863
#2: (vanished) https://govnokod.xyz/_26868
#3: https://govnokod.ru/26881 https://govnokod.xyz/_26881
#4: https://govnokod.ru/26896 https://govnokod.xyz/_26896

nepeKamHblu_nemyx, 07 Сентября 2020

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

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

+2

1

Просто оффтоп #8

#1: https://govnokod.ru/20162 https://govnokod.xyz/_20162
#2: https://govnokod.ru/25329 https://govnokod.xyz/_25329
#3: https://govnokod.ru/25415 https://govnokod.xyz/_25415
#4: (vanished) https://govnokod.xyz/_25472
#5: https://govnokod.ru/25693 https://govnokod.xyz/_25693
#6: (vanished) https://govnokod.xyz/_26649
#7: https://govnokod.ru/26672 https://govnokod.xyz/_26672

nepeKamHblu_nemyx, 06 Сентября 2020

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

Assembler / Говнокод #26904

+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
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99

lea esi, cpu_name
    mov eax, 0
    mov mreg, eax

    ;[04/12] G
    mov eax, 0ffh
    and eax, ebx
    mov mreg, eax
    mov al, byte ptr [mreg]
    mov [esi], al
    inc esi

    ;[03/12] e
    mov eax, 0ff00h
    and eax, ebx
    mov mreg, eax
    mov al, byte ptr [mreg + 1]
    mov [esi], al
    inc esi

    ;[02/12] n
    mov eax, 0ff0000h
    and eax, ebx
    mov mreg, eax
    mov al, byte ptr [mreg + 2]
    mov [esi], al
    inc esi

    ;[01/12] u
    mov eax, 0ff000000h
    and eax, ebx
    mov mreg, eax
    mov al, byte ptr [mreg + 3]
    mov [esi], al
    inc esi

    ;[08/12] i
    mov eax, 0ffh
    and eax, edx
    mov mreg, eax
    mov al, byte ptr [mreg]
    mov [esi], al
    inc esi

    ;[07/12] n
    mov eax, 0ff00h
    and eax, edx
    mov mreg, eax
    mov al, byte ptr [mreg + 1]
    mov [esi], al
    inc esi

    ;[06/12] e
    mov eax, 0ff0000h
    and eax, edx
    mov mreg, eax
    mov al, byte ptr [mreg + 2]
    mov [esi], al
    inc esi

    ;[05/12] I
    mov eax, 0ff000000h
    and eax, edx
    mov mreg, eax
    mov al, byte ptr [mreg + 3]
    mov [esi], al
    inc esi

    ;[12/12] n
    mov eax, 0ffh
    and eax, ecx
    mov mreg, eax
    mov al, byte ptr [mreg]
    mov [esi], al
    inc esi

    ;[11/12] t
    mov eax, 0ff00h
    and eax, ecx
    mov mreg, eax
    mov al, byte ptr [mreg + 1]
    mov [esi], al
    inc esi

    ;[10/12] e
    mov eax, 0ff0000h
    and eax, ecx
    mov mreg, eax
    mov al, byte ptr [mreg + 2]
    mov [esi], al
    inc esi

    ;[09/12] l
    mov eax, 0ff000000h
    and eax, ecx
    mov mreg, eax
    mov al, byte ptr [mreg + 3]
    mov [esi], al
    inc esi

oaoaoammm, 01 Сентября 2020

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

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

+2

1
2
3
4
5
6
7
8
9

Definition idx_compl_r {i : Fin.t N} (j : Fin.t i) : Fin.t N.
      remember (fin_to_nat i) as i'.
      assert (Hlt : i' < N).
      { rewrite Heqi'. eapply fin_to_nat_lt. }
      assert (Heq : i' + (N - i') = N) by lia.
      set (j' := Fin.L (N - i') j).
      rewrite Heq in j'.
      exact j'.
    Defined.

Ещё один говношедевр. Как кастовать значения типа Fin.t (число в интервале от 1 до N) друг в друга. Разворачивается в 12000 строк кода. "Тому, кто это придумал, надо в голову гвоздь забить".

CHayT, 27 Августа 2020

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

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

+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

Definition uilv_add_trivial {N} te (t : list TE) (traces : Traces N)
             i j (Ht : MInt_ trace_elems_don't_commute j true traces t)
             s s' (Hls : LongStep s (te :: t) s')
             (Htriv : trivial_add i j traces) :
    MInt_ trace_elems_don't_commute i true (push_te traces i te) (te :: t).
  Proof with autorewrite with vector; eauto with vector; try vec_forall_eq_contradiction.
    unfold push_te.
    unfold trivial_add in Htriv.
    destruct (Fin.eq_dec i j) as [Hij|Hij].
    (* [i=j], solving by constructor: *)
    { subst.
      unfold trivial_add.
      eapply mint_keep with (rest := traces[@j])...
    }
    remember traces[@j] as t2_.
    destruct t2_ as [|te2 t2]; subst.
    { inversion Ht as [vec Hvec|? ? ? ? ? Hj Hcont|? ? ? ? ? ? Hjj0 Hswitch Hj Hcont];
        subst.
      - eapply mint_keep with (prog := true)...
        eapply mint_nil...
      - rewrite Hj in Heqt2_.
        discriminate.
    }
    remember traces[@i] as t1_.
    destruct t1_ as [|te1 t1]; subst.
    (* [te] is the last element in i-th trace: *)
    { eapply mint_keep with (rest := []) (prog := false)...
      inversion Ht as [vec Hvec|? ? ? ? ? Hj Hcont|? ? ? ? ? ? Hjj0 Hswitch Hj Hcont];
        subst...
      rewrite Heqt1_ in *.
      eapply mint_switch...
      rewrite <-Heqt1_...
    }
    destruct Htriv as [|[Hij' Hcomm]]; [contradiction Hij|idtac].
    eapply mint_keep with (rest := te1 :: t1) (prog := false)...
    rewrite Heqt1_, Vec.replace_id.
    inversion Ht as [vec Hvec|? ? ? ? ? Hj Hcont|? ? ? ? ? ? Hjj0 Hswitch Hj Hcont]; subst...
    replace te0 with te2 in * by congruence.
    eapply mint_switch...
    rewrite <-Heqt1_...
  Defined.

Кто сказал, что хуже C++ темплейтов ничего уже нет? Вы ничего не понимаете в метушне. Это говно разворачивается в 12000 строк, например.

CHayT, 20 Августа 2020

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

Python / Говнокод #26876

+2

1

https://pythoninstitute.org/certification/

кто последний в сертификацию напитон?

defecate-plusplus, 17 Августа 2020

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

bash / Говнокод #26874

+2

1
2

tar -czvf arhiv.tar.hz .
tar -xzf arhiv.tar.hz

Как запомнить эти команды? Бывает гуглю их в день по нескольку раз )))
Сделать алиаснюшню "tar pack" и "tar unpack"?

3_dar, 17 Августа 2020

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

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