home *** CD-ROM | disk | FTP | other *** search
/ A Field Trip to the Sky (Demo) / Mac_Sunburst_AFieldTripToTheSky-Demo.iso / DIR / TERMS.DIR / 00348_Bitmap_sunspot < prev    next >
Text File  |  1996-03-21  |  377b  |  29 lines
  1. global gCurTerm
  2. global gVol
  3.  
  4. on startMovie
  5.   
  6.   global gAudPath
  7.   
  8.   set gAudPath to gVol & "Glossary:"
  9.   
  10.   if gCurTerm <> "" AND gCurTerm <> 0 then
  11.     set p to getTermIndexInfo(gCurTerm,1)
  12.     set p to value(p)
  13.     
  14.     set f to p
  15.     
  16.     go to frame f
  17.     
  18.     set gCurTerm to ""
  19.     
  20.   end if
  21.   
  22.   
  23. end
  24.  
  25.  
  26. on stopMovie
  27.   set gCurTerm to ""
  28. end
  29.