- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
for i:=1 to 100 do
begin
for j:=1 to f do
begin
...
end;
f:=f+1000;
end;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+93
for i:=1 to 100 do
begin
for j:=1 to f do
begin
...
end;
f:=f+1000;
end;
Бедные дельфины, им не повезло с циклами.
+153
this.exec = function(code,op){
op = op || 0;
for(cp=0;cp<code.length;cp++){
if(code[cp]=='op'){this.stack.push(op)}
else if(code[cp].isNumber){this.stack.push(parseFloat(code[cp]))}
else if(this.vars[code[cp]] != undefined){this.stack.push(this.vars[code[cp]])}
else if(this.refs[code[cp]] != undefined){this.call(code[cp])}
else if(this.mathOp.oneOf(code[cp])){this.mathOp(code[cp])}
else if(code[cp] == '->'){cp++;this.vars[code[cp]]=this.stack.pop();}
}
}
Еще один говнокод из моего известного некоторым особо внимательным личностям проекта
+141
static int16_t have_upper_dot(cell *c)
{
cell *cc;
int16_t H;
H=my_bases.ps;
cc=c->prev;
if ((cc->flg & c_f_dust) &&
(c->w>4 && cc->h>=2 && cc->w>=2 &&
(abs(cc->h-cc->w)<=H/6 || cc->h<cc->w && cc->w-cc->h<=H/4) &&
cc->col+1>=c->col && cc->col+cc->w-5<=c->col+c->w ||
c->w<=4 && abs(c->col-cc->col+(c->w-cc->w)/2)<=2) &&
cc->row+cc->h-2<=my_bases.b2)
return 1;
cc=c->next;
if ((cc->flg & c_f_dust) &&
(c->w>4 && cc->h>=2 && cc->w>=2 &&
(abs(cc->h-cc->w)<=H/6 || cc->h<cc->w && cc->w-cc->h<=H/4) &&
cc->col+1>=c->col && cc->col+cc->w-5<=c->col+c->w ||
c->w<=4 && abs(c->col-cc->col+(c->w-cc->w)/2)<=2) &&
cc->row+cc->h-2<=my_bases.b2)
return 1;
return 0;
}
Из одной OCR программы.
+179
eval(file_get_contents("../myClass.php"));
Интересно, он подозревает о существовании функции include ?
+147
int count(int a)
{
int cnt=0;
while(a)
{
++cnt;
}
return cnt;
}
Ф-ция для подсчета количества знаков числа. Взято с www.cyberforum.ru
+127
if ((textBox2.Text != "") && (textBox3.Text != "") && (Convert.ToInt32(textBox2.Text) < Convert.ToInt32(textBox3.Text)))
{
int наименование = 0;
string несозданы = null;
int количество = 0;
bool накладнаясоздана = false;
int накладная = 0;
наименование = Convert.ToInt32(comboBox1.SelectedValue);
string наименованиест = наименование.ToString();
for (int i = Convert.ToInt32(textBox2.Text); i < Convert.ToInt32(textBox3.Text) + 1; i++)
{
bool одинаково = false;
foreach (СкладDataSet.ПоступлениеRow row in складDataSet.Поступление.Rows)
{
if ((i == row.__) && (наименованиест == row.Наименование))
{
одинаково = true;
несозданы += " " + i.ToString();
yes = 2;
}
}
if (одинаково == false)
{
складDataSet.Состояние.AddСостояниеRow(наименование.ToString(), i.ToString(), "2", "1", "");
if (накладнаясоздана == false)
{
поступлениесписокTableAdapter.Insert(Convert.ToDateTime(dateTimePicker1.Text).ToString(), наименование, "000", richTextBox1.Text);
поступлениесписокTableAdapter.Fill(складDataSet.Поступлениесписок);
накладнаясоздана = true;
foreach (СкладDataSet.ПоступлениесписокRow row in складDataSet.Поступлениесписок.Rows)
{ if (накладная <= row.Код) накладная = row.Код; }
}
поступлениеTableAdapter.Insert(наименование, i, накладная.ToString());
количество = количество + 1;
}
}
поступлениесписокTableAdapter.Update(Convert.ToDateTime(dateTimePicker1.Text).ToString(), наименование, количество.ToString(), richTextBox1.Text, накладная, Convert.ToDateTime(dateTimePicker1.Text).ToString(), наименование, "000", richTextBox1.Text);
if (yes == 2)
MessageBox.Show(comboBox1.Text + " - " + несозданы + " не созданы т.к. существуют в базе", "Не созданы...", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
Close();
}
else
MessageBox.Show("Поле пустое, введите номер прибора!!!", "Внимательнее!", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
на готдотнете видел один чел вопрос задавал: http://www.gotdotnet.ru/forums/3/133079/
автору там намекали, что хорошо было бы, чтоб он переделал код, но автор глубоко забил
+146
<?$APPLICATION->IncludeComponent("bitrix:system.auth.form","",Array(
"REGISTER_URL" => "register.php",
"PROFILE_URL" => "profile.php"
"SHOW_ERRORS" => "Y"
)
);?>
Этот код из официальной документации Битрикса.
Обратите внимание перечисление в массиве.
Ох уж этот удивительный Битрискс... xD
+106
procedure FirstStep (var Text: string);
// Удаление комментариев <!--...-->, переводов строк, раскрытие тегов <br>, удаление парных пробелов:
var
P: Integer;
State: Integer;
Idx: Integer;
Cnt: Integer;
NL: Boolean;
begin
State := 0;
P := 1;
NL := True;
while P <= Length (Text) do
begin
if Text[P] in [#9,#10,#13] then Text[P] := ' ';
case State of
0: case Text[P] of
'<': State := 1;
' ': begin
Idx := P;
State := 9;
end; { }
else NL := False;
end; {case}
1: case Text[P] of
'!': State := 2;
'b': State := 7;
else
begin
Dec (P);
State := 10;
end; {else}
end; {case}
2: if Text[P] <> '-' then
begin
Dec (P);
State := 10;
end else State := 3;
3: if Text[P] = '-' then
begin
Idx := P - 3;
State := 4;
end else
begin
Dec (P);
State := 10;
end; {if}
4: if Text[P] = '-' then State := 5;
5: if Text[P] = '-' then State := 6 else State := 4;
6: if Text[P] = '>' then
begin
Delete (Text, Idx, P - Idx + 1);
P := Idx - 1;
while (P >= 1) and (Text[P] = ' ') do Dec (P);
State := 0;
end else State := 4;
7: if Text[P] = 'r' then State := 8 else State := 0;
8: begin
if Text[P] = '>' then
begin
Text[P-3] := #13;
Text[P-2] := #10;
Delete (Text, P - 1, 2);
Dec (P, 2);
NL := True;
end; {if}
State := 0;
end; {8}
9: if Text[P] <> ' ' then
begin
Cnt := P - Idx;
if NL then
begin
Delete (Text, Idx, Cnt);
Dec (Idx);
end else if Cnt > 1 then Delete (Text, Idx, Cnt - 1);
P := Idx;
State := 0;
end; {if}
10: if Text[P] = '>' then State := 0;
end; {case}
Inc (P);
end; {while}
end; {proc FirstStep}
Кусок парсера HTML.
−110
//Assert.h
#import <Foundation/Foundation.h>
@interface Assert : NSObject {
}
+(void)that:(BOOL)expr;
@end
//Assert.m
#import "Assert.h"
@implementation Assert
+(void)that:(BOOL)expr{
if (!expr) {
[NSException raise:@"Failed assertion." format:@"something is fundamentally wrong with the universe", nil];
}
}
@end
//Code.m
#import "Assert.h"
int main (int argc, const char * argv[]) {
NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init];
[Assert that:((6 * 9) == 42)];
...
[pool drain];
return 0;
}
+168
if(x>=900&&x<1000)
{
std::cout<<"DCCCC";
if(x==901)
std::cout<<"I";
else if(x==902)
std::cout<<"II";
else if(x==903)
std::cout<<"III";
else if(x==904)
std::cout<<"IV";
else if(x==905)
std::cout<<"V";
else if(x==906)
std::cout<<"VI";
else if(x==907)
std::cout<<"VII";
else if(x==908)
std::cout<<"VIII";
else if(x==909)
std::cout<<"IX";
if(x==910)
{
std::cout<<"X";
if(x==911)
std::cout<<"I";
else if(x==912)
std::cout<<"II";
else if(x==913)
std::cout<<"III";
else if(x==914)
std::cout<<"IV";
else if(x==915)
std::cout<<"V";
else if(x==916)
std::cout<<"VI";
else if(x==917)
std::cout<<"VII";
else if(x==918)
std::cout<<"VIII";
else if(x==919)
std::cout<<"IX";
}
else if(x==920)
{
std::cout<<"XX";
if(x==921)
std::cout<<"I";
else if(x==922)
std::cout<<"II";
else if(x==923)
std::cout<<"III";
else if(x==924)
std::cout<<"IV";
else if(x==925)
std::cout<<"V";
else if(x==926)
std::cout<<"VI";
else if(x==927)
std::cout<<"VII";
else if(x==928)
std::cout<<"VIII";
else if(x==929)
std::cout<<"IX";
}
//
Перевод числа <1000 в римские цифры... Единственное, что пришло в голову с утра, тупо перебор всех значений. Соответственно так весь код. Это полный 3.14здец?