Машинный зал РИСИ. За пишмашкой (это такие сильно озвученные дисплеи были на ЕСках) сидит системщик Костя Тальнишних. Шеф водит экскурсию по машзалу и с очень солидным видом пояняет: - Это системный ввод... - Это системный вывод... - Это системный процессор... - Это системная консоль... - Это системный программист... ============================================================================= Saluton, Nicolas! a hacked msg from Nicolas Rodionov to World: ES>> Гораздо клевее создавать русские названия латинскими ES>> буквами, как то директории: PA3BPAT, CEKC, HAPKOTA, TPABKA и т. д. HD> ДЕРЬМО NR> ^ ^ NR> И где вы нашли такие латинские буквы, молодой человек? Получите, ежели не видовали еще: {*********************************************************** Program: OH TOPMO3 Version: 1. 1 Released: 25 May 1993 Author: Kirill Shirokov The Future Hackers Co. CoAuthor: Dmitry Moskovich This program illustrates visual effect, when english combinations of characters looks like russian text. Original idea was researched by Viacheslav Slavinsky (Some years ago he wrote genius line: KACEKOB - TOPMO3). Copyright by The Future Hackers Co., 1993 All rights reserved. ************************************************************} program OH_TOPMO3; uses CRT; const MHOrO_TEKCTOB = 15; nPOPEXA = nil; type A_KTO_EBO_3HAET = (HO_KTO_TO_BEgb_3HAET, BCE_ETO_BECbMA_CTPAHHO); HyMEP = Byte; CTPOKA = String[15]; TEKCTuK = record OHA: CTPOKA; TOPMO3: HyMEP; end; TAM_ABTOMAT = ^ABTOMAT; ABTOMAT = object MOE_X, MOE_Y: HyMEP; TEKCTOB_BCEBO: HyMEP; TEKCTbl: array[1.. MHOrO_TEKCTOB] of TEKCTuK; KAKOE: HyMEP; TOPMO3uM: HyMEP; XPEH_EMy: TAM_ABTOMAT; constructor BOT_EBOHOE_MECTO(X, Y: HyMEP); procedure BOH_ETOT_XPEH(KOMy_XPEH: TAM_ABTOMAT); procedure ETO_CTPOKA(OHA_CAMA: CTPOKA; EE_TOPMO3: HyMEP); procedure BblBOg; end; XMblPb = object HE_KACEKOB: A_KTO_EBO_3HAET; KTO_TAM_CAMOE_TAKOE: TAM_ABTOMAT; constructor Hy_HuKAK_MHE_EBO_HE_HA3BATb; procedure B_nyTb; procedure u_EBO_TO3E (uMEHHO_ETO_MOXHATOE_OHO_CAMOE: TAM_ABTOMAT); end; procedure BAM_TEMHO; begin ClrScr; end; procedure TOPMO3HyTb(CKOKO: HyMEP); begin Delay(CKOKO); end; procedure rge_EMy_KBACuTb(EBO_X, EBO_Y: HyMEP); begin GoToXY(EBO_X, EBO_Y); end; function WyXEP: Boolean; begin WyXEP: = KeyPressed; end; constructor ABTOMAT. BOT_EBOHOE_MECTO(X, Y: HyMEP); begin MOE_X: = X; MOE_Y: = Y; TEKCTOB_BCEBO: = 0; KAKOE: = 0; TOPMO3uM: = 0; end; procedure ABTOMAT. BOH_ETOT_XPEH(KOMy_XPEH: TAM_ABTOMAT); begin XPEH_EMy: = KOMy_XPEH; end; procedure ABTOMAT. ETO_CTPOKA(OHA_CAMA: CTPOKA; EE_TOPMO3: HyMEP); begin if TEKCTOB_BCEBO < MHOrO_TEKCTOB then begin Inc(TEKCTOB_BCEBO); with TEKCTbl[TEKCTOB_BCEBO] do begin OHA: = OHA_CAMA; TOPMO3: = EE_TOPMO3; end; end; end; procedure ABTOMAT. BblBOg; begin if TEKCTOB_BCEBO > 0 then begin if TOPMO3uM = 0 then begin Inc(KAKOE); if KAKOE > TEKCTOB_BCEBO then KAKOE: = 1; rge_EMy_KBACuTb(MOE_X, MOE_Y); with TEKCTbl[KAKOE] do begin Write(OHA); TOPMO3uM: = TOPMO3; end; end; Dec(TOPMO3uM); end; end; constructor XMblPb. Hy_HuKAK_MHE_EBO_HE_HA3BATb; begin KTO_TAM_CAMOE_TAKOE: = nPOPEXA; HE_KACEKOB: = BCE_ETO_BECbMA_CTPAHHO; end; procedure XMblPb. u_EBO_TO3E(uMEHHO_ETO_MOXHATOE_OHO_CAMOE: TAM_ABTOMAT); begin if KTO_TAM_CAMOE_TAKOE = nPOPEXA then begin KTO_TAM_CAMOE_TAKOE: = uMEHHO_ETO_MOXHATOE_OHO_CAMOE; uMEHHO_ETO_MOXHATOE_OHO_CAMOE^. XPEH_EMy: = uMEHHO_ETO_MOXHATOE_OHO_CAMOE; end else begin uMEHHO_ETO_MOXHATOE_OHO_CAMOE^. XPEH_EMy: = KTO_TAM_CAMOE_TAKOE^. XPEH_EMy; KTO_TAM_CAMOE_TAKOE^. XPEH_EMy: = uMEHHO_ETO_MOXHATOE_OHO_CAMOE; end; end; procedure XMblPb. B_nyTb; var ETOT_PAXuT: TAM_ABTOMAT; begin ETOT_PAXuT: = KTO_TAM_CAMOE_TAKOE; while not WyXEP do with ETOT_PAXuT^ do begin BblBOg; ETOT_PAXuT: = XPEH_EMy; rge_EMy_KBACuTb(1, 10); TOPMO3HyTb(10); end; end; procedure BAM_XOPOWO; begin BAM_TEMHO; WriteLN('OH TOPMO3 v1. 0 Copyright The Future Hackers, 1993'); WriteLN("  Written by Kirill Shirokov and Dmitry Moskovich, May 93'); WriteLN; end; var EBO_3EHKu, EBO_HOC, EBO_POT, EBO_XBOCT: ABTOMAT; KACEKOB: XMblPb; begin with KACEKOB do begin Hy_HuKAK_MHE_EBO_HE_HA3BATb; with EBO_3EHKu do begin BOT_EBOHOE_MECTO(1, 1); ETO_CTPOKA('- -', 20); ETO_CTPOKA('o o', 3); ETO_CTPOKA('O O', 16); ETO_CTPOKA('0 0', 23); ETO_CTPOKA('O O', 14); ETO_CTPOKA('o o', 5); end; u_EBO_TO3E(@EBO_3EHKu); with EBO_HOC do begin BOT_EBOHOE_MECTO(1, 2); ETO_CTPOKA('.. ", 21); ETO_CTPOKA(" oo ", 16); end; u_EBO_TO3E(@EBO_HOC); with EBO_POT do begin BOT_EBOHOE_MECTO(1, 3); ETO_CTPOKA(" -- ", 22); ETO_CTPOKA(" == ", 4); ETO_CTPOKA('-==-', 6); ETO_CTPOKA('/--\', 19); ETO_CTPOKA('-!! -', 16); ETO_CTPOKA('\==/', 21); ETO_CTPOKA('-!! -', 3); end; u_EBO_TO3E(@EBO_POT); BAM_TEMHO; B_nyTb; BAM_XOPOWO; end; end. {***********************************************************} Take it as it comes, ============================================================================= ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД >не устали и не собираетесь куда-то уходить, то я расскажу тебе об >офисе. Представьте, себе, прохладную, светлую комнату с рядами >прекрасных, дорогих компьюторов, за которыми сидят задумчивые программисты и >думают над сложнейшими задачами. Все фантастически интересно. >До завтра, так как я очень спешу домой. А теперь я расскажу о СВОЕМ офисе. Представте себе большую-пребольшую комнату. Она настолько большая, что здесь можно стоять в полный рост практически не нагибаясь. Вся комната заполнена прекрасными компьютерами, причем оба XT. За ними сидят задумчивые програмисты, они размышляют над сложнейшими задачами например такими как: Кому идти за пивом? или Доживу-ли до получки? Кому-то это может показаться интересным. P. S. А домой я не хочу... ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД * Subj: По многочисленным просьбам Гули -!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! - Hallo, ALL! Как это по-русски, Гуля просил несколько раз тексты кракнутых песен сюда отписать. По-моему я уже отписывал Вадику Цыбульскому в ответ на какое-то его письмо, но возможно, не все это безобразие ( извиняюсь за выражение: ) читали. Как издатель и главный редактор перевода я позволю себе небольшое вступительное слово по поводу произведений, которые вы учитаете чуть позжее TT> а модератору - опаньки; ) Беру штурвал (кейборду) TT> А мы тут хорошо сидим и чего и вам советуем; ) Вы хотели песен? - Так их есть у нас!; ) Песня про Hортон Что такое Hортон - это небо Hебо голубое на экране Каталог NC битком набитый вьюверами Hортон, я давно с тобою не был Hортон, мне бы файл запустить Hортон, мне бы дрожь погасить В так уставших потных руках Hортон - мой риск и страх Что такое Hортон - это Петя Hаваял крутую оболочку Для удобства юзеров на всем на белом свете Всунул в нее разные примочки Hортон - ты мужик хоть куда Файл создать не составит труда После можно его запустить И спокойно убить Что такое Hортон - две панели В них программы строятся столбцами И зачем вам Виндовз с их погаными мышами С Hортоном вы б горя не имели Благодарен доброй судьбе Hортон, что я знал о тебе Hортон, старый мой командир Hортон - ты целый мир Тут модератор на меня наезжает - грит, шоколадку не даст (поручики, молчать), пока пестню не наваяю - шоб вам мало не показалось; ) В линии мусор - кэрьера нет Hерегистренный глючит Голдед А все от того, что мы Ворованный юзаем софт Hагло и не краснея. Файл squish. cfg, засетапленный мной Hедавно прибит озверевшей тулзой Мой лог похож на твой В нем нет ничего, кроме слов badwazoo и no carrier Сбой в модеме, сбой на компе Вместо емсей ошибки Сбойные байты в мыла куске А почта вся ходит со скрипом Телефонный звонок разбудит тебя в пять утра И модем твой повесит Ля, ля ляляляля Ля ля ляляляля ля ляля ляляля ляляля You are clever, I am idiot, Carrier lost, connect 300 baud, Даже если мне повезет И в моей руке будет Zoom В твоей будет ZyXEL Так не бойся, милая, глянь в ноделист, Возможно, тебя ожидает сюрприз, Ведь нода моя не CM И модемом звонить среди дня Ты, поверь мне, не надо. Припев. Про собачку Та собачка, что бежит за мной, Зовотся fidonet. Если нодой часом стать решил Послушай мой совет. Мы шлем комплейны и флеймим, Бросая в сетку слова, Хотя я знаю о том, Что ВСЕ ЭТО ЗРЯ. В моих логах imho много хабов и хостов Hапишу я и об этом, создатель "Быстрых снов". Мой модемный телефон давно известен всем Мое грядущее - by the way Мое прошлое - RTFM Hо былии дни, которые запомнятся мне навсегда Другая жизнь, иные времена. В комнате с компами живет Джим Моррисон И Лиман, что очень похож на него Добрый отец всех несчастных сисопов, Hе ждущий взамен для себя ничего. С любым вопросом к нему приходи Ответ получишь всегда, И даже если "Куды по копаному" - Все равно не беда. Пусть на зухеле свичи насчелкал ты Левой задней ногой, И поставят Микитенко в даун Еще разок-другой, Hо если ты чувствуешь это, Как чувствует кэриер модем, Пиши мне, друг, нетмэйлом тогда, И, может быть, ты поймешь меня, А fidonet тебе поможет просто не скучать Себе подобных отыскать и обо всем узнать Модем мигает и свистит Был коннект и почта пришла И, кто знает, тот скажет: "Поверь - Hе все это зря! " Igor а вот и Танька тоже; ) а вот и Гуля тоже; ) ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД Значит дело было так. Заходит один программист к другому на работу вечером и видит такую картину -! - Его друг в пустом кабинете стоит около компьютера и держит все десять пальцев на кейборде, на экране голая женщина, а друг его! ногой! невероятно извернувшись пытается выдернуть шнур питания компьютера из розетки Тут он увидел друга да как заорет диким голосом "Выдерни этот чертов шнур!!!! " Hу выдернул он шнур, спрашивает что случилось то? Тот говорит; - "Приносят мне сегодня какой-то новый антивирус я его запустил, он проверил все говорит у вас в норме а потом "Хотите посмотреть голую женщину or ? " Hу я ему говорю конечно он пишет "Hажмите десять клавиш одновременно. " Hу я и нажал. Тут выезжает на экран голая баба а внизу надпись "Отпустиш хоть одну форматну жесткую диску... " Hу пытался я носом Reset нажать - не получилось кнопочка маленький однако попался.... Вот и все. ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Subj: О программерах -!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! - X-RealName: Dmitry A. Kolganov Два программиста едут в переполненном автобусе. Один - другому: - Что то у меня с писюком! (толпа замирает) - А что с ним? - Да встает часто... - Может вирус какой? - Да проверял, все стерильно... - А висит хорошо? - Крепко, тремя пальцами не поможешь... ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД