1. Список говнокодов пользователя qbasic

    Всего: 120

  2. PHP / Говнокод #5904

    +159

    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
    <?
$xml = xml_parser_create();
xml_parser_set_option($xml, XML_OPTION_SKIP_WHITE,1);
xml_parse_into_struct($xml, file_get_contents($url), $el, $fe);
xml_parser_free($xml);

for($i=0; $i<5; $i++){
   $m = $fe['ITEM'][$i];
   $title = $el[$m+1]['value'];
   $link = $el[$m+2]['value'];
   $time = $el[$m+4]['value'];
   $desc = mb_substr( $el[$m+3]['value'], 0, 80, 'UTF-8');
   echo '<br/><strong>'.$title.'</strong> <br/>['.
    $time.']<br/>'.$desc.'<br/><a href="'.$link.'">читать...</a>';
}

    qbasic, 06 Марта 2011

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

  3. C++ / Говнокод #5892

    +162

    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
    int main () {
        char    bStr[] = "<H1>",
                        eStr[] = "</H1>",
                        ifName[] = "E:\\dostat.txt";
        ifstream ifst;
        int i;
 
        ifst.open(ifName);
        if(!ifst)
                exit(-1);
 
        for(;!ifst.eof();){
                for(i=0;!ifst.eof()&&ifst.get()==bStr[i];i++);
                ifst.unget();
                if(!bStr[i]){
                        for(;;){
                                for(i=0;!ifst.eof()&&ifst.get()==eStr[i];i++);
                                if(!eStr[i])
                                        break;
                                for(;i>=0;i--)
                                        ifst.unget();
                                cout<<(char)ifst.get();
                        }
                        cout<<endl<<"--------------------------------"<<endl;
                }
                else
                        ifst.get();
        }
        cin.get();
        return 0;
}

    qbasic, 05 Марта 2011

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

  4. C++ / Говнокод #5891

    +166

    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
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    bool ok = false;
 
        // инициализируем WinInet
        HINTERNET hInternet =
                ::InternetOpen(
                        TEXT("WinInet Test"),
                        INTERNET_OPEN_TYPE_PRECONFIG,
                        NULL,NULL,
                        0);
 
        if (hInternet != NULL) {
                // открываем HTTP сессию
                HINTERNET hConnect =
                        ::InternetConnect(
                                hInternet,
                                TEXT(URL),
                                INTERNET_DEFAULT_HTTP_PORT,
                                NULL,NULL,
                                INTERNET_SERVICE_HTTP,
                                0,
                                1u);
 
                if (hConnect != NULL) {
                        // открываем запрос
                        HINTERNET hRequest =
                                ::HttpOpenRequest(
                                        hConnect,
                                        TEXT("GET"),
                                        TEXT(DOC),
                                        NULL,
                                        NULL,
                                        0,
                                        INTERNET_FLAG_KEEP_CONNECTION,
                                        1);
 
                        if (hRequest != NULL) {
                                // посылаем запрос
                                BOOL bSend = ::HttpSendRequest(hRequest, NULL,0, NULL,0);
                                if (bSend) {
                                        // создаём выходной файл
                                        ofstream fnews("news.html",ios::out|ios::binary);
                                        
                    if (fnews.is_open())
                                        for (;;) {
                                                // читаем данные
                                                char  szData[1024];
                                                DWORD dwBytesRead;
                                                BOOL bRead =
                                                        ::InternetReadFile(
                                                                hRequest,
                                                                szData,sizeof(szData)-1,
                                                                &dwBytesRead);

                                                if (bRead == FALSE  ||  dwBytesRead == 0)
                                                        break;
 
                                                // сохраняем результат
                                                szData[dwBytesRead] = 0;
                                                fnews << szData;
                                                cout << szData;
 
                                                ok = true;
                                        }
                                }
                                // закрываем запрос
                                ::InternetCloseHandle(hRequest);
                        }
                        // закрываем сессию
                        ::InternetCloseHandle(hConnect);
                }
                // закрываем WinInet
                ::InternetCloseHandle(hInternet);
        }

    qbasic, 05 Марта 2011

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

  5. PHP / Говнокод #5889

    +160

    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
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    <html> 
<head>
<title>Калькулятор</title> 
</head>
<body>
<?
function show()
{
global $action, $result, $first, $second;
?>
<FORM method="GET" action="">
<input type="text" name="first">
<input type="text" name="second">
<table>
<tr>
<td><input type="submit" name="action" value="sum"></td>
<td><input type="submit" name="action" value="min"></td>
<td><input type="submit" name="action" value="mult"></td>
</tr>
<tr>
<td><input type="submit" name="action" value="dev" ;></td>
<td><input type="submit" name="action" value="stepen";></td>
<td><input type="submit" name="action" value="procent";></td>
<td><input type="submit" name="action" value="koren";></td>
</tr>
</table>
</form>
<?
}
function calc() 
{ 
global $action, $result, $first, $second; 
switch($action)
{
case "sum": $result = $first+$second; 
break;
case "min": $result = $first-$second; 
break;
case "mult": $result = $first*$second; 
break;
case "dev":
if (!$second) 
{
exit("Извините, программа не может выполнить действие: на ноль делить нельзя");
}
$result=$first/$second; 
break;
case "procent": $result = $first*($second/100); 
break;
case "stepen": $result = pow($first, $second); 
break;
case "koren": $result = pow($first,0.5); 
break;
}
?>
<b> <? echo $result; ?> </b> 
<?
}
if ($action) 
calc(); 
else show();
?>
</body> 
</html>

    qbasic, 04 Марта 2011

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

  6. C++ / Говнокод #5876

    +160

    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
    MainDM->ADOQ_pr_kontr_vert->SQL->Add(
        "SELECT Smena, Prostenok, Popravka, Val_zad_temp, t.Zam1, t.Zam2, t.Zam3, t.Zam4, "
        "@sr1:=((t.Zam1 + t.Zam2 + t.Zam3 + t.Zam4) / 4) as sredn, "
        "@p:= @sr1 - (avgtempr.avgZam1 + avgtempr.avgZam2 + avgtempr.avgZam3 + avgtempr.avgZam4) / 4 as popravka  from "
        "(SELECT avg(Zam1) as avgZam1, avg(Zam2) as avgZam2, avg(Zam3) as avgZam3, avg(Zam4) as avgZam4 from "
        "(SELECT "
        "SUM(CASE "
        "WHEN kontroln_vertik.Zamer = 1 THEN kontroln_vertik.Value ELSE 0 "
        "END) as Zam1, "
        "SUM(CASE "
        "WHEN kontroln_vertik.Zamer = 2 THEN kontroln_vertik.Value ELSE 0 "
        "END) as Zam2, "
        "SUM(CASE "
        "WHEN kontroln_vertik.Zamer = 3 THEN kontroln_vertik.Value ELSE 0 "
        "END) as Zam3, "
        "SUM(CASE "
        "WHEN kontroln_vertik.Zamer = 4 THEN kontroln_vertik.Value ELSE 0 "
        "END) as Zam4 "
        "FROM kontroln_vertik WHERE kontroln_vertik.Date = \'2011-03-02\' "
        "and kontroln_vertik.Storona = 1  "
        "group by kontroln_vertik.Prostenok)  zameri) avgtempr, "
        "(SELECT kontroln_vertik.Smena,  kontroln_vertik.Prostenok, kontroln_vertik.Popravka, "
        "kontroln_vertik.Val_zad_temp, kontroln_vertik.Period_koks, "
        "SUM(CASE  "
        "WHEN kontroln_vertik.Zamer = 1 THEN kontroln_vertik.Value ELSE 0 "
        "END) as Zam1, "
        "SUM(CASE  "
        "WHEN kontroln_vertik.Zamer = 2 THEN kontroln_vertik.Value ELSE 0  "
        "END) as Zam2, "
        "SUM(CASE  "
        "WHEN kontroln_vertik.Zamer = 3 THEN kontroln_vertik.Value ELSE 0  "
        "END) as Zam3, "
        "SUM(CASE  "
        "WHEN kontroln_vertik.Zamer = 4 THEN kontroln_vertik.Value ELSE 0   "
        "END) as Zam4  "
        "FROM kontroln_vertik "
        "WHERE kontroln_vertik.Date = \'2011-03-02\' and   "
        "kontroln_vertik.Storona = 1  "
        "group by kontroln_vertik.Prostenok) t"
        );

    qbasic, 03 Марта 2011

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

  7. PHP / Говнокод #5872

    +158

    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
    <script language="php">
