Программирование

[parallelno]

Спасибо!
Я это уточнял потому что эта информация объясняет починку бага командами ei/di которые посоветовал Pyk. Там лечилось похоже не из-за того что прерывание не могло быть вызвано до out $10, а из-за того что следующая за ei команда гарантированно выполнялась сразу после ei. Это была lxi sp,

[Advertiser]

[ivagor]

Все зависит от задач. Если, например, нужно играть фоновую музыку по прерываниям, то не надо использовать ei и di. В этом случае надо так изменять sp, чтобы ничего не повредить.

[svofski]

Не могу найти подручного беззнакового умножения 8x8 -> 16. Ни у кого не завалялось?

[Sandro]

Не могу найти подручного беззнакового умножения 8x8 -> 16. Ни у кого не завалялось?

А тебе медленно или быстро? Если быстро, то через таблицу квадратов четвертушек, 512 байт. Если медленно, то вообще в чём вопрос? Двоично в столбик. Как в школе.

[svofski]

А тебе медленно или быстро? Если быстро, то через таблицу квадратов четвертушек, 512 байт. Если медленно, то вообще в чём вопрос? Двоично в столбик. Как в школе.

Медленно норм. Просто не всегда хочется делать все самому. Мне кажется, что такие вещи должны быть готовыми. И раньше как-то находились, а тут оказалось, что что-то как-то нет.

[Sandro]

Так, наверное, потому, что это тривиально ...

Если устраивает совсем медленно, то просто последовательным сложением. Один аргумент в A, второй в DE, нулим HL, и увеличиваем его командой DAD количеством раз, которое в регистре A. Это даже 8x16, между прочим.
Если множитель большой, где-то больше шести, то побитово в столбик. Множитель умножаем на два через XCHG: DAD H: XCHG

[svofski]

Upd: nevermind, нашел.

[parallelno]

svofski, если не сложно, поделись пожалуйста. Я помню только в документации к векторовскому ассемблеру были описаны рутины умножения и деления кажется. Но сам код уже не помню.

[svofski]

Конечно, правда я уже забыл откуда сам списал.

                ; hl = h * l
mul8x8:
                mov 	A,h	; Multiplier    (-1) to A   Register
	        mov 	e,l	; Multiplicand (127) to D,E Registers
	        MVI	d,000h
	        LXI	H,000h	; Clear H,L Registers to initialize Partial Product
	        MVI	B,008h	; Iteration Count (8) to B Register
m88LOOP:        DAD	H	; Shift Partial Product left into Carry (H&L)
	        RAL		; Rotate Multiplier Bit to Carry
	        JNC	m88NEXT	; Test Multiplier at Carry
	        DAD	D	; Add Multiplicand to Partial Product (D&E)
			;   if Carry =1
	        ACI	000h	; (Add Carry Bit)
m88NEXT:        DCR	B	; Decrement Iteration Counter
	        JNZ	m88LOOP	; Check Iterations
	        ret

Но вот правда же, была где-то страничка с хорошим сборником всевозможной арифметики для 8080.

[ivagor]

правда я уже забыл откуда сам списал

Такая процедура (начиная с lxi h,0) есть в Vector-user 1. Только там в описании упущено, что AHL=A*DE. Если старший (третий) байт произведения не нужен, то можно убрать подхват переноса в A.