Новые TR-DOS-релизы

LW · 13.04.2024, 04:19

Сообщение от Slider

Можно было бы сделать, если б кто тыкнул лицом в процедуру, которая занимает немного места и загружает, а затем запускает бейсик-файл с прописанным внутри кода именем.

выполнить команду в басике randomize 15619:rem:run "filename"
куда проще, чем грузить басик, а потом его запускать

**Grand** · 13.04.2024, 10:11

Сообщение от Slider

... процедуру, которая занимает немного места и загружает, а затем запускает бейсик-файл с прописанным внутри кода именем.

Я в своих программах делаю RUN "boot" так:

Код:

        LD      HL,1
        LD      (23618),HL;NEWPPC
        LD      A,H
        LD      (23620),A;NSPPS
;
        LD      HL,start
        LD      DE,23698
        LD      BC,B_PROG-start
        LDIR 
;
        LD      HL,(23613)
        LD      SP,HL;На (SP) адр.проц.обр.ош.
        LD      HL,23698
        PUSH    HL
        LD      HL,65367;RAMTOP=67367.
        PUSH    HL
        EI 
        JP      7878; Уст-ка RAMTOP.
;
start   LD      HL,(23635);НЕ УВЕЛИЧИВАТЬ ЭТУ ПРОЦЕДУРУ!
        LD      BC,19
        PUSH    HL
        PUSH    BC
        CALL    5717;MAKE_ROOM
        POP     BC
        POP     HL
        LD      E,L
        LD      D,H
        ADD     HL,BC
        LD      (23627),HL;VARS
        LD      HL,B_PROG
        LDIR 
        SET     7,(IY+1);Уст.при вып.прогр.
        JP      #1B7D;Запуск BASIC-интерпретатора.
B_PROG  DEFB    0,1,15,0,#F9,#C0,#B0
        DEFM    #22,"15619",#22
        DEFB    ":",#EA,":",#F7,13
;B_PROG не должна оказаться в области стека, который
;переустановит 7878!!

- - - Добавлено - - -

Это будет работать, если системные области не уничтожены пользовательской программой!

- - - Добавлено - - -

Если системные области уничтожены, тогда BASIC-программу надо запускать, как здесь.

**Stl75** · 13.04.2024, 15:57

Сообщение от Slider

Можно было бы сделать, если б кто тыкнул лицом в процедуру, которая занимает немного места и загружает, а затем запускает бейсик-файл с прописанным внутри кода именем.
Можете, если есть у кого, выслать мне на почту - [email protected]

Привет, Slider...

Можешь boots по разбирать,
или защиты дисков от копирования.

Там такое - точно есть.
Загрузка basic файла и запуск.

Сообщение от ^m00h^

Можно также озвучить с c64/atari st, на амстраде как и на спеке биперная музыка.

Про музыку и звуки...
Да можно, конечно...
Только это - по времени много займет...

Если так дискетнуть - пара недель,
а если софтину переделывать то от полгода
встанет...

Оно надо кому???

**Stl75** · 30.04.2024, 23:46

Привет всем...

Игруш к Белтейну...

Сборник игр - Sirwood 48/128K - intro, 1, 2, 3 from Opera' 90
by Tiboh, Slider и совсем немного Kozlish...

Сборник игр сконвертирован с +3 .Dsk...
Sirwood 2, 3 - с фирменной музыкой и AY - эффектами...

Игра ускорена по сравнением с оригиналом...
Мой начальный вариант процедуры для ускорения
вывода буфера на экран...