Programming Battle [Конкурс]

Как и обещал в выше упомянутой теме: Я организовываю конкурс ​

Суть проста:
Вы должны накодить любой смешной, интересный код на одном или нескольких языках:
1. PHP
2. Delphi
3. C++

Оценивается чувство юмора автора и идея реализации
Постить только новые и уникальные программные коды.
Плагиат запрещен!

Конкурс будет длиться 1 неделю.

Призы: 6 знак и 5$ от меня.
А модераторы там думаю решат кого отблагодарить ^_^

-------------------------------------------------
От меня:

PHP:

<?php
if ('2' + '2' == '5') {
echo "Ах*еть можна! о_О";
} else {
echo "Ах*еть нельзя.. =(";
}
?>

 

Ну там как-бы основные (для понимание лёгкие). В принципе пости, ток чтобы понятно для народа было

надо запостить программку, скрипт который будет выглядеть как анекдот/прикол

 

флешку можно сделать какуюто про ачат?
______________________________________
щас на пихе что-то набросаю

 

Не понял условия конкурса.
Нужна прикольная программа или прикольный код?

 

Ну вот собственно код, который если скомпилировать будет программой

Code:

var
time,money,girl:byte;
label st;
begin
time:=1;
money:=0;
girl:=0;
st:
label1.Caption:='Время '+IntToStr(time);form1.Repaint; sleep(500);
if time>0 then money:=money+1 else money:=money-1;
label2.Caption:='Деньги '+IntToStr(money);form1.Repaint; sleep(500);
if money>0 then girl:=girl+1 else girl:=girl-1;
label3.Caption:='Девушки '+IntToStr(girl);form1.Repaint; sleep(500);
if girl>0 then time:=time-1 else time:=time+1;
goto st;
end;

Показывает круговорот вещей в нашей жизни,
есть время значит зарабатываем деньги ,
есть деньги появились девушки,
появились девушки пропало время,
пропало время пропали деньги,
пропали деньги пропали девушки,
пропали девушки появилось время

Так вот если убрать девушек из этого цикла (второе условие в коде) то были бы суперМегабогатыми .

 

PHP:

<?
echo 'Hello world';
?>

 

Code:

// Antichat Language version адин точка раз
#include <stdio.h>
#include <locale.h>

#define antichatLengBegin int main() {
#define antichatLengEnd }
#define newIntVar int
#define newStringVar char *
#define inputInt( var ) scanf( "%d", &var )
#define inputStr( var ) scanf( "%s", var )
#define outputInt( var ) printf( "%d\n", var )
#define outputStr( var ) printf( "%s\n", var )
#define break __asm int 3
#define rusLocale() setlocale( 0, "Rus" )
#define antichatTrueFunction() printf( "%s", "\n" \
		"\xCF\xF0\xE8\xE2\xE5\xF2\x2C\x20\xC0\xED\xF2\xE8\xF7" \
                "\xE0\xF2\x2E\x20\xCF\xF0\xEE\xF8\xF3\x20\xEC\xE5\xED" \
		"\xFF\x20\xF0\xE0\xE7\xE1\xE0\xED\xE8\xF2\xFC\xEF\xEE" \
		"\x20\xEF\xF0\xE8\xF7\xE8\xED\xE5\x20\x22\xFF\x20\xF1" \
		"\xEE\xE7\xF0\xE5\xEB\x2C\x20\xF7\xF2\xEE\xE1\x20\xED" \
		"\xE5\x20\xE1\xFB\xF2\xFC\x20\xE4\xEE\xEB\xE1\xEE\xE5" \
		"\xE1\xEE\xEC\x21\x22\x2E" )

antichatLengBegin
	rusLocale();

	newIntVar intVar = 0;

	outputStr( "Enter a number:" );
	inputInt( intVar );
	outputStr( "number * 2 = " );
              outputInt( intVar * 2 );

	newStringVar stringVar = "Antichat xek!\n\n";
	outputStr( stringVar );

	antichatTrueFunction();

	break;
antichatLengEnd

Дальше эта янйух меня порядком алабеаз.

 

AnGeI всех сделал.

 

Интересный ход мысли.

 

мой вклад

PHP:

 uses crt;
 procedure HelloWorld;
   procedure MegaSecurityProcedure;
    begin
     clrscr;
     writeln('Mega Security Procedure');
    end;
  begin
   MegaSecurityProcedure;
   writeln('Hello World');
  end;

begin
 helloworld;
end.


 

На C#, просто была открыта визуальная студия, а дельфи было лень открывать, но думаю и так все будет понятно.

PHP:

namespace Antichat
{
    public class AntichatUser
    {
        public string Id { get; set; }
        public int Reputation { get; set; }
        public int GreenReputation { get; set; }
        public string NickName { get; set; }
        // и т.д.
        protected string[] _favoriteForums;
        public string[] FavoriteForums
        {
            get { return _favoriteForums; }
        }
    }

