- 1
- 2
- 3
- 4
- 5
If bd12tc->mes!=num_month
st_mes=num_month
Else
st_mes=bd12tc->mes
EndIf
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+97
If bd12tc->mes!=num_month
st_mes=num_month
Else
st_mes=bd12tc->mes
EndIf
Clipper
Перевожу на работе старую программку (писалась больше 12 лет назад) в Delphi, нашёл вот такое
+138
//
switch (cwin->cpref->shuffle) {
case TRUE:
last = g_list_last(cwin->cstate->rand_track_refs);
if ((!cwin->cstate->curr_rand_ref) || (last && (cwin->cstate->curr_rand_ref == last->data))){
path = get_next_unplayed_random_track(cwin);
if (!path)
rand_unplayed = TRUE;
}
else path = get_next_random_ref_track(cwin);
break;
case FALSE:
path = get_next_sequential_track(cwin);
if (!path) seq_last = TRUE;
break;
default:
break;
}
буль...
+100
procedure interpretation;
var
s,f:string;
i,m,v:integer;
begin
s:=#0;
for I:=0 to form9.Memo2.Lines.Count-1 do begin
s:=form9.Memo2.Lines.Strings[i];//ïðîñìîòð ñòðîê èäåò
//ñâåðõó âíèç
if s='hex' then hex;
if s='acsii' then acsii;
if (s[1]='a') and (s[2]='d') and (s[3]='d') then begin
form9.Edit6.Text:=s[5];
form9.Edit5.Text:=s[7];
peredsim;
end;
if (s[1]='s') and (s[2]='a') and (s[3]='m') then begin
form9.Edit2.Text:=s[5];
form9.Edit4.Text:=s[7];
samsimbyl;
end;
if (s[1]='d') and (s[2]='e') and (s[3]='l') then begin
form9.Edit3.Text:=s[5];
for v:=1 to length(s) do
deletesimbyl;
end;
if (s[1]='d') and (s[2]='e') and (s[3]='l') and (s[4]='s') then begin
form9.Edit3.Text:=s[6];
dels;
end;
if (s[1]='i') and (s[2]='n') and (s[3]='f') then begin
form9.Memo1.Text:=s[5]+form9.Memo1.Text;
end;
if (s[1]='f') and (s[2]='n') and (s[3]='i') then begin
form9.Memo1.Text:=form9.Memo1.Text+s[5];
end;
if (s[1]='p') and (s[2]='h') and (s[3]='e') then RapsrRedel;
if (s[1]='n') and (s[2]='a') and (s[3]='b') then PerstNO;
if (s[1]='a') and (s[2]='t') and (s[3]='s') then acsiitosim;
if (s[1]='h') and (s[2]='t') and (s[3]='s') then hextosim;
if (s[1]='h') and (s[2]='t') and (s[3]='a') then hextoacsii;
if (s[1]='a') and (s[2]='t') and (s[3]='h') then acsiitohex;
end;
end;
Нужно было быстро накодить интерпретатор, которым никто пользоваться не будет, кроме собственно автора программы, для создания простеньких скриптов (сами понимаете семантический анализатор писать, в данном случае не улыбалось). Потому получился такой МегОАдЪовый говнокод!
+71
Calendar calendar = new GregorianCalendar();
calendar.setTime(new Date(System.currentTimeMillis()));
+155
var d = new Date();
dom = d.getDate();
month = d.getMonth();
year = d.getYear();
if (year < 2000) year = year - 100;
else year = year - 2000;
if (year == 12 && month == 3)
days = 26 - dom;
else
days = 0;
if (days < 0) days = 0;
if (days < 10) days = '0' + days.toString();
var base = 'http://ubuntu.ru/media/countdown/1204_1/';
document.write('<a href="http://ubuntu.ru/"><img id="countdownimage" src="'+base+days+'.png" width="180" height="150" border="0" alt="Ubuntu 12.04 LTS" title="Ubuntu 12.04 LTS - Уже скоро!"></a>');
//document.write('<a href="http://ubuntu.ru/get"><img id="countdownimage" src="'+base+'here.png" width="180" height="150" border="0" alt="Ubuntu 12.04 LTS" title="Ubuntu 12.04 LTS - Уже здесь!"></a>');
http://ubuntu.ru/media/countdown/display.js
+72
String displayName = report.getDisplayName();
displayName.replace(
this.periodStartDateParamName,
this.getPeriodStartDateStr() );
displayName.replace(
this.getPeriodEndDateParamName(),
this.getPeriodEndDateStr() );
report.setDisplayName( displayName );
Имитация бурной деятельности по замене подстрок.
+152
function sendForm() {
var checksrole = document.getElementsByName("role");
var i = 0, f = 0;
while (f == 0 && i < checksrole.length) {
if (checksrole[i].checked == true) {
f = 1;
}
i++;
}
if (f == 0) {
WindowUtils.popUpDialog("Пожалуйста, выберите роль пользователя", "WARN");
return false;
}
return true;
}
Автор не догадывается о существовании типа boolean, о говорящих именах функций, о досрочном выходе из цикла и о возможностях используемых фреймворков (на странице использованы одновременно YUI - для вывода окна сообщения и Prototype - для отправки AJAX-запроса).
+117
static double E( double epsilon )
{
int n = 1, nf = 1;
double e = 0;
while (Math.Abs(e - Math.E) > epsilon)
{
e += 1.0 / nf;
nf *= n;
n++;
}
return e;
}
Вычисление числа e как суммы обратных факториалов. По мотивам реальных событий.
+153
<option value="0"
<?
if($_SESSION['ttype'] == 0){ echo "SELECTED"; }
echo ">Подключение\n<option value=\"0last\" ";
if($_SESSION['ttype'] == '0last'){ echo "SELECTED"; }
echo ">История - Подключение\n<option value=\"1\" ";
if($_SESSION['ttype'] == 1){ echo "SELECTED"; }
echo ">Саппорт\n<option value=\"1last\" ";
if($_SESSION['ttype'] == '1last'){ echo "SELECTED"; }
echo ">История - саппорт\n<option value=\"all\" ";
if($_SESSION['ttype'] == 'all'){ echo "SELECTED"; }
?>
>Все
</select>
Вывод селекта для выбора типа заявки. 0.001% сочно наговнокоженного проекта
+114
if (FindNumber.Text.Length > 0)
{
string Num = FindNumber.Text;
FindNom FN=new FindNom();
Num = FN.ReplFindNumer(Num);
if (Num != null && Num.Length > 0)
{
StringBuilder sb = new StringBuilder(Num.Length);
foreach (char c in Num)
{
if (Char.IsControl(c) == true)
continue;
sb.Append(c);
}
Num = sb.ToString();
}
я пришел работать в фирму на развитие проекта интернет магазина, в ней уже работает программист, работает 6 лет!
я открыл его код и увидел ЭТО. причем чувак щеки от важности раздувает