Отправляет email-рассылки с помощью сервиса Sendsay

Секреты приятного отдыха или праздник без хлопот

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Веселые и необычные подарки" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Декабрь 2006   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Автор
Юлия Иванова

Статистика

295 подписчиков
0 за неделю
←   Все выпуски   →

Секреты приятного отдыха или праздник без хлопот


 

"Секреты приятного отдыха или праздник без хлопот"

 

Выпуск 46.

 http://goodchoise.spb.ru

 

Организация и проведение свадебных торжеств и других праздничных мероприятий www.goodchoise.spb.ru.

 

Скоро Новый год.

Это интересно!!!

Песенка про елочку для программистов.

 

 

 
 
Удачи! Ваш праздник обязательно будет самым ярким и незабываемым!
Организация и проведения свадебных торжеств, молодёжных вечеринок и других праздничных мероприятий www.goodchoise.spb.ru.

Версия песенки про елочку для программистов

 

program Елочка;
Begin
Лес.елочка.create();
While not Лес.елочка.dead do
Begin
лес.елочка.age := лес.елочка.age+1;
if зима or лето then
begin
лес.елочка.plain := true;
лес.елочка.color := cl_green;
end;
метель.filename:=’D:MusicNSYNC - 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’)" src
For i:=1 to SizeOf(Праздник.елочка.радость) do
Прадзник.Дети.Настроение + Праздник.елочка.радость;
End.

С уважением, Ляпина Ольга

 

 

 

 

 

 

Наш сайт http://goodchoise.spb.ru

 По всем вопросам обращаться на е-майл           lyapina_olga@mail.ru

 

 

 
В избранное