[Back to SCROLL SWAG index]  [Back to Main SWAG index]  [Original]

{
> I've got all kinds of routines by now, from fire to plasma, etc.
> But what I need is a screen in graphics mode 13h (or mode-x),
> where text scrolls from the bottom of the screen to the top of
> the screen.

The address is a000:0000 -  now all you should do is:
}
x : array[1..320] of byte;
asm
mov ax,$a000
mov es,ax
mov ds,ax
cld
mov cx,160
xor si,si
mov di,offset x[1]
rep movsw
mov si,320
xor di,di
mov cx,160*199
rep movsw
mov si,offset x[1]
mov di,320*199
mov cx,160
rep movsw
end;

{
That should do it - A simple move operation.
Note: This will only scroll one line. I think it's fast enough - although I
tested it on a 386-dx40. The drawback of it is that you get this nasty line on
the screen.
}

[Back to SCROLL SWAG index]  [Back to Main SWAG index]  [Original]