Тема для всяких глупых вопросов

[ALKO]

а потом просто смещение добавлять.

но оно не константное жи. А обратно пропорционально ширине пикчи.

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

хотя да. Наверное быстрее вычислить значение вначале

LD HL, offset
LD B, (_SPR_W)
LD A, 32
SUB B
LD (HL), A

Наверное так.

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

Замени OR #F2 на ADD #F2 чтоб прокатило ))

Таки да. Помогло. Благодарю.

[Advertiser]

[Dart Alver]

хотя да. Наверное быстрее вычислить значение вначале

LD HL, offset
LD B, (_SPR_W)
LD A, 32
SUB B
LD (HL), A

Наверное так.

Хмм... Нет такой команды 'LD B, (**)', есть 'LD A,(**)' или 'LD BC,(**)'
И много лишнего, например HL зря приплёл.

можно:

LD A,(_SPR_W)
LD B,A
LD A,32
SUB B
LD (offset),A

но лучше например

LD A,(_SPR_W)
NEG            ; A=-A
ADD A,32
LD (offset),A

Оба варианта одинаковы и по тактам и по размеру, но во втором случае портится только регистр A

А можно сохранять позицию перед LDIR.

Например вот вариант изменения твоего кода для примера.

   ld hl, SPR_ATTR  ;указатель на массив DEFB

; Для начала если расположение ячеек координат и размера идёт друг за другом
; типо так :  
;_SPR_X  DB ?
;_SPR_Y  DB ?
;_SPR_W  DB ?
;_SPR_H  DB ?
;  то можно вместо конструкции
  
       ;         ld a,(_SPR_Y)
       ;         ld d,a
       ;         ld a,(_SPR_X)
       ;         ld e,a
       ;         ld a,(_SPR_H)
       ;         ld b,a
     
; поступить проще

                ld de,(_SPR_X)  ; E=(_SPR_X) , D=(_SPR_Y)
                ld bc,(_SPR_W)  ; C=(_SPR_W) , B=(_SPR_H)
                                                       
; а теперь вместо этого              

;PUTSPRITES2     push bc
       ;         push de

       ;         LD A,D
       ;         RRCA
       ;         RRCA
       ;         RRCA
       ;         LD C,A
       ;         AND 31
       ;         OR 242 ; 61952/256
       ;         LD B,A
       ;         LD A,C
       ;         AND 252
       ;         OR E
       ;         LD C,A

       ;         ld d,b
       ;         ld e,c
       ;         ld bc,(_SPR_W)
       ;         ld b,0
       ;         ldir

       ;         pop de

       ;         inc d

       ;         pop bc
       ;        djnz PUTSPRITES2

       ;    ret

; сначала найдём адрес в буфере (почти та же процедура) ))

                 ld a,d
                 rrca
                 rrca
                 rrca
                 ld d,a
                 and #E0
                 or e
                 ld e,a
                 ld a,d
                 and 3
                 add a,#F2  ; Для буфера в #F200
                 ld d,a     ; в DE - адрес, никаких BC портить не надо
            
                 ld a,32    ; ну а вот и наше смещение
                 sub c      ; теперь в A - смещение для строки

1          ; всё начинаем цикл
                 push bc
                 ld b,0     
                 ldir
                 ld c,a         ; теперь bc - смещение
                 ex de,hl
                 add hl,bc      ; переход на новую строку
                 ex de,hl
                 pop bc            
                djnz 1B

              ret

Как-то так. Это пример конечно, можно и ещё поколдовать )) Да я и обшибиться мог, не проверял всё-таки ))
И да - код что этот, что изначальный предполагает что спрайт атрибутов целиком помещается в экране,
если вылезет - будет пичалька ))

[Lethargeek]

Как-то так. Это пример конечно, можно и ещё поколдовать ))

push/pop и ldb в цикле нафиг не нужны, просто c загружать два раза (мб даже из половинок ix в сумме выгодней); счётчик строк в a

[ALKO]

Как-то так. Это пример конечно, можно и ещё поколдовать )) Да я и обшибиться мог, не проверял всё-таки ))
И да - код что этот, что изначальный предполагает что спрайт атрибутов целиком помещается в экране,
если вылезет - будет пичалька ))

теперь несколько иная задача возникла.
А именно разбить ldir на составные (т.к. планирую сделать зеркальную итерацию атрибутов в строке, и скип оных по ключевому цвету).
Пробую так, но чёто не то. Какая-то кашыца получается в одну строку. Хотя казалось бы, что может пойти не так.

                 push bc
                 LD    B,(_SPR_W)

ALT_LDIR                ld a,(hl)
                              ld (de),a
                              inc hl
                              INC DE

                              DJNZ   ALT_LDIR

                ; ldir

Тут уже макс. скорость не требуется.

