По колено в коде — Говнокод.ру

Си / Говнокод #2605

+137.5

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

void TWindowTID::SetStyle(GtkWidget* widget, const char *form, gint Red_, gint Green_, gint Blue_)
{
    struct _GtkStyle *style;
    GdkColor bg;
    style=gtk_style_new();
    bg.red = Red_;
    bg.blue = Blue_;
    bg.green = Green_;
    if (form=="TEXT")
    {
        style->fg[GTK_STATE_NORMAL]=bg; //TEXT
    }
    else
        if (form=="BORDER")
        {
            style->base[GTK_STATE_NORMAL]=bg; //BORDER
        }
        else
            if (form=="ALL")
            {
                style->bg[GTK_STATE_NORMAL]=bg;
                style->base[GTK_STATE_NORMAL]=bg; //BORDER
                style->fg[GTK_STATE_NORMAL]=bg; //TEXT
            }
            else
                if (form=="button")
                {
                    style->bg[GTK_STATE_PRELIGHT]=bg;
                    style->base[GTK_STATE_PRELIGHT]=bg; //BORDER
                    style->bg[GTK_STATE_SELECTED]=bg;
                    style->base[GTK_STATE_SELECTED]=bg; //BORDER
                }
                else
                {
                    style->bg[GTK_STATE_NORMAL]=bg;
                }
    style->font = gdk_font_load("-adobe-helvetica-*-r-*-*-12-*-*-*-*-*-*-*");
    if ((GtkWidget *)widget!=NULL) gtk_widget_set_style((GtkWidget *)widget, style);
}

Сравнение строк умиляет

mutanabbi, 12 Февраля 2010

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

Pascal / Говнокод #2604

+107.2

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

procedure TFormMoneyToBag.AMEditVirtualKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  Field : string;
  Value : integer;
begin
  if (Key = 16) or (Key = 13) then begin
    with ADOHardCash.FieldByName('Dengi') do begin
      if AsString = '500 грн' then Field := '[500hrn]'
      else if AsString = '200 грн' then Field := '[200hrn]'
           else if AsString = '100 грн' then Field := '[100hrn]'
                else if AsString = '50 грн' then Field := '[50hrn]'
                     else if AsString = '20 грн' then Field := '[20hrn]'
                          else if AsString = '10 грн' then Field := '[10hrn]'
                               else if AsString = '5 грн' then Field := '[5hrn]'
                                    else if AsString = '2 грн' then Field := '[2hrn]'
                                         else if AsString = '1 грн' then Field := '[1hrn]'
                                              else if AsString = '1 грн монета' then Field := '[1hrnCoin]'
                                                   else if AsString = '50 коп' then Field := '[50kopCoin]'
                                                        else if AsString = '25 коп' then Field := '[25kopCoin]'
                                                             else if AsString = '10 коп' then Field := '[10kopCoin]'
                                                                  else if AsString = '5 коп' then Field := '[5kopCoin]'
                                                                       else if AsString = '2 коп' then Field := '[2kopCoin]'
                                                                            else if AsString = '1 коп' then Field := '[1kopCoin]'
    end;

    UpdateIncassationCurrentValue.Parameters.ParamByName('@IncassationId').Value := IncassationId;
    UpdateIncassationCurrentValue.Parameters.ParamByName('@Field').Value := Field;
    if AMEditVirtual.Text = '' then Value := 0 else Value := StrToInt(AMEditVirtual.Text);
    UpdateIncassationCurrentValue.Parameters.ParamByName('@Value').Value := Value;
    ExecStoredProc(UpdateIncassationCurrentValue);

    RequeryADO(ADOHardCash);
    RequeryADO(ADOCashDeskInfo);
    ButtonStatus;
    AMEditVirtual.Visible := false;
  end;
end;

Сие Чудо техники заполняет параметры для выполнения хранимой процедуры на сервере.
Написал Большой Мудила, хотя в целом он хороший человек.

cruelwizard, 12 Февраля 2010

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

Куча / Говнокод #2602

+118.9

1
2
3

.loginField {
color: красний;
}

fuckyounoob, 12 Февраля 2010

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

C++ / Говнокод #2601

+63.6

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16

struct window_t
{
    int Frame;
    int Window;
    int Title;
};

int TWindowTID::CreateWindow(int width,int height,int posX,int posY,int WindowType,int &win)
{
    GtkWidget* fixed;
    fixed = get_new_fixed()
    window_t* w0 = new window_t;
    // здесь всякие разные манипуляции разной степени бессмысленности
    w0->Window=reinterpret_cast<int>(fixed);
    return static_cast<int>(w0->Window);
}

Буйство кастов

mutanabbi, 12 Февраля 2010

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

Си / Говнокод #2600

+96.5

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

......
                 int a1=0,a2=0,a3=0,a4=0,a5=0,a6=0,a7=0,a8=0,a9=0,a10=0;
                 for (int i=0;i<arl->Count;i++)
                 {
                    if(arl[i]<0.1)
                    {
                        a1++;
                    }
                    if(arl[i]<0.2&&arl[i]>0.1)
                    {
                        a2++;
                    }
                    if(arl[i]<0.3&&arl[i]>0.2)
                    {
                        a3++;
                    }
                    if(arl[i]<0.4&&arl[i]>0.3)
                    {
                        a4++;
                    }
                    if(arl[i]<0.5&&arl[i]>0.4)
                    {
                        a5++;
                    }
                    if(arl[i]<0.6&&arl[i]>0.5)
                    {
                        a6++;
                    }
                    if(arl[i]<0.7&&arl[i]>0.6)
                    {
                        a7++;
                    }
                    if(arl[i]<0.8&&arl[i]>0.7)
                    {
                        a8++;
                    }
                    if(arl[i]<0.9&&arl[i]>0.8)
                    {
                        a9++;
                    }
                    if(arl[i]<1&&arl[i]>0.9)
                    {
                        a10++;
                    }
                 }
