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

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

В номинации:

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

За время:

Java / Говнокод #16189

+87

1
2
3
4
5
6
7
8

public BarrierAssessment(int id, Client client, int homephone, int mobile, int email, int transport, int licence, boolean notInWorkForce, boolean unpaidWork, boolean cdeProgram, boolean notWorkingBut, int paidWork, 
String employerOcc, String reason, int highlevel, String further, int stableAccomodation, int loneParent, int livingWith, int policeProblems, int courtPending, int preventFrom, int medical, int drugTest, int currentBusy, 
String scurrentBusy, String reasonForNotGettingJob, int startTomorrow, String jobGoals, int currentResume, int canvasLetter, int referees, int interviewClothing, String otherBarriers, int ec, LastModified lastModified, 
Date datestamp, Date bupdated, String disabilityBarriers, Date licenceDueToExpire, Date licenceDueBack, String currentSkills, String possibleSkills) {
 
...
 
}

Мать всех конструкторов!

Meegoo, 18 Июня 2014

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

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

+87

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

delim:=0;
result:='';
resulttemp:='';
otv1:=trunc(rez);
ott2:=rez-otv1;
while otv1>=s1 do
begin
	delim:=delim+1;
	r1:=otv1 div s1;
	r2:=otv1 mod s1;
	otv1:=r1;		
	if (r2>=0) and (r2<=9) then
		str(r2,resulttemp);			
	if r2=10 then resulttemp:='a';
	if r2=11 then resulttemp:='b';
	if r2=12 then resulttemp:='c';
	if r2=13 then resulttemp:='d';
	if r2=14 then resulttemp:='e';
	if r2=15 then resulttemp:='f';		
	result:=result+resulttemp;
end;	
if (otv1>=0) and (otv1<=9) then
	str(otv1,resulttemp);	
if otv1=10 then resulttemp:='a';
if otv1=11 then resulttemp:='b';
if otv1=12 then resulttemp:='c';
if otv1=13 then resulttemp:='d';
if otv1=14 then resulttemp:='e';
if otv1=15 then resulttemp:='f';	
result:=result+resulttemp;
delim:=length(result);
resulttemp:=result;
for otv1:=1 to delim do
	result[otv1]:=resulttemp[delim+1-otv1];

Перевод числа из десятичной системы счисления в систему счисления с основанием s1

n924, 15 Марта 2014

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

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

+87

1

FileName := Format('%.2d',[I]) + 'frame' + Format('%.3d', [J]) + '.jpg';

Вычисление названия картинки в цикле

1291, 02 Сентября 2013

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

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

+87

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

*-*-*-*-*-*-*-*-*-*-*-*-*-*-зашифрованные прокси:*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
<TD id="address">
<script language=javascript>
<!--
					proxy(3,'28','70','216','172',80);
					proxy(4,'70','216','172','28',80);
					proxy(1,'103','10','59','30',8080);
					proxy(2,'10','59','30','103',80);
					proxy(3,'251','151','101','109',80);
					proxy(4,'83','209','222','25',8080);
					proxy(1,'101','109','251','89',80);
					proxy(2,'50','26','5','101',8080);
					proxy(3,'220','89','186','93',8000);
					proxy(4,'158','98','190','250',8090);
					proxy(1,'92','39','185','18',80);
					proxy(2,'8','240','44','5',8080);
					proxy(3,'127','84','124','81',8080);
                                                       
                                                               [...]
// -->
</script>
				</TD>

//*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-Свиток-расшифровщик*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*

function proxy(mode,arg1,arg2,arg3,arg4,port){
	var ret;
	switch(mode) {
		case 1:
			ret=arg1+"."+arg2+"."+arg3+"."+arg4+":"+port+"<BR>";
			break;
		case 2:
			ret=arg4+"."+arg1+"."+arg2+"."+arg3+":"+port+"<BR>";
			break;
		case 3:
			ret=arg3+"."+arg4+"."+arg1+"."+arg2+":"+port+"<BR>";
			break;
		case 4:
			ret=arg2+"."+arg3+"."+arg4+"."+arg1+":"+port+"<BR>";
			break;
	}
	document.write(ret);
}
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-

var
  StartPos : Integer;
  MyText ,temp: string;
  memorystream:tmemorystream;
  anolink:string;
  i:integer;
  ccount:integer;
  counter:string;
  endpos:integer;
  steg,eteg:string;
  b:integer;
  mode,arg1,arg2,arg3,arg4,port:string;
