home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazine 28 Bonus / CDRomMagazine-SoftKey-ArtPassion-FrenchVersion-Win31Mac.bin / data / crmixpl.dir / 00086_Script_Cursors < prev    next >
Text File  |  1996-05-07  |  767b  |  27 lines

  1. -- ----------------------------------------------------------
  2. -- Handler defineCursors defines the global variables that will
  3. -- be used as cursors.
  4.  
  5. on defineCursors
  6.   global handCursor
  7.   
  8.    set handCursor = [the number of cast "hand", the number of cast "handMask"]
  9. end
  10.  
  11. -- ----------------------------------------------------------
  12. -- Handler resetCursor resets the cursor of the given sprite to 
  13. -- the default arrow.
  14.  
  15. on resetCursor whichSprite
  16.   set the cursor of sprite whichSprite = -1
  17. end
  18.  
  19. -- ----------------------------------------------------------
  20. -- Handler setHandCursor gives the given sprite the hand
  21. -- arrow cursor.
  22.  
  23. on setHandCursor handSprite
  24.   global handCursor
  25.   set the cursor of sprite handSprite = handCursor
  26. end
  27.