'===========================================================================
' Subject: BASIC MUSIC COLLECTION             Date: 11-01-95 (23:22)       
'  Author: Unknown Author(s)                  Code: QB, QBasic, PDS        
'  Origin: FidoNet QUIK_BAS Echo            Packet: SOUND.ABC
'===========================================================================
CLS : PRINT "The GhostBusters Theme"
PLAY "MNT150L8O3CCL16D+EL8GL4A+AL8CCL16D+EL8GL4A+AP8L16CCL8E"
PLAY "CD<A+P2>CL16CCL8<A+>CL4<AP4L16>CCL8D+CD<A+P8L4A+L8A+>C"
PLAY "P2L16CCL8D+CL4D+P4P8L16C<A+L8>CCL4CP2L16D+CD+CL4D+P4<A+"
PLAY "L8A+>CP2P8L16CCL8D+CL4D+P4P8L16C<A+L8>CCL4CP2L16D+CD+"
PLAY "CL4D+P4<A+L8A+>CP2P4L4D+L8CL4D+L8CL4D+L8CL4D+L8CD+CL16<A+"
PLAY "BL8>CL4D+L8CL4D+L8CL4D+L8CL4D+L8CD+CL16<A+BL8>CL4GL8D+"
PLAY "L4GL8D+L4GL8D+L4GL8D+GD+L16C+DL8D+L4GL8D+L4GL8D+L4GL8D+"
PLAY "L4GL8D+GD+L16C+DL8D+CCL16D+EL8GL4A+AL8CCL16D+EL8GL4A+"
PLAY "AP8L16CCL8ECD<A+P2>CL16CCL8<A+>CL4<AP4L16>CCL8D+CD<A+"
PLAY "P8L4A+L8A+>CP2L16CCL8D+CL4D+P4P8L16C<A+L8>CCL4CP2L16D+"
PLAY "CD+CL4D+P4<A+L8A+>CP2P8L16CCL8D+CL4D+P4P8L16C<A+L8>CC"
PLAY "L4CP2L16D+CD+CL4D+P4<A+L8A+>CP2P4L16D+CD+CL4D+P4<A+L8A+"
PLAY ">CL16D+EL8GL4>CP4"

CLS : PRINT "The Entertainer"
PLAY "MNT100L8O4DEC<AABGGDEC<AABGGDEC<AABAG+GGG>G>GG<DD+E>C"
PLAY "C<E>CC<E>CCCCCC>CDD+ECDEE<B>DDCCCCCCO2DD+E>CC<E>CC<E>C"
PLAY "CCCCCCAGF+A>CEEDC<A>DDDDDDO2DD+E>CC<E>CC<E>CCCCCC>CDD+"
PLAY "ECDEE<B>DDCCCCCCCDECDEECDCECDEECDCECDEE<B>DDCCCCCCO2D"
PLAY "D+E>CC<E>CC<E>CCCCCC>CDD+ECDEE<B>DDCCCCCCO2DD+E>CC<E>C"
PLAY "C<E>CCCCCCCAGF+A>CEEDC<A>DDDDDDO2DD+E>CC<E>CC<E>CCCCC"
PLAY "C>CDD+ECDEE<B>DDCCCCCCCDECDEECDCECDEECDCECDEE<B>DDCCC"
PLAY "CC<EFF+GGAGGEFF+GGAGGEC<GAB>CDEDCD<G>EFGAGEFGGAGGEFF+"
PLAY "GGAGGGAA+BBBBBAF+DGGGGGEFF+GGAGGEFF+GGAGGEC<GAB>CDEDC"
PLAY "DCCCCC<GF+G>CC<A>CC<A>C<AG>CEGGEC<GAA>CCEDDCCCCCC>EFF+"
PLAY "GGAGGEFF+GGAGGEC<GAB>CDEDCD<G>EFGAGEFGGAGGEFF+GGAGGGA"
PLAY "A+BBBBBAF+DGGGGGEFF+GGAGGEFF+GGAGGEC<GAB>CDEDCDCCCCC<G"
PLAY "F+G>CC<A>CC<A>C<AG>CEGGEC<GAA>CCEDDCCCCCCCO2DD+E>CC<E"
PLAY ">CC<E>CCCCCC>CDD+ECDEE<B>DDCCCCCCO2DD+E>CC<E>CC<E>CCC"
PLAY "CCCCAGF+A>CEEDC<A>DDDDDDO2DD+E>CC<E>CC<E>CCCCCC>CDD+E"
PLAY "CDEE<B>DDCCCCCCCDECDEECDCECDEECDCECDEE<B>DDCCCCCCO1CC"
PLAY "O3AG+AAAA>CCDDDDDDDD<FEFFFFAAA+A+A+A+A+A+A+GDDGDDGDDC"
PLAY "CCCFFFFEG+B>DDC<B>C<AAAAA+A+A+A+AG+AAAA>CCDDDDDDDD<FE"
PLAY "FFFFAAA+A+A+A+A+A+A+GDDGDDGDDCCCCFFFFA>CC<GGCDEFF<B>C"
PLAY "DEFGAG+AAAA>CCDDDDDDDD<FEFFFFAAA+A+A+A+A+A+A+GDDGDDGD"
PLAY "DCCCCFFFFEG+B>DDC<B>C<AAAAA+A+A+A+AG+AAAA>CCDDDDDDDD<F"
PLAY "EFFFFAAA+A+A+A+A+A+A+GDDGDDGDDCCCCFFFFA>CC<GGCDEFFO1F"
PLAY "FO4FFO1FFO3CC<A>CC<A>C<AG>CEGGEC<GAA>CCEDDCCCCC>CCO1C"
PLAY "C>FFEFFEFF<F>A>D<A>CDC<AGGF+GGF+GG<GO3CECDEDCDDC+DDC+"
PLAY "DDO1DO3FAFGAGF>CCCCCC<AAGG<GGGGGGFFEFFEFF<F>A>D<A>CDC"
PLAY "<AGGF+GGF+GG<GO3CECDEDC<AG+A>GGFFCED+EAA>C<GECCCCEDDC"
PLAY "CC<GGGGGGFFEFFEFF<F>A>D<A>CDC<AGGF+GGF+GG<GO3CECDEDCD"
PLAY "DC+DDC+DDO1DO3FAFGAGF>CCCCCC<AAGG<GGGGGGFFEFFEFF<F>A>D"
PLAY "<A>CDC<AGGF+GGF+GG<GO3CECDEDC<AG+A>GGFFCED+EAA>C<GECC"
PLAY "CCEDDCCCCC>CC"

