Скупая мужская слеза скатилась по моей щеке

[ Версия для печати ]
Добавить в Telegram Добавить в Twitter Добавить в Вконтакте Добавить в Одноклассники
Страницы: (8) « Первая ... 4 5 [6] 7 8   К последнему непрочитанному [ ОТВЕТИТЬ ] [ НОВАЯ ТЕМА ]
NightRiderz1
29.09.2021 - 23:18
0
Статус: Offline


Ярила

Регистрация: 13.02.17
Сообщений: 5312
Цитата (Vredtech @ 29.09.2021 - 23:15)
Мдя... народ дисководами меряется )))

А в 1986 помнится, были такие перфоленты... 60 строчек Бейсика метров на 5 тянуло.

Последний раз перфоленту в 2010 читал, из любопытства, найденную в бункере ГО.
 
[^]
шелмимо
29.09.2021 - 23:25
4
Статус: Offline


Ярила

Регистрация: 3.05.12
Сообщений: 3024
Это еще не выкладывали?

Скупая мужская слеза скатилась по моей щеке
 
[^]
makarutum
29.09.2021 - 23:27
0
Статус: Offline


Хохмач

Регистрация: 12.04.13
Сообщений: 701
Цитата (DrFucker @ 29.09.2021 - 18:51)
Ха, я знал как монтесуму проходить тёмную комнату :)

Спасибо большое я эту игру больше 30 лет искал
 
[^]
subjrs
29.09.2021 - 23:30
2
Статус: Offline


Шутник

Регистрация: 8.08.10
Сообщений: 60
Не все лишь поймут

Скупая мужская слеза скатилась по моей щеке
 
[^]
Rishat
29.09.2021 - 23:31
0
Статус: Offline


Ярила

Регистрация: 26.07.10
Сообщений: 1976
PowerDVD, да уж, до слёз. Тогда и трава зеленее была и телефоны кнопочные..
 
[^]
lvanoff
30.09.2021 - 00:15
5
Статус: Offline


Хохмач

Регистрация: 27.11.12
Сообщений: 771
Держи бро, там даже серийник написан маркером.

Скупая мужская слеза скатилась по моей щеке
 
[^]
Alconaut
30.09.2021 - 00:20
0
Статус: Offline


Алкоголик

Регистрация: 28.07.16
Сообщений: 2247
Цитата (NightRiderz1 @ 30.09.2021 - 00:59)
Цитата (vanonik @ 29.09.2021 - 22:45)
Цитата (Bris2 @ 29.09.2021 - 22:05)
А я скучаю по:

Скучаешь по АТ питанию?
По нечаянно забытой парковке диска? И приближающемуся последующему трындецу?
Нунах такие приключения.

Проблемы с парковкой последний раз еще на MFM дисках видел, в эпоху 95й уже пофигу на это было. Там кеш скидывался, а не парковка.

Это как вы теплое с мокрым сравниваете? Обнуленный кэш и физически "упавшую" "иголку" магнитной головки в рандомном месте диска, для остановки головки не предназначенном?
 
[^]
Alconaut
30.09.2021 - 00:27
0
Статус: Offline


Алкоголик

Регистрация: 28.07.16
Сообщений: 2247
Цитата (шелмимо @ 30.09.2021 - 01:25)
Это еще не выкладывали?

Я месяц назад в первую циву играл smile.gif
 
[^]
NightRiderz1
30.09.2021 - 00:37
2
Статус: Offline


Ярила

Регистрация: 13.02.17
Сообщений: 5312
Цитата (Alconaut @ 30.09.2021 - 00:20)
Цитата (NightRiderz1 @ 30.09.2021 - 00:59)
Цитата (vanonik @ 29.09.2021 - 22:45)
Цитата (Bris2 @ 29.09.2021 - 22:05)
А я скучаю по:

Скучаешь по АТ питанию?
По нечаянно забытой парковке диска? И приближающемуся последующему трындецу?
Нунах такие приключения.

