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

    Всего: 1419

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

    +104.9

    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
    echo “<select id=\”seltel[".$i."]\”>”;
switch ($data2["PHONE"][$i]["type"]) {
case “Факс”:
echo “<option selected>Факс”;
echo “<option>Офисный телефон”;
echo “<option>Колцентр”;
echo “<option>Телефон”;
echo “<option>Мобильный телефон”;
break;
case “Офисный телефон”:
echo “<option>Факс”;
echo “<option selected>Офисный телефон”;
echo “<option>Колцентр”;
echo “<option>Телефон”;
echo “<option>Мобильный телефон”;
break;
case “Колцентр”:
echo “<option>Факс”;
echo “<option>Офисный телефон”;
echo “<option selected>Колцентр”;
echo “<option>Телефон”;
echo “<option>Мобильный телефон”;
break;
case “Телефон”:
echo “<option>Факс”;
echo “<option>Офисный телефон”;
echo “<option>Колцентр”;
echo “<option selected>Телефон”;
echo “<option>Мобильный телефон”;
break;
case “Мобильный телефон”:
echo “<option>Факс”;
echo “<option>Офисный телефон”;
echo “<option>Колцентр”;
echo “<option>Телефон”;
echo “<option selected>Мобильный телефон”;
break;
};
echo “</select><br/>”;

    вот как надо создавать выпадающие списки!

    guest, 12 Декабря 2008

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

  3. JavaScript / Говнокод #139

    +58.5

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    <script>
var InternetExplorer = navigator.appName.indexOf(«Microsoft») != -1;
var ie = 0;
if (InternetExplorer) { var ie=1 }
</script>

    проверка ИЕ.

    guest, 12 Декабря 2008

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

  4. Perl / Говнокод #138

    −379.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
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    sub pfexec { args "pfexec", @_ unless $1.$2 eq "pfexec";
  local ( $_, $lp, @rep ) = @_; $lp ||= 1;
  die 'Command string must not contain $$ sequences' if m/\$\$/o;
  1 while s/\(([^()]*)\)/'$$'.push(@rep,$1)/eo;
# print $_,"REP:\n","=>",join( "\n=>", @rep),"\n";
  unshift @rep, ""; s/\s+/ /g;

LOOP: while ( $lp-- ) {
        foreach ( split ";" ){
          my @cmd = split " "; $_ = shift @cmd; last unless m/^(\w{2})(\w+)/o;
CMD:  foreach (@cmd){
                1 while s/\$\$(\d+)/'('.$rep[$1].')'/eo; s/^\(\s*(.*?)\s*\)$/$1/so;
                s/^\%(\d+)->(\w+)=//    and ${$HASH[$1]} ->{$2} = $_ and next;
                /^\%(\d+)->(\w+)/               and $_ = ${$HASH[$1]} ->{$2} and redo CMD;

                /^%%(\d+)/      and $_ = $HASH[$1] || ( $HASH[$1] = \{} ) and next;
                /^\%(\d+)/      and $_ = ${$HASH[$1]} and next;
                /^\#\#(\d+)/ and $_ = $CHAN[$1] || ( $CHAN[$1] = \{} ) and next;
                /^\#(\d+)/      and $_ = ${$CHAN[$1]} and next;
          }
          $_ = $::control{$1} && $::control{$1}{$2};
          s/\^(\d+)/$cmd[$1-1]/geo and print "Expanded to: $_\n"
                and pfexec( $_ ) if !ref;
          args $1.$2, @cmd and eval { $_->(@cmd) } if "CODE" eq ref;
          last LOOP if $@;
        }
  }

    Так пишет мой коллега

    guest, 12 Декабря 2008

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

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

    +22.8

    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
    $year=date('y');
$y=date('Y');
$month=date('M');
$day=date('d');
$dayofmonth=date('D');
print "Today is $day $month $y, $dayofmonth.";

if($month=="Apr" || $month=="Jun" || $month=="Sep" || $month=="Nov")
{ $maxday=30; }
else if($month=="Feb") 
{ if($year % 4) { $maxday=28; } else { $maxday=29; } }
else 
{ $maxday=31; }

#print "Current month consist of $maxday days.\n";

#Для высокосных годов

if($year=="04" || $year=="32" | $year=="60" || $year=="88")
{ if($month=="Jan" || $month=="Apr" || $month=="Jul")
  { $fd=4; }
  else if($month=="Feb" || $month=="Avg")
  { $fd=0; }
  else if($month=="Mar" || $month=="Nov")
  { $fd=1; }
  else if($month=="May")
  { $fd=6; }
  else if($month=="Jul")
  { $fd=2; }
  else if($month=="Sep" || $month=="Dec")
  { $fd=3; }
  else if($month=="Oct")
  { $fd=5; }
}

// и так далее :)

    Реализация календаря :)

    guest, 12 Декабря 2008

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

  6. ActionScript / Говнокод #136

    −453.9

    1. 1
    2. 2
    //_domain = url.match(/http\:\/\/(.*?)\/.*/is)[1]; не работает с https
