Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+129.4
<a class="btn" href="#" onclick="{if $client->getId()}xmlrpc_choose_playlist(this,{$mp3->getId()},1,'top_month_mp3');return false;{else}xmlrpc_load_popup('login', null);{/if}">
<img src="views/default/images/add.gif" width="8" height="8" alt="Добавить в плейлист" title="Добавить в плейлист" />
</a>
Это кусок смартявского шаблона
Типа песенку в плейлист добавляем
а иногда таких песен на странице ни одна сотня )))
paranoid,
20 Января 2010
+156
Как корабль назовешь, как говорится...
Кто сможет объяснить, почему пользователь sbb (т.е. я) на говнокоде присутствует 2 раза?
http://www.govnokod.ru/user/92
http://www.govnokod.ru/user/91
sbb,
20 Января 2010
+141.8
proc redraw_level {level val} {
global lnames countries towns provinces sublocations positions
set parent [expr $level - 1]
set pvalue [.f$parent.l get [lindex $positions $parent]]
set curlist [lindex $lnames $level]($pvalue)
if {$val!=""} {lappend $curlist $val}
.f$level.l delete 2 end
eval set list_vals $$curlist
eval .f$level.l insert end $list_vals
}Поскольку начал писать на TCL пару дней назад, ну просто не знаю, как изящно сделать. Опять на DCL смахивает...
nil,
19 Января 2010
+80
Очередное обновление на сайте Говнокод.ру!
Что нового:
1) отсылка комментариев по Ctrl+Enter
2) Новый раздел "Сток", в котором будут собраны последнии комментарии
3) Мы наконец-то починили отсылку почты с сайта!
4) Из мелочей следует отметить сервис восстановления забытых паролей и автоматическое скрытые заминусованных комментариев
5) Говнокод.ру еще быстрее и еще стабильнее!По всем вопросам, предложениям и баг-репортам обращаться по контактам, указанным на странице "Обратная связь" (ссылка внизу страницы)
striker,
17 Января 2010
+126.6
<meta млн="" $42="" за="" рынке,="" масличном="" на="" оператора="" украинского="" крупнейшего="" group,="" allseeds="" доли="" контрольной="" приобретении="" о="" соглашение="" подписала="" Украины,="" групп="" агропромышленных="" крупнейших="" из="" одна="" ,="" Групп="" Кернел="" content="" name="description"/>Говнодвижок слепил описание странички.
condemetrius,
14 Января 2010
+115.7
(defun create (a) ;; список из составляющих атомов списка A
(cond
((null a) nil)
((atom a) (list a))
(T (append (create (car a)) (create (cdr a))))
)
)
(defun uniq (a) ;; оставить только уникальные атомы
(cond
((null a) nil)
((member (car a) (cdr a)) (uniq (cdr a)))
(t (cons (car a) (uniq (cdr a))))
)
)
(defun compare (a b) ;; сравнение состава списков
(if (= (length a) (length b))
(diff a b)
nil
)
)
(defun diff (a b) ;; проверка состава 2x списков
(cond
((null a) T)
(T (if (member (car a) b)
(diff (cdr a) b)
nil )
)
)
)
(defun main (a b)
(compare
(uniq (create a))
(uniq (create b))
)
)а нужно было всего то проверить состоят ли 2 списка из одних и тех же атомов
xXx_totalwar,
31 Декабря 2009
+124.3
Functions called:
fflush (4 times)
delete (11 times)
fclose (1 times)
free (11 times)
fread (3 times)
fopen (1 times)
vsnprintf (4 times)
new (11 times)
SysReallocMem (652 times)
SysFreeMem (13185 times)
SysGetMem (13188 times)
lstrlenA (1 times)
lstrcpynA (4 times)
calloc (1 times)
strlen (98 times)
realloc (1 times)
strdup (1 times)
malloc (8 times)
memcpy (4 times)
Resource types used:
object (11 allocs, 11 max)
memory block (13199 allocs, 4007 max)
file stream (1 allocs, 1 max)
file handle (1 allocs, 1 max)
Nemerle,
29 Декабря 2009
+122.4
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" runat="Server">
<!--
POSTER PHOTO
-->
<div id="poster-photo-container">
<img src="images/photo-poster.jpg" alt="" class="poster-photo-image" />
<div id="feature-area-home">
<div id="login" class="boxed">
<h2 class="title">Аккаунт пользователя</h2>
<div class="content">
<fieldset>
<legend>Войти</legend>
<label for="inputtext1">Аккаунт :</label>
<input id="inputtext1" type="text" name="inputtext1" value="" />
<label for="inputtext2">Пароль :</label>
<input id="inputtext2" type="password" name="inputtext2" value="" />
<asp:Button ID="Button1" runat="server" Text="Войти" onclick="Button1_Click" />
<p><a href="#">Забыли пароль ?</p>
</a>
</fieldset>
</div>
</div>
</div>
</div>
<!--
CONTENT CONTAINER
-->
<div id="content-container-two-column">
<!--
CONTENT MAIN COLUMN
-->
<div id="content-main-two-column">
<h1>
<span lang="ru">Контроль измерительных приборов.</span> </h1>
<p>
Consectetuer adipiscing elit, sed diam nonummy nibh euismod tincidunt ut laoreet
dolore magna aliquam erat volutpat.</p>
<div id="three-column-container">
<div id="three-column-side1">
<a href="Items.aspx">
<img src="images/home-photo-1.jpg" class="photo-border" alt="Enter Alt Text Here" /></a>
<h2>
<span lang="ru">Хромотографы ?</span></h2>
<p>
<span lang="ru">11111111</span></p>
<span lang="ru">
<a href="Items.aspx">Подробнее</a></span><img class="arrow" src="images/arrow.gif" alt="" /></div>
</div>
</div>
<!--
CONTENT SIDE COLUMN
-->
<div class="clear">
</div>
</div>
</asp:Content>Найти DIV
Nemerle,
28 Декабря 2009
+122.6
<html>
<head>
</head>
<body>
<table class="fon_verstala_mudak" width="939" cellspacing="0" cellpadding="0" border="0" align="center">
</table>
<table class="fon2_verstala_mudak" width="939" cellspacing="0" cellpadding="0" border="0" align="center">
</table>
</body>
</html>
Как потерять клиента из-за верстальщика-мудака?
Хотел купить телефон, но сначала заглянул как свёрстан сайт... Про то что кроссбраузерность даже на костылях мимо не проходила я промолчу, но код начисто отбил желание отовариваться у них.
VanSanblch,
17 Декабря 2009
+130
for INPUTFILE in `ls ${_BUILD_DIR}/db/full/migrate[0-9].sql`; do
STAGE=`basename $INPUTFILE | awk -F "" '{print $8}'`
Я видел много, но чтобы ТАК получали символ из строки...
awk - поистине многофункциональный язык!
nil,
16 Декабря 2009
Follow us!