Вид для печати
Помню задавал я этот вопрос насчёт - нафиг нужен этот SCL, когда есть TRD? На меня куча критики помнится обрушалась, что оно места меньше занимает, и вообще раньше так было принято. Я лишь говорил, что вы ещё намучаетесь с этим SCL, а тем у кого TRD место много занимает, посоветовал пользоваться упаковщиками. Да и раньше они, упаковщики, тоже были.
Ну и, что мы видим? Опять пошли танцы с бубном вокруг этих SCL.
думаю, что не потяну, хотя бы и попробовал.Цитата:
Сообщение от elf/2
я запутался в том:Цитата:
Сообщение от elf/2
есть .scl, в котором хранится один моноблок, поэтому данные для подсчета можно интерпретировать по-разному.
АПВС?:)Цитата:
Сообщение от elf/2
---------- Post added at 13:18 ---------- Previous post was at 13:16 ----------
ну то промеж строк псты читаешь же:)Цитата:
Сообщение от Rindex
.scl - просто компактный, формат эмуляторы поддерживают.
Гы. А когда задумаешь играть в игру, которая записывает новый файл на диск, ты чего с этим SCL делать будешь нажав на запись после пару часов игры. Материться, наверное... :)Цитата:
Сообщение от denpopov
не знал и не играл в подобные игры. а с другой стороны - у ААА появилось 200 с гаком крэктр, и сколько они займут в формате .TRD?Цитата:
Сообщение от Rindex
все равно, противники формата пускай идут по холодку, как говорит мой сосед:)
А ты сыграй. И, вроде, кто-то говорил, что пользуется эмуляторами? Так открою страшную тайну, файл в SCL и TRD в запакованном ZIP'e, занимает одинаковое количества места.Цитата:
Сообщение от denpopov
Ну да ладно. Для этого есть эта тема.
вообще говоря, я сообщение создл не ради холивара. Просто я утомился собирать 1К и 256б в один файл, вот и занялся вопросом. Думаю, что ради подобной цели, а не только ради 1К, финальное решение устроит и других.Цитата:
Сообщение от Rindex
Да никаких проблем. Spectacullator нормально дописывает в SCL. Только что WHAM+ из SCL запустил и сохранил из него мелодию. Вышел из эмуля, проверил SCL — новый файл появился.Цитата:
Сообщение от Rindex
Не всегда. Очень часто бывает вот так. Нафиг такое счастье.Цитата:
Так открою страшную тайну, файл в SCL и TRD в запакованном ZIP'e, занимает одинаковое количества места.
И вообще я не хочу из архивов запускать. У меня Speccy 2010 есть, я чего, буду в огромном дереве папок копаться (каждая игра в папке с именем игры в разных форматах) и в них всё распаковывать чтобы на него скопировать? Тут никаких флешек не хватит.
Заодно, у Спектакулятора с версии 7 до 8 по дефолту диски залочены на запись, поэтому приходится ручками в Disk Drives отключать защиту на запись. Может, в этом и дело?:)
Дык, если не отключить защиту записи, тут и TRD не поможет. :)Цитата:
Сообщение от denpopov
Резюме: SCL рулит.
Неа.Цитата:
Сообщение от denpopov
Это видно, по уже написанным постам. ;)Цитата:
Сообщение от creator
тарищи модераторы, ваше резюме - последний вариант покатит для сборки, или нет?
Уточню — я против неправильных SCL.Цитата:
Сообщение от Rindex
взаимоISKLючающие параграфы детект:
Цитата:
Сообщение от creator
Цитата:
Сообщение от creator
---------- Post added at 14:43 ---------- Previous post was at 14:42 ----------
тады ой:)Цитата:
Сообщение от Rindex
Нет тут никаких взаимоисключений. "Неправильные" это неправильно сформированнные — без контрольной суммы.Цитата:
Сообщение от denpopov
Именно из-за моей приверженности к этому формату, я повёл себя так непримиримо к тому, кто попытался его (формат SCL) скомпрометировать. ;)
по последнему и сделанному тебе нечего сказать?Цитата:
Сообщение от creator
Как бы на тебя расчитывали... :v2_blink: Кто, если не ты?Цитата:
Сообщение от elf/2
я уже не настоящий сварщик :( после питона на c/c++ смотреть не могуЦитата:
Сообщение от Shadow Maker
Может Саша Медведев этот тред прочитает и сделает всем хорошо...
Лично у меня все те же проблемы с твоим макросом. Луа тоже пишет не туда по-моему, или же где-то что еще пропадает последний байт последнего файла... Короче не собирает в итоге работающую SCL. Фикси.Цитата:
Сообщение от denpopov
какая у тебя версия?Цитата:
Сообщение от Shadow Maker
1.07 RC7, видимо.
Ну а исходник?
я подготовил работу в .SCL, потом FAR'ом вытащил в другой .SCL, размер файлов и контрольных сумм совпал, если не трудно, то покажи свою работу.
Что исходник? Взял твой исходник.
Проблемы такие вот:PHP код:device zxspectrum128
macro sectors datab,datae
IF low (datae-datab)=0
db high (datae-datab)
ELSE
db (1+high (datae-datab))
ENDIF
endm
org $8000-14*2-9
scl_b:
;header_b:
db "SINCLAIR"
db 2;two! filez
;-1st
; 12345678t
db "abstractC"
dw $8000;start adres of code block
dw end-begin;size of code
sectors begin,end;db 4;sectors
;-2nd
; 12345678t
db "abstractB"
dw basic_e-basic_b-4;size of basic
dw basic_e-basic_b-4;size of basic
sectors basic_b,basic_e;db 1;sectors
;header_e:
; ORG #8000
begin
ld hl,pack,de,$6100
push de
include "zx7.a80"
pack: incbin "test.bin.zx7"
end
org $8400
basic_b:
db #00,10;номер строки
DW EndLine1 - Line1
Line1:
db $FD;clear
db $B0;val
db $22,"24575",$22,":"
db $F9;randomize
db $C0;usr
db $B0;val
db $22,"15619",$22,":"
db $EA;rem
db ":"
db $F7;run
db $22,"abstract",$22
db $AF;code
db #0D
EndLine1:
db #80;for autorun
db #AA,10,0
basic_e:
org $8500
dw 0,0;checksum
scl_e:
savebin "test.scl",scl_b,scl_e-scl_b
LUA
local fp
local checksum
fp = assert(io.open("test.scl", "rb"))
checksum=0
while true do
local byte = fp:read(1)
if byte==nil then
break
end
checksum=checksum+string.byte(byte)
end
assert(fp:close())
print("writing",string.format("%08X",checksum))
fp = assert(io.open("test.scl", "a"))
for i=1,4 do
fp:write(string.char(checksum%256))
checksum=math.floor(checksum/256)
end
assert(fp:flush())
assert(fp:close())
ENDLUA
PHP код:SjASMPlus Z80 Cross-Assembler v1.07 RC7 (build 02-04-2008)
scl.a80(24): error: [IF] Forward reference
scl.a80(30): error: [IF] Forward reference
Pass 1 complete (2 errors)
Pass 2 complete (2 errors)
writing 000258F4
Pass 3 complete
Errors: 2, warnings: 0, compiled: 180 lines, work time: 0.016 seconds
Да, косяк с расположением файлов. Буду думать.
Вот такой вариант.
Тоже задумал make_scl написать - не спрашивайте на чем, - не скажу.
Никак не могу понять, каким образом вы выравниваете файлы внутри scl по границе сектора. Или это не требуется?
Да не образом, а свечкой.Цитата:
Сообщение от Sergey
Требуется из-за спецификации формата.
на Rexx'е:)Цитата:
Сообщение от Sergey
кстати, кто шарит, подскажите, пройдет ли align 256?
никак не врублюсь в описание(
Ну считаешь количество, делишь на 256, смотришь остаток от деления, если 0, то всё ок, иначе добиваешь нулями до конца. Как попов выравнивает я не смотрел.Цитата:
Сообщение от Sergey
тупо ORG'ами:)Цитата:
Сообщение от Shadow Maker
Шо, свечки больше не помогают? :)Цитата:
Сообщение от denpopov
---------- Post added at 13:37 ---------- Previous post was at 13:31 ----------
я так понял, он так и делает: после INCBIN макрос sectors юзается.Цитата:
Сообщение от Shadow Maker
Можно иcпользовать align 256. Только будет один минус - случайные данные хуже пакуются, чем нули. Но я считаю, что на это целесообразно "забить". На реале, ведь, тоже неиспользуемая часть сектора хз чем забита.
Цитата:
Сообщение от Sergey
нутыпонел:)Цитата:
Сообщение от Sergey
Апну тему. В исходниках осталась одна логическая ошибка с выравниванием данных, поэтому вот два варианта сборки - моноблок и бейсик-загрузчик с отдельными файлами.
не знаю, на что эта ошибка влияет, у мну так компилиЦЦа, кстати в крайнем компиляторе, надо бы на предыдущих проверить.
Но при этом скомпиленное работает, и в эмуле, и в virtual TR-DOS, что главное.Код:---------- Capture Output ----------> "K:\Program Files\Crimson Editor SVN286M\sjasmplus-win32-1.07-rc7\sjasmplus.exe" scl.asm
SjASMPlus Z80 Cross-Assembler v.20190304.3
scl.asm(24): error: [IF] Forward reference
scl.asm(31): error: [IF] Forward reference
Pass 1 complete (2 errors)
Pass 2 complete (2 errors)
writing 00258657
Pass 3 complete
Errors: 2, warnings: 0, compiled: 118 lines
> Terminated with exit code 1.
Вроде бы мелькало решение таких ошибок. У меня тоже выскакивают сообщения, но файлы работают.
Работает потому что размер кода внутри блоков IF и ELSE одинаков. (+ в данном случае в IF используется разница адресов, на которую длина кода внутри IF/ELSE все равно не влияет) Иначе в общем случае могут быть проблемы. Разрулить в sjasmplus это по-нормальному по идее можно (не для всех случаев), но нетривиально.Цитата:
Сообщение от zebest
Если причина в секторах для моноблока
то проще такКод:macro sectors datab,datae
IF low (datae-datab)=0
db high (datae-datab)
ELSE
db (1+high (datae-datab))
ENDIF
endm
Код:db high($FE+datae-datab)
нет, как раз basic версию компилил. Нуу значит повезло.Цитата:
Сообщение от Shiny