1. Perl / Говнокод #12062

    −166

    1. 1
    2. 2
    3. 3
    4. 4
    for ( my $i = 0 ; $i < $pmcount ; $i ++ ) { 
    $_ = $array_ref->[$i]; 
    # workin' hard
}

    if ( $perl eq 'C' ) { print "govnokod повсеместно" }

    Elvenfighter, 06 Ноября 2012

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

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

    +16

    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
    void keyStart(int key,void (*func)())
{
  while(SDL_PollEvent(&keyEvent))
  {
    switch(keyEvent.type)
    {
      case SDL_KEYDOWN:
        switch(keyEvent.key.keysym.sym)
        {
          /*Выход*/
          case SDLK_ESCAPE:
          func();
          break;
          case SDLK_w:
          func();
          break;
          case SDLK_q:
          func();
          break;
          default:
          break;
        }
      break;
      default:
      break;
    }
  }
      
}

    Функция высшего порядка, мужики. Сами знаете откуда.

    LispGovno, 06 Ноября 2012

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

  3. ActionScript / Говнокод #12060

    −100

    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
    //.....
    public final class Random
    {
        static public function _int(min: int, max: int):int
        {
            return min + Math.round( Math.random()*(max - min));
        }
        //.....
        static public function _Bool():Boolean
        {
            return (_int(0, 1) == 1);
        }

        //подброс монеты: орёл
        static public function coinSideEagle(): Boolean
        {
            return _Bool();
        }

        //всё по-честному: решка
        static public function coinSideTail(): Boolean
        {
            return !coinSideEagle();
        }
     }

    d9k, 05 Ноября 2012

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

  4. Java / Говнокод #12059

    +94

    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
    String s="a, b, c, d,,,";
		
		String[] spl=s.split ( "," );
		o.println(spl.length);
		for (String s1: spl)
			o.print(s1+";");
//4
//a; b; c; d;
		StringTokenizer st=new StringTokenizer(s);
		o.println("\n"+st.countTokens ());
		while (st.hasMoreElements ()){
			o.print(
				st.nextToken ()+";"
			);
		}
//4
//a,;b,;c,;d,,,;
		st=new StringTokenizer(s,",");
		o.println("\n"+st.countTokens ());
		while (st.hasMoreElements ()){
			o.print(
				st.nextToken ()+";"
			);
		}
//4
//a; b; c; d;

    http://ideone.com/zh0paB
    Очередной сюжет из серии JavaGovno.

    3.14159265, 05 Ноября 2012

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

  5. SQL / Говнокод #12058

    −123

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    DECLARE @Quarter int --квартал
DECLARE @Year int --год
DECLARE @Code int
...
SET @Code =  CAST((CAST(@Year as char(4))+ CAST( (@Quarter) as char))as int)
...

    Получаем код квартала вида 20123 - третий квартал 2012 года

    CrazyMORF, 05 Ноября 2012

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

  6. PHP / Говнокод #12057

    +71

    1. 1
    2. 2
    3. 3
    <?php
</script>
?>

    ПыхапеГовно выдаёт:
    ?>
    Как оказалось, ему асболютно пофиг каким тегом его открывают, и каким закрывают... <script language="php"> echo "blah-blah-blah"; ?> тоже работает...

    Lowezar, 05 Ноября 2012

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

  7. Haskell / Говнокод #12056

    −82

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    only :: (Integral nt) => nt -> [Bool]
only n = [ x `mod` n == 0 | x <- [0..] ]

each :: (Integral nt) => nt -> [a] -> [a]
each n xs = [ snd x | x <- filter fst $ zip (only n) xs ]

main = do print $ each 2 [1,2,3,4,5,6,7,8,9]

    Haskell. Получение каждого n-го элемента списка.

    Fai, 05 Ноября 2012

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

  8. 1C / Говнокод #12054

    −156

    1. 1
    2. 2
    3. 3
    Говнокод, выручай пишу быстро. Работаю дома, так же как и ты наверно, у нас есть модем мегафон 4G.
Я не знал что там трафик не безлимитный. Сейчас мамка хочет сделать запрос сайтов, точнее уже начала смотреть.
Я смотрел на порно и дрочил, что делать?

    serpinski, 04 Ноября 2012

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

  9. Java / Говнокод #12053

    +68

    1. 1
    2. 2
    3. 3
    public ConcurrentHashMap(int initialCapacity, float loadFactor, int concurrencyLevel) {
     if (initialCapacity < 0)
       throw new IllegalArgumentException();

    - unsigned?
    - ЖАБАПРОБЛЕМЫ.

    А ещё это не портируется на 64хбитные платформы с 32хбитным intом.

    LispGovno, 04 Ноября 2012

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

  10. Куча / Говнокод #12052

    +142

    1. 1
    http://s9.postimage.org/7t1dai0en/born_to_program.png

    Born to program :(

    wvxvw, 04 Ноября 2012

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