home *** CD-ROM | disk | FTP | other *** search
/ Dictionnaire Multimedia Multilingue (Home PC 42) / dictionarvizual.iso / data / tempstru.dir / 00023.ls < prev    next >
Encoding:
Text File  |  1996-03-13  |  348 b   |  14 lines
  1. on mouseUp
  2.   global gmovieStack, gLevel, gAct, chgAct, pDic, gRoot
  3.   if gAct = "f" then
  4.     set the picture of cast chgAct to the picture of cast pDic
  5.     set gAct to "p"
  6.   else
  7.     repeat with i = 8 to 44
  8.       set the cursor of sprite i to -1
  9.     end repeat
  10.     set gLevel to gLevel - 1
  11.     go(1, gRoot & getAt(gmovieStack, gLevel))
  12.   end if
  13. end
  14.