-----Messaggio Originale----- 
Da: "Patrick Mast, xHarbour." <[EMAIL PROTECTED]>
A: "xHarbour-Developers" <[email protected]>
Data invio: lunedì 24 novembre 2008 10.25
Oggetto: [xHarbour-developers] Screen scrolls UP


> Hello,
>
> Please consider this sample:
> //------------------------------------------------//
> FUNCTION Main()
>   LOCAL n:= 1
>
>   @ 12,1 SAY "@ 12,1 SAY..." GET n
>   READ
>
>   @ 10,1 SAY "@ 10,1 SAY..." GET n
>   READ
>
> RETURN NIL
> //------------------------------------------------//

Please put

SETMODE( 25, 80 )

just after LOCAL n := 1

EMG

--
EMAG Software Homepage:     http://www.emagsoftware.it
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg
The EMG Music page:         http://www.emagsoftware.it/emgmusic 


-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to