home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2000 February / DPPCPRO0200.ISO / ps10.dxr / Scripts_5.ls < prev    next >
Encoding:
Text File  |  1999-10-26  |  254 b   |  14 lines
  1. global giCurrentTrackNumber
  2.  
  3. on exitFrame
  4.   if not soundBusy(1) then
  5.     giCurrentTrackNumber = giCurrentTrackNumber + 1
  6.     if giCurrentTrackNumber > 10 then
  7.       giCurrentTrackNumber = 2
  8.     end if
  9.     go("free")
  10.   else
  11.     go(the frame)
  12.   end if
  13. end
  14.