home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / optimus / agata / home.dir / 00004_loop end.ls < prev    next >
Encoding:
Text File  |  1997-02-20  |  238 b   |  14 lines
  1. on exitFrame
  2.   global theCoord, pierwszyRaz
  3.   Animate(theCoord)
  4.   if pierwszyRaz = 1 then
  5.     sound playFile 1, "aga01.aif"
  6.     set pierwszyRaz to 0
  7.   else
  8.     if not soundBusy(1) then
  9.       go(1, "aga04")
  10.     end if
  11.   end if
  12.   go(4)
  13. end
  14.