CLS : PRINT "Alfred Hitcock Presents"
PLAY "MNT150L8O2DP8>DL32EL8DC+<B>C+P8DEP8<ADP8>DL32EL8DC+<B"
PLAY ">C+P8DEP8<ADP8>FL4AL8GFP8AL4>CL8<A+AP8>CL4EL8DC+<A+AG"
PLAY "FE<DP8>DL32EL8DC+<B>C+P8DEP8<ADP8>DL32EL8DC+<B>C+P8DE"
PLAY "P4FP8AL4>CL8<A+AGFD+GA+DC+DEP8FL4E.L8D"

CLS : PRINT "The Double-Oh-Seven Theme"
PLAY "MNT150L4O1BL8EBL4>CL8<E>CL4C+L8<E>C+L4CL8<E>CL4<BL8EB"
PLAY "L4>CL8<E>CL4C+L8<E>C+L4CL8<E>C>EL16F+F+L8F+L4F+.L8<EE"
PLAY "E>EL16GGL8GL4G.L8<F+F+F+>EL16F+F+L8F+L4F+.L8<EEE>EL16G"
PLAY "GL8GL4G.L8<F+F+F+>EL16F+F+L8F+L4F+.L8<EEE>EL16GGL8GL4G."
PLAY "L8<F+F+EO4D+L64<BL8>DL2DL64O2GL8BL64F+L8AL32G.L1B.L8E"
PLAY "L16F+F+L8F+L4F+.L8>EEE<EL16GGL8GL4G.L8>F+F+F+<EL16F+F+"
PLAY "L8F+L4F+.L8>EEE<EL16GGL8GL4G.L8>F+F+F+<EL16F+F+L8F+L4F+."
PLAY "L8>EEE<EL16GGL8GL4G.L8>F+F+E>D+L64<BL8>DL2DL64<GL8BL64F+"
PLAY "L8AL32G.L1B.L4O1BL8EBL4>CL8<E>CL4C+L8<E>C+L4CL8<E>CL4<B"
PLAY "L8EBL4>CL8<E>CL4C+L8<E>C+L4CL8<E>C>EL64EL4GL8>D+L64<G"
PLAY "BL4>D.L8<GL64FL8A+L64GL2B.L8GL32AGL4F+.L8<B>EC+L2C+L64<G"
PLAY "BL8>F+.P16L64<GBL4>F+L8EL64EL4GL8>D+L64<GBL4>D.L8<GL64F"
PLAY "L8A+L64GL2B.L8GL32AGL4F+.L8<B>D+EL2EL64<GBL8>C+.P16L64<G"
PLAY "BL4>C+L8EL64EL4GL8>D+L64<GBL4>D.L8<GL64FL8A+L64GL2B.L8G"
PLAY "L32AGL4F+.L8<B>EC+L2C+L64<GBL8>F+.P16L64<GBL4>F+L8EL64E"
PLAY "L4GL8>D+L64<GBL4>D.L8<GL64FL8A+L64GL2B.L8GL32AGL4F+.L8<B"
PLAY ">D+EL2EL64<GBL8>C+.P16L64<GBL4>C+L64<GBL8>EL64<GBL4>E"
PLAY "L64<GBL8>EL64<A>D+L8F+.L16EL64<A>D+L4F+L64<B>EL8GL64<B"
PLAY ">EL4GL64<B>EL8GL64<A>D+L8F+.L16EL64<A>D+L4F+L64<GBL8>E"
PLAY "L64<GBL4>EL64<GBL8>EL64<A>D+L8F+.L16EL64<A>D+L4F+L64<B"
PLAY ">EL8GL64<B>EL4GL64<B>EL8GL64<A>D+L8F+.L16EL64<A>D+L4F+"
PLAY "L64C+EGL8BL64C+EGL8BP8L2O1BL8BL64O3C+EGL8BL64C+EGL8BP8"
PLAY "L4O1B.BL64O3C+EGL16BL8BL16BL8BL64C+EGL8BL4O1BL8EBL4>C"
PLAY "L8<E>CL4C+L8<E>C+L4CL8<E>C>EL16F+F+L8F+L4F+.L8EEEEL16G"
PLAY "GL8GL4G.L8F+F+F+EL16F+F+L8F+L4F+.L8EEEEL16GGL8GL4G.L8F+"
PLAY "F+F+EL16F+F+L8F+L4F+.L8EEEEL16GGL8GL4G.L8F+F+E>D+L64<B"
PLAY "L8>DL2DL64GL8BL64F+L8AL32G.L1B.P16L8O2EL4GL8>D+L4DL8<G"
PLAY "BB>F+L4FL8<BL4>DL8A+L4AL8FAL4AL8D+DDP8P4L64O1EB>GB>C+"
PLAY "L2F+."