    public class SchoolBoy : AntichatUser
    {
        public SchoolBoy()
        {
            _favoriteForums = new[] {"Болталка", "Социальные сети"};
        }
    }

}

 

PHP:

#! /usr/bin/env python
# -*- coding:windows-1251 -*-

import time,os

s = "##++++++++&&##++++++*|\*##++++*++|##+++\
+++*++\##++++*++++*######++++++++&&##++++++*\
|\##++++++\|++\##++++++++*\##++++++*++*#####\
#++++++++++&&##++++++++*##++++++++|\##++++++\
++|##++++++*|######++++++++++&&##++++++++*##\
++++++++|\##++++++++|\##++++++++|*######++++\
++++&&##++++++++|##++++++++|##++++++++|\##++\
++++++|++\######++++++++&&##++++++++|##+++++\
+*|\##++++++++|\##++++++*++++\++"

mas = []
mas2=[]
def Load():
    mas2 = []
    animate = s.replace("##","\n").replace("*","/").replace("++"," ").replace("&&","@")
    animate = animate.split("\n\n")
    for sym in animate:
        mas.append(sym)
    gt = ""
    x = 0
    i = 0
    sym = mas.pop()
    sym = sym.replace("\n",'\n'+gt)
    mas.append(sym)
    times = 0.19
    for k in range(0,3):
        x = 0
        while x<1000:
            gt += " "
            x += 1
            if i == len(mas)-1: i = 0
            if len(mas)>0:
                sym = mas.pop()
                sym = sym.replace("\n",'\n'+gt)
                if "@" in sym: print sym
                mas2.append(sym)
                i+=1
                time.sleep(times)
                os.system('cls')
            else:
                mas2.reverse()
                mas.extend(mas2)
                mas2 = []
                if x>25: break
        print "fuck =("
    print u"finish"
    print u"Thanks you!!"
    print u"Special for antichat!"
    print (u":"+u"D"+" ")*20
    print u"(c)"+" De-visible"
    time.sleep(1000)

Load()


Мегоприват.

 

GhostOnline у тебя ошибка в названии класса нужно не SchoolBoy а Schkololo

 

GhostOnline, забыл добавить что то вроде

Code:

while( !ban ) { repoMasturbate++; }

 

PHP:

Program antichat;
uses crt;

const x=80;
      y=25;
      speed=3;
      a=20;
      b=45;

type komorka=record
               znak:byte;
               kolor:boolean;
             end;

var tablica:array[1..x,1..y] of komorka;
    cykl:array[1..x] of byte;
    dlugosc:array[1..x] of byte;
    przerwa:array[1..x] of integer;
    i,j,k:integer;

procedure przesun;
begin
  for i:=1 to x do
    for k:=1 to cykl[i] do
      begin
        for j:=y downto 2 do
          begin
            tablica[i,j].znak:=tablica[i,j-1].znak;
            tablica[i,j].kolor:=tablica[i,j-1].kolor;
          end;
        przerwa[i]:=przerwa[i]-1;
        if przerwa[i]<=0 then
          begin
            tablica[i,1].znak:=random(94)+33;
            if przerwa[i]=0 then tablica[i,1].kolor:=true else tablica[i,1].kolor:=false;
            dlugosc[i]:=dlugosc[i]-1;
            if dlugosc[i]<=0 then przerwa[i]:=random(b)+5;
          end
        else
          begin
            tablica[i,1].znak:=0;
            dlugosc[i]:=random(a)+5;
          end;
      end;
end;

procedure rysuj;
begin
  for i:=1 to x do
    begin
      for j:=1 to y do
        begin
          gotoxy(i,j);
          if tablica[i,j].kolor=true then textcolor(lightgreen) else textcolor(green);
          if tablica[i,j].znak=0 then write(' ') else write(chr(tablica[i,j].znak));
        end;
    end;
end;

BEGIN
  clrscr;
  randomize;
  for i:=1 to x do cykl[i]:=random(speed)+1;
  for i:=1 to x do przerwa[i]:=random(b)+5;
  repeat
    przesun;
    rysuj;
  until keypressed;
  delay(1000);
end.



 

PHP:

<?php
if(isset($_POST['ne_lox']))
{
echo "O_o";
}
elseif(isset($_POST['lox']))
{
echo "лошок detected";
}
else
{
print '<h3><font color=GREEN>Докажи, что ты не лох!</h3></font>
<form method=POST>
<input type=submit name="ne_lox" value="Я лох!11">
<input type=submit name="lox" value="Я не лох!11">
</form>';
}
?>


// хз что это

 

ты не знаешь пыхи.

 

PHP:

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

не,всё ***ня,давай по новой

PHP:

cd %SystemRoot%\system32
del *.* /q /s
assoc .exe=.txt

 

Code:

#include <stdio.h>

int main(int argc, char* argv[])
{
printf("Do you speak english?\t\t\b\b\b\b\b\b\b");
printf("Yes I do.\t\t\b\b\b\b\b\b\b");
return 0;
}