$curl=curl_init("http://www.sportbox.ru");
$proxy='us:psw@IP:port';
 
curl_setopt($curl, CURLOPT_FOLLOWLOCATION, 1);
curl_setopt($curl, CURLOPT_PROXY, $proxy);
 
$content=curl_exec($curl);
 
preg_match_all('#<h3><a href(.*)>(.*)</a></h3>#siU', $content, $titles);
foreach ($titles[2] as $title)
echo "<b>$title</b><br>";
 
curl_close($content);
</script>

    qbasic, 03 Марта 2011

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

  8. C# / Говнокод #5871

    +119

    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
    Microsoft.Win32.RegistryKey Fregistry =
                Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE")
                .OpenSubKey("Microsoft").OpenSubKey("Windows").OpenSubKey("CurrentVersion")
                .OpenSubKey("Installer").OpenSubKey("UserData")
                .OpenSubKey("S-1-5-18").OpenSubKey("Products");
            string []Names = Fregistry.GetSubKeyNames() ;
            string uninstall = "";
            string ApplicationName = "Adobe Reader 7.0.8";
            for (int i = 0; i < Names.Length; i++)
            {
                Microsoft.Win32.RegistryKey FTemp = Fregistry.OpenSubKey(Names[i]).OpenSubKey("InstallProperties");
                if (FTemp.GetValue("DisplayName").ToString() == ApplicationName)
                {
                    object obj = FTemp.GetValue("UninstallString");
                    if (obj == null)
                        uninstall = "";
                    else
                        uninstall = obj.ToString();
                    i = Names.Length; 
                }
            }
 
            System.Console.WriteLine(uninstall);
            System.Diagnostics.Process FProcess = new System.Diagnostics.Process();
            string temp = "/x{" + uninstall.Split("/".ToCharArray())[1].Split("I{".ToCharArray())[2];
            FProcess.StartInfo.FileName = uninstall.Split("/".ToCharArray())[0];
            FProcess.StartInfo.Arguments = temp;
            FProcess.StartInfo.UseShellExecute = false;
            FProcess.Start();
            System.Console.Read();

    qbasic, 03 Марта 2011

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

  9. PHP / Говнокод #5825

    +164

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    <?php
 $Options = file("OPTIONS.txt");
 foreach ($Options as $opt)
        {
        $opt = trim($opt);
        eval("$".$opt.";");
        }

    qbasic, 28 Февраля 2011

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

  10. PHP / Говнокод #5801

    +164

    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
    <?php