.....

определение количества элементов в каждом диапазоне. Было написано быстро и влоб, т.к ничего красивее придумать не смог, да и времени не было.

KoirN, 11 Февраля 2010

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

Куча / Говнокод #2599

+131.8

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

def ad30 // Все понятно из названия, да?
vgl start_naht 3
baw gr
spg ad40

aktuelle_naht = 3 ;
lad vsp 53 aktuelle_naht ;
spg up setze_npk_abs ;

vgl start_naht 3
baw gl
PPZ # R100 Z1 z1_start Z2 P8 Z3 P9 ;

z1_start = -1590
z1_ziel =  -2985
vgl tisch_nr 2
baw gl
spg ad31
z1_start = z1_start + tisch_abstand ;
z1_ziel  = z1_ziel  + tisch_abstand ;
def ad31
z1_soll = z1_start

lad r1 R65
lad r2 R66
R1.C = c3_soll ;
R2.C = c3_soll ;
R1.B = 0;
R2.B = 0;

spg up verschiebe_nahtanfang ; 

spg up fahre_z1 ;
PPZ # A1 -12.13 A2 -15.73 A3 114.05 A4 24 A5 40 A6 -208 Z1 z1_start Z2 P8 Z3 P9

pnd_amp = pnd_amp_laengs ;
pnd_len = pnd_amp * 0.8

dx = -delta_x_npk
ges_schweiss = ges_schweiss_orig * 0.85
npk 4 rel x dx  y 0 z delta_z_npk a 0 b 0 c 0

spg up laengsnaht_ohne_messen ;

; ------- Veraenderte Punkte speichern
vgl za_soll 90
baw kl
spg ad35
; ------- Oberseite -----------------------
lad r605 r1
lad r606 r2
spg ad36
; ------- Unterseite ----------------------
def ad35
lad r625 r1
lad r626 r2
def ad36

lad p1 pos

spg up freifahren

spg up anfahr_ges ;
p2 = p2 - ( z1_start - z1_ziel )
liz x p1 y p2 z p3 a p4 b p5 c p6 z1 z1_start z2 p8 z3 p9

spg up grundstellung

spg up brenner_reinigen ;

; --------------------------------------------------------------
; Schweissnaht 4 (Roboterseite)
; --------------------------------------------------------------
def ad40
vgl start_naht 4
baw gr
spg ad50

aktuelle_naht = 4 ;
lad vsp 53 aktuelle_naht ;
spg up brenner_reinigen ;

z1_start =   -1590
z1_ziel  =  -2985
vgl tisch_nr 2
baw gl
spg ad41
z1_start = z1_start + tisch_abstand ;
z1_ziel  = z1_ziel  + tisch_abstand ;
def ad41
z1_soll  = z1_start ;

lad r1 R67
lad r2 R68

Это язык SRCL, используется на некоторых роботах, зовется высокоуровневым. Однако не умеет даже передавать параметры в функции.

Особенно умиляют команды типа PPZ и LIZ и названия типа aktuelle_naht - писал немец :)

В конце концов, чтобы запрограммировать этого робота пришлось писать свой конструктор программ, который выдавал эту лажу мегатоннами (а в чем еще измерять разрушительную силу этой хрени??).

karevn, 11 Февраля 2010

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

Куча / Говнокод #2598

+132.9

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

$html .= "\n" . '<script type="text/javascript">' . "\n";

        // mootools js that highlights the cells
        for ($row = 0; $row < 5; $row++){
            for ($col = 0; $col < 5; $col++){
                $box_num = ($col*5) + $row + 1;
                if (!in_array($box_num, $strength_boxes)){
                    $html .= '
var fx_strength_'.$box_num.' = new Fx.Morph($(\'colorbox_'.$box_num.'\'), {duration:200, wait:false});
$(\'strengths\').addEvent(\'mouseenter\', function(){
    fx_strength_'.$box_num.'.start({
        \'opacity\': 0.25
    });
});
$(\'strengths\').addEvent(\'mouseleave\', function(){
    fx_strength_'.$box_num.'.start({
        \'opacity\': 1.0
    });
});
';
                }
                if (!in_array($box_num, $weakness_boxes)){
                    $html .= '
var fx_weakness_'.$box_num.' = new Fx.Morph($(\'colorbox_'.$box_num.'\'), {duration:200, wait:false});
$(\'weaknesses\').addEvent(\'mouseenter\', function(){
    fx_weakness_'.$box_num.'.start({
        \'opacity\': 0.25
    });
});
$(\'weaknesses\').addEvent(\'mouseleave\', function(){
    fx_weakness_'.$box_num.'.start({
        \'opacity\': 1.0
    });
});
';
                }
            }
        }

html.
Формируется эффект подсвечивания для неких ячеек в таблице. Расставить классы и написать пять строк - не судьба :)

karevn, 11 Февраля 2010

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

C++ / Говнокод #2597

+929.1

1
2
3
4
5
6
7

page_t* make_page()
{
 page_t* p = new page_t;
 // заполнение
 return p;
 delete(p);
}

я в шоке... не знаю что хотел сказать аффтар (недоступен)... не могу даже прокомментировать ЭТО %)

zaufi, 11 Февраля 2010

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

JavaScript / Говнокод #2596

+153

1

for (var i=0; i<$('.tr_t').length; i+=2) $('.tr_t:eq(' + i + ')').css('color', '#CCCCCC');

JDVU, 11 Февраля 2010

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

Говнокод: по колено в коде.