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

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

В номинации:

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

За время:

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

+4

1

http://надальнийвосток.рф

ну не всем же напитон...

defecate-plusplus, 22 Мая 2016

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

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

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

// А какие-нибудь IDE с интегрированными отладчиками (или
// отладчики сами по себе) умеют нахрен выкидывать всякую
// там компилтайм-метушню из кода, оставляя лишь то, что
// реально исполняется в рантайме?

// Ну например, чтобы хуйня вида
if constexpr(хуйня1)
{
  bagor1();
  if constexpr(хуйня2)
  {
    bagor11();
  }
  else
  {
    bagor12();
  }
}
else
{
  bagor2();
  if constexpr (хуйня3)
  {
    bagor21();
  }
  bagor();
}

// и если хуйня1 == true и хуйня2 == false то чтоб в отладчике
// в какой-то там говноIDE я увидел бы не эту пидоросню с if consexpr
// а только лишь

bagor1();
bagor12();

Есть ли такое?

j123123, 18 Апреля 2021

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

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

−120

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

Option Explicit

Dim HTMLCode As String 'переменная для хранения кода страницы

Private Sub Command1_Click()
    Winsock1.RemotePort = 80                'устанавливаем порт сервера 80
    Winsock1.RemoteHost = "ippages.com"     'Хост
    Winsock1.Connect                        'Подключаемся
    Label4.Caption = Winsock2.LocalIP
End Sub

Function CutIP(HTML As String) As String
Dim p1 As Integer
    p1 = InStr(HTML, "Content-Type: text/html")
    CutIP = Trim(Mid(HTML, p1 + 27, Len(HTML) - p1 - 23))
End Function

Private Sub Label1_Click()

End Sub

Private Sub Winsock1_Close()        'Событие генерируется при закрытии Канала связи
    Form1.Caption = "Не подключен" 'Просто сообщаем о том что не подключены
    Winsock1.Close
End Sub

Private Sub Winsock1_Connect()      'Событие генерируется при подключении
   Form1.Caption = "Подключение"      'Подключены
   'Посылаем запрос на сервер  выдающему наш IP
  Winsock1.SendData "GET " + "/simple/" + " HTTP/1.0" + Chr(10) + Chr(10)
End Sub

'Событие генерируется когда нам приходят данные
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim Temp As String
  Winsock1.GetData HTMLCode
  Label1.Caption = CutIP(HTMLCode)
End Sub

Получение ай-пи адреса посредством отправки на сайт запроса через компонент WinSock.
http://vbbook.ru/visual-basic/polychenie-svoego-ip/
Строго говоря, это не лажа кодера, просто используется (по незнанию?) очень глючный и непредсказуемый компонент.

Fixed by me:

Function GetCurrentIP() As String

  Dim txt As String

  Dim i, j As Integer

  Dim mshttp As New XMLHTTP 'по умолчанию сервер всегда зареган.

  mshttp.open "GET", "http://checkip.dyndns.org/", False ' синхронный get

  mshttp.send

  txt = mshttp.responseText

  i = InStr(1, txt, ":")

  

  If i > 0 Then

    i = i + 1

  Else

    GetCurrentIP = "" ' удобно было бы, если по присваиванию, подобному этому, происходило покидание процедуры. Ан, нет.

    Exit Function

  End If

  

  j = InStr(i, txt, "</")

  If j < 1 Then

    GetCurrentIP = ""

    Exit Function

  End If

  

  GetCurrentIP = Trim(Mid(txt, i, j - i))

End Function

Stertor, 15 Февраля 2014

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

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

+1

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

