Шахты online • Просмотр темы - В лесу родилась ёлочка.

В лесу родилась ёлочка.

Сообщения без ответов | Активные темы

Список форумов » Шахтинцы общаются » Я плакалЪ

Страница 1 из 1 [ Сообщений: 6 ]

Пред. тема
След. тема

Версия для печати

Модератор: Begemot

Автор

Smayliks
Администратор

Сообщение

Добавлено: Вс апр 18, 2004 8:32 Заголовок сообщения:

В лесу родилась ёлочка.

program Елочка;
Begin
Лес.елочка.create();
While not Лес.елочка.dead do
Begin
лес.елочка.age := лес.елочка.age+1;
if зима or лето then
begin
лес.елочка.plain := true;
лес.елочка.color := cl_green;
end;

метель.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;
While x
Begin
лес.заяц.left := x;
inc(x);
лес.заяц.top := y + round( abs(sin(x*pi/180)*10) );
end;

Winexec('wolf3d.exe /evil',0);

лес.елочка.cuttoclipboard;
Праздник.pastefromclipboard;
Праздник.елочка.skin.loadfromfile('нарядная.jpg');
For i:=1 to SizeOf(Праздник.елочка.радость) do
Прадзник.Дети.Настроение + Праздник.елочка.радость;

End.

_________________
Подпись. ;-)

Возраст: 35

Зарегистрирован: Вт мар 09, 2004 18:20
Сообщения: 3224
Откуда: Со всей страны =)

Автор

TOSHIK
Администратор

Сообщение

Добавлено: Вс апр 18, 2004 11:18 Заголовок сообщения:

Класс!

_________________
Активисты все еще ищутся здесь!

Возраст: 33

Зарегистрирован: Пт авг 08, 2003 13:49
Сообщения: 6596
Откуда: Ростов-на-Дону

Автор

Tarantino
Почётный форумщик

Сообщение

Добавлено: Вс апр 18, 2004 12:39 Заголовок сообщения:

Опять програминг и юмор в ту степь, переведите на русский...

Возраст: 33

Зарегистрирован: Вт сен 23, 2003 15:46
Сообщения: 8847

Автор

Smayliks
Администратор

Сообщение

Добавлено: Вс апр 18, 2004 18:02 Заголовок сообщения:

Если англицкий знаешь, то всё и так понятно будет.
А если не знаешь... На русском это сабж.

_________________
Подпись. ;-)

Возраст: 35

Зарегистрирован: Вт мар 09, 2004 18:20
Сообщения: 3224
Откуда: Со всей страны =)

Автор

Денис
Администратор

Сообщение

Добавлено: Вт апр 20, 2004 9:35 Заголовок сообщения:

))

_________________
..

Возраст: 37

Зарегистрирован: Пт авг 08, 2003 17:15
Сообщения: 887
Откуда: Шахты

Автор

Zoyla1
Случайно забежавший

Сообщение

Добавлено: Пн апр 06, 2015 8:42 Заголовок сообщения:

Re: В лесу родилась ёлочка.

#include "win31.h"
#include "win95.h"
#include "win98.h"
#include "workst~1.h"
#include "evenmore.h"
#include "oldstuff.h"
#include "billrulz.h"
#include "monopoly.h"
#include "backdoor.h"
#define INSTALL = HARD

_________________
http://www.solitairewithbuddies.com/

Зарегистрирован: Пн апр 06, 2015 8:32
Сообщения: 1

Список форумов » Шахтинцы общаются » Я плакалЪ

Страница 1 из 1 [ Сообщений: 6 ]

Пред. тема
След. тема

Версия для печати

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

Перейти: