ZX-Ревю 1997 №1-2 - Этюды - процедуры быстрого скроллинга экрана.

ZX-Ревю 1997 №1-2

1997 г.

Этюды - процедуры быстрого скроллинга экрана.

(с) Александр Лавров г.Тольятти.

280

RET

В ZX РЕВЮ 96/3 были да

290 UP2

A,8

ны два скроллинга

экрана (автор

300

ADD

A,H

Вадим Куликов). Эти процедуры

310 320

LD JR

H,A NXTU

можно ускорить,

если заменить

внугренний цикл (строки с 90 по 130) на LDIR и поменять расчет

SCROLL DOWN 10 (c) A.Lavrov

адреса следующей линии.

20 from NEW STANDARD

Идея

использовать ылк в

ORG

40000

процедурах

скроллинга взята из

DE,#57E0

книги "Как

написать игру для ZX

HL,#56E0

Spectrum"

(часть

2-ая) фирмы

A, 191

"Питер"

70 DW1

ВС,32

SCROLL UP

PUSH

10 (с) A. Lavrov from

LDIR

20 NEW STANDARD

100

POP

ORG

40000

110

H,D

DE,#4000

120

L.E

HL,#4100

130

DEC

А, 191

140

AF.AF'

70UP1

ВС.32

150

A.H

PUSH

160

AND

#07

LDIR

170

XOR

#07

100

POP

180

Z.DW2

110

H,D

190 NXTD

AF.AF'

120

L,E

200

DEC

130

INC

210

NZ.DW1

140

AF.AF'

220

RET

150

A,H

230 DW2

A,H

160

AND

#07

240

ADD

A, 8

170

NZ.NXTU

250

H,A

180

A,H

260

A.L

190

SUB

270

SUB

#20

200

H,A

280

L.A

210

A, #20

290

NC.NXTD

220

ADD

A,L

300

L,#E0

230

L,A

310

A,H

240

C.UP2

320

SUB

250 NXTU

AF.AF'

330

H,A

260

DEC

340

NXTD

270

NZ.UP1

этюды

Скорость скроллинга должна увеличится почти вдвое. Правда, нарушена синхронность, если использовать процедуры в паре. Т.е. процедура SCROLL DOWN работает медленнее чем SCROLL UP А именно, в каждой установке новой линии на 2 такта, новой строки на 10 тактов и нового сегмента на 2 такта дольше.

Для скроллинга окна надо изменить часть процедуры SCROLL DOWN (для SCROLL_UP это не требуется), вставив такие строки:

280 JR C.DW3

285 LD L,A

290 JR NXTD

295 DW3 LD A,L 300 OR #E0

305 LD L.A

Количество перемещаемых строк (пиксельных) задается в строке 60, в А. Адрес верхнего левого или нижнего левого углов, как и раньше в DE, строка 40. Ширина окна (в знакоместах) в ВС, строка 70.

Чтобы процедуры сами рассчитывали начальный адрес в HL, надо заменить строки 50 и 60 в обоих процедурах, и поставить метку в строку 110: 50 LD А,п

количество пиксельных линий + 1 60 JR s ; метка в строке 110.

СОДЕРЖАНИЕ:

Темы: Игры, Программное обеспечение, Пресса, Аппаратное обеспечение, Сеть, Демосцена, Люди, Программирование