- 1
http://foto.golden.ru/tags/%3cbr%3e%3ciframe%20src=http:%252F%252Fblogs.golden.ru%20width=800%20height=600%3e
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+132
http://foto.golden.ru/tags/%3cbr%3e%3ciframe%20src=http:%252F%252Fblogs.golden.ru%20width=800%20height=600%3e
Оказывается, говнокодить можно и в URL. Ещё бы javascript в эту строку воткнуть...
+132
oSqlStr[0, 12] = " '<DIV onclick=\"fShowWindow(''../ReglamSchemesDoc.aspx?code='+Cast(s1.n_pp AS VarChar(50))+''')\" align=\"center\"><img border=\"0\" src=\"../Image/sxemaRed.gif\"></DIV>'+CASE WHEN s1.s_reglament>'' THEN '<DIV onclick=\"fShowFile('''+Replace(Replace(s1.s_reglament,' ',''),';',''')\" align=\"center\"><img border=\"0\" src=\"../Image/sxema.gif\"></DIV><DIV onclick=\"fShowFile(''')+''')\" align=\"center\"><img border=\"0\" src=\"../Image/sxema.gif\"></DIV>' ELSE '' END ";
Однострочная каша из трёх языков
Взято отсюда...
http://www.aspnetmania.com/Forums/ForumMessage/336926.html
+132
<table width="500" height="10">
<td>
<br>
</tr>
</table>
Дипломная работа... no comments
+129
@echo off
if exist 3.txt del 3.txt
: begin
if "%1"=="" goto end
echo %1 >> 3.txt
copy 3.txt "%1" >4.txt
shift
goto begin
: end
dir *. /O-S /B
del *.
del 3.txt
del 4.txt
Batch файл под DOS, студенческое задание было: написать *.bat файл, который выводит список аргументов в обратном порядке, например, на команду foo.bat qwe sdf fgh ty должен быть ответ ty fgh sdf qwe. Как-то не додумался я прибавлять аргументы в обратном порядке. и придумал, как это сделать средствами бат файла.
+143
<img src="\rus\windows\internet-explorer\images\waterdrop_banner_887.jpg" height="380" width="958" />
Источник: http://www.microsoft.com/rus/windows/internet-explorer/welcome.aspx
Это полный комплект для интернета. Интернета, каким он нужен именно вам. Общение, информация и безопасность. Воспользуйтесь функциями Internet Explorer 8, чтобы создать свой интернет. ©
Сука.
+131
#include <default.inc>
var a:float=0.0;
var b:float=0.0;
var c:float=0.0;
var d:float=0.0;
var x1:float=0.0;
var x2:float=0.0;
::no
write 'Enter A: ';
in a;
write 'Enter B: ';
in b;
write 'Enter C: ';
in c;
write '$a*x^2+$b*x+c=0 [y/n]: ';
var s:string='';
string readline(s);
if eq(s, 'y') yes : no;
::yes
math d='b*b-4*a*c';
if eq(d, 0) dzero : dnzero;
if low(d, 0) dex;
::dzero
math x1='(-b)/(2*a)';
writeln 'X = $x1';
jump exit;
::dnzero
math x1='(-b+Math.sqrt(d))/(2*a)';
math x2='(-b-Math.sqrt(d))/(2*a)';
write 'X1 = $x1 X2 = $x2';
jump exit;
::dex
write 'Don`t exist!';
::exit
write 'Repeat? [y/n]';
string readline(s);
if eq(s, 'y') no;
write 'Bye!';
call readkey;
Программа развязывания квадратных уравнений на самодельном ЯП =)
Да, это не совсем ГК, но тем не менее смешно.
ЗЫ. В "default.inc" находятся ф-ции "write" и "readkey".
+121
<div onmouseover="this.style.cursor = 'pointer';" onmouseout="this.style.cursor = 'default';">
+130
//Сам скрипт
#!/bin/sh
cat /opt/chtag/truechars > /opt/chtag/tf
printf " $1@" >> /opt/chtag/tf
mp3info -p "%t" "$1">> /opt/chtag/tf
/opt/chtag/a.out < /opt/chtag/tf > /opt/chtag/t3
sh /opt/chtag/t3
//truechars
абвгдеёжзийклмнопрстуфхцчшщьыъэюяАБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЬЫЪЭЮЯ
//Исходники a.out
#include <iostream>
using namespace std;
int main()
{
int i,j;
string name,s,as="",truec;
cin >> truec;
cin >> s;
while(!cin.eof()) {as+=" "+s; cin >> s;}
name=as.substr(1,as.find("@",0)-1);
as=as.substr(as.find("'")+1);
for(i=0; i<truec.size(); i++)
{
if(as.find(truec[i],0)<truec.size())
{
cout << "printf \"" << name << " OK!\\n\"" << endl;
return 0;
}
}
cout << "printf \""<<name<<"\\'s tags will be changed...\\nBefore\\n\";\n"
"mp3info \""<< name << "\";\n"
"mid3iconv -e CP1251 -d --remove-v1 \""<< name << "\";\n"
"printf \"Now\\n\"\nmp3info \"" << name << "\""
<< endl;
return 0;
}
Вообще должен кодировку в русских тэгах в mp3 нормальной делать...
+137
function random return float is
variable X : float;
begin
return X;
end function random ;
Вот такую реализацию функции random посоветовали на одном VHDL форуме. :D
+144
if if = then then
then = else;
else else = if;
Следующий фрагмент вполне допустим при программировании на PL/1, но написать такое может только идиот со справкой. "Совершенный код" (c)