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

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

В номинации:

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

За время:

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

−99

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

'Поиск с использованием Mid()
'-------
Dim B
'переменная Б - номер символа
Dim foundn
' номер найденной строки
Dim A As String
'A - текст в котором ищем
Dim find As String
'--------
A="this is text ! ololo 12345 abcd"
Call found("ololo",1)
 
Function found(Text As String, start)
B = start
find = Text
Do While Not (Mid(A, B, Len(find)) = find)
B = B + 1
If B > 1000000 Then
MsgBox ("overfloow")
'если номер символа > 10000000 - остановка процесса
End
End If
Loop
foundn = B
End Function

Поиск в string

hromjo, 17 Мая 2010

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

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

+171

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

function isSpace(s){
return (s==" " || s=="n" || s=="13" || s=="t" || s=="r")?true:false
}
function count(){
var c=0
var i
var prevspace=true
var str=document.forms.form.text.value
for(i=str.length-1;i>=0;i--){
if(isSpace(str.charAt(i)) && prevspace){
}else{
c++
}
prevspace=isSpace(str.charAt(i))
}
document.forms.form.total.value=c
return false
}

Вычисляем количество слов в поле. http://javascript.ru/forum/misc/9381-podschet-slov-v-forme.html
P.S. спамеры могут не спрашивать, где здесь C++ — он в 12-ой строчке:)

Infamous, 13 Мая 2010

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

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

+144

1
2
3
4
5

