home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 26
/
CD_ASCQ_26_1295.iso
/
vrac
/
shwtxt19.zip
/
USA.ST
< prev
next >
Wrap
Text File
|
1994-10-11
|
503b
|
11 lines
ON INTKEY0 ESC GOTO QUIT\CLS 7,0\COPY(USA,1)\BFILL 0 (1,1,25,1)219 14
FOR V1=0 TO 24\V2=25-V1\BCOPY 1TO0(1,1,25,80)(V2,1)\WAIT .1\NEXT V1
WAIT 1.5\COLOR 1,4\WINDOW(22,30,25,50)104\COLOR 15,2\WINDOW(23,31,24,49)32
P@ 23,31\PRINT " S H O W T E X T "\COLOR 31
P@ 24,31\PRINT " Made in the U.S.A.";\COLOR 15,0\SCREENSAVER 1
:LOOP\WAITKEY 0\IF NOT KEY NULL QUIT
SCROLL DOWN(1,2,18,80)\FOR V1=2 TO 80\V2=V1/4\V2=[X]\IF V2<>0 CONT
WAIT .09
:CONT\SCROLL UP(1,V1,18,V1)\NEXT V1\GOTO LOOP
:QUIT\EXITC