LINUX.ORG.RU
ФорумTalks

Program Party;


0

0

Program Party;
Uses Vine, Food, Condoms;
{$I Variable.Pas}
Procedure Prepare;
Begin
    Find(House);
    Buy(Bottles);
    Buy(Food);
    Call(Friends);
    Call(Girls);
End;{ Prepare }
Procedure Drinks;
Begin
    Open(Bottles);
    Repeat
           Drink(Next(Gramms100));
           Food:=Eat(Next(Foods));
    Until TwoViewInEyes;
End;{ Drinks }
Procedure Dances;
Begin
     Music:=True;
     Call(OneGirl);
     Go(DancingRoom);
     With Music.Jump Do 
        Begin
          If Girl(Drink)>Normal(Drink) Then
             Begin
                Touch(AssOfGirl);
                Touch(BreastOfGirl);
             End
          Else
             Begin
                Go(DrinkingRoom);
                Let`s(Girl):=Drinks(More);
                Return(DancingRoom);
             End;
        End;
End;{ Dances }
Procedure Fuck( Who : Sex );
Var
    HowMany: LongInt;
Begin
     If WhoGirl Then Write('Are yor sodomite ??!');
     Find(DarkRoom);
     Close(Door_and_windows);
     If Not Find(BedInRoom) Then BedInRoom:=AnyTable;

     HowMany:=0;
     Repeat
     Call(Next(Who));
     Delete(DressOf(Who));
     Kiss(Lips,Breast,OtherPartsOfBody);
     Repeat
            Asm
               PUSH YourPenis
               POP? YourPenis
            End;
     Until YouHaveOrgasm;
     Case HowMany of Inc(HowMany);
         If (HowMany mod 15 = 0) Then Write('You are BIG man !!!');
     Until YourPenisStay;
End;{ Fuck }
Begin { Party - Main Program }
    Prepare;
    Drinks;
    If Who(Drink)>Normal(Drink) Then Who:=FaceDown;

     Dances;
     Fuck(Girls);
     Go(AtHomes);
End.{ Main Program }
anonymous

Издеваешься? Какой в жопу трубопаскакаль в 21 веке?
Давайте откроем проект по портированию на Ц и все платформы.

#include <stdio.h>
#include <qdrink.h>
#include <qsex.h>
#include <qlocale.h>
#include <qworld.h>

#define LOR="http://www.linux.org.ru"
#define FRIENDS=NULL

QMan Ivanich; 
QParty party;
QBestGirlInDaWorld Kumka;

#ifdef KUMKA_IS_BUSY_TODAY

int main(char* party)
{
	QString pocket;
	if !(pocket.contains("money")) 
		masturbate(LOR);
	else
	{
		if (party.isBig())
			call("friends");
		
		if (Ivanich.alreadyDrunk())
			masturbate(LOR);
			LOR->send('pipiska');
			masturbate(LOR);
			LOR->send('RIP');
			LOR->send('Linux suxx');
			masturbate(LOR);

			monitor->Clean(MN_CAREFULLY);
			Kumka->sendSMS('ILY');
			masturbate(Kumka);


		else
		{
			QParty where_do_we_want_to_go_today = new QParty(party);
			taxi->GoGoGo(where_do_we_want_to_go_today);

			if (numOfGirls(party) == 0) 
				call("udaff.com");
			else
			{
				they_want_me = girls.seek();
				
				switch (they_want_me) {
					
					case 0:
						masturbate(NULL);
						break;
						
					case 1048576:
						localClinic = 'AMZ, ul. Kuznetsova, 2a';
						taxi.GoGoGo(localClinic);

					default:

						if (fopen(they_want_me, RW, ASS) == NULL) {
							if (fopen(they_want_me, RW, MOUTH) == NULL) {
								fopen(they_want_me, RO, MOUTH);
								taxi.GoGoGo(supermarket);
								supermarket->Buy("Orbit Professional");
							}
						}
						else
								while (cock_stand == true)
									have_sex;
						printf("%s", 'I love you, my darling');
						
								
					
				}
				
				taxi.GoGoGo("home");
				masturbate(LOR);

				while (pocket.contains(money))
				goto NextParty;
			}
			
		}
			
	}
		
}

#endif //KUMKA_IS_BUSY_TODAY
	
/* Пока все
** какие ваши впопучления, ой, то есть впечатления?
** если будет время и посетит муза, 
** проект будет продолжен
*/

K48 ★★★★
()
Ответ на: комментарий от K48

Прикольно :)))
особенно LOR->send('pipiska');

anonymous
()
Ответ на: комментарий от K48

> masturbate(LOR);

на лор дрочить ? а где же сиси ?

anonymous
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.