По колено в коде — Говнокод.ру

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

+141.5

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

procedure TForm2.s1;
var a,a1:real;
begin
a:=a+1.8;
randomize;
if p<1 then
begin
if a<1.9 then
begin
a:=999;
a1:=random(4);
if a1=2 then
begin
GroupBox5.Visible:=True;
GroupBox6.Visible:=False;
GroupBox1.Visible:=False;
end
else
if a1=3 then
begin
GroupBox5.Visible:=False;
GroupBox6.Visible:=True;
GroupBox1.Visible:=False;
end
else
begin
GroupBox5.Visible:=False;
GroupBox6.Visible:=False;
GroupBox1.Visible:=True;
end
end
end
end;

0_o

guest, 31 Января 2009

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

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

+151.1

1
2
3
4
5

$this->oPostTest->recipients = trim($this->oPostTest->recipients);
$this->oPostTest->recipients = trim($this->oPostTest->recipients, ';');

$this->oPostTest->recipients = str_replace(' ', ';', $this->oPostTest->recipients);
$this->oPostTest->recipients = str_replace(';;', ';', $this->oPostTest->recipients);

такая вот загагулина )

guest, 30 Января 2009

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

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

+154.3

01
02
03
04
05
06
07
08
09
10

double a, b;

...

 *((DWORD*)&a) ^= *((DWORD*)&b);
 *((DWORD*)&b) ^= *((DWORD*)&a);
 *((DWORD*)&a) ^= *((DWORD*)&b);
 *((DWORD*)&a + 1) ^= *((DWORD*)&b + 1);
 *((DWORD*)&b + 1) ^= *((DWORD*)&a + 1);
 *((DWORD*)&a + 1) ^= *((DWORD*)&b + 1);

Cпособ обменять значения двух переменных типа double;

guest, 30 Января 2009

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

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

+152.9

1
2
3
4
5
6

if (isset($this->handle) || !isset($this->handle) {
     echo "Не правильный тип ресурса... или не тип ресурса не известен..."
}
...
...
...

Проверим дескриптор :D

guest, 30 Января 2009

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

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

+143

1
2
3
4
5

if ($src_encoding == '')
{
    // lame, but we know no better...
    $src_encoding = $GLOBALS['xmlrpc_internalencoding'];
}

guest, 30 Января 2009

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

Си / Говнокод #478

+108.6

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

void init()
{
  int i;

  for(i=0;i<4;i++)
    ALG_RxConst[i] = -1;

  for(i=0;i<4;i++)
    ALG_TxConst[i] = -1;

  for(i=0;i<4;i++)
    ALG_EqInfo[i][0] = 0;

  for(i=0;i<4;i++)
    ALG_EqInfo[i][1] = -1;

  for(i=0;i<4;i++)
    ALG_EqInfo[i][2] = -1;
}

Индусу очень-очень нравится for ;)

guest, 29 Января 2009

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

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

+160.1

1
2
3
4
5
6
7

class Company extends BaseCompany {
//...
    public function setName($v){
        $this->setName(String::mb_ucfirst($v));
    }
//...
}

Мегаметодика переопределения сеттеров. Symfony, Propel.

guest, 29 Января 2009

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

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

+150

01
02
03
04
05
06
07
08
09
10

{? if (!isset($edit_style)) ?}
<form action="disp.php?action=style_add" method="post">
{? else ?}
<form action="disp.php?action=style_edit" method="post">
<input type="hidden" name="id" value="{? $edit_style.id ?}">
{? /if ?}
...
...
<td><input type="submit" value="{? if (isset($edit_style)) ?}Save{? else ?}Add{? /if ?}"></td>
  Ю

guest, 29 Января 2009

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

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

+138.9

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

1000:
    nume:=0;
    for i:=1 to mmes do work^[i]{^}:=work^[i]{^}+hde;
    iter:=iter+1;
    for j:=1 to 2 do
begin
    if j=1 then w:=work^[1]{^};
    if j=2 then w:=work^[mmes]{^}  ;
    ab:=2*sqrt(3.*abs(1.-w));
    w1:=ab;
    for i:=1 to 10 do
begin
    w2:=ab * sqrt(1.+w1);
    if abs(w2-w1)<1.e-6 then goto 18;
    w1:=w2
end;
18:
  wkb:=(1.+w2)/w;
  if j=1 then rpsi[1]^:=work^[2]{^}*wkb;
  if j=2 then rpsi[mmes]^:=work^[m1]{^}*wkb
end;
  b:=rpsi[mmes]^;
  for i:=1 to m1 do
begin
    npsi:=mmes-i;
    a:=(12./work^[npsi]{^}-10.0)-1./b;
    rpsi[npsi]^:=a;
    b:=a;
    if a<=1. then goto 30
end;
30:
  mcross:=npsi;
  rmcros:=a;
  b:=rpsi[1]^;
  for i:=2 to mcross do
begin
    a:=(12./work^[i]{^}-10.0)-1./b;
    rpsi[i]^:=a;
    b:=a;
    if a<0. then nume:=nume+1
end;
   if (iter=1) and (nume<num) then writeln('error in initial Eh');
   if nume=num then goto 50;
   if (not bisec) then writeln('give left energy El');
   if (succes) then goto 60;
   if nume>num then eh:=enew;
   if nume<num then el:=enew;
   goto 80;
50:
  m3:=mcross+1;
  m4:=mcross-1;
  a:=1.-0.5/work^[m3]{^};
  a1:=a*(1./rpsi[m3]^-rpsi[mcross]^);
  b:=1.-0.5/work^[m4]{^};
  b1:=b*(rmcros-1./rpsi[m4]^);
  de:=(a1-b1)*work^[mcross]{^};
  if de>0. then eh:=enew;
  if de<0. then el:=enew;
  it:=it+1;
  goto 70;
60:
   it:=0;
70:
   if it>=maxit then goto 100;
80:
   eold:=enew;
   delta:=(el-eh)*0.5;
   enew:=eh+delta;
   hde:=hsq12*(enew-eold);
   succes:=false;
  {writeln  ('delta=',delta); }
   if abs(delta)>1.e-10 then goto 1000;
  {writeln('enew=',enew);  }
   if nume=num then goto 90;
   writeln ('degeneration : num-state=nume-state ');
   halt;
90:
{  lip:=true; }
100:
  succes:=true;

1 из 3-х модулей, которые мне нужно оснастить ГУИ, оптимизировать и привнести абстракцию...

guest, 29 Января 2009

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

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

+148

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

<script type="text/javascript">
$(document).ready(function(){

$(".in").hover(
  function () {
  $(this).css("background-color","#EEE7C5");
  },
  function () {
  $(this).css("background-color","#97CAFF");
  }
)
});
</script>





<div onclick="location.href='feed2.png';" style="cursor: pointer;" class="in">
Блог
</div>

guest, 28 Января 2009

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

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

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

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

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

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

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

Си / Говнокод #478

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

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

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

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