1. PHP / Говнокод #945

    +189.8

    1. 1
    $near_red = $near_red-$near_red-$near_red;

    Своеобразный способ получения отрицания числа...

    guest, 24 Апреля 2009

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

  2. C++ / Говнокод #943

    +137.6

    1. 1
    struct X{template<class T>X(T);X g(){X(this->*&X::g);}};

    Короткая программа валит MSVC8 при компиляции

    guest, 24 Апреля 2009

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

  3. Си / Говнокод #942

    +133.5

    1. 1
    #define TRUE __LINE__

    Тонкая версия #define TRUE чего-то-там.
    __LINE__ во многом будет вести себя как нормальный TRUE, выстрелит при применении оператора ==

    guest, 24 Апреля 2009

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

  4. PHP / Говнокод #941

    +158.4

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    function is_even($integer)
{
    if (($integer/2) == ((int) ($integer/2)))
        return TRUE;
    else
        return FALSE;
}

    Очевидно, определение четности числа. Взято у одного очень, казалось бы, толкового человека.

    guest, 24 Апреля 2009

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

  5. Java / Говнокод #940

    +150

    1. 1
    2. 2
    3. 3
    if (id != object.id) return false;

return true;

    IntelliJ IDEA 8 :) equals по интовому полю.
    Хорошо хоть сама тут же предлагает упростить.. :)

    guest, 24 Апреля 2009

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

  6. Perl / Говнокод #939

    −149

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    if (bstatus==0)
		{
			bstatus=0; 
		}
		else
		{	
			bstatus=0;
		}

    Вот так вот...

    guest, 24 Апреля 2009

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

  7. JavaScript / Говнокод #938

    +152

    1. 1
    var p = $p(p);

    Краткость — сестра мудака^Wталанта

    guest, 24 Апреля 2009

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

  8. Java / Говнокод #937

    +138.7

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    class struct_tree_item
    
    {
        
        struct_tree_item ParentItem;
        int ItemIndex;
        
        
    } struct_tree_item item;

void bind_item ( struct_tree_item itemA, struct_tree_itemB)
{
   ItemB.ParentItem = ItemA;
}

    Интересный подход к декларации классов:) Что-то напоминает.

    guest, 24 Апреля 2009

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

  9. JavaScript / Говнокод #936

    +125.8

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    function CheckBankAccount(BIK, _Account) {
    var Mask = "71371371371371371371371";
    var Control = 0;
    var M;
    var strM;

    if (!BIK) {
        return true;
    }

    var Account = BIK.substring(6, 9) + _Account;

    for (var i = 0; i <= 22; i++) {
        M = RealParseInt(Account.substring(i, i+1))*RealParseInt(Mask.substring(i, i+1));
        strM = M.toString();
        Control += RealParseInt(strM.substring(strM.length-1, strM.length));
    }

    var R = ((Control/10) - Math.floor(Control/10));

    if (R == 0) {
        return true;
    }
    else {
        return false;
        }
}

    Существует множество способов взять остаток от деления на 10. Два из них в этом примере...

    guest, 24 Апреля 2009

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

  10. Pascal / Говнокод #935

    +151

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    procedure Load_flashDEF_setings;
var
  Reg: TRegistry;
  RegKeyPath: string;
begin
 Reg := TRegistry.Create;
 try
  with Reg do begin
   RootKey := HKEY_CURRENT_USER;
   RegKeyPath := 'Software\fuckinSoft';
   OpenKey(RegKeyPath, True);
   if ReadBool('Wipe_File')=false then begin Main.frmMain.CBx_wipe_file.Checked:=false;
   end
   else
   if ReadBool('Wipe_File')=true then begin Main.frmMain.CBx_wipe_file.Checked:=true;
   end
   else
   if ReadBool('Def_Module')=false then begin Main.frmMain.CBx_defence_module.Checked:=false;
   end
   else
   if ReadBool('Def_Module')=true then begin Main.frmMain.CBx_defence_module.Checked:=true;
   end
  end
 finally
  Reg.CloseKey;
  Reg.Free;
 end;
end;
 
procedure Save_flashDEF_setings;
var
  Reg: TRegistry;
  RegKeyPath: string;
begin
 Reg := TRegistry.Create;
 try
  with Reg do begin
   RootKey := HKEY_CURRENT_USER;
   RegKeyPath := 'Software\fuckinSoft';
   OpenKey(RegKeyPath, True);
   if Main.frmMain.CBx_wipe_file.Checked=true then begin WriteBool('Wipe_File', true);
   end
   else
   if Main.frmMain.CBx_wipe_file.Checked=false then begin WriteBool('Wipe_File', false);
   end
   else
   if Main.frmMain.CBx_defence_module.Checked=true then begin WriteBool('Def_Module', true);
   end
   else
   if Main.frmMain.CBx_defence_module.Checked=false then begin WriteBool('Def_Module', false);
   end
  end
 finally
  Reg.CloseKey;
  Reg.Free;
 end;
end;

    Ифы хороши в меру =\

    guest, 23 Апреля 2009

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