
Сообщение от
romancha
Sample.7z
так-с, проблема была с 2.scr. файла нет на диске, не сохраняется из boot.
- - - Добавлено - - -
Код:
device zxspectrum128
ORG #4000
incbin "2.scr"
begin
end
MODULE boot
Basic:
db #00,#01;номер строки
DW EndLine1 - Line1
Line1:
db $F9 ; randomize
db $C0 ; usr
db 176 ; val
db 34 ; "
db "15619"
db 34 ; "
db ":" ; :
db 234 ; rem
db ":" ; :
db 239 ; load
db 34 ; "
db "2_scr"
db 34 ; "
db 175 ; code
db 176 ; val
db 34 ; "
db "16384"
db 34 ; "
db #0D
EndLine1:
EndBasic:
ENDMODULE
EMPTYTRD "pic.trd" ;create empty TRD image
SAVETRD "pic.trd", "boot.B", boot.Basic, boot.EndBasic - boot.Basic
SAVETRD "pic.trd","2_scr.C",$4000,$1B00
Примерно так. А вообще это изврат писать Бейсик побайтно, если есть заготовка. Удобнее получить Бейсик на диске, вытащить файл как Hobeta и добавлять утилкой на образ. Или каким-то шаманством.