Arev Splash Screen... (AREV Specific) [Revelation On-Line Wiki]

Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

At 05 APR 2002 09:44:22PM Scott Kapaona wrote:

AREV Specific

Hello,
 On faster computers, is there any way to slow down or maybe even
pause the splash screen i.e; REVLOMSG? Just thought I'd ask.

Thanks

Scott K.

At 07 APR 2002 11:07AM [url=http://www.sprezzatura.com" onMouseOver=window.status=Click here to visit our web site?';return(true)]The Sprezzatura Group[/url] wrote:

Well, it's not a perfect answer but you COULD redisplay

the REVLOMSG as the first line of your logon script then keep it there for as

long as YOU wanted!

Declare Function Esc.To.Attr

Screen=Xlate("DOS","REVLOMSG", "", "X")

Ptr=1

VideoRw="

Loop

    NextChar=ScreenPtr, 1

While Len(NextChar)

    If NextChar=\1B\ Then

        VidAttr=Esc.To.Attr(ScreenPtr, 4)

        Ptr += 4

    End Else

        VideoRw := NextChar : VidAttr

        Ptr += 1

    End

Repeat

Call Video.Rw(0,0,@crtwide-1, @crthigh -1,"W",VideoRw)

The Sprezzatura Group

World Leaders in all things RevSoft

View this thread on the forum...