[Dart Alver]

теперь несколько иная задача возникла.
А именно разбить ldir на составные (т.к. планирую сделать зеркальную итерацию атрибутов в строке, и скип оных по ключевому цвету).
Пробую так, но чёто не то. Какая-то кашыца получается в одну строку. Хотя казалось бы, что может пойти не так.

LD B,(_SPR_W) - нет такой команды в Z80 !!!

В остальном нифига не понял что ты хочешь сделать.

[ALKO]

LD B,(_SPR_W) - нет такой команды в Z80 !!!

В остальном нифига не понял что ты хочешь сделать.

Да... опять на те же грабли...
Странно что компилятор не ругается и сглатует за милую душу эту ересь.

Вопрос снят. Терь всё ок.

[ALKO]

Казалось, что всё уже, баZа для движка имеется. Ан нет. Всё никак не отстану.
Вот в том блоке, где мы прибавляем смещение к hl, как мне выполнить проверку, что атрибуты находятся в диапазоне от 0 до 31 ? Чтоб отсекало, а не лезло на след. строку.

сначала найдём адрес в буфере (почти та же процедура) ))

ld a,d
rrca
rrca
rrca
ld d,a
and #E0
or e
ld e,a
ld a,d
and 3
add a,#F2 ; Для буфера в #F200
ld d,a ; в DE - адрес, никаких BC портить не надо

ld a,32 ; ну а вот и наше смещение
sub c ; теперь в A - смещение для строки

1 ; всё начинаем цикл
push bc
ld b,0
ldir
ld c,a ; теперь bc - смещение
ex de,hl
add hl,bc ; переход на новую строку
ex de,hl
pop bc
djnz 1B

ret
Как-то так. Это пример конечно, можно и ещё поколдовать )) Да я и обшибиться мог, не проверял всё-таки ))
И да - код что этот, что изначальный предполагает что спрайт атрибутов целиком помещается в экране,
если вылезет - будет пичалька ))

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

Прост не хотелось бы переделывать ширину буфера.

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

Прост не хотелось бы переделывать ширину буфера.

но, видимо, таки придётся...

[ALKO]

Стал переделывать шырину буфера (на 40 байт на строку вместо 32-ух)
Заменил в этой строке на ld a,40

ld a,32 ; ну а вот и наше смещение
sub c ; теперь в A - смещение для строки

1 ; всё начинаем цикл

Затем процедура переброски буфера на экран:

VIRT_WIDE_ATTR_TO_SCR 
	halt
	di
    ld de,REAL_SCREEN
    ld hl,MAIN_BUFF ; главный буфер
;    ldir
	LD    B,24
WIDE_LOOP
	push bc
    ld bc,32
	ldir
	ld bc,8 ; 40 ширина буфера минус 32 область реального экрана - остаток
	add hl,bc 
	pop bc
	DJNZ  WIDE_LOOP 
	ei
RET

Но почему-то позиция XY атрибутов начинается с косяком. То, что должно быть 0 по X, равняется 32-8.
И вместо отсечения - переход на следующую строку...

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

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

[Dart Alver]

Стал переделывать шырину буфера (на 40 байт на строку вместо 32-ух)
Заменил в этой строке на ld a,40

И это всё что ты заменил ? А то, что старом варианте проги адресация была гвоздями прибита к ширине 32 байта ты учёл ? ))

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

Вот очень простенький и медленный вариант адресации для 40 байтной ширины буфера.

; адрес в буфере шириной 40 байт  E-x , D-y
; 40 не кратен степеням 2-ки

                ; ADR= Y*40+X = Y*32+Y*8+X
                ; максимальный Y=23 ; 256/23=11,13...
                ; в нашем случае можно умножение на 8 использовать байтовое
                ; а уже дальше придётся переходить на слова
                
                 push hl
                 ld a,d ; Y
                 ld d,#F2  ; старший байт буфера
                 add a,a ; *2
                 add a,a ; *4
                 add a,a ; *8
                 ld l,a
                 ld h,0
                 add hl,hl ; *16
                 add hl,hl ; *32
                 add a,l    ; \ 
                 ld l,a     ; |  *32 + *8
                jp nc,1F    ; |
                 inc h      ; /
1                add hl,de  ; +x +буфер
                 ex de,hl
                 pop hl

Пытаться оптимизировать дальше влом. ))
Если бы ширина буфера была бы скажем 64 или 128 (кратна степеням 2-ки), то арифметика адресации была бы попроще. ))

[ALKO]

Если бы ширина буфера была бы скажем 64 или 128 (кратна степеням 2-ки), то арифметика адресации была бы попроще. ))

Шота оно не пашет у меня...
делать шырину 64... жертвовать впустую 576 байт... не уверен что могу сейчас себе это позволить.