home *** CD-ROM | disk | FTP | other *** search
/ cyber.net 2 / cybernet2.ISO / dkdemo / sdm.dir / 00015_Script_15 < prev    next >
Text File  |  1995-04-04  |  443b  |  17 lines
  1. on startmovie
  2.   
  3.   global movielist
  4.   
  5.   set movielist = list("@:ATLAS:01.dir", "@:TWTW:01.dir", "@:stowaway:01title.dir","@:Science:01Start.DIR", "@:NATURE:01Intro.DIR", ¼
  6.   "@:HISTORY:01Hia.dir", "@:MFIAD:01Title.DIR","@:Body:01.DIR", "@:PB:01.DIR", 1)
  7.  
  8.   global cdepth
  9.   put the colordepth into cdepth
  10.   set the colordepth to 8
  11.   sound stop 1
  12.   set the volume of sound 1 to 255
  13.   set the soundlevel = 5
  14.   
  15.   
  16. end startmovie
  17.