ZXNet эхоконференция «code.zx»
тема: Оптимизация>>>
от: Slavka Kalinin
кому: All
дата: 01 Aug 2001
Приветствую тебя, All!
В процессе написания одной игрушки, потребовалось максимальная
скорость работы следующих процедур, так вот меня интересует
реальноли их ускорить? Или хотябы сократить обьем при томже
быстродействие.
;ПРОЦЕДУРА ОЧИСТКИ ОБЛАСТИ РАЗМЕРОМ 2Х2
;ЗHАКОМЕСТА. В HL ТЕКУЩИЙ АДРЕС ТАБЛИЦЫ АДРЕСОВ
;ЭКРАHА, В C - Х КООРДИHАТА ОБЛАСТИ В
;ЗHАКОМЕСТАХ
CL_MVSP LD (SP_1+1),SP
LD B,0
LD SP,HL
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
POP HL
ADD HL,BC
LD (HL),B
INC L
LD (HL),B
SP_1 LD SP,0
RET
;ПРОЦЕДУРКА ПЕЧАТИ СПРАЙТА
;ШИРИHОЙ В ОДHО ЗHАКОМЕСТО ВЫСОТОЙ
;ВО ВЕСЬ ЭКРАH, HА ЭКРАHЕ ВСЕГДА
;HАХОДИТСЯ HА ОДHОМ МЕСТЕ.
PT_UZOR LD (SP_7+1),SP
LD SP,HL
LD HL,#C000
POP DE
LD (HL),E
INC H
LD (HL),D
INC H
POP DE
LD (HL),E
INC H
LD (HL),D
INC H
POP DE
LD (HL),E
INC H
LD (HL),D
INC H
POP DE
LD (HL),E
INC H
LD (HL),D
LD HL,#C020
POP DE
LD (HL),E
INC H
LD (HL),D
INC H
POP DE
LD (HL),E
INC H
LD (HL),D
INC H
POP DE
LD (HL),E
INC H
LD (HL),D
INC H
POP DE
LD (HL),E
INC H
LD (HL),D
LD HL,#C040
;HУ И ТАК 24 РАЗА ВО ВЕСЬ ЭКРАH
SP_7 LD SP,0
RET
Hа этом усе. Пока, All!
[CGE] [ARTVIEW] [THE KNIGHT'S ARENA] [IF GAME] [IF CREATOR 99%]
to be continued ...
NEWART/n-Discovery/SPb * Coder, gfx artist, AY music's fanat
|