1. Pascal / Говнокод #4943

    +92

    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
    unit uncrt;
    
    interface
    
    procedure ClrScr;
    procedure Sound(Hz: Word);
    procedure NoSound;
    
    procedure TextColor(Color: Byte);
    procedure TextBackground(Color: Byte);
    
    var
      TextAttr: Byte; { Для особо продвинутых случаев }
    
    implementation
    
    procedure ClrScr;
    begin end;
    
    procedure Sound(Hz: Word);
    begin end;
    procedure NoSound;
    begin end;
    
    procedure TextColor(Color: Byte);
    begin end;
    procedure TextBackground(Color: Byte);
    begin end;
    
    end.

    Вас достала школота, раскрашивающая свои бибикающие программы?
    Вам поможет этот модуль!

    TarasB, 16 Декабря 2010

    Комментарии (41)
  2. C# / Говнокод #4942

    +114

    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
    protected void Page_Load(object sender, EventArgs e)
        {
            String a = Convert.ToString(max);
            RangeValidator1.MinimumValue = "0";
            RangeValidator1.MaximumValue = "3333";
              
            int ind=Convert.ToInt16(DropDownList1.SelectedIndex);
            
            if ((curind < 0)||(ind<0))
            {
                WareHouse WH = new WareHouse();
                string[] list = WH.RefreshList(curProd);
                int i = 0;
                int len = list.Length;
                DropDownList1.Items.Clear();
                while (i < len)
                {
                    if (curProd != list)
                    {
                        DropDownList1.Items.Add(list);
                    }
                    i++;
                }
            
            }
        }

    Чувак прислал резюме и пример проекта ASP.NET. А в нем это. Особо забавляет строка 7 и цикл while

    Terran, 16 Декабря 2010

    Комментарии (10)
  3. PHP / Говнокод #4941

    +157

    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
    $query = "SELECT * FROM records WHERE  id_film='$id_film'";        
    $results = mysql_query($query);
    $var1 = "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n";
    $var1 = $var1. "<playlist>\n";     
    while($line = mysql_fetch_assoc($results))
      {
    $tmp_us = $tmp_us.$line['id_user'];
      $var1 = $var1."<vid src=\"http://homelinux.com:8080/sample1/content/audiorecord/"
      . $line['id_user']
      ."/"
      . $line["file_name"]
      ."_d.flv"
      . "\" label=\""
      . $line["file_name"]
      ."\""
      ." id_film=\""
      . $line["id_film"]
      ."\""
      ." time_begin=\""
      . $line["time_begin"]
      ."\""
      ." time_end=\""
      . $line["time_end"]
      ."\""
      ." id_user=\""
      . $line["id_user"]
      ."\""  
      ." sh_val=\""
      . $line["sh_val"]
      ."\""
      ." id_record=\""
      . $line["id_record"]
      ."\""
      ."/>\n";
    }
    $var1 = $var1."</playlist>\n"; 
    echo "var1=$var1";

    Вот так некоторые Flash-еры формируют xml пакеты

    Agel_Nash, 16 Декабря 2010

    Комментарии (20)
  4. PHP / Говнокод #4940

    +160

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    function Add($WEB_FORM_ID, $arrVALUES=false, $CHECK_RIGHTS="Y", $USER_ID=false)
    {
    		global ... $_REQUEST, ...;
    ...
    }

    Битрикс

    elw00d, 16 Декабря 2010

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

    +107

    1. 1
    2. 2
    OpenDialog1.Execute;
    Memo1.Lines.LoadFromFile(OpenDialog1.FileName);

    Угадайте, что будет, если в опендиалоге нажать "Отмена".

    PEMOHT, 16 Декабря 2010

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

    +162

    1. 1
    $str = strip_tags(htmlentities($str));

    простовато, но...
    Тэги не пройдут!!!

    fork, 15 Декабря 2010

    Комментарии (21)
  7. C++ / Говнокод #4937

    +162

    1. 1
    2. 2
    while(!ThreadActivateFlag)
      Sleep(0);

    Говногость, 15 Декабря 2010

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

    +147

    1. 1
    int*& HochuVOtpusk = *new int*;//:(

    Говногость, 15 Декабря 2010

    Комментарии (21)
  9. Си / Говнокод #4935

    +144

    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
    for (i=0; i<n1; i++)
            for (j=0; j<n; j++)
                for (l=0; l<m; l++)
                {
                    printf ("Введите в матрицу № %d строку №[%d][%d] \n", i+1,j+1,l+1);
                    while((h<k) && (*(*(*(*(mt+i)+j)+l)+h-1)!='\n'))                        //цикл для последовательного ввода всех элементов символьной строки;
                    {
                        fflush(stdin);
                        *(*(*(*(mt+i)+j)+l)+(h++)) = getchar();                                //ввод элемента символьной строки;
                    }
                        if (*(*(*(*(mt+i)+j)+l)+h-1)='\n')                                    //удаление из конца введённой строки символа переноса \n;
                        { *(*(*(*(mt+i)+j)+l)+h-1)='\0';}
                        else
                        { *(*(*(*(mt+i)+j)+l)+h)='\0';}
                        h = 0;
                }

    heil pure c

    stasoft, 15 Декабря 2010

    Комментарии (23)
  10. PHP / Говнокод #4934

    +158

    1. 1
    2. 2
    3. 3
    $where = "(`user_id` = ".$id." and `user_fr` = ".$user->Get('u_id').") or (`user_id` = ".$user->Get('u_id')." and `user_fr` = ".$id.")";
        
    $inc = array_merge($db->Select('friends', $where), $db->Select('friends_incoming', $where));

    Проверка на существования дружбы или предложений дружбы между двумя пользователями (каунтом $inc).

    Мартин, 15 Декабря 2010

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