<?php if(sizeof($v[1])==1) {?>
<?php
 }
 ?>
 <?php if(sizeof($v[1])>1) { $v[1]=ass_array_shuffle($v[1]); ?>

и в завершение говнопоноса... не думаю что мне нужон был именно sizeof

Lure Of Chaos, 12 Мая 2010

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

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

+103

1
2
3
4

private ListBoxItem FindItem(string guid)
{
        return _userlist.Items.Cast<ListBoxItem>().FirstOrDefault(item => ((TextBlock) ((StackPanel) item.Content).Children[1]).Text == guid);
}

Функция поиска элемента в ListBox по значению Guid в одну строку. Наговнокодил ReSharper.

botinko, 09 Мая 2010

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

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

−122

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

sub PrintToFile {
	
	my ($filename, @file) = @_;
	
	@file = sort {$a <=> $b} @file;
	
	open BK, ">backup.txt";
	foreach $line(@file) {
		print BK "$line";
	}
	close BK;
	
	rename "backup.txt", "$filename";
	unlink "backup.txt";
	
}

А вот так мы записываем в файл. И нас не интересует многопоточность или проверка имени файла (в вызывающей функции тоже нет). А не записать ли нам ../index.html?

Прошу не кидаться калом. Первый раз вижу перл. Может быть так и надо? Волшебник-интерприатор все поправит, и не даст сучиться ужасному?

ps взято с разломанного недображелателем хостинга, для того, чтобы "поправить все как следует".

da4ever, 09 Мая 2010

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

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

−119

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

sub getMessages{
local($mop,$pg,$all)=@_;

if(!&db_query("select insurance_faq_main.id,date_format(insurance_faq_main.date,'%d.%m.%Y'),insurance_faq_main.name,insurance_faq_main.email,insurance_faq_main.www,insurance_faq_main.city,insurance_faq_main.message,insurance_faq_main.ip,answer from insurance_faq_main, insurance_faq_ans where insurance_faq_ans.idm=insurance_faq_main.id order by id desc limit ".$pg*$mop.",$mop")) {$body .= $db_message; return -1}

$id;
@date;
@name;
@email;
@www;
@city;
@msg;
@ip;
@answer;

for(local $i=0;defined($rows->[$i]);$i++)
    {
    $id[$i]=$rows->[$i]->[0];
    $date[$i]=$rows->[$i]->[1];
    $name[$i]=$rows->[$i]->[2];
    $email[$i]=$rows->[$i]->[3];
    $www[$i]=$rows->[$i]->[4];
    $city[$i]=$rows->[$i]->[5];
    $msg[$i]=$rows->[$i]->[6];
    $ip[$i]=$rows->[$i]->[7];
    $answer[$i]=$rows->[$i]->[8];
    }
return $i;
}

Мужской способ возвращать результаты из функции

Suor, 26 Апреля 2010

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

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

−89

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

Public Class TreeKuBi003
			''' -----------------------------------------------------------------------------
			''' <summary>
			''' Подключение KuBi.
			''' </summary>
			''' <remarks>
			''' </remarks>
			''' <history>
			''' 	[Max Pro]	30.01.2009	Created
			''' </history>
			''' -----------------------------------------------------------------------------
			Public Const sKuBi As String = _
			"	SELECT" & sEnter & _
			"		iIdTreeKuBi," & sEnter & _
			"		iIdTreeNone" & sEnter & _
			"	FROM" & sEnter & _
			"	    TreeKuBiNone" & sEnter & _
			"	ORDER BY" & sEnter & _
			"		iIdTreeKuBi;"
		End Class		 'TreeKuBi003
		'''

А так Максим Прохоров использует классы. На мой вопрос - максим, а зачем тебе нужны классы?
- ну, чтобы хранить данные.

ursus, 23 Апреля 2010

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

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

+156

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

Избранные куски кода:

Генерация разметки html страницы: (и так страниц 5-6 кода примерно)
document.body.style.margin = "0px";
document.title = sTitle;
document.body.style.backgroundColor = sColor0;
document.body.style.backgroundImage = "url(" + sImgUrl0 + ")";
document.body.style.backgroundRepeat = "repeat-x";
tableMain = document.body.appendChild(document.createElement("table"));
tableMain.style.fontFamily = "serif";
tableMain.style.fontSize = "10.5pt";
tableMain.style.fontWeight = "bold";
tableMain.id = "tableMain";
tableMain.style.width = "100%";
tableMain.style.borderCollapse = "collapse";
tableMain.cellPadding = "0px";


Данные в базе:
⌠var var oCell; //рабочая ячейка. var divAny; ⌡var ⌠ini oCell = document.getElementById("cellInfo"); ⌡ini ⌠one ₢₢₢InfoClear(); ⌡one // 0 ₢₢₢A2Add(oCell,"∃∃∃"); oCell.appendChild(document.createTextNode("\u00A0\u00A0\u00A0")); // 1 ₢₢₢A2Add(oCell,"∃∃∃"); oCell.appendChild(document.createTextNode("\u00A0\u00A0\u00A0")); // 2 ₢₢₢A2Add(oCell,"∃∃∃","1_2_76_22"); oCell.appendChild(document.createTextNode("\u00A0\u00A0\u00A0")); // 3 ₢₢₢A2Add(oCell,"∃∃∃"); ₢₢₢BrAdd(oCell); ₢₢₢BrAdd(oCell); // 4 ₢₢₢TextAddDivBlack(oCell,"∃∃∃",1); ₢₢₢BrAdd(oCell); divAny=₢₢₢div6Add(oCell); // 5 ₢₢₢TextAdd(divAny,"∃∃∃"); ₢₢₢TextAdd(divAny,"www.bolshoybiznes.ru"); // 6 ₢₢₢TextAdd(divAny,"∃∃∃"); // 7 ₢₢₢TextAddBrDivGray(oCell,"∃∃∃"); // 8 ₢₢₢TextAddDivGray(oCell,"∃∃∃"); // 9 ₢₢₢TextAddBrDivBlack(oCell,"∃∃∃"); // 10 ₢₢₢TextAddBrDivBlack(oCell,"∃∃∃"); // 11 ₢₢₢TextAddBrDivBlack(oCell,"∃∃∃"); // 12 ₢₢₢TextAddBrDivBlack(oCell,"∃∃∃"); // 13 ₢₢₢TextAddBrDivBlack(oCell,"∃∃∃"); ₢₢₢BrAdd(oCell); // 13+4=17 divAny=₢₢₢divList6Add(oCell,["∃∃∃","∃∃∃","∃∃∃","∃∃∃"]);

Это яваскрипт имени Максима Прохорова.

ursus, 23 Апреля 2010

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

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

−94

1
2
3
4
5

// Функция, проверяющая совпадение цветов. Переваривает любые типы
public static Boolean bColor(Object oR1,Object oG1, Object oB1,Object oR2,Object oG2, Object oB2)
{
if(!IsByte(oR1) || !IsByte(oR2) || !IsByte(oG1) || !IsByte(oG2) || !IsByte(oB1) || !IsByte(oB2)) return false;
 }

Имени Максима Прохорова функция

ursus, 22 Апреля 2010

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

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