_domain =  url.substr(url.indexOf("://")+3).substr(0,url.substr(url.indexOf("://")+3).indexOf("/"));

    не работает никак

    guest, 12 Декабря 2008

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

  7. ActionScript / Говнокод #135

    −452.5

    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
    z=1;
b1.onRelease = function() {
    if(xo1._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo1._alpha=100;
    xo1.gotoAndStop(z);}
};

b2.onRelease = function() {
    if(xo2._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo2._alpha=100;
    xo2.gotoAndStop(z);}
};

b3.onRelease = function() {
    if(xo3._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo3._alpha=100;
    xo3.gotoAndStop(z);}
};

b4.onRelease = function() {
    if(xo4._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo4._alpha=100;
    xo4.gotoAndStop(z);}
};

b5.onRelease = function() {
    if(xo5._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo5._alpha=100;
    xo5.gotoAndStop(z);}
};

b6.onRelease = function() {
    if(xo6._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo6._alpha=100;
    xo6.gotoAndStop(z);}
};

b7.onRelease = function() {
    if(xo7._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo7._alpha=100;
    xo7.gotoAndStop(z);}
};

b8.onRelease = function() {
    if(xo8._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo8._alpha=100;
    xo8.gotoAndStop(z);}
};

b9.onRelease = function() {
    if(xo9._alpha!=100){
    z+=1;
    if(z>2){z=1}
        xo9._alpha=100;
    xo9.gotoAndStop(z);}
};

    Интерфейс крестиков-ноликов на флеше, AS.

    guest, 12 Декабря 2008

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

  8. VisualBasic / Говнокод #134

    −593.8

    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
    Dim cr

Private Function click()
If cr = 0 Then
cr = 1
click = "X"
Else
cr = 0
click = "O"
End If
End Function
Private Sub CommandButton1_Click()
If CommandButton1.Caption = "" Then CommandButton1.Caption = click()
End Sub

Private Sub CommandButton10_Click()
cr = 0
 CommandButton1.Caption = ""
 CommandButton2.Caption = ""
 CommandButton3.Caption = ""
 CommandButton4.Caption = ""
 CommandButton5.Caption = ""
 CommandButton6.Caption = ""
 CommandButton7.Caption = ""
 CommandButton8.Caption = ""
 CommandButton9.Caption = ""
 
End Sub

Private Sub CommandButton2_Click()
If CommandButton2.Caption = "" Then CommandButton2.Caption = click()

End Sub

Private Sub CommandButton3_Click()
If CommandButton3.Caption = "" Then CommandButton3.Caption = click()
End Sub

Private Sub CommandButton4_Click()
If CommandButton4.Caption = "" Then CommandButton4.Caption = click()
End Sub

Private Sub CommandButton5_Click()
If CommandButton5.Caption = "" Then CommandButton5.Caption = click()
End Sub

Private Sub CommandButton6_Click()
If CommandButton6.Caption = "" Then CommandButton6.Caption = click()
End Sub

Private Sub CommandButton7_Click()
If CommandButton7.Caption = "" Then CommandButton7.Caption = click()
End Sub

Private Sub CommandButton8_Click()
If CommandButton8.Caption = "" Then CommandButton8.Caption = click()
End Sub

Private Sub CommandButton9_Click()
If CommandButton9.Caption = "" Then CommandButton9.Caption = click()
End Sub

    Крестики-нолики на Power Point за 2 минуты.

    guest, 12 Декабря 2008

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

  9. JavaScript / Говнокод #133

    +44

    1. 1
    document.getElementById(element.id).checked = true;

    guest, 12 Декабря 2008

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

  10. Pascal / Говнокод #131

    +23

    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
    if not MultiThread then
  begin
    GetName(@rec);
    result:=rec.fname;
  end
  else
  begin
    hThread:=CreateThread(0,0,@GetName,@rec,0,tmp);
    if WaitForSingleObject(hThread,100)=WAIT_TIMEOUT then
      TerminateThread(hThread,0)
    else
      result:=rec.fname;
    CloseHandle(hThread);
  end;

    Дельфисты - ущербные люди......

    guest, 12 Декабря 2008

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

  11. Python / Говнокод #130

    −229.2

    1. 1
    2. 2
    3. 3
    4. 4
    try:
    tray.pop_item('Note')
except:
    pass

    Этот код вытаскивает (вытаскивал) элемент из трея. На каждом кадре. %)

    guest, 12 Декабря 2008

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