home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2000 February / DPPCPRO0200.ISO / ps10.dxr / Scripts_60.ls < prev    next >
Encoding:
Text File  |  1999-10-26  |  321 b   |  17 lines
  1. global gArtistFlag, giCurrentTrackNumber, gVOPlaying
  2.  
  3. on exitFrame
  4.   if gVOPlaying then
  5.     nothing()
  6.   else
  7.     if not gArtistFlag then
  8.       gVOPlaying = 1
  9.       puppetSound(1, "artist")
  10.     else
  11.       if not soundBusy(1) then
  12.         puppetSound(1, "track" & giCurrentTrackNumber)
  13.       end if
  14.     end if
  15.   end if
  16. end
  17.