begin
  steg:='proxy(';
  eteg:=');';
  memorystream:=tmemorystream.create;
  idhttp1.Request.UserAgent:='Mozilla/5.0 (Windows NT 5.1; rv:19.0) Gecko/20100101 Firefox/19.0';
  idhttp1.Request.Accept:='text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
  idhttp1.request.AcceptLanguage:='ru-RU,ru;q=0.8,en-US;q=0.5,en;q=0.3';
  idhttp1.Request.AcceptEncoding:='ngnix';
  idhttp1.Request.Connection:='keep-alive';
  idhttp1.Get('http://anonymousinet.com/index.php',memorystream);
  memorystream.Position:=0;
  mytext:=memorystreamtostring(memorystream);
  mytext:=utf8toansi(mytext);
  memorystream.Clear;
  startpos:=0;
  While true do
  begin
    startPos := PosEx(steg, MyText, StartPos + 1);
    if StartPos > 0 then
    begin
      temp:=copy(mytext,startpos+length(steg),length(mytext));
      b:=pos(eteg,temp);
      if b >0 then
      temp:=copy(temp,1,b-1);
      temp:=trim(temp);
      temp:=stringreplace(temp,'''','',[rfreplaceall]);
      mode:=stringfield(temp,',',1);
      arg1:=stringfield(temp,',',2);
      arg2:=stringfield(temp,',',3);
      arg3:=stringfield(temp,',',4);
      arg4:=stringfield(temp,',',5);
      port:=stringfield(temp,',',6);
      smemo1.lines.add(proxy(mode,arg1,arg2,arg3,arg4,port));
    end
    else
    Break;
  end;

    end;

Зловонная попытка защитить прокси от парсинга. Гм, как бы помягче,гм, неудачная...

Stertor, 11 Августа 2013

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

Java / Говнокод #11245

+87

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

   public static final String HTTP = "http://";
    public static final String HTTPS = "https://";

    public static final String HTTP_UP = "HTTP://";
    public static final String HTTPS_UP = "HTTPS://";

    public static final String HTTP_UP_1 = "Http://";
    public static final String HTTPS_UP_1 = "Https://";

    private static final String STUPID_PROTOCOL = "http://http://";
    private static final String STUPID_PROTOCOL_1 = "ttp://";
    private static final String STUPID_PROTOCOL_2 = "hhttp://";

из утилит по проверки урлов

ykhrustalev, 20 Июня 2012

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

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

+87

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

function  get_info($id)  {
					$query = "SELECT  * FROM `static` WHERE `id`='$id'  LIMIT 1";
					$sql= mysql_query($query) or die(mysql_error());
					$row = mysql_fetch_assoc($sql);
					$masiv=array();
					$masiv['keywords']=$row['keywords'];
					$masiv['menu']=$row['menu'];
					$masiv['description']=$row['description'];
					$masiv['title']=$row['title'];
					$masiv['link']=$row['link'];
					$masiv['name']=$row['name'];
					$masiv['name_show']=$row['name_show'];
					$masiv['content']=$row['content'];
					$masiv['id']=$row['id'];
					$masiv['parant_id']=$row['parant_id'];
					$masiv['show']=$row['show'];
					$masiv['addons']=$row['addons'];
					$masiv['redirect']=$row['redirect'];
					$masiv['parant_id']=$row['parant_id'];
					return $masiv;
				}

Занимался переводом сайта в UTF-8, наткнулся на такую вот функцию.

baldrs, 03 Мая 2012

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

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

+87

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

procedure makeWord(var str : string; var word : string);
var j, p,tp : integer;
begin
	j:= 1;
	p := pos(' ', str);
	if (p = 0) then p:= length(str);
	word := copy(str, 0, p);
	delete(str, 0, p);
	while (str[j] = ' ') or (str[j] = ''#9'') do begin
		Inc(j);
	end;
	if (j > 0) then begin 
		delete(str,0,j-1);
	end;
end;
	
var		i,p,n : integer;
			str, word : string;
begin
	str := 'I   		 want to   tell   you!';
	readln(n);
	for i:= 1 to n do begin
		makeWord(str,word);
		writeln(word);
	end;
	readln;
end.

Программа выводит первые n слов строки

ckiD, 21 Февраля 2012

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

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

+87

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

var
x,y,R:real;
l11,l12,l1,l21,l22,l2,l3,l41,l42,l4,l51,l52,l5,l6,l71,l72,l7:boolean;
begin
x:= StrToFloat(edit1.text);
y:= StrToFloat(edit2.text);
R:=StrToFloat(edit3.text);
l11:=(y<x) and (x*x+y*y<R*R) and (y>0);
l12:=(x*x+y*y<r*r) and (x<0)and (y>0);
l1:=l11 or l12;
l21:=(y>0) and (x*x+y*y<R*R)and (y>x);
l22:= ( x*x+y*y<R*R)and (y>x) and (x<0);
l2:= l21 or l22;
l3:=(y<0) and ( x*x+y*y<R*R)and (y>x);
l41:= (x>0) and ( x*x+y*y<R*R)and (y<x);
l42:= (x<-1) and ( x*x+y*y>R*R)and (y>x);
l4:= l41 or l42;
l51:= (x>1) and ( x*x+y*y>R*R)and (y<x);
l52:= (x>-1) and ( x*x+y*y>R*R)and (y<x);
l5:= l51 or l52;
l6:= (y>0) and ( x*x+y*y<R*R)and (y>x);
l71:= (x>0) and (x*x+y*y>R*R) and (y<0);
l72:= (y<0) and (x*x+y*y>R*R) and (y<x) and (x<0);
l7:= l71 or l72;
if l1= true then
begin
edit4.text:='T принадлежит 1 области';
end
else
begin
edit4.text:='T не принадлежит 1 области';
end;
if l2= true then
begin
edit4.text:='T принадлежит 2 области';
end
else
begin
edit4.text:='T не принадлежит 2 области'
end;
if l3= true then
begin
edit4.text:='T принадлежит 3 области'
end
else
begin
edit4.text:='T не принадлежит 3 области'
end;
if l4= true then
begin
edit4.text:='T принадлежит 4 области'
end
else
begin
edit4.text:='T не принадлежит 4 области'
end;
if l5= true then
begin
edit4.text:='T принадлежит 5 области'
end
else
begin
edit4.text:='T не принадлежит 5 области'
end;
if l6= true then
begin
edit4.text:='T принадлежит 6 области'
end
else
begin
edit4.text:='T не принадлежит 6 области'
end;
if l4= true then
begin
edit4.text:='T принадлежит 7 области'
end
else
begin
edit4.text:='T не принадлежит 7 области'
end;
end;

end.

...

Cyanide, 15 Февраля 2012

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

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

+87

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

procedure GenerateMines; // Процедура генерации мин
label
again;
var
t,m:Integer; // Переменные для цикла
i,j:Byte; // Координаты на поле
bufer:String; // Вспомогательная переменная цикла. Хранит текущие сгенерированные координаты мины для записи в массив
begin
Randomize;
for t:= 1 To mines Do
begin
again:
  i:=Round(Random*9+1);
  j:=Round(Random*9+1);
  bufer:=IntToStr(i) + ',' + IntToStr(j); // Создание строковой записи коордитаты мины
  for m:= 1 To 100 Do // Цикл для проверки, есть ли сгенерированная координата в массиве
  begin
    if bufer = mines_a[m] then goto again; // Если сгенерированная координата в массиве есть, то программа генерирует новые координаты
  end;
  mines_a[t]:=bufer; // Запись новой координаты в массив
  field[i,j]:=9; // Добавление мины на поле в сгенерированные координаты
end;
end;

Процедура генерации мин в сапёре. Говно или не?

SmseR, 10 Января 2012

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

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

+87

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

function det5(var a:atab):double;
{FUNKCIYA VYCHISLYAET OPREDELITEL MATRITSY 5-go PORYADKA a}
begin
det5:=
+a[1,1]*a[2,2]*a[3,3]*a[4,4]*a[5,5]-a[1,2]*a[2,1]*a[3,3]*a[4,4]*a[5,5]
+a[1,3]*a[2,1]*a[3,2]*a[4,4]*a[5,5]-a[1,1]*a[2,3]*a[3,2]*a[4,4]*a[5,5]
-a[1,3]*a[2,2]*a[3,1]*a[4,4]*a[5,5]+a[1,2]*a[2,3]*a[3,1]*a[4,4]*a[5,5]
-a[1,4]*a[2,1]*a[3,2]*a[4,3]*a[5,5]+a[1,1]*a[2,4]*a[3,2]*a[4,3]*a[5,5]
-a[1,1]*a[2,2]*a[3,4]*a[4,3]*a[5,5]+a[1,4]*a[2,2]*a[3,1]*a[4,3]*a[5,5]
-a[1,2]*a[2,4]*a[3,1]*a[4,3]*a[5,5]+a[1,2]*a[2,1]*a[3,4]*a[4,3]*a[5,5]
-a[1,4]*a[2,3]*a[3,1]*a[4,2]*a[5,5]+a[1,3]*a[2,4]*a[3,1]*a[4,2]*a[5,5]
-a[1,3]*a[2,1]*a[3,4]*a[4,2]*a[5,5]+a[1,4]*a[2,1]*a[3,3]*a[4,2]*a[5,5]
-a[1,1]*a[2,4]*a[3,3]*a[4,2]*a[5,5]+a[1,1]*a[2,3]*a[3,4]*a[4,2]*a[5,5]
+a[1,4]*a[2,3]*a[3,2]*a[4,1]*a[5,5]-a[1,3]*a[2,4]*a[3,2]*a[4,1]*a[5,5]
+a[1,3]*a[2,2]*a[3,4]*a[4,1]*a[5,5]-a[1,4]*a[2,2]*a[3,3]*a[4,1]*a[5,5]
+a[1,2]*a[2,4]*a[3,3]*a[4,1]*a[5,5]-a[1,2]*a[2,3]*a[3,4]*a[4,1]*a[5,5]
+a[1,5]*a[2,1]*a[3,2]*a[4,3]*a[5,4]-a[1,1]*a[2,5]*a[3,2]*a[4,3]*a[5,4]
+a[1,1]*a[2,2]*a[3,5]*a[4,3]*a[5,4]-a[1,1]*a[2,2]*a[3,3]*a[4,5]*a[5,4]
-a[1,5]*a[2,2]*a[3,1]*a[4,3]*a[5,4]+a[1,2]*a[2,5]*a[3,1]*a[4,3]*a[5,4]
-a[1,2]*a[2,1]*a[3,5]*a[4,3]*a[5,4]+a[1,2]*a[2,1]*a[3,3]*a[4,5]*a[5,4]
+a[1,5]*a[2,3]*a[3,1]*a[4,2]*a[5,4]-a[1,3]*a[2,5]*a[3,1]*a[4,2]*a[5,4]
+a[1,3]*a[2,1]*a[3,5]*a[4,2]*a[5,4]-a[1,3]*a[2,1]*a[3,2]*a[4,5]*a[5,4]
-a[1,5]*a[2,1]*a[3,3]*a[4,2]*a[5,4]+a[1,1]*a[2,5]*a[3,3]*a[4,2]*a[5,4]
-a[1,1]*a[2,3]*a[3,5]*a[4,2]*a[5,4]+a[1,1]*a[2,3]*a[3,2]*a[4,5]*a[5,4]
-a[1,5]*a[2,3]*a[3,2]*a[4,1]*a[5,4]+a[1,3]*a[2,5]*a[3,2]*a[4,1]*a[5,4]
-a[1,3]*a[2,2]*a[3,5]*a[4,1]*a[5,4]+a[1,3]*a[2,2]*a[3,1]*a[4,5]*a[5,4]
+a[1,5]*a[2,2]*a[3,3]*a[4,1]*a[5,4]-a[1,2]*a[2,5]*a[3,3]*a[4,1]*a[5,4]
+a[1,2]*a[2,3]*a[3,5]*a[4,1]*a[5,4]-a[1,2]*a[2,3]*a[3,1]*a[4,5]*a[5,4]
-a[1,5]*a[2,4]*a[3,1]*a[4,2]*a[5,3]+a[1,4]*a[2,5]*a[3,1]*a[4,2]*a[5,3]
-a[1,4]*a[2,1]*a[3,5]*a[4,2]*a[5,3]+a[1,4]*a[2,1]*a[3,2]*a[4,5]*a[5,3]
+a[1,5]*a[2,1]*a[3,4]*a[4,2]*a[5,3]-a[1,1]*a[2,5]*a[3,4]*a[4,2]*a[5,3]
+a[1,1]*a[2,4]*a[3,5]*a[4,2]*a[5,3]-a[1,1]*a[2,4]*a[3,2]*a[4,5]*a[5,3]
-a[1,5]*a[2,1]*a[3,2]*a[4,4]*a[5,3]+a[1,1]*a[2,5]*a[3,2]*a[4,4]*a[5,3]
-a[1,1]*a[2,2]*a[3,5]*a[4,4]*a[5,3]+a[1,1]*a[2,2]*a[3,4]*a[4,5]*a[5,3]
+a[1,5]*a[2,4]*a[3,2]*a[4,1]*a[5,3]-a[1,4]*a[2,5]*a[3,2]*a[4,1]*a[5,3]
+a[1,4]*a[2,2]*a[3,5]*a[4,1]*a[5,3]-a[1,4]*a[2,2]*a[3,1]*a[4,5]*a[5,3]
-a[1,5]*a[2,2]*a[3,4]*a[4,1]*a[5,3]+a[1,2]*a[2,5]*a[3,4]*a[4,1]*a[5,3]
-a[1,2]*a[2,4]*a[3,5]*a[4,1]*a[5,3]+a[1,2]*a[2,4]*a[3,1]*a[4,5]*a[5,3]
+a[1,5]*a[2,2]*a[3,1]*a[4,4]*a[5,3]-a[1,2]*a[2,5]*a[3,1]*a[4,4]*a[5,3]
+a[1,2]*a[2,1]*a[3,5]*a[4,4]*a[5,3]-a[1,2]*a[2,1]*a[3,4]*a[4,5]*a[5,3]
-a[1,5]*a[2,4]*a[3,3]*a[4,1]*a[5,2]+a[1,4]*a[2,5]*a[3,3]*a[4,1]*a[5,2]
-a[1,4]*a[2,3]*a[3,5]*a[4,1]*a[5,2]+a[1,4]*a[2,3]*a[3,1]*a[4,5]*a[5,2]
+a[1,5]*a[2,3]*a[3,4]*a[4,1]*a[5,2]-a[1,3]*a[2,5]*a[3,4]*a[4,1]*a[5,2]
+a[1,3]*a[2,4]*a[3,5]*a[4,1]*a[5,2]-a[1,3]*a[2,4]*a[3,1]*a[4,5]*a[5,2]
-a[1,5]*a[2,3]*a[3,1]*a[4,4]*a[5,2]+a[1,3]*a[2,5]*a[3,1]*a[4,4]*a[5,2]
-a[1,3]*a[2,1]*a[3,5]*a[4,4]*a[5,2]+a[1,3]*a[2,1]*a[3,4]*a[4,5]*a[5,2]
+a[1,5]*a[2,4]*a[3,1]*a[4,3]*a[5,2]-a[1,4]*a[2,5]*a[3,1]*a[4,3]*a[5,2]
+a[1,4]*a[2,1]*a[3,5]*a[4,3]*a[5,2]-a[1,4]*a[2,1]*a[3,3]*a[4,5]*a[5,2]
-a[1,5]*a[2,1]*a[3,4]*a[4,3]*a[5,2]+a[1,1]*a[2,5]*a[3,4]*a[4,3]*a[5,2]
-a[1,1]*a[2,4]*a[3,5]*a[4,3]*a[5,2]+a[1,1]*a[2,4]*a[3,3]*a[4,5]*a[5,2]
+a[1,5]*a[2,1]*a[3,3]*a[4,4]*a[5,2]-a[1,1]*a[2,5]*a[3,3]*a[4,4]*a[5,2]
+a[1,1]*a[2,3]*a[3,5]*a[4,4]*a[5,2]-a[1,1]*a[2,3]*a[3,4]*a[4,5]*a[5,2]
+a[1,5]*a[2,4]*a[3,3]*a[4,2]*a[5,1]-a[1,4]*a[2,5]*a[3,3]*a[4,2]*a[5,1]
+a[1,4]*a[2,3]*a[3,5]*a[4,2]*a[5,1]-a[1,4]*a[2,3]*a[3,2]*a[4,5]*a[5,1]
-a[1,5]*a[2,3]*a[3,4]*a[4,2]*a[5,1]+a[1,3]*a[2,5]*a[3,4]*a[4,2]*a[5,1]
-a[1,3]*a[2,4]*a[3,5]*a[4,2]*a[5,1]+a[1,3]*a[2,4]*a[3,2]*a[4,5]*a[5,1]
+a[1,5]*a[2,3]*a[3,2]*a[4,4]*a[5,1]-a[1,3]*a[2,5]*a[3,2]*a[4,4]*a[5,1]
+a[1,3]*a[2,2]*a[3,5]*a[4,4]*a[5,1]-a[1,3]*a[2,2]*a[3,4]*a[4,5]....

Жалко, что вся функця не поместилась.
Найдено здесь. http://bbi-math.narod.ru/rosenbrock/rosenbrock.html
Там автор показывает мастерство владения циклами и рекурсиями. А так же демонстрирует каменную выдержку и самообладание, при наборе такого кода.

antoha_by, 02 Декабря 2011

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

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