Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+146
(
define
(
lazy-reader
reader
)
(
lambda
(
port
)
(
make-lazy-list1
(
lambda
(
)
(
let
(
(
it
(
reader
port
)
)
)
(
if
(
eof-object?
it
)
'
(
)
it
)
)
)
)
)
)Идиотское форматирование в Scheme
guest,
12 Июня 2009
+54
$k = "\$user->".$rowField->name;
eval("\$k = \"$k\";");
if ( !$k && $k !== '0' ) {
...
}ребята не в курсе)
guest,
12 Июня 2009
+152
if ($view == 0) {
render_blocks($side, $blockfile, $title, $content, $bid, $bposition);
} elseif ($view == 1 && $CURUSER) {
render_blocks($side, $blockfile, $title, $content, $bid, $bposition);
} elseif ($view == 2 && (get_user_class() >= UC_MODERATOR)) {
render_blocks($side, $blockfile, $title, $content, $bid, $bposition);
} elseif ($view == 3 && (!$CURUSER || get_user_class() >= UC_MODERATOR)) {
render_blocks($side, $blockfile, $title, $content, $bid, $bposition);
}Закодированный кусок с трекера TBDev Yuna Edition.(include/blocks.php)
guest,
12 Июня 2009
+95
void Mouse(int button, int state, int x, int y)
{
if ((button==GLUT_LEFT_BUTTON) && (state==GLUT_DOWN))
{
y=WIN_HEIGHT-1-y;
if (y<233)
{
if ((field[x/26][y/26]).busy)
{
begin_trace_x=x/26;
begin_trace_y=y/26;
}
else
if ((begin_trace_x!=-1)&&(begin_trace_y!=-1))
{
end_trace_x=x/26;
end_trace_y=y/26;
if (!checkField())
game_over=true;
else
if (findTrace())
{
moveBall();
if (!countScore())
{
throwBalls();
countScore();
}
}
}
}
glutPostRedisplay();
}
}Вот. Игрушку Lines писал когда-то.
guest,
12 Июня 2009
+142.1
if ($ret == '')
{
$ret = "array('$day', '$date_num', '$date_month', '$image', '$temperatura_high', '$temperatura_low', '$osadky')";
}
else
{
$ret .= ", array('$day', '$date_num', '$date_month', '$image', '$temperatura_high', '$temperatura_low', '$osadky')";
}
$i++;
}
$ret = '$array = array('.$ret.');';
eval($ret);Нашел случайно. А ведь работает то :)
guest,
12 Июня 2009
+153
<?
if ($arResult["MANAGE_PANEL"]["MESSAGES"] == "Y"):
endif;
?>
Ну вы поняли, какая CMS
/bitrix/modules/forum/install/components/bitrix/forum/templates/.default/bitrix/forum.menu/.default/template.php
Семёрка, 426 строка
guest,
11 Июня 2009
+144.8
case ErrorType of
1: fmError.Label1.Caption:=GetMsg('Err001');
2: fmError.Label1.Caption:=GetMsg('Err002');
3: fmError.Label1.Caption:=GetMsg('Err003');
4: fmError.Label1.Caption:=GetMsg('Err004');
5: fmError.Label1.Caption:=GetMsg('Err005');
end;Работающее приложение. Смотю сорцы, которые написал малчик.
guest,
11 Июня 2009
+150
private function _registerTag($id, $tag) {
$res = $this->_query("DELETE FROM TAG WHERE name='$tag' AND id='$id'");
$res = $this->_query("INSERT INTO tag (name, id) VALUES ('$tag', '$id')");
if (!$res) {
$this->_log("Zend_Cache_Backend_Sqlite::_registerTag() : impossible to register tag=$tag on id=$id");
return false;
}
return true;
}(с) zend framework @ Zend_Cache_Backend_Sqlite
guest,
11 Июня 2009
+73.2
/*
* когда-нибудь этот код будет смотреть другой программист
* так вот, если ты есть тот самый программист и надеюсь ты хороший программист,
* то если возникнут какие-то недопонятки, извиняй, старался писать код как-можно качественее
* но если несложно напиши мне(--------) если считаешь что код дерьмовый. я постараюсь его отрефакторить и объяснить тебе)
*
* маразм какой-то конечно написал), но мне просто интересно насколько качествен или дерьмов мой код).
* спс
*/думаю это надо постить на antigovnokod.ru, но к сожалению такого проекта еще нету. поэтому запостил строчки этого хорошего программиста сюда)
guest,
11 Июня 2009
+48.3
function save_config()
{
global $default_dbname;
global $PHP_SELF;
global $titolo1, $lblTitolo1, $titolo2, $lblTitolo2, $titolo3, $lblTitolo3;
global $titolo1_home, $titolo2_home, $titolo3_home, $desc1_home, $desc2_home, $desc3_home;
global $titolo1_maxchar, $titolo2_maxchar, $titolo3_maxchar;
global $desc1_maxchar, $desc2_maxchar, $desc3_maxchar;
global $desc1, $lblDesc1, $desc2, $lblDesc2, $desc3, $lblDesc3;
global $numero, $lblNumero, $data, $lblData, $datascad, $lblDatascad;
global $datascadhomeCheck, $lblDatascadhome;
global $datains, $lblDatains, $datamod, $lblDatamod, $link, $lblLink;
global $numero_home, $data_home, $datascad_home, $datains_home, $datamod_home;
global $homepage, $lblHomepage, $approvato, $lblApprovato;
global $idoperatore_ins, $lblIdoperatore_ins, $idoperatore_mod, $lblIdoperatore_mod;
global $tipo_salvataggio, $areanumber, $areanome, $areadettagli;
global $posizioneNumero, $posizioneData, $posizioneTitoloDesc, $posizioneDataIns, $posizioneDataMod;
global $area_visualizzazione, $area_home_column;
//variabili users
global $titolo1_users, $titolo2_users, $titolo3_users;
global $desc1_users, $desc2_users, $desc3_users;
global $numero_users, $data_users;
global $datascad_users, $homepage_users;
global $datains_users, $datamod_users, $link_users;
global $approvato_users, $idoperatore_ins_users, $idoperatore_mod_users;
global $area_tipologia, $idAreaGruppo, $altezzaRiquadroCompattoArea;
global $area_orderby, $area_sortby;
global $ut;
...........Поддерживаю один древний (лет 8 ему) проект. Вот кусок одной функции.
guest,
11 Июня 2009
Follow us!