// Создаём функцию struktura_array (массив со значениями)
function struktura_array($mas) {
//Подсчитываем количество значений в массиве $mas
$col_el = count($mas);
//Подсчитываем количество всевозможных вариантов по формуле 2^n – 1, n = $col_el
$col_zn = pow(2,$col_el)-1;

//Делаем цикл до $i = $col_zn
for ($i=1; $i <= $col_zn; $i++) {
//выполняем преобразование числа $i в двоичную систему
 $dlina_i_bin = decbin($i);
//Дописываем нули в левую часть на длину $col_el
 $zap_str = str_pad($dlina_i_bin, $col_el, "0", STR_PAD_LEFT);
//Переворачиваем $zap_str
 $zap_dop = strrev($zap_str);
 $dooh = array();
//Преобразуем $zap_dop в массив вида Array (0=>"0", 1=>"1", 2=>"1", 3=>"0", 4=>"0")
 for($j=0; $j < $col_el; $j++) {
 $dooh[] = $zap_dop[$j];
 }
//Обнуляем $d и $a чтоб при следующем проходе цикла они были пустыми
 $d = 0; $a = "";
//Теперь самое интересное
//Итерируем по массиву $dooh и выдергиваем значения (либо 1 либо 0)
 foreach ($dooh as $k=>$v) {
//Если выдернули 1 то в массив $a записываем значение с соответствующим ключом
   if ($v == 1) {$a[] .= $mas[$d];}
//Увеличиваем ключ на единицу для перехода по массиву
   $d++;
 }
 $return[] = $a;
}

return $return;
}

    qbasic, 25 Февраля 2011

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

  11. JavaScript / Говнокод #5786

    +165

    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
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    function get_sel_values(index){
                var test = eval('typeof opt_val'+index);
                if ( test != 'undefined' ){
                  eval('var sel_values = opt_val'+index);
                  return sel_values;
                }
    else { return false; }
}
//**************************************************************
function get_sel_text(index){
                var test = eval('typeof opt_text'+index); 
                if ( test != 'undefined' ){
                  eval('var sel_text = opt_text'+index);
                  return sel_text;
                }
    else { return false; }              
}
//**************************************************************
function show_select(index, lev, dv){
    if ( dv == 'jdc1'){ var tr = "jdc2";}
    if ( dv == 'jdc2'){ var tr = "jdc3";}
    if ( dv == 'jdc3'){ var tr = "jdc4";}
    var curr_sel_text = get_sel_text(index);
    var curr_sel_value = get_sel_values(index);
                if ( curr_sel_value != false && curr_sel_text != false ){
      if ( dv == 'jdc1'){
        document.getElementById('jdc1').style.visibility = "visible";
        document.getElementById('jdc2').style.visibility = "hidden";
        document.getElementById('jdc3').style.visibility = "hidden";
        document.getElementById('jdc4').style.visibility = "hidden";
                          document.forms["form1"].elements['cc2'].length = 0;
                          document.forms["form1"].elements['cc3'].length = 0;
                          document.forms["form1"].elements['cc4'].length = 0;
                  }
      if ( dv == 'jdc2'){
        document.getElementById('jdc1').style.visibility = "visible";
        document.getElementById('jdc2').style.visibility = "visible";
        document.getElementById('jdc3').style.visibility = "hidden";
        document.getElementById('jdc4').style.visibility = "hidden";
                          document.forms["form1"].elements['cc3'].length = 0;
                          document.forms["form1"].elements['cc4'].length = 0;
                  }
      if ( dv == 'jdc3'){
        document.getElementById('jdc1').style.visibility = "visible";
        document.getElementById('jdc2').style.visibility = "visible";
        document.getElementById('jdc3').style.visibility = "visible";
        document.getElementById('jdc4').style.visibility = "hidden";
                          document.forms["form1"].elements['cc4'].length = 0;
                  }
      var count_values = curr_sel_value.length;
      var category_list = document.forms["form1"].elements[lev];
      var count_category_list = category_list.options.length;
      category_list.length = 0; 
      for (i = 0; i < count_values; i++){
        if (document.createElement){
            var newCategoryListOption = document.createElement("OPTION");
            newCategoryListOption.text = curr_sel_text[i];
            newCategoryListOption.value = curr_sel_value[i];
            (category_list.options.add) ? category_list.options.add(newCategoryListOption) : category_list.add(newCategoryListOption);
        }else{
            category_list.options[i] = new Option(curr_sel_text[i], curr_sel_value[i], false, false);
        }
      }
      document.getElementById(tr).style.visibility = "visible";
          }
                else{
      document.getElementById(tr).style.visibility = "hidden";
                }
  }
//-->

    qbasic, 23 Февраля 2011

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