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

    +17.8

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    Function nSetColorPair(att : integer) : integer;
    var
       i : integer;
    Begin
       bg := att div 16;
       fg := att - (bg * 16);
       While bg > 7 Do dec(bg,8);
       While fg > 7 Do dec(fg,8);
    // . . .

    Кусок модуля nCRT для FreePascal 2.2. У нормальных людей att - это байт. И вообще... Говно код!

    Запостил: guest, 16 Декабря 2008

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

    • Говногость:
      Да, современные быдлокодеры с битовыми командами вообще незнакомы. Пойду чтоли ещё одно ядро к процессору докуплю, чтоб Кризис запустить.
      Ответить

    Добавить комментарий