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

    +92.8

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    procedure MyLine(X1, Y1, X2, Y2: Integer; Color: TColor; Canvas: TCanvas);
    begin
      if (Abs(X1 - X2) <= 1) and (Abs(Y1 - Y2) <= 1) then
        Canvas.Pixels[X1, Y1] := Color
      else
      begin
        MyLine(X1, Y1, (X1 + X2) shr 1, (Y1 + Y2) shr 1, Color, Canvas);
        MyLine((X1 + X2) shr 1, (Y1 + Y2) shr 1, X2, Y2, Color, Canvas);
      end;
    end;

    Когда-то давно очень увлекался рисованием в ДОС-е.
    До сих пор помню процедуру быстрого рисования кривой прямой %)
    представляю на суд тот же алгоритм.

    Arch, 29 Октября 2009

    Комментарии (5)
  2. Perl / Говнокод #2071

    −115.1

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    $oblom = 1;
    if ($pusto == 0) {#Если пусто, то сред никем не занят
    	$oblom = 0;
    } else {
    	$oblom = 0;
    .....

    Смотри на переменную $oblom
    В продолжение 2059

    Oleg_quadro, 29 Октября 2009

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

    +165.1

    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
    <?php
    ...
    define ( "CSELECT", "select task.value as tvid, count(*) as cnt from ( " );
    define ( "CJOIN", " ) as s1
       				left join m_dict on s1.id_m_dict = m_dict.id " );
    define ( "CWHERE", " where task_attr.id_mf = 116
          			  			and task_attr.value <> 'Дело'
    					  group by task_attr.value" );
    
    ...
    
    $sqltext = CSELECT . "select id, id_dep, id_m_dict
    		from task
    		where task.state = 0 and
    			  task.startdate <= '" . $reportDate . " 23:59:59' and
    			  task.id_dep in (2,42) and
    			  task.id_m_dict = 29
    	   " . CJOIN . CWHERE;
    
    ...
    ?>

    Я может чего-то не понимаю и так писать круто, но когда этих $sqltext = ... больше 5, то извините, это капец.

    nechin, 29 Октября 2009

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

    +150.6

    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
    {if eq($view_parameters.affichage,'avis')} 
        <!-- complete comment -->
        <script type="text/javascript">
            var object_id = {$next_prev.object.id};
            var url_alias = {$next_prev.url_alias|ezurl()};
        </script> 
        {include uri="design:inc/esi/esi_complete_comment.tpl" object_id=$node.object.id class_identifier=$next_prev.object.class_identifier}
    {else}
        <!-- full comment --> 
        <script type="text/javascript">
            var object_id = {$next_prev.object.id};
            var url_alias = {$next_prev.url_alias|ezurl()};
        </script> 
        {include uri="design:inc/esi/esi_full_comment.tpl" object_id=$next_prev.object.id class_identifier=$next_prev.object.class_identifier}
    {/if}

    Комментарии французов в шаблоне eZ Publish понятны как никогда.

    isage, 29 Октября 2009

    Комментарии (1)
  5. JavaScript / Говнокод #2068

    +144.6

    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
    curEl.change(function (e) {
                switch(current_c){
                    case '1': l = 0.001;  break;
                    case '2': l = 0.001;  break;
                    case '3': l = 1 ;     break;
                }
    
                switch(curEl.val()){
                    case '1': l2 = 0.001;  break;
                    case '2': l2 = 0.001;  break;
                    case '3': l2 = 1 ;     break;
                }
    
                convfrom = parseFloat((curr[current_c]/curr[curEl.val()]) *from.val() * (l/l2));
                convto   = parseFloat((curr[current_c]/curr[curEl.val()])*to.val()*(l/l2));
    
                if(from.val()!='')	from.val(convfrom);
                if(to.val()!='')    to.val(convto);
                from.focus();
            });

    kovel, 28 Октября 2009

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

    +105.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
    public class ImportService : System.Web.Services.WebService
       {
           private const string KEY = "*******";
           [WebMethod]
           public void AddFileInQueue(string aKey, ..., out String error)
           {
                     ...
                   if (KEY == aKey)
                     ...
                   else
                   {
                       error = "Invalid key";
                   }
            }
        }

    Мне предложили использовать эту же авторизацию для нового веб-сервиса в том же проекте со словами "there is normal login implemented somewhere"

    Yagg, 28 Октября 2009

    Комментарии (6)
  7. SQL / Говнокод #2066

    −867.1

    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
    PREPARE `@pr_statement` FROM "
                    SELECT `torrents_full`.`torrent_id`,`torrents_full`.`torrent_tracker`,
                    `torrents_full`.`torrent_href`,`torrents_full`.`torrent_name`,`torrents_full`.`torrent_author`,`torrents_full`.`torrent_files`,
                    `torrents_full`.`torrent_img`,`torrents_full`.`torrent_size`,`torrents_full`.`torrent_info`,`torrents_full`.`torrent_date`,
                    `torrents_full`.`user_name`,`torrents_full`.`user_class`,`torrents_full`.`user_href`,? AS `count` FROM
                    (SELECT `torrents`.`torrent_id`,`torrents`.`torrent_tracker`,
                    `torrents`.`torrent_href`,`torrents`.`torrent_name`,`torrents`.`torrent_author`,`torrents`.`torrent_files`,
                    `torrents`.`torrent_img`,`torrents`.`torrent_size`,`torrents`.`torrent_info`,`torrents`.`torrent_date`,
                    `users`.`user_name`,`users`.`user_class`,`users`.`user_href`
                    FROM `torrents` LEFT JOIN `users` ON `users`.`user_id` = `torrents`.`torrent_author`
                    WHERE `torrents`.`torrent_tracker` IN (?,1,2,3,4,5,6,7) AND (MATCH(`torrents`.`torrent_name`) AGAINST(?)
                    OR `torrents`.`torrent_name` LIKE ?)) as `torrents_full`
                    WHERE `torrents_full`.`torrent_name` LIKE ? ORDER BY `torrents_full`.`torrent_date` LIMIT 50";
        SET @torr_tracker = `torr_tracker`;
        SET @torr_fullsearch = `torr_fullsearch`;
        SET @torr_search = `torr_search`;
        EXECUTE `@pr_statement` USING @torr_count,@torr_tracker,@torr_fullsearch,@torr_search,@torr_search;
        DEALLOCATE PREPARE `@pr_statement`;

    это у меня такой эффективный поиск по БД))))

    Sadie, 28 Октября 2009

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

    +146.6

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    ...
    protected $default_storage = NULL;
    
    ...
    
    public function getDefaultStorage(){
        return $this->getDefaultStorage();
    }
    
    ...

    Почему виснет, емн?
    Заработался =)

    llllllllll, 28 Октября 2009

    Комментарии (19)
  9. PHP / Говнокод #2064

    +163.1

    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
    // генерация проверочного кода
    
    $number = rand(1000, 9999);
    $_SESSION['code'] = $number;
    $press_kod=rand(1000,9999);
    $_SESSION['press_kod'] = "$press_kod";
    
    /* другой файл */
    
    // вывод проверочного кода
    $kod = mysql_query("SELECT press_kod FROM povkod WHERE id='1'",$db);
    $kod2 = mysql_fetch_array($kod);
    $vkod = $kod2["press_kod"];
    
    echo"<br>Проверочный код: <font color=green><b>$vkod</b></font>&nbsp;&nbsp;<input class=input size='5' maxlength='5' name='proverka' type='text'>";

    Captcha отдыхает. Боты просто не ожидали такой наглости со стороны гостевой.

    p.S: кому всё-таки интересно, откуда всё это - http://gb.romka.tu2.ru/down.php

    Cr@ZyBoY, 28 Октября 2009

    Комментарии (8)
  10. SQL / Говнокод #2063

    −867

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    select * from 
        (select dbms_random.value R1 from dual connect by 1=1) q1,
        (select dbms_random.value R2 from dual connect by 1=1) q2
    
    where R1=R2

    Как заставить оракл потеть - искать совпадения в двух бесконечных кучах говна.

    dim1r, 28 Октября 2009

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