По сабжу, к сожалению, пока ничего дельного не попадалось.
P.S. Когда дело дойдет до правки библиотечных функций SOLID C под Estex,
то для "printf" хочу прикрутить твою процедуру (что ты кидал как-то на
форуме ПП). Наткнулся на глюки в твоем "printf". Это относится к выводу
знаковых чисел. У тебя заюзано "res 7,a", я кидаю уже по-фиксенные проце-
дурки.
| | |
| Quote: Long2DEC: ld a,(de) ; ст.разряд ld l,a inc de ld a,(de) ld h,a bit 7,a jp z,uLong2DEC_ ; сохр. старший и загр. мл.разряд inc de ld a,(de) ; мл.разряд ld c,a inc de ld a,(de) ld b,a ; обраб. мл.разряд xor a sub c ld c,a ld a,0 sbc a,b ld b,a ; обраб. ст.разряд ld a,0 sbc a,l ld l,a ld a,0 sbc a,h ld h,a push hl ld l,c ld a,b ; push af ld a,"-" call OutputSymbl ...
| |
| | |
Кста, у тебя в этой процедуре проверка
делается для младшего разряда, вместо старшего.
Положение метки "uLong2DEC_" в твоем сорце, для моего куска надо
пересмотреть. Адрес перехода не совпадает с твоим.
Далее, никаких особенностей нет.
| | |
| Quote: Word2DEC: ld a,(de) ld l,a inc de ld a,(de) bit 7,a jr z,uWord2DEC_ ;res 7,a ; ld h,a ;-- xor a ; sub l ; ld l,a ; ld a,0 ; sbc a,h ;-- ; push af ld a,"-" call OutputSymbl pop af jr uWord2DEC_
Byte2DEC: ld h,0 ld a,(de) bit 7,a jr z,uByte2DEC_ ;res 7,a ; ld l,a ;-- xor a ; sub l ;-- ; push af ld a,"-" call OutputSymbl pop af jr uByte2DEC_
| |
| | |