Алексей Панин
Алексей Панин
  • Видео 315
  • Просмотров 74 126

Видео

Бейсик. Возраст фазы Луны
Просмотров 49628 дней назад
Бейсик. Возраст фазы Луны. Почти прямой перевод программы с Фокала на Бейсик. Оригинал программы смотрите в книге: djvu.online/file/U0KgLWPsp0TLs?ysclid=m52n96j3ke681515945 Текст программы на Бейсике: ' Перевод программы с Фокала на Бейсик из книги ' Т.Б. Романовского "Микрокалькуляторы в рассказах и играх". ' - Минск: Университетское, 1987 10 CLS : SCREEN 12 20 PRINT "Томас Баромеевич Романовс...
Epson FX 85 Win95 test page
Просмотров 5128 дней назад
Epson FX 85 Win95 test page
HP LJ 6L Win95 test page
Просмотров 2328 дней назад
HP LaserJet 6L Win95 пробная страница печати дайвером HP LaserJet II
HP Color LaserJet 5. Слайдшоу
Просмотров 4128 дней назад
HP Color LaserJet 5. Слайдшоу о первом цветном лазерном принтере HP формата А3. Статья об истории создания: www.hpmemoryproject.org/timeline/ted_podelnyk/podelnyk_memoir.htm
У нас на улице Silent Hill
Просмотров 522 месяца назад
Не знаю у кого как - у нас на улице Silent Hill)))
Max Payne. Секретная область в обучении
Просмотров 9252 месяца назад
Игра Max Payne. Секретная область в обучении
Фрагмент игры Max Payne, отсутствующий на Sony PlayStation 2
Просмотров 3982 месяца назад
Фрагмент игры Max Payne и секретная область, отсутствующие в реализации игры на игровой приставке Sony PlayStation 2
Max Payne и крысиный король
Просмотров 6812 месяца назад
Max Payne и крысиный король. Пасхалочка
игра Max Payne на Pentium III
Просмотров 2832 месяца назад
Как идёт игра Max Payne на Pentium III Ноутбук HP omnibook xe3
Бейсик. Программируем снегопад
Просмотров 6112 месяца назад
Программируем снегопад на языке Бейсик. Изначально писал в среде Qbasic, но интерпретатор совсем не справляется (Думаю - проблема в скорости работы DOSBOX), поэтому пришлось запускать уже PowerBasic.
ретро рекламки принтеров HP
Просмотров 342 месяца назад
ретро рекламки принтеров HP
Коробка HP DeskJet 400
Просмотров 122 месяца назад
Коробка струйного принтера HP DeskJet 400
Бутафорская бутафория в игре Max Payne
Просмотров 5 тыс.2 месяца назад
Бутафорская бутафория в игре Max Payne.
Фокал БК0010. Компьютерный мир
Просмотров 863 месяца назад
Советский компьютер Электроника БК0010. Компьютерный мир. Программа для рисования пейзажей. Написана на языке программирования Фокал.
БК0010. Игра КОСИЛКА
Просмотров 323 месяца назад
БК0010. Игра КОСИЛКА
Фокал БК0010. Игра ПИТОН
Просмотров 1373 месяца назад
Фокал БК0010. Игра ПИТОН
Фокал БК 0010. Игра ВАМПИР. Цвет
Просмотров 1893 месяца назад
Фокал БК 0010. Игра ВАМПИР. Цвет
БК0010. Шахматы
Просмотров 933 месяца назад
БК0010. Шахматы
БК0010. Игра Тетрис
Просмотров 893 месяца назад
БК0010. Игра Тетрис
Фокал. Игра Вампир
Просмотров 1233 месяца назад
Фокал. Игра Вампир
Фокал. Игра БИОМАССА
Просмотров 563 месяца назад
Фокал. Игра БИОМАССА
Бейсик-программа на Star ZA-250EE
Просмотров 973 месяца назад
Бейсик-программа на Star ZA-250EE
тест на Star ZA-250EE
Просмотров 733 месяца назад
тест на Star ZA-250EE
Игра Lunar Lander онлайн
Просмотров 175 месяцев назад
Игра Lunar Lander онлайн
Искра 108Д
Просмотров 535 месяцев назад
Искра 108Д
Переезд канала на Рутуб
Просмотров 1276 месяцев назад
Переезд канала на Рутуб
Бейсик. Игра Жизнь
Просмотров 8096 месяцев назад
Бейсик. Игра Жизнь
Бейсик. Мигалка
Просмотров 796 месяцев назад
Бейсик. Мигалка
HDD Quantum Go Drive 120 Mb
Просмотров 2566 месяцев назад
HDD Quantum Go Drive 120 Mb

