Попиксельный raycasting и sjasm

[Destr]

Что-то замучался я с трассером.
Код вида:

L00     SЕТ 7,(НL) ;строка 0            
        SUВ Е                           
        JR C,L11A                       
L01     SЕТ 6,(НL)                      
        SUВ Е                           
        JR C,L12A                       
L02     ...                             
                                        
L10A    ADD A,D                         
        INC Н   ;переход на строку 1    
        JР L10                          
L11A    ADD A,D                         
        INC Н                           
        JР L11                          
L12A    ...                             
                                        
L10     SЕТ 7,(НL) ;строка 1            
        SUВ Е                           
        JR C,L21A                       
L11     SЕТ 6,(НL)                      
        SUВ Е                           
        JR C,L22A                       
L12     ...

никак не могу сообразить как забить?
(ну не декрюнчер ведь а-ля 90-е писать, да и не динамичный он будет, блин!).
Как решается?
(мучаю вот это http://zxpress.ru/article.php?id=11746 )

[Advertiser]

[jerri]

Destr, а стираешь потом как?

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

[QUOTE=Destr;875495]Что-то замучался я с трассером.
Код вида:

L00     SЕТ 7,(НL) ;строка 0            
        SUВ Е                           
        JR C,L11A                       
L01     SЕТ 6,(НL)                      
        SUВ Е                           
        JR C,L12A                       
L02     SЕТ 5,(НL) ;строка 0            
        SUВ Е                           
        JR C,L13A                       
L03     SЕТ 4,(НL)                      
        SUВ Е                           
        JR C,L14A                       
L04     SЕТ 3,(НL) ;строка 0            
        SUВ Е                           
        JR C,L15A                       
L05     SЕТ 2,(НL)                      
        SUВ Е                           
        JR C,L16A                       
L06     SЕТ 1,(НL) ;строка 0            
        SUВ Е                           
        JR C,L17A                       
L07     SЕТ 0,(НL)                      
        SUВ Е                           
        JR C,L18A                       
        jr l00
                                      
L10A    ADD A,D                         
        INC Н   ;переход на строку 1    
        JР L10                          
L11A    ADD A,D                         
        INC Н                           
        JР L11                          
L12A    ...                             
                                        
L10     SЕТ 7,(НL) ;строка 1            
        SUВ Е                           
        JR C,L21A                       
L11     SЕТ 6,(НL)                      
        SUВ Е                           
        JR C,L22A                       
L12     ...

правда чтото я не вижу тут контроль длины отрезка.

[Destr]

правда чтото я не вижу тут контроль длины отрезка

Контроль только в длине итераций (сколько раз повторим отрезок приведёный).
Вообще это шелуха (контроль длины), тут дело в том как преподать 192 раза повторения чтоб не ругался сиджасм и вообще как это модульные метки или что?

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

jerri, я ведь ссыль дал, там это пишется (ну как-бы на теории):
http://zxpress.ru/article.php?id=11746
Больше пол-статьи, там где линия...

[jerri]

возьми лучше помедленнее класику
оставь этот геморой авторам.

[krt17]

Контроль длины я бы сделал перед jr L00 и печатал знакоместами, а хвосты можно и по тормозному.
В сиджасме с именами меток вроде не помутишь через макросы, так как общая картина ясна изначально, можно высчитывать абсолютные переходы исходя из $, но на луа сделать будет и быстрее и проще.

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

Забыл, ведь = есть, но переходы все равно абсолютные считать придется.

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

Дочитал статью вопрос контроля снимается

[Destr]

возьми лучше помедленнее класику

Не могу, это рейкастинг будет, тут надо как можно быстрей...

[jerri]

Destr,

давай тогда с тобой подумаем вместе

вот простой и удобный алгоритм рисования линии

beginning
	di
	ld	hl,#1020  ; yx dest
	ld	de,#3060  ; yx sour
	call	line00	
	ei
	ret

;в HL - yx конца
;в DE - yx начала
line00
 	ld a,h		;вычисляем DY
	sub d
	ld bc,#141c	;создаем базовые изменения координат
	jr nc,line1	;основная пара de
	inc b
			;поэтому меняем DE><HL если рисуем сверху вниз
			;ВСЕГДА рисуем сверху вниз
	neg 
line1 	ld h,a		;H=DY
	ld a,l		;вычисляем DX
	sub e		;
	jr nc,line2
	inc c		;если рисуем справа налево то меняем направление
	neg		 
line2 	cp h		;DX=DY?
	ld l,a
	jr c,line3
			;если меньше то считаем основной координатой DY
	ld l,h
	ld h,a
	ld a,b
	ld b,c
	ld c,a

line3 	ld a,b		;обозначаем как менять координаты
	ld (line5),a
	ld a,c
	ld (line6),a
	ld b,h
	ld a,h
	inc l

	inc b
line4 	call plot ;здесь печать точки - в de координаты yx
line5 	nop 
	sub l
	jr nc,line7
line6 	nop 
	add a,h
line7 	djnz line4

	ret

plot	
	push	hl,de,af
	ld	l,d
	ld	h,koors/256
	ld	a,(hl)
	inc	h
	ld	d,(hl)
	inc	h
	ld	l,e
	or	(hl)
	ld	e,a
	inc	h	
	ld	a,(de)
	xor	(hl)
	ld	(de),a
	pop	af,de,hl
	ret

на основе этого алгоритма надо подумать как рисовать в пределах знакоместа линию

у нас есть 4 варианта развития линии

х+ у+
х- у+
х+ у-
х- у-

[Destr]

на основе этого алгоритма надо подумать как рисовать в пределах знакоместа линию

Ну и сколько тактов на точку получается?
Учти, что нужно будет рисовать 64 линии (угол обзора 90 градусов потому-что, исходя из того что у нас на спеке окружность удобней иметь в 256 градусов, то 64 луча и обеспечивают четверть, т.е. 90 градусов если по-нормальному считать).
Длина каждого луча - 32. Т.е. это как-бы "дальность" взгляда.
Получаем 64*32*кол-во тактов на точку.
Таким образом самое шустрое - это именно алгоритм из спектрумэксперта (ну тот что по ссылке), быстрей я например вообразить не могу, вот замедлить - эт пожалуйста, только это категорически не нужно, хотя придётся, ведь не рисовать линии будем а делать BIT n,(HL), проверка на предмет упирания луча в стенку. Если луч упёрся - выход (что-то вроде JP NZ), а если нет - рисуем (сканируем) дальше. Длину считать/контролить - тоже накладно, так что тупо дублируем прогу 32 раза, такие дела...

[jerri]

Ну и сколько тактов на точку получается?
Учти, что нужно будет рисовать 64 линии (угол обзора 90 градусов потому-что, исходя из того что у нас на спеке окружность удобней иметь в 256 градусов, то 64 луча и обеспечивают четверть, т.е. 90 градусов если по-нормальному считать).
Длина каждого луча - 32. Т.е. это как-бы "дальность" взгляда.
Получаем 64*32*кол-во тактов на точку.
Таким образом самое шустрое - это именно алгоритм из спектрумэксперта (ну тот что по ссылке), быстрей я например вообразить не могу, вот замедлить - эт пожалуйста, только это категорически не нужно, хотя придётся, ведь не рисовать линии будем а делать BIT n,(HL), проверка на предмет упирания луча в стенку если. Если луч упёрся - выход (что-то вроде JP NZ), а если нет - рисуем (сканируем) дальше. Длину считать - тоже накладно, так что тупо дублируем прогу 32 раза, такие дела...

так стоять
тебе что именно нужно то?
рисование линии или чтото другое?

зачем 64 линии?

[krt17]

Смышленый мозг алона провел годы чтобы оптимизировать рейкастинг на zx, все разжевать и дать народу, но нет душа просит велосипеда. Чую потом будет как с нормализацией вектора, нормализовать за 500 тактов на потом умножить на 4 за 1000