Проблемы с парковкой последний раз еще на MFM дисках видел, в эпоху 95й уже пофигу на это было. Там кеш скидывался, а не парковка.

Это как вы теплое с мокрым сравниваете? Обнуленный кэш и физически "упавшую" "иголку" магнитной головки в рандомном месте диска, для остановки головки не предназначенном?

Я не сравниваю, я русской языкой говорю, что в эпоху 95го не было проблемы с упавшими головками.
До того, в эпоху чистого DOS'а со всякими park.com на MFM дисках проблема была. А в винде эта надпись нужна была для скидывания кэша, а не парковки головок.
Не помню, где я читал про кеш. но вот что говорит про эту надпись Рэймонд Чен:

https://devblogs.microsoft.com/oldnewthing/...419-00/?p=93315
 
[^]
fermer91
30.09.2021 - 00:47
2
Статус: Offline


Ярила

Регистрация: 14.04.15
Сообщений: 2871
Не упала. никогда не понимал нахрен он нужен.

P.S. Возможно я слишком рано познакомился с Linux и узнал про UNIX-way. Мне понравилась идея, что для одной задачи должна быть одна программа, которая ее выполняет. Хоть это и утопия, но в последующем я старался использовать ПО как можно ближе соответствующее этому критерию. То есть нафиг всякие комбаины для всего подряд.
 
[^]
lanton90
30.09.2021 - 00:49
0
Статус: Offline


Ярила

Регистрация: 22.08.19
Сообщений: 1374
Цитата (444327219 @ 29.09.2021 - 15:47)
пользовался windows media player и в хуй не дул

Мы с пацанами играли в контру по сетке локальной, которую между домов кинули по крышам. У меня на фоне игры в свернутом медиа плеере играл "ду риш со гууд, ду риш со гут и штайгер нау" и прочие песни этой группы))

Размещено через приложение ЯПлакалъ
 
[^]
Стрелок1
30.09.2021 - 00:49
2
Статус: Offline


Ярила

Регистрация: 2.05.17
Сообщений: 6460
Цитата (NightRiderz1 @ 29.09.2021 - 23:37)
Цитата (Alconaut @ 30.09.2021 - 00:20)
Цитата (NightRiderz1 @ 30.09.2021 - 00:59)
Цитата (vanonik @ 29.09.2021 - 22:45)
Цитата (Bris2 @ 29.09.2021 - 22:05)
А я скучаю по:

Скучаешь по АТ питанию?
По нечаянно забытой парковке диска? И приближающемуся последующему трындецу?
Нунах такие приключения.

Проблемы с парковкой последний раз еще на MFM дисках видел, в эпоху 95й уже пофигу на это было. Там кеш скидывался, а не парковка.

Это как вы теплое с мокрым сравниваете? Обнуленный кэш и физически "упавшую" "иголку" магнитной головки в рандомном месте диска, для остановки головки не предназначенном?

Я не сравниваю, я русской языкой говорю, что в эпоху 95го не было проблемы с упавшими головками.
До того, в эпоху чистого DOS'а со всякими park.com на MFM дисках проблема была. А в винде эта надпись нужна была для скидывания кэша, а не парковки головок.
Не помню, где я читал про кеш. но вот что говорит про эту надпись Рэймонд Чен:

https://devblogs.microsoft.com/oldnewthing/...419-00/?p=93315

проблемы с парковками бьыли только на машина типа ibm at (ЕС-1841) на них надо было запускать park.exe
после таких проблем уже небыло. все решалось за счет выбега диска после отключения питания. и уж тем более на любой винде их небыло. даже на 3.0
 
[^]
nik611
30.09.2021 - 00:49
0
Статус: Offline


Весельчак

Регистрация: 30.03.11
Сообщений: 181
Цитата (Hujack @ 29.09.2021 - 20:42)
Цитата (ДЭМ @ 29.09.2021 - 17:50)
Рыдаю...

Зачем рыдать? Скачай и установи.

Я скачал, установил и пользуюсь.

