home *** CD-ROM | disk | FTP | other *** search
/ Encyklopedia Omnia / Planeta.iso / data / a_gen.dir / 00008_prepVR3.ls < prev    next >
Encoding:
Text File  |  2000-11-14  |  550 b   |  23 lines
  1. on enterFrame
  2.   global gInfoContext
  3.   trackNewMilestone(the frame)
  4.   set the MovieMouseClick of sprite(1) to 0
  5.   set gInfoContext to "a_03"
  6. end
  7.  
  8. on exitFrame
  9.   if soundBusy(1) then
  10.     swingStep(1, #left, 1)
  11.     go(the frame)
  12.   else
  13.     set x to stageRight() - 96
  14.     set y to stageTop()
  15.     apriMiawTipo2("m_navig", x, y, 0)
  16.     cursor(200)
  17.     cursor(-1)
  18.     set the MouseUpHandler of sprite(1) to "handleMouseUpA_VR03"
  19.     set the MouseDownHandler of sprite(1) to "handleMouseDownCommon"
  20.     set the MovieMouseClick of sprite(1) to 1
  21.   end if
  22. end
  23.