Важная информация

User Tag List

Страница 1 из 14 12345 ... ПоследняяПоследняя
Показано с 1 по 10 из 136

Тема: BASIC ДВК

  1. #1
    Master
    Регистрация
    22.07.2007
    Адрес
    St.Petersburg
    Сообщений
    593
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    3
    Поблагодарили
    3 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию BASIC ДВК

    Схватился и понял что нету образа ПЗУ-шного BASIC-а от ДВК-1.

    Ни у кого образ не завалялся ?

    Выглядит он так :

    http://en.wikipedia.org/wiki/File:Ba...K_computer.JPG

    UPD
    Нашелся!! образ 013

    http://qbus.narod.ru/dvk-rom.zip

    Запускается на SIMH. Чтобы загрузить, пришлось написать небольшой скрипт.
    SIMH имеет встроенную команду загрузки бинарных файлов но требует
    какой-то кривой формат.
    Код:
    #!/usr/bin/perl -w
    
    $num_args = $#ARGV + 1;
    
    if ($num_args != 2) {
      print "\nUsage: bin2cmd.pl file.bin LOAD_ADDR > SIMH.cmd\n\n";
      exit;
    }
    
    $infile=$ARGV[0];
    $addr=eval($ARGV[1]);
    
    open INFILE, "<$infile" or die $!;
    binmode INFILE;
    
    my ($data, $n);
    
    while (($n = read INFILE, $data, 1) != 0) {
       printf ("d -b %06o %03o\n",$addr,ord($data) );
       $addr++;
    }
    
    
    close(INFILE);
    $ wget http://qbus.narod.ru/dvk-rom.zip
    $ unzip dvk-rom.zip
    $ ./bin2cmd.pl dvk-rom/013.dat 0140000 >b.cmd
    $ pdp11

    PDP-11 simulator V3.8-1
    sim> do b.cmd
    sim> g 140000

    b|jsik dwk nc
    @0
    vdu
    list

    o{ibk 1 stroke 0
    vdu
    Последний раз редактировалось AlecV; 27.11.2011 в 09:34.

  2. #1
    С любовью к вам, Yandex.Direct
    Размещение рекламы на форуме способствует его дальнейшему развитию

  3. #2
    Veteran Аватар для SKcorp.
    Регистрация
    01.01.2009
    Адрес
    Leningrad, USSR
    Сообщений
    1,954
    Записей в дневнике
    33
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    18
    Поблагодарили
    16 сообщений
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Дык сдампь у Фролова.

  4. #3
    Guru
    Регистрация
    15.09.2009
    Адрес
    SPb
    Сообщений
    7,152
    Спасибо Благодарностей отдано 
    229
    Спасибо Благодарностей получено 
    261
    Поблагодарили
    189 сообщений
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    AlecV, А ты номер ПЗУ скажи - будет тебе Бейсик ;-)

  5. #4
    Master
    Регистрация
    22.07.2007
    Адрес
    St.Petersburg
    Сообщений
    593
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    3
    Поблагодарили
    3 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    dk_spb, как понимаю -012 или -013

    http://fincoins.spb.ru/oldpc/re2/1801PE2.html

  6. #5
    Guru
    Регистрация
    11.09.2009
    Адрес
    Москва
    Сообщений
    4,777
    Спасибо Благодарностей отдано 
    2
    Спасибо Благодарностей получено 
    122
    Поблагодарили
    61 сообщений
    Mentioned
    16 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    У меня в эмуляторе МС1201 - БЭЙСИК ДВК НЦ по команде LIST ошибку не даёт:
    Код:
           БЭЙСИК  ДВК НЦ
    @0
    ЖДУ
    LIST
     
    ЖДУ
    10 PRINT "Hello!"
     
    LIST
     
    10 PRINT "Hello!"
    ЖДУ
    RUN
    Hello!
     
    ОСТ СТРОКЕ   10
    ЖДУ
    Где-то у меня даже лежало описание этого языка с примерами программ.

  7. #6
    Master
    Регистрация
    22.07.2007
    Адрес
    St.Petersburg
    Сообщений
    593
    Спасибо Благодарностей отдано 
    0
    Спасибо Благодарностей получено 
    3
    Поблагодарили
    3 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Patron, Там надо просто всё писать большими буквами. Маленькие латинские -- это на самом деле большие русские.

    иНЖАЛИД ДЕЖИЦЕ

  8. #7
    Guru
    Регистрация
    11.09.2009
    Адрес
    Москва
    Сообщений
    4,777
    Спасибо Благодарностей отдано 
    2
    Спасибо Благодарностей получено 
    122
    Поблагодарили
    61 сообщений
    Mentioned
    16 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от AlecV Посмотреть сообщение
    Маленькие латинские -- это на самом деле большие русские.
    В данном случае - видимо там просто перед проверкой введённой команды её регистр не приводится к верхнему. Дело в том, что код ПЗУ рассчитан на работу с терминалом 15ИЭ-00-013 и выводит сообщения в полноценном КОИ-7 с кодами <RUS><LAT>:

    Код:
    <016>       b|jsik  dwk nc     <017>
    @0
    <016>vdu<017>
    PRINT "yes!!!"
    yes!!!
    LIST
     
    <016>vdu<017>
    list
     
    <016>o{ibk     1 stroke<017>   0
    <016>vdu<017>

  9. #8
    Guru
    Регистрация
    07.10.2007
    Адрес
    п.Пудость Гатчинского р-на Лен.обл.
    Сообщений
    3,208
    Спасибо Благодарностей отдано 
    345
    Спасибо Благодарностей получено 
    606
    Поблагодарили
    398 сообщений
    Mentioned
    46 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Миниатюры Миниатюры Нажмите на изображение для увеличения. 

Название:	BASIC DVK_NC on UKNC.PNG 
Просмотров:	619 
Размер:	2.0 Кб 
ID:	31174  

  10. #9
    Guru
    Регистрация
    11.09.2009
    Адрес
    Москва
    Сообщений
    4,777
    Спасибо Благодарностей отдано 
    2
    Спасибо Благодарностей получено 
    122
    Поблагодарили
    61 сообщений
    Mentioned
    16 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    У меня БЭЙСИК ДВК НЦ вылетает в пульт при включении таймера.

  11. #10
    Guru
    Регистрация
    07.10.2007
    Адрес
    п.Пудость Гатчинского р-на Лен.обл.
    Сообщений
    3,208
    Спасибо Благодарностей отдано 
    345
    Спасибо Благодарностей получено 
    606
    Поблагодарили
    398 сообщений
    Mentioned
    46 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Patron Посмотреть сообщение
    У меня БЭЙСИК ДВК НЦ вылетает в пульт при включении таймера.
    Аналогично, надо выключать, да еще перед запуском исполняю команду RESET, что бы очистить триггер EVNT.

Страница 1 из 14 12345 ... ПоследняяПоследняя

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. 128 basic
    от sevol в разделе Для начинающих
    Ответов: 31
    Последнее: 21.04.2020, 13:25
  2. laser basic
    от johnny в разделе Программирование
    Ответов: 32
    Последнее: 17.02.2014, 22:57
  3. Tiny Basic
    от Kakos_nonos в разделе Зарубежные компьютеры
    Ответов: 0
    Последнее: 25.04.2011, 16:51
  4. Дизассемблер BASIC-48
    от Prusak в разделе Пресса
    Ответов: 4
    Последнее: 22.06.2010, 22:52
  5. Программы на BASIC
    от form в разделе ДВК, УКНЦ
    Ответов: 14
    Последнее: 17.04.2010, 15:41

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •