A ScreenSaver Made By Charlie And Modified By Jack

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    rem Simple color screensaver

rem Basic setting and array start
AUTOCAM OFF
HIDE MOUSE
POSITION CAMERA X,Y,Z
COUNTER AS INTEGER
DIM RNTEXT$(10)
RNTEXT$(1)="J&G co."
RNTEXT$(2)="Created By J&G co."
RNTEXT$(3)="I Like J&G co."
RNTEXT$(4)="J&G co. Rocks!"
RNTEXT$(5)="Gamers Rule"
RNTEXT$(6)="I Support J&G co."
RNTEXT$(7)="I Bought This Screensaver From J&G co."
RNTEXT$(8)="For $1.99!"
RNTEXT$(9)="Is'nt That Cheap!"
RNTEXT$(10)="Buy Products From J&G co."


rem Main screensaver loop
DO
WAIT 100
SET CURSOR RND(640),RND(480)
IF COUNTER>=120
CLS
COUNTER=0
ENDIF
SET TEXT SIZE 20
SET TEXT TO BOLDITALIC
SET TEXT TRANSPARENT
INK RGB(RND(255),RND(255),RND(255)),0
PRINT RNTEXT$(RND(10))
COUNTER=COUNTER+1
LOOP