1. PHP / Говнокод #6811

    +154

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    $dbh = $this->initDbh('master');
$srv = $dbh->getServer();
if ($srv->isSlave())
{
       $this->triggerError('Trying write on slave');
       return false;
}

    Перестархуй

    travka, 01 Июня 2011

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

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

    +181

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    if ( 
	isset(parent::$db['title'])	&&	// если существует такое поле в данной таблице
	!parent::$db['title']		&&	// и оно пустое
	isset($inDB['title'])		&&	// и таки необходимо записать в базу это поле
	!$inDB['title']			&&	// но записывать нечего (но надо!)
	isset(parent::$db['header'])		// зато присутствует то поле, из которого можно получить данные
) {
	$inDB['title'] = strip_tags(parent::$db['header']);
}

    Ниточки Ариадны...

    istem, 01 Июня 2011

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

  3. Lua / Говнокод #6809

    −93

    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
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    --загрузка шрифта
MyFont = pge.font.load("verdana.ttf",12)

--цвета шрифта
white = pge.gfx.createcolor(255,255,255)
green = pge.gfx.createcolor(0,255,0)

--загрузка графики
A01 = pge.texture.load("pics/A-01.png")
A02 = pge.texture.load("pics/A-02.png")
A03 = pge.texture.load("pics/A-03.png")
A04 = pge.texture.load("pics/A-04.png")
A05 = pge.texture.load("pics/A-05.png")
A06 = pge.texture.load("pics/A-06.png")
A07 = pge.texture.load("pics/A-07.png")
A08 = pge.texture.load("pics/A-08.png")
A09 = pge.texture.load("pics/A-09.png")
A10 = pge.texture.load("pics/A-10.png")
A11 = pge.texture.load("pics/A-11.png")
A12 = pge.texture.load("pics/A-12.png")
A13 = pge.texture.load("pics/A-13.png")
A14 = pge.texture.load("pics/A-14.png")
A15 = pge.texture.load("pics/A-15.png")
A16 = pge.texture.load("pics/A-16.png")
A17 = pge.texture.load("pics/A-17.png")
A18 = pge.texture.load("pics/A-18.png")
A19 = pge.texture.load("pics/A-19.png")
A20 = pge.texture.load("pics/A-20.png")
A21 = pge.texture.load("pics/A-21.png")
A22 = pge.texture.load("pics/A-22.png")
A23 = pge.texture.load("pics/A-23.png")
A24 = pge.texture.load("pics/A-24.png")

--переменная для счётчика
index = 1


while pge.running() do
pge.controls.update()
pge.gfx.startdrawing() -- начало рисования
pge.gfx.clearscreen() -- очистка экрана
if pge.controls.pressed(PGE_CTRL_DOWN) then
index = index+1 -- увеличиваем index на 1
end

A01:activate()
A01:draw(30,25) -- отрисовка первой картинки
-- далее отрисовка последующих картинок в зависимости от значения переменной index
	if index==2 then
		pge.gfx.clearscreen()
		A02:activate()
		A02:draw(30,25)
	end
	if index==3 then
		pge.gfx.clearscreen()
		A03:activate()
		A03:draw(30,25)
	end
	if index==4 then
		pge.gfx.clearscreen()
		A04:activate()
		A04:draw(30,25)
	end
	if index==5 then
		pge.gfx.clearscreen()
		A05:activate()
		A05:draw(30,25)
	end
	if index==6 then
		pge.gfx.clearscreen()
		A06:activate()
		A06:draw(30,25)
	end

pge.gfx.enddrawing() -- конец отрисовки
pge.gfx.swapbuffers()
	if pge.controls.pressed(PGE_CTRL_START) then
		break
	end
end

    Увидел и не смог не запостить
    Lua

    Werdn, 01 Июня 2011

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

  4. 1C / Говнокод #6808

    −136

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    Если СтрФайлЗагрузки = Ложь Тогда
		СтрФайлЗагрузки = ФайлЗагрузки;
	Иначе
		ФайлЗагрузки = СтрФайлЗагрузки;
