home *** CD-ROM | disk | FTP | other *** search
/ Undercover - Rock on Multimedia 2 / UNDERCOVER2.BIN / main.dir / 00123_Script_123 < prev    next >
Text File  |  1996-01-27  |  470b  |  18 lines
  1. on exitFrame
  2.   if soundbusy(1) then
  3.     set temp = integer(the timer/ 60)
  4.     set sec = integer(temp mod 60)
  5.     set min = integer(temp / 60)
  6.     
  7.     if sec < 10 then set the text of cast "time" = "0"& min & ":0" &  sec
  8.     else  set the text of cast "time" = "0"& min & ":" &  sec
  9.     
  10.     go the frame
  11.   else
  12.     global gDisablePopup
  13.     set gDisablePopup = false
  14.     set the text of cast "time" = "00:00"
  15.     playMusic
  16.     go marker(-1)
  17.   end if
  18. end