home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C++ Games Programming
/
CPPGAMES.ISO
/
fgl
/
fglight
/
exbas.arj
/
TEMP
/
15-06.BAS
< prev
next >
Wrap
BASIC Source File
|
1995-01-20
|
452b
|
23 lines
REM $INCLUDE: 'fastgraf.bi'
DEFINT A-Z
FGmusicb "T150 L8 EDCDEEE P DDD P EGG P EDCDEEE L16 P L8 EDDEDC$", 1
WHILE FGplaying
PRINT "Mary Had a Little Lamb..."
WEND
FGwaitfor 18
FGmusicb "L16 CC#DD#EFF#GG#AA#B O+$", 2
WHILE FGplaying
PRINT "up the scale in two octaves..."
WEND
FGwaitfor 18
FGmusicb "T180 O2 L2 P L8 P GGG L2 D# L24 P L8 P FFF L2 D$", 1
WHILE FGplaying
PRINT "Beethoven's Fifth Symphony..."
WEND
END