КонецЕсли;

    1vasia1, 01 Июня 2011

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

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

    +175

    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
    function enc($text) {

$bad_symbols =  array('ï', 'î', 'é', 'è', 'ì', 'å', 'í', 'õ', 'Ö', 'Ç',
                      'Â', 'â', 'ó', 'ç', 'ä', 'à', 'Í', 'ò', 'Ð', 'ÿ',
	        'ñ', 'Ì', 'ë', 'ý', 'ö', 'ã', 'Ñ', 'Ô', 'Ï', 'ü',
	        'Ã', 'ð', 'æ', 'á', 'À', '¸', 'ù', 'Ê', 'ê', 'Á',
	         '÷', 'Ý', 'û', 'Ë', 'È', 'Ò', 'ß', 'þ', 'Ä', 'Î',
	        'Ó', 'Å', 'Æ', 'Û', 'ø', 'ô', '×', '¹', '³', 'Õ', 'Þ', 'Ø');
					  
$good_symbols = array('п', 'о', 'й', 'и', 'м', 'е', 'н', 'х', 'Ц', 'З',
                      'В', 'в', 'у', 'з', 'д', 'а', 'Н', 'т', 'Р', 'я',
	        'с', 'М', 'л', 'э', 'ц', 'г', 'С', 'Ф', 'П', 'ь',
                      'Г', 'р', 'ж', 'б', 'А', 'ё', 'щ', 'К', 'к', 'Б',
	         'ч', 'Э', 'ы', 'Л', 'И', 'Т', 'Я', 'ю', 'Д', 'О',
	         'У', 'Е', 'Ж', 'Ы', 'ш', 'ф', 'Ч', '№', 'і', 'Х', 'Ю', 'Ш');
 
$text_rus = str_replace($bad_symbols, $good_symbols, $text, $count);

				
// Восстанавливаем японские иероглифы
$bad_symbols =  array('іх', 'Тф', 'ҐЇ', 'Ґё', 'ҐЯ', '©`', 'Ґµ', 'Ґа', 'ь\\', '¤¦', '¤µ', 'Ґ«', 'Ґу', 'Ґї', 'Ґм', 'Ґй',
                      'Ґ¦', 'ҐЙ', 'Ґ·', 'Ґ°', 'ҐК', 'Ґл', 'Ґк', 'Ґи', 'ЈЁ', 'Ј©', 'ЈЬ', 'ЈЇ', 'Бч', 'РЗ', 'СІ', 'зR',
	         'ВЇ', 'РД', 'ИЪ', 'Ѕв', 'ҐЄ', 'Ґп', 'Ґі', 'РР', 'ЯM', 'Зъ', 'ҐИ', '¤н', '¤ї', '¤у', '¤А', '±°',
	        'ЗУ', '‘й', 'к ', 'ҐЬ', 'Ґн', '¤П', '¤д', '‰ф', '¤Я', '¤л', '¤і', '¤И', '¤к');
					  
$good_symbols = array('初', '音', 'ク', 'ジ', 'ミ', 'ー', 'サ', 'ム', '黒', 'う', 'さ', 'カ', 'ン', 'タ', 'レ', 'ラ',
                      'ウ', 'ド', 'シ', 'グ', 'ナ', 'ル', 'リ', 'ヨ', '（', '）', '＼', '／', '流', '星', '巡', '鏡',
	        '炉', '心', '融', '解', 'オ', 'ワ', 'コ', '行', '進', '曲', 'ト', 'ろ', 'た', 'ん', 'だ', '卑',
	        '怯', '戦', '隊', 'ボ', 'ロ', 'は', 'や', '夢', 'み', 'る', 'こ', 'と', 'り');

$text_jap = str_replace($bad_symbols, $good_symbols, $text_rus, $count2);

if ($count > 3)
    return $text_rus;
elseif ($count2 > 3)
    return $text_jap;
else return $text;
}

    Декодер кривых тегов на интернет-радио.
    Написано год назад.
    Я, конечно, знал про iconv, но очень хотелось решить головоломку - имелся тег, который я знал, что значит в верной кодировке. А остальные я не знал, что значат.
    И в итоге, зная некоторые соответствия символов win-1252 и win-1251, стал отгадывать соответствия к остальным :)
    А дальше - высший пилотаж, это даже iconv не брал.
    Японские иероглифы, испорченные хрен знает как. Знал только как расшифровывается имя одного исполнителя.
    Дальше гуглом и методом тыка искал соответствия к остальным иероглифам.

    7ion, 01 Июня 2011

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

  6. Java / Говнокод #6806

    +76

    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
    private void listGSNames()
	{
		int idMaxLen = 0;
		int nameMaxLen = 0;
		for (Entry<Integer, String> e : GameServerTable.getInstance().getServerNames().entrySet())
		{
			if (e.getKey().toString().length() > idMaxLen)
			{
				idMaxLen = e.getKey().toString().length();
			}
			if (e.getValue().length() > nameMaxLen)
			{
				nameMaxLen = e.getValue().length();
			}
		}
/* Some Code */
}

    Отрезок из регистратора игрового сервера Lineage от команды L2jServer.
    e.getKey().toString().length() - Приведение к строке, потом определение строки. Выглядит зрелищно! =)

    Akira, 01 Июня 2011

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

  7. Python / Говнокод #6805

    −94

    1. 1
    for smth in filter(None, [something]): do(smth)

    лопата

    wiz, 31 Мая 2011

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

  8. Куча / Говнокод #6804

    +131

    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
    /*здесь заданы значения листов x и y соответственно*/
x: [...] $
y: [...] $
...
/*и понеслась*/
xx: [-10] $
for i in create_list(i,i, 2,length(h)) do
	xx: append(xx, [i,i]) $
xx: append(xx, [10]) $

yy: [ first(x) ] $
for i in create_list(i,i, 2,length(h)) do
	yy: append(yy, [x[i-1],x[i]]) $
yy: append(yy, [last(yy)]) $

plot2d( [discrete, xx,yy] ) $

    maxima. рисуем кусочно-заданную функцию О_о

    ilardm, 31 Мая 2011

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

  9. Pascal / Говнокод #6803

    +110

    1. 1
    2. 2
    3. 3
    DataModule1.QueryPlayers.Close; 
DataModule1.QueryPlayers.SQL.Text:='select fp_id, fp_familiya, fp_imya, fp_otchestvo, FP_DATE_ZAKLUCHENIYA_CONTRAKTA, FP_DATE_OKONCHANIYA_CONTRAKTA,FP_OKLAD,fp_amplua,amp_nazvanie from football_player f,amplua a where f.fp_amplua=a.amp_id and f.fp_familiya like "'+ str+'%"'; 
DataModule1.QueryPlayers.Open;

    Девушка, работа с базой.

    bloodye, 31 Мая 2011

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

  10. ActionScript / Говнокод #6802

    −111

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    stop()
stage.addEventListener(Event.ENTER_FRAME,qw)
function qw(e:Event):void{
if(q.value=="tekst"){
 gotoAndStop(2)
}
}

    Event.CHANGE нам не поможет,
    Нам поможет 'enterFrame'

    KirAmp, 31 Мая 2011

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