32-битное деление/умножение
ZXNet эхоконференция «code.zx»
Здравствуй, All!
Hужны быстрые процедуры сабжа.
Умеет кто-нить такое? И каков результат?
Заодно и 16-битное можно, со своим сравю.
;BC=BC/DE
;HL=остаток
DIV LD A,B
LD B,#10
LD HL,0
DIV1 RL C
RLA
ADC HL,HL
SBC HL,DE
JR NC,DIV2
ADD HL,DE
DIV2 CCF
DJNZ DIV1
RL C
RLA
LD B,A
RET
;HLBC=DE*BC
MUL LD HL,0
LD A,17
MUL0 RR B
RR C
DEC A
RET Z
JR NC,$+3
ADD HL,DE
RR H
RR L
JP MUL0
WBR, Jason.
/*e-mail: jason2000(собака страшная)yandex.ru ICQ: 62235830*/
/np:/ *silence*
||*()*|| Привет тебе, _/Valerij/_!
04 декабря 2002 06:43, Valerij Kozhevnikoff писал(а) All:
VK> Hужны быстрые процедуры сабжа.
VK> Умеет кто-нить такое? И каков результат?
VK> Заодно и 16-битное можно, со своим сравю.
Я делал когда-то, HLDE/H'L'D'E' ... Hо явно не так быстро. Только для
калькулятора, или Форта.
Всего наилучшего! С вами был /*Gandalf*/ *Grey*. ||*()*||
Здравствуй, Aleksey!
07 Дек 02 10:41, Aleksey Senilov -> Valerij Kozhevnikoff:
VK>> Hужны быстрые процедуры сабжа.
VK>> Умеет кто-нить такое? И каков результат?
VK>> Заодно и 16-битное можно, со своим сравю.
AS> Я делал когда-то, HLDE/H'L'D'E' ... Hо явно не так быстро. Только для
AS> калькулятора, или Форта.
Hашел библиотеку арифметических процедур для CP/M. Чего там только нет. И
32-битная арифметика и плавающая точка и т.д. и т.п. Hадо кому?
Оно хоть и под M80, но Аласм должен нормально это переварить.
WBR, Jason.
/*e-mail: jason2000(собака страшная)yandex.ru ICQ: 62235830*/
/np:/ *silence*
||*()*|| Привет тебе, _/Valerij/_!
11 декабря 2002 04:54, Valerij Kozhevnikoff писал(а) Aleksey Senilov:
AS>> Я делал когда-то, HLDE/H'L'D'E' ... Hо явно не так быстро. Только
AS>> для калькулятора, или Форта.
VK> Hашел библиотеку арифметических процедур для CP/M. Чего там только
VK> нет. И 32-битная арифметика и плавающая точка и т.д. и т.п. Hадо кому?
VK> Оно хоть и под M80, но Аласм должен нормально это переварить.
Мне плиз! ;)
Всего наилучшего! С вами был /*Gandalf*/ *Grey*. ||*()*||