CLS
PRINT "The Looney Tunes Theme"
PLAY "MST200L8O3E.L16DL8CDED+ECDDDL2D.L8D.L16CL8<B>CDC+D<B>C"
PLAY "CCL2C.L8<G.L16G+L8A.L16G+L8G.L16G+L8A.L16G+L8G>DDL2D."
PLAY "L8<AG+AL4>DEL2G"

CLS : PRINT "The Original Star Trek Theme"
PLAY "MNT255L1O4B.D.F.<A.P8L2GL8G>C.L2FFL4E.L8EL4C<A>DL2GP8"
PLAY "L4GL1BP4L2CL8CF.L2A+A+L4A.L8AL4FDGL2>CP8L4CL1EP1L2O3G"
PLAY ">F.L4EDC<BL2A+L1A+L2G>G.L4FEDCL2<BL1BL4A+L2A.L4B>C+DE"
PLAY "F+GL2AL1A+.L2<A+.L4>CDD+FGG+L2A+L1BL2<G>F.L4EDC<BL2A+"
PLAY "L1A+L4G+L2G>G.L4FEDCL2<BL1BL4A+L2A.L4B>CDEFEL2G.L4GL2A+."
PLAY "L4AL2GL1CL4D.F.A.L1>C"

CLS : PRINT "The Star Wars Theme"
PLAY "MNT100L2O3CGP16L16FEDL2>C<GP16L16FEDL2>C<GP16L16FEFL2D"
PLAY "P16L16<GGGL2>CGP32L16FEDL2>C<GP16L16FEDL2>C<GP16L16A+"
PLAY "AA+L1GL2G.L8<G.L16GL4A.L8A>FEDCL16CDEDP16L8<AL4BL8G.L16G"
PLAY "L4A.L8A>FEDCGP8L4D.P8L8<G.L16GL4A.L8A>FEDCL16CDEDP16L8<A"
PLAY "L4BP16L8>G.L16GL8>C.L16<A+L8G+.L16GL8F.L16D+L8D.L16CL1G"
PLAY "L2G.P16L16GGGL8>CP8L16<CCCL2C."
SYSTEM