Во, во. Все фильмы на харде.
Всё воспроизведение ТОЛЬКО через него, любимого!!!
 
[^]
NightRiderz1
30.09.2021 - 00:51
1
Статус: Offline


Ярила

Регистрация: 13.02.17
Сообщений: 5312
Цитата (Стрелок1 @ 30.09.2021 - 00:49)

проблемы с парковками бьыли только на машина типа ibm at (ЕС-1841) на них надо было запускать park.exe
после таких проблем уже небыло.

О чем, собственно, я и написал why.gif
 
[^]
ByBus
30.09.2021 - 01:10
0
Статус: Offline


Ярила

Регистрация: 12.01.12
Сообщений: 1460
А никто не помнит игру про робота. Похож на робокопа даже вроде этих двуногих роботов отстреливал. Вид был сбоку. Играл на бытовом компьютере в детстве.
 
[^]
МшЕ
30.09.2021 - 01:12
1
Статус: Offline


Юморист

Регистрация: 17.03.15
Сообщений: 487
Спасибо за настальгию, как в детство вернулся.
Давайте тему Администрции закажем- старперы..
трудно быть богом, (стругатские) мало, кто поймет
ДВК-3 был собран в корпусе типа «моноблок», который совмещал в себе монитор МС 6105, источник питания У12.087.314 мощностью 250 Вт, дисководы и «корзину» с системной шиной. Отдельно подключалась клавиатура МС 7004. ДВК-3 имел в своем составе плату микро-ЭВМ «Электроника МС 1201.02» на основе процессора КМ1801ВМ2 (в керамическом корпусе), плату КНГМД, плату КСМ (контроллер символьного монитора) и плату КГД (контроллер графического дисплея).
Простите, прослезился.

 
[^]
sss555
30.09.2021 - 01:20
1
Статус: Offline


   

Регистрация: 1.12.15
Сообщений: 2373
Не понимаю я ваши современные штуки, я до сих пор этим пользуюсь

Скупая мужская слеза скатилась по моей щеке
 
[^]
Karat7
30.09.2021 - 01:31
0
Статус: Offline


Директор интернета

Регистрация: 18.08.10
Сообщений: 3480
Без всякого пафоса стоит простой K-Lite сейчас dont.gif
 
[^]
Alconaut
30.09.2021 - 01:41
1
Статус: Offline


Алкоголик

Регистрация: 28.07.16
Сообщений: 2247
Цитата (Karat7 @ 30.09.2021 - 03:31)
Без всякого пафоса стоит простой K-Lite сейчас dont.gif

Media Player Classic ты имел в виду? Ибо K-Lite это не плеер, а набор кодеков, в комплекте с которым идет плеер MPC-HC. А речь о плеерах идет, а не о кодеках.
 
[^]
NightRiderz1
30.09.2021 - 01:44
0
Статус: Offline


Ярила

Регистрация: 13.02.17
Сообщений: 5312
Цитата (ByBus @ 30.09.2021 - 01:10)
А никто не помнит игру про робота. Похож на робокопа даже вроде этих двуногих роботов отстреливал. Вид был сбоку. Играл на бытовом компьютере в детстве.

Эксолон какой-нибудь со спектрума?
 
[^]
l0g0ut
30.09.2021 - 01:50
5
Статус: Offline


Хохмач

