воскресенье, 13 августа 2006
много нецензурщины и ахтунгов. читать только программистам, потому что другие не поймут =)
читать дальше
превед Анекдотнах;
амонявзядъ ПреведГУИ, МедведПервыйнах, Лез32, Учаснеги;
типапревед
ТэМойМедвед = хуле (ТэМедвед)
комрад
ПапаМедвед: ТэМедвед;
МамаМедвед: ТэМедвед;
бублиг
кагдила Родид(Папа, Мама: ТэМедвед);
кагдила Писец; папойвыдан;
кагдила Идинах(Куданах: ТэУрл); папойвыдан;
кончел;
кагдила ТэМойМедвед.Родид(Папа, Мама: ТэМедвед);
начел
ПапаМедвед:=Папа;
МамаМедвед:=Мама; // Пох шобзнал!
кончел;
кагдила ТэМойМедвед.Писец;
начел
Ахтунг('Низя убид мой Медвед!!!','Идите фтопку',ИКОН_ИДИНАХ);
кончел;
// Пох карочи праграма
типа
моймедвед: ТэМойМедвед:
мужыг: ТэУчаснег;
тъйодка: ТэУчаснпег;
лез: ТэЛез32;
начел
ёпт
лез:=ТэЛез32.Родид([йолки,соснынах,дубы,бирьозы,трава,поляно]);
моймедвед:=ТэМойМедвед.Родид(livejournal,ru_preved);
// Пох низабаяниваимые канстанты!
моймедвед.Идинах(лез.Туданах('поляно'));
мужыг:=ТэУчаснег.Родид();
тъйодка:=ТэУчаснег.Родид();
лез.Вставить(мужыг,Туданах('поляно'));
лез.Вставить(тъйодка,Туданах('поляно'));
мужыг.Вставить(тъйодка);
ежели мужыг.Нивставляет тоды
начел
// Пох и здесь пидарасынах!
Ахтунг('У вас в системе неправельный мужыг, '+
'пастафьте себе пакет Учаснег-dev-2.1.11',
'Ахтунгбля',ИКОН_АХТУНГ);
бамбить;
кончел;
моймедвед.Идёд;
мужыг.Reposition; // Пох идинственая албанская команда в "Преведе"…
моймедвед.Подняд(моймедвед.Рука.Л);
моймедвед.Подняд(моймедвед.Рука.П);
моймедвед.Сказад('ПРЕВЕД!');
ухёпт
Ахтунг('Шотозафигня случилосо с праграмай, вазможна, '+
'ваш камог кетайского праизводства… Смините моск!',
'Ужоснах',ИКОН_АХТУНГ);
кончел;
кончел. // Всёнах, писец
-
-
14.08.2006 в 00:16пацтулом