ZXAAA → Программирование → директива IFUSED ужясма
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Короче, код такой:
device zxspectrum128
ORG #6000
begin
end
page 0
org $C000
page0b:
db "Dzhigurda",0
page0e:
display /d,end-begin
savesna "!void.sna",begin
IFUSED page0b
display page0b
ELSE
display "no page 0"
ENDIFВерсия 1.07 RC7, при компеляции выдает no page 0. Хотя по идее, должно казать адрес.
чо за фигня?
дак ты ее и не юзед
ну да, конечно
device zxspectrum128
ORG #6000
begin
;border
MACRO brd n
ld a,n
out ($FE),a
ENDM
;liney
;atrxy
jr $
call nbde
IFUSED nbde
nbde INC D:LD A,D:AND 7:RET NZ
LD A,E:ADD A,#20:LD E,A:RET C
LD A,D:SUB 8:LD D,A:RET
ENDIF
IFUSED nbhl
nbhl INC h:LD A,h:AND 7:RET NZ
LD A,L:ADD A,#20:LD L,A:RET C
LD A,H:SUB 8:LD H,A:RET
ENDIF
end
display /d,end-begin
savesna "!void.sna",beginНипонел, ты разобрался?
нед(
[img]https://zxdemos.ru/oldforum/uploads/images/1065/8d83f917daec2b466cc0c80825855c08.png[/img]
Все заебись с твоим кодом
Если обьявлена это хуйня, надо к ней обратиться как во втором примере. А так все работало всегда
Ну да, меня это и смутило - пример с nbde работает, а с page0 нет.
смысл в том, чтобы влегкую написать загрузчик. т.е., если объявлены page0,page1,page3,page4, то использовать директивы IFUSED и при загрузке и при создании TRD
сделай display c ними тогда сработает, наверное ну или какую другую неважную хрень
А вообще такие штуки define делаются, посмотри мож тебе удобнее будет
Кулибины, блядь - пилят ужасм до посинения.
huj equ page0b
теперь работает. Спасибо за подсказку
а хер там. если page0b не задана, то не катит.
device zxspectrum128
ORG #6000
begin
jr $
ld a,$10,bc,$7ffd:out (c),a
ld hl,$C000
end
page 0
org $C000
page0b:
db "Dzhigurda",0
page0e:
LUA
if sj.get_label("page0b")~=-1 then
sj.insert_label("nop0", 1)
else
sj.insert_label("nop0", 0)
end
ENDLUA
; display nop0
savesna "!void.sna",begin
IF nop0==1
display "p0 OK"
ELSE
display "no page 0"
ENDIF
device zxspectrum128
ORG #6000
begin
jr $
define page0b
;----------------------
ifdef page0b
display "win"
else
display "failed"
endif
;----------------------
savesna "!void.sna",beginтак православно
это глупо. page0b задана для страницы. Похоже, что удобнее использовать DEFINE.
Но, бля, критерий IFUSED ебанутый, если я правильно понял.
не, ифузед заябись, просто не для этого, у тебя второй пример прям каноничный
только с документаций не совпадает. IFUSED прринимает значение true, если к метке было обращение - CALL или LD A,()
неправильно это.
device zxspectrum128
ORG #6000
begin
jr $
hui equ wtf
;----------------------
ifused wtf
wtf equ 1
display "win"
else
display "failed"
endif
;----------------------
savesna "!void.sna",beginсуяли, все работает и так
если page0b не задано, то компеляция валится.
Ясное дело, яж говорю, оно не совсем для этого. Но то что должно делать делает правильно
Ага, теперь понел. Все же с DEFINE работает:
page 0
org $C000
page0b:
DEFINE pg0
f0: incbin "page0\0.bin.zx7"
f1: incbin "page0\1.bin.zx7"
page0e:
...
IFDEF pg0
di
ld de,(#5CF4)
ld hl, #C000
sectors page0b,page0e
call #3d13
ENDIFновый ужасм
http://www.pouet.net/prod.php?which=88704
по тесту пофиксили эту директиву
[quote="Шыншыл"]по тесту
какому тесту? в ней и так все работало
смотрю чейжлоги тут https://github.com/z00m128/sjasmplus/releases последний год не было никаких фиксов
device zxspectrum128
ORG #6000
begin
jr $
ld a,"0"
rst 16
ld hl,bla
IFUSED bla
; ld a,-1
display "bla"
ENDIF
jr $
bla:
end
display /d,end-begin
savesna "!void.sna",beginИ чё? Нихуа не изменилось, работает как раньше.
Добавили exist это да, раньше это только дефайнами делалось, но так себе костыль, имхо не нужный.
[quote=krt17 87115]И чё? Нихуа не изменилось, работает как раньше.
работает по-другому. в прежней версии директива работала при использовании call r1 или ld a,(a1). Здесь, похоже, работает при определении метки.
А зачем тогда ты пример с использованием показал?
И не должна при определении работать, если работает то это косяк
почему косяк то?
Чтобы отправить ответ, вы должны войти или зарегистрироваться
ZXAAA → Программирование → директива IFUSED ужясма