Регистрация: 14.04.15
Сообщений: 707
Цитата (Стрелок1 @ 29.09.2021 - 20:38)
а кто помнит такой приквел word`а?

я с Александром Гутниковым (автор WD) в одном КБ на НПО Комета работать начинал в 87.
в 88 первый PC через подставные страны закупили, к ним в сектор чуть позже.
Как сейчас помню его руссификаторы rkb и rega (не помню Гутников или Алексей Толчков писал, вроде они из одного сектора были), потом fx800 для заливки своих шрифтов на принтеры с командами epson, кстати, на нее была защита от копирования сделана, которую мы обошли, программулина после установки записывала в несколько байт после себя определенный набор кодов, который при копировании не копировался, мы через pctools увеличивали длину, копировали, и потом старую длину восстанавливали.
Единственное, программа могла только драфтовые символы заливать в принтр без наложения точек, как в nlq режиме.

Когда я свой диплом писал (я на вечернем учился), ммне захотелось свои символы с наложением сделать и пришлось написать свою прогу с графическим интерфейсом.

кусок моего пионерского кода запустить на x64 винде 16-ти битный екзешник недало сейчас только текст паскальный есть, возможно не финальный релиз
Код

{------------------- процедура редактирования символа NLQ ------------------}
рrосеdurе EditCharNlq(var Flag:Fl;var Modify:YesType);

Begin

 Modify := No;
 CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
 SetFillStyle(1,MenuColor);
 Bar(SymbolCodeTextX,SymbolCodeTextY-4,SymbolCodeTextX+23,SymbolCodeTextY+2);
 Str(Code,Slujba);
 SetColor(MenuTextColor);
 OutTextXY(SymbolCodeTextX,SymbolCodeTextY,Slujba);
 SetColor(MenuTextColor);
 SetTextJustify(RightText,CenterText);
 Str(X,Slujba);
 slujba := slujba+' ';
 OutTextXY(XposTextX,XposTextY,slujba);
 Str(Y,Slujba);
 slujba := slujba+' ';
 OutTextXY(YposTextX,YposTextY,slujba);

 Flag := Nul;
repeat
 SetColor(MenuColor);
 
 SetTextJustify(LeftText,CenterText);
 
 If D_Nlq[y,x] = true then Begin
                       OutTextXY(DotTextX,DotTextY,'OFF');
                       SetColor(MenuTextColor);
                       OutTextXY(DotTextX,DotTextY,'ON')
                       end
                  Else Begin
                       OutTextXY(DotTextX,DotTextY,'ON');
                       SetColor(MenuTextColor);
                       OutTextXY(DotTextX,DotTextY,'OFF')
                       end;

 While Not Keypressed do;
 key := ReadWord;
 CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
  Case Key of
  1059 : Help; {F1}
  1063 : SetkaNlq(GridTextX,GridTextY); {F5}
  1073 : Begin {PgUp}
       Case Code of
       33..126,129..255 : Dec(Code);
       128              : Dec(Code,2);
       end; {Case}
         Flag := PgUp;
         End;

  1132 : Begin {CtrlPgUp}
         Code := 32;
         Flag := CtrlPgUp;
         End;

  1118 : Begin {CtrlPgDn}
         Code := 255;
         Flag := CtrlPgDn;
         End;

  1081 : Begin {PgDn}
       Case Code of
       32..125,128..254 : Inc(Code);
       126              : Inc(Code,2);
       end; {Case}
         Flag := PgDn;
         End;

  1080 : if y < 18 then {Down}
                   Begin
                   SetColor(MenuColor);
                   SetTextJustify(RightText,CenterText);
                   Str(Y,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(YposTextX,YposTextY,slujba);
                   inc(Y);
                   SetColor(MenuTextColor);
                   Str(Y,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(YposTextX,YposTextY,slujba);
                   End;

  1071,  {Home}
  1079   {End}
       : Begin
         SetColor(MenuColor);
         SetTextJustify(RightText,CenterText);
         Str(Y,Slujba);
         slujba := slujba+' ';
         OutTextXY(YposTextX,YposTextY,slujba);
     if Key = 1071 then
                   Begin {Home}
                   Y := 1;
                   SetColor(MenuTextColor);
                   OutTextXY(YposTextX,YposTextY,'1 ');
                   End;
     if Key = 1079 then
                   Begin {Home}
                   Y := 18;
                   SetColor(MenuTextColor);
                   OutTextXY(YposTextX,YposTextY,'18 ');
                   End;
         end;

  1116,  {CtrlRight}
  1115   {CtrlEnd}
       : Begin
         SetColor(MenuColor);
         SetTextJustify(RightText,CenterText);
         Str(X,Slujba);
         slujba := slujba+' ';
         OutTextXY(XposTextX,XposTextY,slujba);
     if Key = 1116 then
                   Begin {CtrlRight}
                   X := 12;
                   SetColor(MenuTextColor);
                   OutTextXY(XposTextX,XposTextY,'12 ');
                   End;
     if Key = 1115 then
                   Begin {CtrlLeft}
                   X := 1;
                   SetColor(MenuTextColor);
                   OutTextXY(XposTextX,XposTextY,'1 ');
                   End;
         end;

  1119,  {CtrlHome}
  1117   {CtrlEnd}
       : Begin
         SetColor(MenuColor);
         SetTextJustify(RightText,CenterText);
         Str(Y,Slujba);
         slujba := slujba+' ';
         OutTextXY(YposTextX,YposTextY,slujba);
         Str(X,Slujba);
         slujba := slujba+' ';
         OutTextXY(XposTextX,XposTextY,slujba);
     if Key = 1119 then
                   Begin {CtrlHome}
                   Y := 1;
                   X := 1;
                   SetColor(MenuTextColor);
                   OutTextXY(YposTextX,YposTextY,'1 ');
                   OutTextXY(XposTextX,XposTextY,'1 ');
                   End;
     if Key = 1117 then
                   Begin {CtrlHome}
                   Y := 18;
                   X := 12;
                   SetColor(MenuTextColor);
                   OutTextXY(YposTextX,YposTextY,'18 ');
                   OutTextXY(XposTextX,XposTextY,'12 ');
                   End;
         end;


  1072 : if y > 1  Then {Up}
                   Begin
                   SetColor(MenuColor);
                   SetTextJustify(RightText,CenterText);
                   Str(Y,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(YposTextX,YposTextY,slujba);
                   Dec(Y);
                   SetColor(MenuTextColor);
                   Str(Y,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(YposTextX,YposTextY,slujba);
                   End;
  1077 : if x < 12 then  {Right}
                   Begin
                   SetColor(MenuColor);
                   SetTextJustify(RightText,CenterText);
                   Str(X,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(XposTextX,XposTextY,slujba);
                   inc(x);
                   SetColor(MenuTextColor);
                   Str(X,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(XposTextX,XposTextY,slujba);
                   End;
  1075 : if x > 1  Then  {Left}
                   Begin
                   SetColor(MenuColor);
                   SetTextJustify(RightText,CenterText);
                   Str(X,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(XposTextX,XposTextY,slujba);
                   Dec(x);
                   SetColor(MenuTextColor);
                   Str(X,Slujba);
                   slujba := slujba+' ';
                   OutTextXY(XposTextX,XposTextY,slujba);
                   End;

  1060 : Begin {F2}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := F2;
         End;
  1061 : Begin {F3}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := F3;
         End;
  1062 : Begin {F4}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := F4;
         End;
  1064 : Begin {F6}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := F6;
         End;
  1065 : Begin {F7}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := F7;
         End;
  1068 : Begin {F10}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := F10;
         End;
  13   : Begin {Enter}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := Enter;
         End;

  27   : Begin {Esc}
         CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);
         Flag := Esc;
         End;
  32   : begin {Spase}
         Modify := Yes;
         if G = true then SetkaNlq(GridTextX,GridTextY);
         if D_Nlq[y,x] = true then D_Nlq[y,x] := false else D_Nlq[y,x] := true;
         SetColor(DotColor);
         SetFillStyle(1,DotColor);
         if D_Nlq[y,x] = true
           Then
           PieSlice{arc}(x*radius+DX,
               y * round(radius*koeff)+DY,
               0, 360, Radius)
           Else Begin
                SetColor(PaperColor);
                SetFillStyle(1,PaperColor);
                PieSlice{arc}(x*radius+DX,
                              y * round(radius*koeff)+DY,
                              0, 360, Radius);
                 For i := y-1 to y+1 do
                  For j := x-1 to x+1 do
                  Begin
                  SetColor(DotColor);
                  SetFillStyle(1,DotColor);
                  if (i >= 1) and (i<=18) and (D_Nlq[i,j] = true)
                      and (j >= 1) and (j <= 12) then
                           PieSlice(j*radius+DX,
                              i * round(radius*koeff)+DY,
                              0, 360, Radius);
                  end;{For}
                end;
         if G = true Then SetkaNlq(GridTextX,GridTextY);
         end; {32:}
  end; {Case}

  g := Grid;
  CircleXor(x*radius+dx,y*Round(radius*koeff)+dy);

Until Flag <> Nul;
End;
{---------------------------------------------------------------------------}


много тогда паскальничали.
я графику любил, рисовалки кривых плоскостей делал с экспортом в автокад.
музыкальную шкатулку для игры мелодий на рулонном плотере (расчет наклона и длины линий, и скорости перемещения пера с экспортом в plt файл, отправив который на lpt порт с подключенным плоттером удавалось заставить его более менее шаговым двигателем с заправленным листом А1 музыку извлекать)

после защиты диплома в 94-ом я срулил из КБ поработал айтишником в налоговой, там написал игрушку гонка для матричного принтера dfx-8000 (A3 1060 знаков в секунду, где рисовались габариты трассы и машинка между ними, принтер с бешенной скоростью это печатал, а с клавиатуры надо было удерживать машину в габаритах трассы, получался трек, при этом на дисплей ничего не выводилось, смотреть надо было на принтер!!!).

А потом программирование во мне отрубило, стал админом

При всем при этом Леха с Александром были схемотехниками электронной аппаратуры по рабочеим должностям, а я инженер-конструктор (сначала лаборант, потом техник, потом за 2 года до диплома ИК стал, можно было с неоконченным высшим).
Никаких программистов тогда в КБ у нас не было, были энтузиасты-любители

Скупая мужская слеза скатилась по моей щеке
 
[^]
rubiconlook
30.09.2021 - 02:18
0
Статус: Offline


Приколист

Регистрация: 27.05.20
Сообщений: 312
Цитата (Стрелок1 @ 29.09.2021 - 15:52)
...

Говорят жив есче

Размещено через приложение ЯПлакалъ
 
[^]
KCA
30.09.2021 - 02:33
0
Статус: Offline


Хохмач

Регистрация: 10.07.20
Сообщений: 629
Цитата (swell84 @ 29.09.2021 - 15:50)
Цитата (art179 @ 29.09.2021 - 15:45)
Ты не поверишь!!! Он и сейчас есть... Называется также: "CyberLink PowerDVD"

Да и денег стоит :) Да и на хуй никому не нужен :))) Хотя иногда включаешь новый ноутбук и он блять там есть кстати :))) Предустановленный.

Каких он денег стоил? В Retail упаковке любой видеокарты диск с ним лежал
 
[^]
ProtoStar
30.09.2021 - 02:38
-1
Статус: Offline


Приколист

Регистрация: 14.12.16
Сообщений: 235
Олды письками мерюца gigi.gif
 
[^]
BattlePorQ
30.09.2021 - 02:43
1
Статус: Offline


Парасьонах

Регистрация: 20.07.09
Сообщений: 64340
Цитата (KCA @ 30.09.2021 - 02:33)
Каких он денег стоил? В Retail упаковке любой видеокарты диск с ним лежал

Так то в ретейле. А я тогда даже Fury MaXX в OEM-виде купил )
 
[^]
Понравился пост? Еще больше интересного в Телеграм-канале ЯПлакалъ!
Только зарегистрированные и авторизованные пользователи могут оставлять комментарии. Авторизуйтесь, пожалуйста, или зарегистрируйтесь, если не зарегистрированы.
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) Просмотры темы: 35192
0 Пользователей:
Страницы: (8) « Первая ... 4 5 [6] 7 8  [ ОТВЕТИТЬ ] [ НОВАЯ ТЕМА ]


 
 



Активные темы






Наверх