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

    В номинации:
    За время:
  2. Куча / Говнокод #13543

    +125

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    : %fib
        ( left right count limit -- result )
        2dup u<= if 2drop swap drop exit then
        1+ 2swap tuck + 2swap recurse ;
    
    : fib
        ( n -- n )
        1 2 0 -rot 2swap %fib ;

    Где там ForthGovno?

    wvxvw, 03 Августа 2013

    Комментарии (17)
  3. JavaScript / Говнокод #13528

    +153

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    /* Грязный хак для слайдера */
    switch (id){
        case '1':
            num = 2;
            break;
        case '2':
            num = 1;
            break;
        default:
            num = 0;
            break;
    }

    lynx1983, 01 Августа 2013

    Комментарии (17)
  4. C++ / Говнокод #13488

    +75

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    int i, n;
    for(n = 0; n < 3; n++)
    {
       switch(n){
             case 0:
                    n+=i;
             case 1:
                    n-=i;
             case 2:
                    n*=i;
       }
    }

    Написал это, встал и хорошенько вымыл руки с мылом.

    http://programmersforum.ru/showthread.php?t=241288

    Stertor, 26 Июля 2013

    Комментарии (17)
  5. C# / Говнокод #13421

    +128

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    public void BuildInsertClause(OleDbCommand cmd, ObjectState objState)
            {
                  StringBuilder builder = new StringBuilder();
                  ..........
                  cmd.CommandText = builder.ToString() + "(" + columns.ToString() + ") VALUES (" +
                  values.ToString() + ")";
            }

    http://solidcoding.blogspot.ru/2008/01/linq-to-excel-provider-25.html
    Еще много смешного, для затравки:

    object val = reader[col.GetSelectColumn()];
    if (val is DBNull)
    {
    val = null;
    }

    neeedle, 15 Июля 2013

    Комментарии (17)
  6. PHP / Говнокод #13356

    +167

    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
    /**
     * Return data
     * 
     * @return array 
     */
    public function __toString()
    {
        return $this->toArray();
    }
    
    /**
     * Return Data
     * 
     * @return array
     */
    public function toArray()
    {
        return $this->_data;
    }

    No comments

    quall, 10 Июля 2013

    Комментарии (17)
  7. Pascal / Говнокод #13331

    +133

    1. 1
    ADMIN LOH

    Stertor, 09 Июля 2013

    Комментарии (17)
  8. C++ / Говнокод #13289

    +12

    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
    class Random
    {
    public:
        int getInt(int min, int max)
        {
            return std::uniform_int_distribution<int>(min, max)(_rd);
        }
        
        double getReal(double min, double max)
        {
            return std::uniform_real_distribution<double>(min, max)(_rd);
        }
        
        bool getBool()
        {
            return std::uniform_int_distribution<int>(0, 1)(_rd);
        }
    
    private:
        std::random_device _rd;
    };

    Даже не знаю, говнокод это или нет.

    an0nym, 02 Июля 2013

    Комментарии (17)
  9. C++ / Говнокод #13263

    +3

    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
    #include "stdafx.h"
    int otv;
    int main()
    {
    	int l[10]={1,1,1,1,1,1,1,1,1,1};
    	start://старт
    	std::cout<<"Enter the number of variables < 10\n";
    	int g;
    	std::cin>>g;
            if(g>=10||g<=0) goto start;
    	std::cout<<"please enter "<<g<<" your numbers\n";
    	for(int y=0;y<g;y++){int z;std::cin>>z;l[y]=z;}
    	for(int y=0;y<g;y++){std::cout<<l[y]<<", ";}
    	otv=l[0]*l[1]*l[2]*l[3]*l[4]*l[5]*l[6]*l[7]*l[8]*l[9];
    	std::cout<<"answer is "<< otv <<'\n';
    	return 0;}

    Кальцо еще то.

    govnor, 29 Июня 2013

    Комментарии (17)
  10. Pascal / Говнокод #13217

    +130

    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
    procedure TMyTr.Execute; // метод потока; эта процедура выполняется в отдельном потоке.
    var
    s,resp,ip,port:string;
    cw,i:integer;
    begin
      http:=TIdHTTP.Create(nil);
      cw:=getnumberproxy;
      while cw<form1.Memo1.Lines.Count do 
      begin
        s:=form1.Memo1.Lines[cw];
        i := Pos(':',s);
        IP := Copy(s,1,i-1);
        PORT := Copy(s,i+1,Length(s));
        try
          http.ProxyParams.ProxyServer:=ip;
          http.ProxyParams.ProxyPort:=StrToInt(port);
          http.ReadTimeout:=Form1.SpinEdit2.Value*1000;
          resp:=http.Get('http://ya.ru/');
          if pos('ya.ru',resp)<>0 then
          form1.Memo2.Lines.Add(ip+':'+port);
          except
            end;
          cw:=getnumberproxy;
          checked:=checked+1;
          end;
      http.Free;
    
    end;

    Вот так живут Америка с Европой; что интересно, ни поток ни форма ни разу не заглючили.

    Stertor, 23 Июня 2013

    Комментарии (17)
  11. Pascal / Говнокод #13214

    +132

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    var
        FormMeh: TFormMeh;
        x,y,len:integer;
          x2,y2:integer;
          x3,y3:integer;
          x0,y0, y20:integer;
          xa , ya : integer;
          v1 , v2 : integer;
        x1,y1,ar,dar:integer;
        anim:integer;

    Глобальные переменные отныне РАЗРЕШЕНЫ. Утверждаю, подпись моя.

    Stertor, 23 Июня 2013

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