Re: A85: Re: Scrolling
[Prev][Next][Index][Thread]
Re: A85: Re: Scrolling
I used this routine by Eric, but I had to modify it a little. Here is the
original:
; scroll.asm
; written by Erik Huizing
; ehuizing@acs.ucalgary.ca
;
; scroll the entire screen left 1 pixel
;
; code size = ~30 bytes
Scroll:
ld b, 64
ld hl, VIDEO_MEM
rowLoop:
push bc
sla (hl)
inc hl
ld b, 15
scrollBytes:
sla (hl)
jr nc, skip
dec hl
set 0, (hl)
inc hl
skip:
inc hl
djnz scrollBytes
pop bc
djnz rowLoop
ret
Then I had to write a routine to add the new row, but that wasn't to big a
problem :)
-------
NAME : Mikel Blanchard, President of Macross Software
WEB : http://MacrossSoftware.home.ml.org/
EMAIL : cashonly@aol.com
ICQ : 3033904 (CashOnly)