home *** CD-ROM | disk | FTP | other *** search
/ Browser - Artopolis 97 / browser.iso / mac / artrope / artrope.dir / 00028_Script_initReviewTextFrame < prev    next >
Text File  |  1997-10-08  |  471b  |  18 lines
  1. global scrollObject
  2.  
  3. --=====================================
  4. --16= closebutton
  5. --17=up button
  6. --18 = downbutton
  7. --19 = barsprite (quickdraw line)
  8. --20 = slider/marker
  9. --22 = text (text sprite)
  10. ---------------------------------------
  11. on exitFrame
  12.   cleanUpFrame
  13.   fingerCursor([4,5,16,17,18,19,20])
  14.   set the cursor of sprite 3 to -1
  15.   
  16.   --on new me, textSprite0, barSprite0, markSprite0
  17.   set scrollObject = new(script "Scroll Text Parent",22,19,20)
  18. end