ZXNet эхоконференция «code.zx»

Hi Kirill!

Fri Apr 23 1999 13:12 you wrote to All:

KF> KAK МОЖHО БЫСТРЕЕ И КОРОЧЕ ?

ты уж сам пойми - или быстpее, или коpоче. у меня вот такое нашлось:

=========== Вырежь и сохрани ===========
ld hl, 0
ld a, b
ld b, 16
@@loop: sla c
rla
adc hl, hl
or a
sbc hl, de
inc c
jp nc, @@next
dec c
add hl, de
@@next: djnz @@loop
ld b, a
ret
=========== Вырежь и сохрани ===========

KF> В спектpум надо хотя-бы i80486 поставить, там
KF> деление за 24 такта выполняется... :-(

угу, а тебе коpовье вымя имплантиpовать, чтоб за молоком ходить не надо было.


Bye, Michael.