SjASMPlus Z80 кросс ассемблер

[Lethargeek]

вот такой пример:

        ORG $C000

bnode1  db LOW (label1-$), LOW (label1-$)

bnode2  db LOW (label2-$)
        db LOW (label2-$)

wnode1	dw label1-$, label1-$

wnode2	dw label2-$
        dw label2-$

label1  ld b,50
        halt
        djnz $-1
		
label2  ld b,50
        halt:djnz $-1

результат:

   C000 0C 0C       bnode1	db LOW (label1-$), LOW (label1-$)
   C002             
   C002 0F          bnode2	db LOW (label2-$)
   C003 0E          		db LOW (label2-$)
   C004             
   C004 08 00 08 00 wnode1	dw label1-$, label1-$
   C008             
   C008 09 00       wnode2	dw label2-$
   C00A 07 00       		dw label2-$
   C00C             
   C00C 06 32       label1	ld b,50
   C00E 76          		halt
   C00F 10 FD       		djnz $-1
   C011             		
   C011 06 32       label2	ld b,50
   C013 76          		halt
   C014 10 FD        		djnz $-1

опаньки! почему в $C000 и $C004 числа одинаковые?
получается, что $ равен адресу первого числа в def-строке, а не текущего! разве так правильно?
тем более что, как видим ниже, для команд уже нет никакой разницы, первая она в строке или нет

[rasmer]

правильно\неправильно - вопрос к автору той версии сджасма которую ты юзаешь....
перенеси dw на новую строчку и не заморачивайся...

[Lethargeek]

правильно\неправильно - вопрос к автору той версии сджасма которую ты юзаешь....

дык последнюю доступную 1.07rc7 (rc8 я по ссылкам не обнаружил)

перенеси dw на новую строчку и не заморачивайся...

для меня это заморачиваться как раз, некрасиво и чревато ошибками
у меня байтовое бинарное дерево с переходом по смещению от листа
и удобно, чтобы разветвления шли построчно, влево и вправо

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

По моему с дефами как раз правильно, а вот с кодом не совсем, по идее должно быть так же.

ящетаю, всё должно быть ровно наоборот: в дефах $ должен соответствовать текущему элементу, а в кодовой строке - началу строки

Хотя все эти переходы по $ и запись через : только ухудшают читаемость имхо.

запись-то скорей улучшает, когда опы тесно связаны в одно действие (и при отладке их удобней закомментировать)

[Lethargeek]

ну вот и суть, задача не в реальном коде, а в необходимости имитировать генерируемые данные вручную

нет, не суть, они не все генерируются

Ну не знаю всегда коментил блоки по ctrl+/ хотя да хорошая причина сделать код нечитаемым,

текст читаем лучше, когда глазу не приходится выискивать, где же в монотонном столбце отдельных команд начинается очередное цельное действие
и когда листать поменьше приходится, потому что нет нужды каждый чих пустыми строками выделять, и на экране больше информации помещается

[Bedazzle]

Есть вопрос, как удобней всего оформлять список объектов, когда затем в разных местах программы используются порядковые номера этих объектов (т.е. индексы)?

Сделал через MAP, получилось что-то вроде:

       MAP 0

INDEX_0: #1  SETSPRITE 5, 6
INDEX_1: #1  SETSPRITE 12, 1
INDEX_2: #1  SETSPRITE 3, 7

....

creature:
       DB INDEX_1, INDEX_2

[Sayman]

Какой-то не понятный глюк в ужасме. делаю:

wascorrlogd:	INCBIN "corlogd_.bin"
		ORG wascorrlogd

		LUA ALLPASS
			for i=1,256,1 do
				l_scrtopx = sj.get_label("screen_topx") * 8
				addr = sj.current_address+l_scrtopx
				byte = sj.get_byte(addr)
				sj.insert_define("_b", byte)
				print("addr=",addr)
				_pc("db _b")
			end
		ENDLUA

т.е. погруженная табличка должна быть подправлена. ORG стоит, но по факты, кусок Lua кода исполняет код на 256 байт ниже. Т.е. это _pc("db _b") производит запись игнорируя ORG, соответственно, не с адреса, скажем #8500, с которой табличка, а с адреса #8600, сразу за ней. Косяк! Как это исправить? может я что-то не так делаю?

[Advertiser]

[krt17]

Как это исправить? может я что-то не так делаю?

а так что напишет?

		display $
wascorrlogd:	INCBIN "corlogd_.bin"
		ORG wascorrlogd
		display $

[Sayman]

в том-то и дело, что в консоль пишет он всё верно и даже в логах (файл листинга) тоже всё верно. А в бинарном файле каша! Т.е. даже если заменить скрипт на lua на что-то типа:

wascorrlogd:
	INCBIN "corlogd_.bin"
	ORG wascorrlogd
	DUP 256
		db {$+(screen_topx*8)} & 0xff    ;альтернативная замена аласмовскому безобразию
	EDUP

то один фиг, ORG игнорируется и данные попадают сразу после инкбиненой таблички. Хрень какая-то.
бинарник собираю не в снапшот, а именно в бинарник камандой типа sjasmplus.exe %1.asm --raw=%1.exe --lst=%1.lst (или принудительно через OUTPUT в теле исходника).

[krt17]

ну и конечно если нет никакого потаенного смысла может проще написать _pc("db "..byte) вместо дефайна

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

хо хо
org при компиляции в raw ясен фиг не играет

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

компиль в девайс режиме и сохраняй savebin

[Sayman]

да, я так и понял, что таблички собирать придётся отдельно. ацтой, чё. только почему в рав не играет, какая разница, оно что там бинарь, что так бинарь. тупость ужасмовская.
и кстати, собирается всё и так с DEVICE ZXSPECTRUM128. Но только savebin спасает. бред в общем.