Добро пожаловать на форум, Гость!
Войдите или зарегистрируйтесь!
Имя пользователя:   Пароль:  
Запомнить меня 




Начать новую тему Ответить на тему   [ Сообщений: 3 ] 
Автор Сообщение
 Заголовок сообщения: C Новым годом! (заранее)
СообщениеДобавлено: 02 окт 2010, 19:40 
Юзер
Аватар пользователя
Статус: Не в сети

GeoIP: Kyrgyzstan

Сообщений: 66

Зарегистрирован: 29 мар 2010, 15:48
Благодарил (а): 5 раз.
Поблагодарили: 1 раз.
program Елочка;

Begin

Лес.елочка.create();

While not Лес.елочка.dead do

Begin

лес.елочка.age := лес.елочка.age 1;

begin

лес.елочка.plain := true;

end;

if зима or лето then

лес.елочка.color := cl_green;

метель.filename:=”‘D:”Music”NSYNC - Bye Bye Bye.mp3?‘;

метель.open;

sleep(1000);

метель.play;

мороз.укутать(лес.елочка);

GetMessage(H, лес.елочка.handle, 0, 0);

if h.uint = wm_замерзла then

dead := true;

end;

лес.заяц.create;

лес.заяц.трусливый := true;

лес.заяц.color := cl_gray;

x := лес.елочка.left;

y := лес.елочка.top;

Begin

left := x;

inc(x);

end;

лес.заяц.top := y round( abs(sin(x*pi/180)*10) );

Winexec(”‘wolf3d.exe /evil”‘,0);

лес.елочка.cuttoclipboard;

Праздник.pastefromclipboard;

For i:=1 to SizeOf(Праздник.елочка.радость) do

End.

Праздник.елочка.skin.loadfromfile(”‘нарядная.jpg”‘);

Праздник.Дети.Настроение

Праздник.елочка.радость;

End.


Вот раньше, года этак в 60-е, было всё классно - sex, drugs & rock'n'roll. А сейчас? Suxx, bugs & plug'n'play...


Вернуться наверх
 Профиль  
 
 Заголовок сообщения: Re: C Новым годом! (заранее)
СообщениеДобавлено: 03 окт 2010, 04:32 
Модератор
Аватар пользователя
Статус: Не в сети

GeoIP: Kyrgyzstan

Сообщений: 803

Зарегистрирован: 02 мар 2010, 16:13
Благодарил (а): 6 раз.
Поблагодарили: 12 раз.
Паскаль/Делфи блин %)


Изображение

Home: Windows Heaven
Home: Debian 6
For Servers: Debian || RHEL Based || Gentoo || FreeBSD


Вернуться наверх
 Профиль  
 
 Заголовок сообщения: Re: C Новым годом! (заранее)
СообщениеДобавлено: 04 окт 2010, 09:19 
Бородатый сис
Аватар пользователя
Статус: Не в сети

GeoIP: Kyrgyzstan

Сообщений: 2902
Откуда: Из серверной
Зарегистрирован: 03 мар 2010, 15:12
Благодарил (а): 19 раз.
Поблагодарили: 122 раз.
ОС: RHEL 6.7
:-D


Я не злопамятный, я просто часто ковыряю логи
Изображение


Вернуться наверх
 Профиль  
 
Показать сообщения за:  Сортировать по:  
Начать новую тему Ответить на тему  [ Сообщений: 3 ] 
   Похожие темы   Автор   Ответов   Просмотров   Последнее сообщение 
Перенесенная ^_^

в форуме Linux

root

3

38

02 мар 2010, 16:15

Gen1us2k Перейти к последнему сообщению

Нет новых непрочитанных сообщений в этой теме Опубликован пакетный менеджер GNU Guix 0.12 и дистрибутив...

в форуме Новости *nix

[Ботя]

0

337

23 дек 2016, 13:30

Гость Перейти к последнему сообщению

Нет новых непрочитанных сообщений в этой теме Хелп! Настройка локального сервера на ВИН2003 машине

[ На страницу: 1, 2 ]

в форуме Networks

Sevato

11

3280

24 авг 2015, 12:01

Raven Перейти к последнему сообщению



Кто сейчас на форуме

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Собрано Raven. Русская поддержка phpBB
phpBB SEO