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

User Tag List

Страница 1 из 3 123 ПоследняяПоследняя
Показано с 1 по 10 из 28

Тема: Существует ли BAS to TXT ?

  1. #1
    Member
    Регистрация
    08.05.2006
    Адрес
    St.-Petersburg
    Сообщений
    144
    Благодарностей: 57
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию Существует ли BAS to TXT ?

    Чем можно конвертировать ZX BASIC в обычный текстовый файл?

    Удивительно, но поиском не нашел.

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

  3. #2
    Guru Аватар для newart
    Регистрация
    19.01.2005
    Адрес
    Санкт-Петербург
    Сообщений
    10,947
    Благодарностей: 1520
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Best View на реале.

  4. Этот пользователь поблагодарил newart за это полезное сообщение:
    eugeniusz (10.03.2012)

  5. #3
    Moderator Аватар для BYTEMAN
    Регистрация
    11.01.2006
    Адрес
    Брест/Минск
    Сообщений
    7,549
    Благодарностей: 1672
    Записей в дневнике
    4
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    BASin
    С уважением, Александр.
    Scorpion ZS-256 Turbo+
    SID-Blaster/ZX
    Музей ретрокомпьютеров в Минске!
    Здесь ничего нет => http://byteman.by
    И здесь тоже --->>> http://bytespace.by

  6. Этот пользователь поблагодарил BYTEMAN за это полезное сообщение:
    eugeniusz (10.03.2012)

  7. #4
    Member
    Регистрация
    08.05.2006
    Адрес
    St.-Petersburg
    Сообщений
    144
    Благодарностей: 57
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    спасибо!

    bestview на триальном спектакуляторе не работает.

    basin рабатает!

  8. #5
    Member
    Регистрация
    03.03.2008
    Адрес
    Петербург
    Сообщений
    177
    Благодарностей: 103
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    В IS-DOS есть программа bas_is.com и резидент bas_is.res

    А обратная программа (txt -> basic) существует?

  9. #6
    Veteran Аватар для John North
    Регистрация
    22.09.2006
    Адрес
    Ижевск
    Сообщений
    1,706
    Благодарностей: 400
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    BView в чистом дос или в дос-боксе на хр..
    Пс: Basic View.
    Хороший.. Плохой.. Главное - у кого ружьё !!

  10. #7
    Moderator Аватар для BYTEMAN
    Регистрация
    11.01.2006
    Адрес
    Брест/Минск
    Сообщений
    7,549
    Благодарностей: 1672
    Записей в дневнике
    4
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от AndTorp Посмотреть сообщение
    А обратная программа (txt -> basic) существует?
    Да вроде тот же BASin умеет...
    С уважением, Александр.
    Scorpion ZS-256 Turbo+
    SID-Blaster/ZX
    Музей ретрокомпьютеров в Минске!
    Здесь ничего нет => http://byteman.by
    И здесь тоже --->>> http://bytespace.by

  11. #8
    Banned
    Регистрация
    01.12.2010
    Адрес
    г. Санкт-Петербург
    Сообщений
    1,657
    Благодарностей: 1243
    Записей в дневнике
    21
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Просто так
    Код:
    char* zx{256] = {
      "<0>", "<1>", "<2>", "<3>", "<4>", "<5>", "<6>", "<7>", "<8>", "<9>", "<10>", "<11>", "<12>", "<13>", "", "<15>",
      "<16>", "<17>", "<18>", "<19>", "<20>", "<21>", "<22>", "<23>", "<24>", "<25>", "<26>", "<27>", "<28>", "<29>", "<30>", "<31>",
    
      " ", "!", "\"", "#", "$", "%", "&", "'", "(", ")", "*", "+", ",",  "-", ".", "/",
      "0", "1", "2",  "3", "4", "5", "6", "7", "8", "9", ":", ";", "<",  "=", ">", "?",
      "@", "A", "B",  "C", "D", "E", "F", "G", "H", "I", "J", "K", "L",  "M", "N", "O",
      "P", "Q", "R",  "S", "T", "U", "V", "W", "X", "Y", "Z", "[", "\\", "]", "^", "_",
      "f", "a", "b",  "c", "d", "e", "f", "g", "h", "i", "j", "k", "l",  "m", "n", "o",
      "p", "q", "r",  "s", "t", "u", "v", "w", "x", "y", "z", "{", "|",  "}", "~", "(c)",
    
      "<128>",      "<129>",       "<130>",     "<131>",      "<132>",     "<133>",     "<134>",    "<135>",    
      "<136>",      "<137>",       "<138>",     "<139>",      "<140>",     "<141>",     "<142>",    "<143>",
      "<144>",      "<145>",       "<146>",     "<147>",      "<148>",     "<149>",     "<150>",    "<151>",    
      "<152>",      "<153>",       "<154>",     "<155>",      "<156>",     "<157>",     "<158>",    "<159>",
      "<160>",      "<161>",       "<162>",     "SPECTRUM ", "PLAY ",    "RND ",     "INKEY$ ", "PI ",     
      "FN ",       "POINT ",     "SCREEN$ ", "ATTR ",     "AT ",      "TAB ",     "VAL$ ",   "CODE ",
      "VAL ",      "LEN ",       "SIN ",     "COS ",      "TAN ",     "ASN ",     "ACS ",    "ATN ",    
      "LN ",       "EXP ",       "INT ",     "SQR ",      "SGN ",     "ABS ",     "PEEK ",   "IN ",  
      "USR ",      "STR$ ",      "CHR$ ",    "NOT ",      "BIN ",     "OR ",      "AND ",    "<= ",     
      ">= ",       "<> ",        "LINE ",    "THEN ",     "TO ",      "STEP ",    "DEF FN ", "CAT ", 
      "FORMAT ",   "MOVE ",      "ERASE ",   "OPEN # ",   "CLOSE # ", "MERGE ",   "VERIFY ", "BEEP ",   
      "CIRCLE ",   "INK ",       "PAPER ",   "FLASH ",    "BRIGHT ",  "INVERSE ", "OVER ",   "OUT ",
      "LPRINT ",   "LLIST ",     "STOP ",    "READ ",     "DATA ",    "RESTORE ", "NEW ",    "BORDER ", 
      "CONTINUE ", "DIM ",       "REM ",     "FOR ",      "GO TO ",   "GO SUB ",  "INPUT ",  "LOAD ", 
      "LIST ",     "LET ",       "PAUSE ",   "NEXT ",     "POKE ",    "PRINT ",   "PLOT ",   "RUN ",
      "SAVE ",     "RANDOMIZE ", "IF ",      "CLS ",      "DRAW ",    "CLEAR ",   "RETURN ", "COPY "
    };
    
    void basicToTxt(const char* p, int s, FillBuffer& out) {
      while(s>4) {
        unsigned short line = p{0]<<8 | p{1];
        unsigned short size = p{2]<<8 | p{3];
        s-=4;
        if(s<size) return;
        out.itoa(line);
        out.str(" ");
        for(unsigned int i=0; i<size; i++) {
          if(*p==14) {
            p+=6;
            i+=5;
          } else {
            out.str(zx{(unsigned char)*p++]); 
          }
        }
        out.str("\r\n");
        s-=size;
      }
    }
    Последний раз редактировалось vinxru; 13.03.2012 в 16:04.

  12. #9
    Vitamin C++ Аватар для Vitamin
    Регистрация
    14.01.2005
    Адрес
    Таганрог, Россия
    Сообщений
    4,031
    Благодарностей: 1426
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    vinxru, что-то у тебя с автоматической расстановок скобочек не так Плюс сырая реинтерпретация байт не комильфо- тот же номер строки ты вполне кошерно вычисляешь.

  13. #10
    Banned
    Регистрация
    01.12.2010
    Адрес
    г. Санкт-Петербург
    Сообщений
    1,657
    Благодарностей: 1243
    Записей в дневнике
    21
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Vitamin Посмотреть сообщение
    vinxru, что-то у тебя с автоматической расстановок скобочек не так Плюс сырая реинтерпретация байт не комильфо- тот же номер строки ты вполне кошерно вычисляешь.
    Оптимизация. Убрал.

Страница 1 из 3 123 ПоследняяПоследняя

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

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

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

Похожие темы

  1. Точный эмулятор существует ли?
    от AmoNik в разделе Эмуляторы
    Ответов: 41
    Последнее: 22.11.2013, 19:27
  2. Демо коллекшн,существует ли?
    от Роман x87 в разделе Amiga
    Ответов: 10
    Последнее: 08.03.2011, 00:38
  3. winuae.net больше не существует?
    от ReDmit в разделе Amiga
    Ответов: 5
    Последнее: 21.02.2010, 10:40
  4. Существует современный эмуль под ДОС?
    от skyther в разделе Эмуляторы
    Ответов: 15
    Последнее: 28.06.2008, 10:54

Ваши права

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