Новогодний оффтоп #5
░░░░░░░░░░░░░░░░░▐▌░░░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░▀████▀░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░▄█▀▀█▄░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░░░▄▄░░░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░▄████▄░░░░░░░░░░░░░░░
░░░░░░░░░░░▄▄██╬██╬████▄▄░░░░░░░░░░░
░░░░░░░░▀███████╬███╬██████▀░░░░░░░░
░░░░░░░░░░▄▄█╬████╬█████▄▄░░░░░░░░░░
░░░░▄▄▄▄██╬████╬█████╬███╬██▄▄▄▄░░░░
░░░░░░▀▀████╬█████╬█████████▀▀░░░░░░
░░░░░░░░░▄█████╬██████╬███▄░░░░░░░░░
░░▄▄▄▄██████╬█████╬███████╬███▄▄▄▄░░
░░▀▀▀████╬█████╬████╬███╬██████▀▀▀░░
░░░░░░░░████╬████████╬██████░░░░░░░░
░░▄▄▄█████╬██████╬█████╬███╬███▄▄▄░░
▀▀▀████╬█████╬█████╬████╬███╬████▀▀▀
░░░░░░▀▀▀██████████████████▀▀▀░░░░░░
░░░░░░░░░░░░░░░░████░░░░░░░░░░░░░░░░
░░░░░░░░░░░░░░░░████░░░░░░░░░░░░░░░░

#1: https://govnokod.ru/27188 https://govnokod.xyz/_27188
#2: https://govnokod.ru/27893 https://govnokod.xyz/_27893
#3: https://govnokod.ru/28484 https://govnokod.xyz/_28484
#4: https://govnokod.ru/28896 https://govnokod.xyz/_28896

rOBHOBO3Hblu_nemyx, 23 Декабря 2024

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

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

+2

1
2
3
4
5

Есть какие советы, как уехать за границу так, чтобы поддерживать связь с родителями и не быть найденным?

Я думаю, что даже через мобильник связываться опасно.
Пеленг, все дела, хоть там и схемы на жесткой логике, чаще всего. Но боязно.
В конце концов, доступ к таким операциям можно получить через взлом сервера\технического отдела.

OlegUP, 06 Июля 2019

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

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

0

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

Building on that example, the new syntax for function definitions would look like:

def name(positional_only_parameters, /, positional_or_keyword_parameters,
         *, keyword_only_parameters):

Therefore the following would be valid function definitions:

def name(p1, p2, /, p_or_kw, *, kw):
def name(p1, p2=None, /, p_or_kw=None, *, kw):
def name(p1, p2=None, /, *, kw):
def name(p1, p2=None, /):
def name(p1, p2, /, p_or_kw):

https://www.python.org/dev/peps/pep-0570

3.14159265, 07 Ноября 2019

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

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

+143

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

// основная функция запуска
func main($script){
    //устанавливаем значение переменной
    $caption = "гыыы кальулятор";
    
    //грузим иконку
	$calc_icon= library_load_icon(library_load("shell32.dll"),307);
	
	//создаем окошко))
	$main_window=gui_window("TCalc",$caption,$_WS_SYSMENU+$_WS_VISIBLE+$_WS_CAPTION,$_CW_DESKTOPCENTER,$_CW_DESKTOPCENTER,200,100,$calc_icon,0,0,"WindowFunc");
	
	gui_control($main_window,"button","ok",201,$_WS_CHILD+$_WS_VISIBLE+$_BS_DEFPUSHBUTTON+$_BS_FLAT,152,16,32,16);
	gui_control($main_window,"edit","2+7",202,$_WS_CHILD+$_WS_VISIBLE,2,15,130,15);
	gui_control($main_window,"static","Ready",203,$_WS_CHILD+$_WS_VISIBLE,16,36,130,16);
	
	//иконка в трее...
	tray_icon($main_window,$calc_icon,"ГАЛЬГУЛЯТОР",$_NIM_ADD);
	tray_icon_show_balloon($main_window,"[$caption] -> Startup","Добро пожаловать в программу\nСоздано с неизвестным языком (название не придумал)",4);
	idle(); //перевод программы в режим ожидания
}
	 
func WindowFunc($hwnd,$msg,$param,$id){ //обработка сообщений виндоуса
	if($msg==$_WM_CLOSE){  //если крестик нажали
		tray_icon($main_window,$calc_icon,null,$_NIM_DELETE);  //удаляем иконку
		close();  //выходим
	}
	if($msg==$_WM_COMMAND){  //если нажали кнопку
		if($id==201){ //click ok  //определяем ID   //math_compiler - производить математические операции
			$res=math_compiler(gui_get($hwnd,202)); //gui_get - получить текст
			if length($res)==0 {                    //gui_set - установить текст
				$res="[ERROR]";
				tray_icon_show_balloon($hwnd,"[$caption] -> Ашипка","Нивазможна\nправирить текст!",2);
			}else{
				tray_icon_show_balloon($hwnd,"[$caption] -> Result",gui_get($hwnd,202)." = $res",4);
			}
			gui_set($hwnd,203,$res);
		}
	}
}

Названия языка нет..
Если не нравятся названия команд (например, func и т.д.), то пишите, исправлю. Потом вам готовую версию вышлю :)

Mobac, 20 Апреля 2014

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

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

−8

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

.MODEL small ;отводим под стек и под данные по 64Кб код занимает 1 сегмент, данные и стек обьеденены в одну группу
.STACK 100h ;отмечаем начало сегмента стека
.DATA ;отмечаем начало сегмента данных
 
_STDOUT_ equ 1 ; из синтаксического описания видно, что с помощью equ идентификатору 
;можно ставить в соответствие как числовые выражения, так и текстовые строки, 
    ;а псевдооператор “=” может использоваться только с числовыми выражениями;
vivod db 0Dh, 0Ah, '$' ; $-кон. стр.
 
String db 82 dup(?); выделение памяти для строки 
PosLen db 14 dup(?); выделение памяти для строки (числа)
Pos dw ? ; память для первого числа
Len dw ? ; для второго
 
.CODE ;отмечаем начало сегмента кодов
preob proc ; процедура преобразования из строки в число
xor ax, ax
mov bx, ax
mov cx, 10 ; для реализации цикла
_repeat:
mov bl, [si] ; помещаем в bl символ строки
inc si ; в si переходим к ячейке следующего символа
sub bl, '0'; преобразуем ASCII код в число
jb _break ; если SF = 1 то выходим из процедуры(указывает, что между числами стоит пробел, числовой код пробела меньше числового кода нуля)
cmp bl, 9 ; сравниваем, если число больше 9 - то это символ - идём на выход
ja _break
mul cx
add ax, bx ;прибавляет в регистр ax нужное число
jmp _repeat
_break:
ret ; возврат в в главный код
preob endp
 
main PROC
;инициализация сегментного регистра ds адресом сегмента данных
mov ax, @data
mov ds, ax
 
;ввод строки
mov [String], byte ptr 80
mov ah, 0Ah
lea dx, [String]
int 21h
 
;ввод строки чисел
mov al,10 ; перенос строки
int 29h ; быстрый вывод символов на экр(экон байт)
mov [PosLen], byte ptr 14
mov ah, 0Ah
 
lea dx, [PosLen]
int 21h
 
;преобразование строки в первое число
lea si, [PosLen+2]
call preob
mov [Pos], ax
call preob
mov [Len], ax
 
mov al,10 ; перенос строки
int 29h ; быстрый вывод символов на экр(экон байт)
mov ah, 40h ;номер функции помещается в ah
mov bx, _STDOUT_ ;в bx хранится дескриптор стандартного выходного потока
mov cx, [Len] ; кол-во выводимых символов
lea dx, [String+1] ; адрес буфера вывода
add dx, [Pos] ; берем 1 сим. и добавляем число, чтобы перейти к нужному нам символу
int 21h 
 
;завершение программы
xor ax,ax
int 16h
mov ax,4c00h
int 21h
MAIN ENDP
END MAIN

Помогите разобраться в коде, понять логику
Задание: Ввести с клавиатуры строку и строку из двух чисел. Первое число ука- зывает начало подстроки для ввода на экран, второе количество символов из пер- вой строки, которое необходимо вывести на экран.

tuple, 20 Декабря 2021

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

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

−5

1
2
3
4
5
6
7
8
9

Привет петухи.
Страйкер, зацени (не фишинг):
http://govnokod.xyz

Кто желает присоединиться, или просто обосрать, вот сорцы https://github.com/guestinho/govnokod-wordpress
Кроме повторения функционала самого говнокода, есть говносток.
Также как у борманда, можно добавлять в игнор (нужно зарегистрироваться, список хранится в базе).
Счетчик непрочитанных рабочий.
Все ники с govnokod.ru зарезервированы. Но свой ник (если вы имеете к нему доступ) можно подтвердить при регистрации, путем постинга специального коммента. Мыло не обязано быть таким же.

g0_1494089681773, 28 Марта 2018

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

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