home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (UK) 9 / cdromtoday9-coverdisc.bin / pplanes / gloss / 00013_Script_13 < prev    next >
Text File  |  1994-08-18  |  334b  |  14 lines
  1. on exitFrame
  2.   cursor 4
  3.   global GlossHilite, GlossText, MaxScreenLines
  4.   set GlossText = 8
  5.   set GlossHilite = 7
  6.   set MaxScreenLines = 13
  7.   puppetSprite GlossHilite, true
  8.   
  9.   global ReadGlossary
  10.   if ReadGlossary then
  11.     set the text of field "Glossary" = ""
  12.     set the text of field "GlossaryData" = ""
  13.   end if
  14. end