;AlignSprite_____________________ ;by Tim Farrell | ;Input: DE = Sprite Address | ; H = X-Coord (0-15) | ; L = Y-Coord (0-7) | ;Output: Sprite drawn to screen | ;Destroyed: none | ;-------------------------------- AlignSprite: push af push bc push de push hl ld a, h ld h, l ld l, a sla l srl h rr l ld bc, $FC00 add hl, bc ld b, 8 ASpriteLoop: ld a, (de) ld (hl), a inc de ld a, 16 add a, l ld l, a jp nc, ASNoinc inc h ASNoinc: djnz ASpriteLoop pop hl ;\ pop de ; \ pop bc ; > mmmpop boop be doop mmmpop pop af ; / ret ;/