Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+188
<?php
...
$Sex = $_POST['sex']; //Пол юзера из поискового запроса
$searchSex = $_POST['searchsex']; //Пол искомого партнёра
...
if ($Sex == $searchSex) //Осторожно, педерасты!
{
...
//Вывод капчи
...
}
?>Из написанного знакомым движка для сайта знакомств. Комментарии оригинала.
vistefan,
29 Января 2012
+997
vector<string> task(vector<string> words, string abbrev)
{
vector<string> results;
int index = 0;
while (index < words.size())
{
bool t = true;
string result = "";
for (int i = 0; i < abbrev.size(); i++)
{
if ( (index+i)<words.size() )
{
if (words[index+i][0] == abbrev[i])
{
result+=words[index+i]+" ";
}
else
{
t = false;
break;
}
}
else t = false;
}
if (t) results.push_back(result);
index++;
}
return results;
}Поиск всех возможных расшифровок аббревиатуры в векторе строк. И пофиг что существует алгоритм search.
Stanislaw374,
05 Ноября 2011
+137
xxx: Скажите пожалуйста нубоюзеру, как в сишарпе извлечь корень определённой степени?
yyy: http://msdn.microsoft.com/ru-ru/library/system.math.sqrt.aspx (Math.Sqrt, Возвращает квадратный корень из указанного числа.)
xxx: Спасибо, но желательно бы не только >квадратный< корень, но и заданной степени.
yyy: Делай через циклы или рекурсивно.
double SuperSquare(double number, int n)
{
double result = number;
for(int i = 0; i < n; i++)
{
result = Math.Sqrt(result)
}
return result;
}
// Както такИнновационный способ вычислять корень заданной степени.
flawy,
23 Августа 2011
+168
if ((!IsForum() && $url[0] != 'underwater-video' && $end_element !='diveclan' && $end_element !='partners') || ($url[0] != 'underwater-photo' && sizeof($url)==1))
if ($url[0]!='atlas-uw-photo' && !empty($title) && $end_element!='diving-guide' && $end_element!='atlas-wrecks' && $end_element!='atlas-deep' && $end_element!='atlas-caves' && $end_element!='sea-inhabitants')
if ($APPLICATION->GetCurPage()!='/underwater-video/mygallery.php' && $APPLICATION->GetCurPage()!='/underwater-video/add.php' && $APPLICATION->GetCurPage()!='/atlas_update/travel_add/index.php')
if ($url[0] != 'diving-media' && $url[0] != 'underwater-photo')
$APPLICATION->SetTitle($title);Унифицированный костыль тайтлов на битриксе. Это лежит во вкл области, которая цепояется после </html>
atarix12,
16 Августа 2011
+96
Assign(F, FileName);
IOResult;
Reset(F);
if IOResult = 0 then begin
for i := 0 to MaxModelNamesCount-1 do ModelKind[i] := mkVagon;
Result := True;
BlockRead(F, W, 2);
if W = OldWDim then begin // старый формат
// 20 строк пропущено
end else if W = WDim then begin // новый формат
BlockRead(F, FormatVersion, 4); // версия нового формата
if FormatVersion <= 4 then begin
BlockRead(F, EditorDate, 4);
BlockRead(F, C, 4);
LCount := C;
for i := 0 to LCount - 1 do begin
BlockReadLine(F, Lines[i], 16);
if (FormatVersion <= 2) and (Lines[i].Attr[3] and $0F = 5) then Lines[i].Attr[0] := 0
else if (Lines[i].Attr[3] and $0F = k3DObject) then ModelKind[Lines[i].IntAttr[1]] := mkStatic;
end;
if FormatVersion <= 1 then begin
ModelNamesCount := 8; // для 1й версии список жёстко задан
ModelNames[0] := 'ГЗРВ-10';
ModelNames[1] := 'ГЗРВ-10М';
ModelNames[2] := 'КТМ-5М3';
ModelNames[3] := 'ЛМ-68';
ModelNames[4] := 'ЛМ-68М';
ModelNames[5] := 'ЛМ-68ММ';
ModelNames[6] := 'ЛВС-86';
ModelNames[7] := 'ЛВС-97';
for i := 8 to MaxModelNamesCount-1 do ModelNames[i] := '';
end else if FormatVersion <= 3 then begin
ModelNamesCount := 0;
for i := 0 to 255 do begin
j := 0;
BlockRead(F, j, 1);
SetLength(ModelNames[i], j);
for j := 1 to Length(ModelNames[i]) do Read(F, byte(ModelNames[i, j]));
if ModelNames[i] <> '' then Inc(ModelNamesCount);
end;
end else begin
BlockRead(F, ModelNamesCount, 4); // кол-во моделей
for i := 0 to MaxModelNamesCount - 1 do ModelNames[i] := '';
for i := 0 to ModelNamesCount-1 do begin
BlockRead(F, k, 4); // номер считываемой модели
j := 0;
BlockRead(F, j, 1); // длина имени, не более 255
SetLength(ModelNames[k], j);
for j := 1 to Length(ModelNames[k]) do Read(F, byte(ModelNames[k, j]));
end;
end;
for i := 0 to 8 do
for j := 0 to 12 + Byte(FormatVersion >= 2) do with Routes[i, j] do begin
BlockRead(F, PCount, 2);
SetAllowedModels(Routes[i,j], 0, -1);
if FormatVersion <= 1 then begin
BS := [];
BlockRead(F, BS, 4);
AllowedModelsCount := 0;
for k := 0 to 255 do if k in BS then begin
Inc(AllowedModelsCount);
AllowedModels[k] := True;
end;
end else if FormatVersion <= 3 then begin
BlockRead(F, BS, 32);
AllowedModelsCount := 0;
for k := 0 to 255 do if k in BS then begin
Inc(AllowedModelsCount);
AllowedModels[k] := True;
end;
end else begin
BlockRead(F, AllowedModelsCount, 4);
for k := 0 to AllowedModelsCount-1 do begin
BlockRead(F, n, 4); // номер модели
AllowedModels[n] := True;
end;
end;
for k := 0 to PCount - 1 do begin
if FormatVersion >= 3 then BlockRead(F, c, 4)
else begin
c := 0;
BlockRead(F, c, 2);
end;
Points[k] := c;
end;
BlockRead(F, DefVagons, 1);
SpeedRoute := boolean(DefVagons shr 4);
DefVagons := DefVagons and $0F;
BlockRead(F, Interval, 1);
end;
end else Result := False;
end else Result := False;
Close(F);
Короче, лапша из if FormatVesion такой-то...
Обратная совместимость формата файла.
Формату уже 4 года.
TarasB,
05 Июня 2011
+167
include 'function_uvorot.php';
include 'function_block.php';
include 'function_udara_krit.php';
function goodatack ($n,$zona_udara,$zona_blocka,$krit,$anti_krit,$uvorot,$anti_uvorot)
{
if ($uvorot>$anti_uvorot) // Опредиляем присудствует ли увертывание.
{
echo $text=uvorot ($n,$zona_udara); // функция перещета уворота
}
else
{
if ($zona_udara==$zona_blocka) // Опредиляем не заблокирован ли удар
{
echo $text=zablokirovan1 ($n,$zona_blocka,$krit,$anti_krit); //функцыя блока удара
$_SESSION[$n]+=$uron;
}Это не я)
GogaF,
05 Мая 2011
−101
test_lever.listen_to_me_bro(null); // nothing to be saidмолчание и безжизненный взгляд
strike_neko_squad,
26 Апреля 2011
+166
void СSomeClass::InternalRemovePath( QString qsPath, int pUIModule )
{
QProgressDialog * pDlg = (QProgressDialog *)pUIModule;
...................
}
.......................
void someFunction ()
{
..................
QProgressDialog * pProgress = NULL;
pProgress = new QProgressDialog( QObject::tr( "Deleting...") , QObject::tr( "Abort" ), 0, nTotal, NULL );
InternalRemovePath( qsPath , (int) pProgress );
..................
}
И по коду таких вещей (приведение указателей к int при передаче в функции) очень много. Пока собрал проект, задолбался.
Интересно, что автор курил? Хотя, нет - тут уже что-то потяжелее.
panter_dsd,
23 Марта 2011
+181
int maxOf5(int a, int b, int c, int d, int e) {
int arr[5];
arr[0] = a;
arr[1] = b;
arr[2] = c;
arr[3] = d;
arr[4] = e;
bubbleSort(&arr, 5);
return arr[0];
}no comments...
wh_,
22 Декабря 2010
+145
<?
// Функция для того, чтобы иЗ***оВаТь текст
$str = 'бросайте вы корявить текст';
function koryavka ($t){
$c = strlen($t);
for($i=0;$i<$c;$i++) {
$t[$i] = (is_int($i/2)) ? strtoupper($t[$i]) : $t[$i];
$ret[] = $t[$i];
}
return implode('',$ret);
}
echo koryavka ($str);
?>
Aligan,
01 Декабря 2010
Follow us!