Куча — Говнокод.ру

Куча / Говнокод #3204

+131

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

#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".

FMB, 12 Мая 2010

Комментарии (20)

Куча / Говнокод #3155

+130

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

//Сам скрипт
#!/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 нормальной делать...

Tanger, 04 Мая 2010

Комментарии (3)

Куча / Говнокод #3152

+137

1
2
3
4
5

function random return float is
       variable X : float;
  begin
       return X;
  end function random ;

Вот такую реализацию функции random посоветовали на одном VHDL форуме. :D

Говногость, 03 Мая 2010

Комментарии (18)

Куча / Говнокод #3121

+144

1
2
3

if if = then then
    then = else;
else else = if;

Следующий фрагмент вполне допустим при программировании на PL/1, но написать такое может только идиот со справкой. "Совершенный код" (c)

freakru, 27 Апреля 2010

Комментарии (23)

Куча / Говнокод #3113

+143

1

!<>

Просто очень короткий говнокод:
Читается как не больше и не меньше.
Конечно, выдумано, но тем не менее :)

wvxvw, 26 Апреля 2010

Комментарии (9)

Куча / Говнокод #3044

+133.8

1
2
3

Продолжение обсуждения Говнокод #3028

Предлагаю перейти сюда, а то каментов тонна.

Продолжение обсуждения Говнокод #3028

А то каментов скопилось.

Предлагаю премодерацию переложить на плечи тех, кто постит.
Выложил говно -- проследи, чтобы обсуждение было на уровне.

Отдельно на должности модеров, я думаю, народ не пойдет. Это отнимает много времени и сил.
Тем более ГдеЗдесьСиПлюсПлюсеры не дремлют.

Если постер будет излишне необъективен и будет выпиливать любую критику, то его ветка просто будет уныла.
Ведь при наличии хорошего диалога в каментах, даже из неоднозначного поста получается годная вещь.

Для гестов можно ввести ограничение по количеству каментов в сутки, следить по IP, хотя этот метод не лишен недостатков.
Или установить вырвиглазную капчу. Шутка. :))

mrbig66, 19 Апреля 2010

Комментарии (128)

Куча / Говнокод #3035

+61.2

1

border: yes!;

найдено в css :-\

guеst, 18 Апреля 2010

Комментарии (16)

Куча / Говнокод #3028

+78.4

Мне немногозначно дали понять, что анонимы всех достали. Пишут в почту, в icq, в реформал и даже смски шлют.
Проект уже вырос из того нежного возраста, когда его судьбу мог решать я сам. Посему предлагаю обсудить сложившуюся ситуацию и прийти к соглашению, выпиливать ли анонимов или оставлять.

striker, 17 Апреля 2010

Комментарии (288)

Куча / Говнокод #2987

+130.8

1

^.*rutor\.org\/(?:(?:torrent)|(?:download))\/(\d*)\/?.*

govnoacc, 11 Апреля 2010

Комментарии (19)

Говнокод: по колено в коде.