Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+93.9
SetTime(0,0,0,0); {засекаем время, т.е. устанавливаем системное время равным
0 ч 0 мин 0.00 сек }
{NumDist - число расматриваемых расстояний
i - индекс элемента массива расстояний,
количество групп всегда равно расстоянию d,
CurGroup - номер сортируемой группы}
For i:=1 to NumDist do
begin
d:=dist[i];
For CurGroup:=1 to d do
InsertSort(d,CurGroup);
end;
GetTime(hour,minute,second,hund); {Получаем время сортировки}
Говнокод для измерения времени работы алгоритма.
Источник - http://ru.wikipedia.org/wiki/%D0%A1%D0%BE%D1%80%D1%82%D0%B8%D1%80%D0% BE%D0%B2%D0%BA%D0%B0_%D0%A8%D0%B5%D0%BB% D0%BB%D0%B0
В лучших индусских традициях, виват!
guest,
01 Июня 2009
−13.1
void Example5 (Scoord_t* coord, double data [], int size)
{
int i = 0;
while (i < size)
{
assert (0<= i && i < size);
if (i == 0) {data [i] = 1;}
if (i == 1) {data [i] = 2;}
if (i == 2) {data [i] = 3;}
if (i > 2 && i <=size/2) {data [i] = data [i - 3] + 6;}
if (i == size/ 2) {data [i] = data [i - 1] + 3;}
if (i == size/2 + 1) {data [i] = data [i - 1] - 1;}
if (i == size/2 + 2) {data [i] = data [i - 1] - 1;}
if (i > size/2 + 2) {data [i] = data [i - 3] - 6;}
Print (data, i);
i++;
}
}Просматривал свои старенькие функции... Не мог удержаться
guest,
28 Мая 2009
+149.8
// how high?
var yesman = function(){ return true; };Случайно обнаружил в исходнике AJAX фреймворка Dojo :)
guest,
15 Мая 2009
+141.5
<?
class Sistem_Debuger implements Sistem_Debuger_Intarface {
protected $zhopa=array();
/* ... */
function AddZhopa($msg,$type){
$this->zhopa[]=$type.':'.$msg;
}
function ShoZaNax(){
if(!empty($this->zhopa)){
print "<pre>Админ, если ты это читаешь - тебе жопа!!\r\n";
print implode("\r\n",$this->zhopa);
print "</pre>";
die();
}
return false;
}
/* ... */
}
?>поёт прям
guest,
15 Мая 2009
−35.3
bool Update(float dt) // ага, вот так вот жестоко мы постепенно приведём всё к нормальным coding conventions ^_^
{
return update(dt);
}
bool update(float dt) // теперь возвращает true если value изменилось и false если нет
{
//bla-bla-blaжестокое решение code standart'a
guest,
15 Мая 2009
+103.8
if (intVal($arSection["PICTURE"]) <= 0 ? true : false)
guest,
13 Мая 2009
+100.3
procedure TShemaForm.T1Timer(Sender: TObject);
begin
ShemaForm.Visible:=true;
ShemaForm.AlphaBlend:=true;
T1.Enabled:=false;
ShemaForm.AlphaBlendValue:=20;
T2.Enabled:=true;
end;
procedure TShemaForm.T2Timer(Sender: TObject);
begin
T2.Enabled:=false;
ShemaForm.AlphaBlendValue:=50;
T3.Enabled:=true;
end;
procedure TShemaForm.T3Timer(Sender: TObject);
begin
T3.Enabled:=false;
ShemaForm.AlphaBlendValue:=100;
T4.Enabled:=true;
end;
procedure TShemaForm.T4Timer(Sender: TObject);
begin
T4.Enabled:=false;
ShemaForm.AlphaBlendValue:=150;
T5.Enabled:=true;
end;
procedure TShemaForm.T5Timer(Sender: TObject);
begin
T5.Enabled:=false;
ShemaForm.AlphaBlendValue:=200;
T6.Enabled:=true;
end;
procedure TShemaForm.T6Timer(Sender: TObject);
begin
T6.Enabled:=false;
ShemaForm.AlphaBlendValue:=255;
ShemaForm.AlphaBlend:=false;
ShemaForm.SetFocus;
MaForm.ShemaB.BevelWidth:=2;
MaForm.ShemaB.Color:=$00C08080;
end;Дипломный проект. Реализация плавного появления окна. На плавное исчезновение еще 6 таймеров
guest,
06 Мая 2009
+149.2
function removeContent( &$cid, $sectionid, $option ) {
...
$state = '-2';
$ordering = '0';
//seperate contentids
mosArrayToInts( $cid );
$cids = 'id=' . implode( ' OR id=', $cid );
$query = "UPDATE #__content"
. "\n SET state = " . (int) $state . ", ordering = " . (int) $ordering
. "\n WHERE ( $cids )"
;
$database->setQuery( $query );
...
}Взято из администрирования статичного контента CMS Joomla! 1.0.x. Забавно ребята приводят к целому типу только что собственноручно объявленные строкой переменные =)
guest,
04 Мая 2009
+153
TSearchRec sr;
if(FindFirst(Dir+"\\"+mask,iattr,sr)==0)
{
do
{
AnsiString Processes=Dir+"\\"+sr.Name;
//куча кода
AnsiString newName=sr.Name;
//еще код
AnsiString TmpFile=Dir+"\\"+newName;
if(RenameFile(Processes,TmpFile))
{
...
}
{
...
continue;
}
}while(FindNext(sr)==0);
}И почему программа "виснет"? Это в клиенте платежной системы... Рыдаю... (стр. 19)
guest,
30 Апреля 2009
+137
<html>
<head>
<title>Сибирский Джинсовый центр - джинсы и трикотаж оптом в Новосибирске</title>
</head>
<body>
<H1 ALIGN="center"><B>Компания СДц - более 1500 позиций фирменной джинсовой одежды на складе, поставки новых коллекций из Турции по предзаказу, франчайзинговая сеть брендовых магазинов по всей Сибири</B></H1>
Сибирский Джинсовый центр – один из крупнейших в Сибири поставщиков джинсов оптом, зимнего и летнего трикотажа, а также верхней одежды и сопутствующих аксессуаров. Компания является единственным официальным представителем в Сибирском регионе производителей модных женских и мужских джинсов VIGOSS, DLF, ENRICO BELENO, а также предлагает молодежную джинсовую одежду торговых марок Timezone, URBANO, BLKjeans со склада в Новосибирске.</body>
<DIV ALIGN="center">
<TABLE>
<TR>
<TD><img src="http://www.jeanscom.ru/collections/vig_autumn_winter_2008/2_small.jpg"></TD> <TD><img src="http://www.jeanscom.ru/collections/vig_autumn_winter_2008/2_small.jpg">
</TR>
<TR>
<TD><img src="http://www.jeanscom.ru/collections/vig_autumn_winter_2008/2_small.jpg"></TD> <TD><img src="http://www.jeanscom.ru/collections/vig_autumn_winter_2008/3_small.jpg"></TD>
</TR>
</TABLE>oo
guest,
29 Апреля 2009
Follow us!