ld hl,5800h
ld de,5801h
xor a
push af
label
pop af
ld bc,32; (или 31 (не помню тонкостей ldir) и еще увеличить hl и de)
ld (hl),a
ldir
add a,8
and 38h
push af
ld a,d
cp 5bh
jr nz,label
pop af
естественно что можно процедуру оптимизировать
ld hl,5800h
ld de,5801h
xor a
push af
label
pop af
ld bc,32; (или 31 (не помню тонкостей ldir) и еще увеличить hl и de)
ld (hl),a
ldir
add a,8
and 38h
push af
ld a,d
cp 5bh
jr nz,label
pop af
естественно что можно процедуру оптимизировать
Последний раз редактировалось mishutka; 28.10.2011 в 03:06.
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)