Комментарии

  • @molilya
    @molilya 14 часов назад

    Безопасно ли что головка при выключении остаётся на пластине ,а не паркуется. Хотя, диск 98 года, да и парковаться в этой моделе негде вроде как

    • @AlexPayneKU
      @AlexPayneKU 5 часов назад

      Головка, как видите, паркуется к центру диска - там линейная скорость меньше, да и запуск, обратите внимание, происходит не резко. Так что - вполне нормально. У многих дисков так, даже у современных

  • @lgrover2390
    @lgrover2390 2 дня назад

    Здравствуйте! Возможно ли его подключить и печатать с андрод смартфона ?

    • @AlexPayneKU
      @AlexPayneKU 15 часов назад

      Ну, Вы спросили, тоже) Не знаю. Могу только сказать, что у него есть LPT и USB разъём. Понимает язык матричников Epson и IBM. Вот честно - даже не думал никогда о таком подключении. Если USB принтеры подключают к Андроиду, то, наверное, и этот можно подключить.

    • @lgrover2390
      @lgrover2390 14 часов назад

      @AlexPayneKU тоже вот не могу найти информации, те приложения что есть для андрод не видят эту модель принтера! Да старый конечно! Но было бы полезно в каких либо случаях я думаю, т. К аппарат безотказный

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 2 дня назад

    Зато быстрая, относительно.

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 2 дня назад

    Вроде бы у нас были в школе но у нас их не использовали, лежали себе в кладовке.

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 2 дня назад

    Побыстрей и точней серии Б3-34, но система программирования на 34-ке намного лучше. У 124-й только БП и условный переходы, вот и всё программирования, даже [ПП] [В/0] нет.

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 2 дня назад

    Эмулятор МК-61 частота 125 кГц(большинство реальных ПМК держат). 9 за 9 сек, 15 за 14 сек, Искра быстрей. Но программа для 34-х занимает 9 шагов с возвратом БП 00. 00: X->П0 01: 1 02: П->Х0 03: х 04: FL0 05: 02 06: С/П 07: БП 08: 00 RPN и сама система программирования серии Б3-34 даёт возможности писать компактные программы, отмечается как одна из лучших для ПМК на автокоде.

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 3 дня назад

    МК на чипе К145ИК1301 в котором есть некоторые ошибки и не точности, Б3-34 сделан на К145ИК1302 и К145ИК1303, в которых так же были ошибки и которые исправили более поздних выпусках.

  • @blablablablablablab
    @blablablablablablab 5 дней назад

    Он такой же советский как все украденные на западе игрушки, калькуляторы, пылесосы и фотоаппараты

  • @ЮжныйКот-м2э
    @ЮжныйКот-м2э 17 дней назад

    Кому надо, чтоб не набирать вот вам текст: Бейсик. Текстовые пузырьки. Алексей Панин CLS WHILE INKEY$ = "" p = RND(1) * 79 + 1 c = RND(1) * 29 + 1 COLOR c PRINT TAB(p); "0" WEND END

  • @ЮжныйКот-м2э
    @ЮжныйКот-м2э 17 дней назад

    Кому надо, чтоб не набирать вот вам текст: Бейсик. Случайные символы случайного цвета. Алексей Панин CLS WHILE INKEY$ = "" x = RND(1) * 79 + 1 y = RND(1) * 24 + 1 c = RND(1) * 29 + 1 ch = RND(1) * (255 - 32) + 32 LOCATE y, x COLOR c PRINT CHR$(ch); WEND END

  • @ЮжныйКот-м2э
    @ЮжныйКот-м2э 17 дней назад

    Какой ужас

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 17 дней назад

    это старый бейсик. Произошел от фортрана первых версий, фактически упрощённый фортран-интерпретатор. Но зато весит от 4 кб для 8080, влезает в ПЗУ и работает на самых простых БК.

  • @Memecatv
    @Memecatv 19 дней назад

    [Ё³⁶+ш⁵]=sx

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 21 день назад

    ЭКВМ-П поточней будет, но С3-15 и МК-15 более компактные, вояки в основном 15-м старались пользоваться.

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 25 дней назад

    Эмулятор есть, но не работает, какая-то ошибка в классе CIK13, ошибка именно в вводе/выводе. МК-44 сделан на К145ИК13, так же как серия Б3-34, так же Б3-32 сделан на К145ИК1301

  • @ArturBelianskiy
    @ArturBelianskiy 25 дней назад

    Панин уже до Луны добрался

  • @LithiumDeuteride-6
    @LithiumDeuteride-6 26 дней назад

    У наших проще и логичней, и без RPN программируемый сложно представить, если это конечно не бейсик, но это уже следующие поколение калькуляторов/микрокомпьютеров.

  • @AlexPayneKU
    @AlexPayneKU 29 дней назад

    HP Color LaserJet 5. Слайдшоу о первом цветном лазерном принтере HP формата А3. Статья об истории создания: www.hpmemoryproject.org/timeline/ted_podelnyk/podelnyk_memoir.htm

  • @AlexPayneKU
    @AlexPayneKU 29 дней назад

    Бейсик. Возраст фазы Луны. Почти прямой перевод программы с Фокала на Бейсик. Оригинал программы смотрите в книге: djvu.online/file/U0KgLWPsp0TLs?ysclid=m52n96j3ke681515945 Текст программы на Бейсике: ' Перевод программы с Фокала на Бейсик из книги ' Т.Б. Романовского "Микрокалькуляторы в рассказах и играх". ' - Минск: Университетское, 1987 10 CLS : SCREEN 12 20 PRINT "Томас Баромеевич Романовский, Алексей Алексеевич Панин." 30 PRINT "Возраст фазы Луны." 40 PRINT "Введите дату:" 50 INPUT "День (1-31)-"; d 60 INPUT "Месяц (1-12)-"; m 70 INPUT "Год (1901-2099)-"; g 80 s = INT((22 - m) / 10) 90 p = INT((12 * s + m - 14) * 30.59 + d) 100 n = INT((g - 1899 - s) * 365.25 + p) 110 q = INT((n - 2) / 29.5304) 120 r = n - 2 - 29.53 * q 130 PRINT "Возраст фазы Луны: "; r; " дней." 140 e = r * 6.283 / 29.5304 150 IF (e - 3.1415) ﹤ 0 THEN GOTO 180 160 IF (e - 3.1415) = 0 THEN GOTO 180 170 IF (e - 3.1415) ﹥ 0 THEN GOTO 210 180 a = 50 * COS(e) 190 b = -50 200 GOTO 230 210 a = -50 * COS(e) 220 b = 50 230 d = 0 240 LINE (0, 0)-(250, 200), 0 250 IF (d - 6.284) ﹤ 0 THEN GOTO 280 260 IF (d - 6.284) = 0 THEN GOTO 280 270 IF (d - 6.284) ﹥ 0 THEN END 280 IF (d - 3.1415) ﹤ 0 THEN GOTO 310 290 IF (d - 3.14145) = 0 THEN GOTO 310 300 IF (d - 3.1415) ﹥ 0 THEN GOTO 330 310 x = a * SIN(d) + 50 320 GOTO 340 330 x = b * SIN(d) + 50 340 y = -50 * COS(d) + 50 350 d = d + 15 * 3.1415 / 180 360 LINE -(x + 200, 200 - y * 3 / 4) 370 GOTO 250

    • @Abyss5737
      @Abyss5737 27 дней назад

      Спаггети код это ужас!!!

    • @LithiumDeuteride-6
      @LithiumDeuteride-6 17 дней назад

      @@Abyss5737 это старый бейсик, никаких или почти никаких возможностей писать структурный код. Да же ассемблер более структурный чем старый бейсик. Кстати, фокал ещё хуже.

  • @mysteriumvitae5338
    @mysteriumvitae5338 Месяц назад

    Как это технически возможно, если у ноутбуков и дисковода для дискет-то обычно не бывает?)) Не опубликуете инструкцию? ;)

  • @ПУКтенестсметанку

    ЗАЧМ ТАК?😢

  • @Fakerbey
    @Fakerbey Месяц назад

    Полный аналог - это Casio fx-950. Редкий зверь

  • @Fakerbey
    @Fakerbey Месяц назад

    Если у вас есть рукописная инструкция, пожалуйста объясните как делать перевод полярных координат в декартовы и обратно. Куда что вводите и в какой последовательности? И что за клавиша справа вторая сверху? Спасибо!

    • @AlexPayneKU
      @AlexPayneKU Месяц назад

      Хорошо. Постараюсь в ближайшее время разобраться и снять видео

  • @capy_bite
    @capy_bite 2 месяца назад

    Круто, что есть встроенная функция интегрирования. А при выключении калькулятора содержимое памяти сохраняется?

  • @silentsilentdoom
    @silentsilentdoom 2 месяца назад

    Вот это жесть!

  • @Fakerbey
    @Fakerbey 2 месяца назад

    Добрый день. Замечательное видео! только благодаря вам, я понял как менять количество цифр после запятой ))) Вам нигде на просторах интернета не попадалась инструкция для этого калькулятора?

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      У меня имеется рукописный перевод инструкции, надо заняться - хотя бы отсканировать. Он идентичен METRIC (TEAL) SR84. Не искали инструкцию для него?

    • @Fakerbey
      @Fakerbey 2 месяца назад

      @@AlexPayneKU Нет, к сожалению не ищется. Пробовал даже на японских сайтах. Мне почему интересен этот калькулятор? Ностальгия, наверное. Году в 77-78м, будучи в 3-м классе, увидел рекламу SC-7500. Красивый, мощный как кирпич! ) А уж какая была бумага и качество печати! Белейшая, мелованная, с мелким тиснением. А запах от нее! Что интересно, даже будучи в 3-м классе я четко понимал, что такой бумаги у нас не будет от слова никогда. Получается, в те годы Тошиба продавала или пыталась продавать такие калькуляторы в СССР? Если память не изменяет, реклама была на английском.

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      @@Fakerbey Ну, если реклама была на английском, то, скорее всего, кто-то просто из загран. командировки привез буклетик. А вообще они давно в полиграфию и рекламу умеют. Мы только сейчас начали потихоньку догонять и то на заграничном оборудовании

    • @Fakerbey
      @Fakerbey Месяц назад

      Интересно, у калькулятора имеется нулевой оперативный регистр памяти, который обозначен точкой в крайнем левом разряде. И ещё 3 независимых регистра памяти. (1,2,3) Судя по клавишам, калькулятор может выполнять элементарнейшие статистические вычисления. Среднеквадратическое отклонение, среднее арифметическое и сумму квадратов. Но вот как вводить данные для статистических расчётов пока ума не приложу. Будем искать...©. 😀 Нашел! Надо набрать число и затем нажать кнопку со значком суммы. На экране отобразится порядковый номер данных. А вот сколько всего данных можно ввести я не знаю. Дошёл до 100 потом надоело нажимать. И калькулятор не ищет сумму квадратов, я ошибся. Только среднеквадратическое отклонение и среднее значение.

  • @BS-jf4yb
    @BS-jf4yb 2 месяца назад

    Только что перепрошел эту игру. Очень хорошо сохранилась, местами удивлялся глубине проработки деталей

  • @igori1178
    @igori1178 2 месяца назад

    Спустя столько лет все графика все еще не вызывает тошноты

    • @TizianoVecellio_o
      @TizianoVecellio_o 2 месяца назад

      так игра шедевр, рукописи не горят©

    • @frederick18582
      @frederick18582 2 месяца назад

      Примерно любая неконсольная графика начиная с 2000 года не вызывает тошноты

  • @killmen_55055
    @killmen_55055 2 месяца назад

    Прикольно, я бы такое никогда не смог найти

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Да уж ладно, прибедняться-то)

  • @a_skedz
    @a_skedz 2 месяца назад

    В том, что вышел такой порт для PS2, виноваты Rockstar Toronto. Тем более это вторая игра, которую они портировали с компьютера. Вроде даже как на PS2 есть перевод от компании "Триада", который был в видео.

  • @karlson88552
    @karlson88552 2 месяца назад

    Класс😮😮😮

  • @amogus7014
    @amogus7014 2 месяца назад

    можете скинуть ссылку на эмулятор? не могу найти

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Например: bashkiria-2m.narod.ru/index/fajly/0-11

  • @unnamedsoldier5446
    @unnamedsoldier5446 2 месяца назад

    и что такого?в каждой игре так

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Да ничего такого. Просто интересные факты

  • @rookbirdfirst
    @rookbirdfirst 2 месяца назад

    Серьезно, чтоль?

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Что?

    • @rookbirdfirst
      @rookbirdfirst 2 месяца назад

      @@AlexPayneKU вот такие короли с оружием в игре есть?

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      @@rookbirdfirst крысы с оружием появляются, если кинуть гранату в дыру в стене. а получить гранату в первом уровне можно, вскрыв секретку, даже не прибегая к читам

  • @Exor4ist
    @Exor4ist 2 месяца назад

    Понятно откуда взялась белка с пистолетом 😂

  • @zheka____
    @zheka____ 2 месяца назад

    Эх, помню такое. Тоже писали на бейсике всякое в школе. 7 или 8й класс, вроде бы как 97-98й годы. Снегопад, салют, разные картинки, и ещё примитивные игры.

  • @MihBarm
    @MihBarm 2 месяца назад

    Крыски тут серьёзные Пацаны, за грену сразу с ДиГлами разбираться идут😂❤ А ты как хотел рамсить безнаказанно😂❤

  • @ВладиславГришин-ш7ш
    @ВладиславГришин-ш7ш 2 месяца назад

    под win10 бейсик можно запустить?

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Я пользуюсь DOS-BOX'ом. Кроме того, есть проект Qbasic64 - тот прямо под Виндой запускается, но мне он не нравится - слишком часто зависает.

  • @AlexPayneKU
    @AlexPayneKU 2 месяца назад

    SCREEN 12: CLS '21.11.2024 Панин А.А. PRINT "Снегопад." PRINT : PRINT INPUT "Введие количество снежинок:", n 'Генерируем начальное положение каждой снежинки 'Иcходя из разрешения 640*480 DIM snx(n), sny(n) 'Массивы с координатами каждой снежинки FOR i = 1 TO n 'Заполняем массивы случайными координатами sny(i) = INT(RND(1) * 640) snx(i) = INT(RND(1) * 480) NEXT i CLS 'Очищаем экран от диалога с пользователем while inkey$="" 'Цикл до нажатия клавиши 'Выводим снежинки на экран FOR i = 1 TO n PSET (sny(i), snx(i)) NEXT i 'Рассчитываем новые координаты снежинок 'х - увеличивается до 480 - максимум, затем сбрасывается в 0 'то есть снежинка, улетевшая вниз за экран - появляется вновь вверху экрана 'y - увеличивается или уменьшается случайным образом 'что создаёт эффект кружения. FOR i = 1 TO n IF snx(i) <= 480 THEN snx(i) = snx(i) + int(rnd(1)*3) ELSE snx(i) = 0 'Можно + случайное число sny(i) = sny(i) + INT(RND(1) * 3 - 1)' Прибавляем число от -1 до 1 'Контроля выхода за экран нет для y NEXT i for z=1 to 300:next z ' Небольшая задержка для устранения мерцания CLS 'Очищаем экран от снежинок wend ' Возвращаемся к рисованию снежинок END

  • @ИвнВас
    @ИвнВас 2 месяца назад

    Автор как запустил на 10-й винде? Дай ссылку на скачивание.

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      На Рутрекере есть готовое - 1 и 2 часть.

  • @Санчё-Пансо
    @Санчё-Пансо 2 месяца назад

    Воплатил в жизнь мечту миллионов )

  • @oleg8300-f3g
    @oleg8300-f3g 2 месяца назад

    Шедевр

  • @ДмитрийБыков-у3ж
    @ДмитрийБыков-у3ж 2 месяца назад

    Какая же шикарная атмосфера в этой игре, типа как в фильме "город грехов"

  • @MrGty78
    @MrGty78 2 месяца назад

    Самое прикольное, что эта игра теперь ужасно тормозит на компе, на котором я ее проходил (комп 2008 года). Когда игровой комп сдох, материнка накрылась, я попытался на старом запустить и хер там. Помню на нем гонял в mass effect 3 на минималках. Дрова видимо новые не катят для старых игр

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Ну, не знаю. Я проходил эту игру изначально на Celeron 1800 с 256 Мб ОЗУ, видяха была GeForce 4 с 64 Мб. Очень хорошо шло, но на средних настройках. Один раз отпала половина ОЗУ - я сразу начал удивляться почему начало тормозить))) Но, следует заметить, что Макс на минималках шёл у меня, например, на Celeron 1000 со 128 Мб ОЗУ с какой-то офисной видяшкой. На таких же конфигурациях шёл и Второй Макс, конечно, с тормозами) Но играли же)))

    • @MrGty78
      @MrGty78 2 месяца назад

      @@AlexPayneKU Вооот) А сейчас на том же самом компе слайдшоу. Вроде бы атлон 5000+ 3 озу и Н210 512 Мб. Правда 10-ку туда накатил. Ну иже с нм, купил норм машину на i5 12400.как-нибудь на ней попробую)

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      @@MrGty78 У меня Макс идёт на 10-ке. А на указанной в начале сообщения конфигурации - должен летать. Правда, возможно, Вы скачиваете какую-то модифицированную под современные компы версию.

    • @MrGty78
      @MrGty78 2 месяца назад

      @@AlexPayneKU Скорее всего + дрова свежие. Еще какой-то фикс на игру ставил для широкого экрана, а то все растянуто было.

  • @tafliaowl2930
    @tafliaowl2930 2 месяца назад

    Max Payne -forever!!!🤟😎

  • @CRIOL89
    @CRIOL89 2 месяца назад

    Лол привет из 2024 , в играх до сих пор используют фоны , предметы , которые не активны , просто для фона , чтобы снизить нагрузку на комп\приставку , но при этом обеспечить атмосферу и т.д.

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Что Вы говорите?))) А мужики-то не знают)))

  • @Sanremark
    @Sanremark 2 месяца назад

    Да,класс,молодец, классные темы ведешь❤

  • @АлексейЛукашов-т7г
    @АлексейЛукашов-т7г 2 месяца назад

    Шикарное повествование

    • @AlexPayneKU
      @AlexPayneKU 2 месяца назад

      Это вы про что?

  • @vikkonstruct3686
    @vikkonstruct3686 2 месяца назад

    Макс Пэйн - это прекрасно! 😢

  • @MlZAAR
    @MlZAAR 2 месяца назад

    Великая игра