CD-ROM Magazine 28 Bonus/CDRomMagazine-SoftKey-ArtPassion-FrenchVersion-Win31Mac.bin/data/crmixpl.dir/00086_Script_Cursors

Text File | 1996-05-07 | 767b | 27 lines

-- ----------------------------------------------------------
-- Handler defineCursors defines the global variables that will
-- be used as cursors.

on defineCursors
  global handCursor

   set handCursor = [the number of cast "hand", the number of cast "handMask"]
end

-- ----------------------------------------------------------
-- Handler resetCursor resets the cursor of the given sprite to
-- the default arrow.

on resetCursor whichSprite
  set the cursor of sprite whichSprite = -1
end

-- ----------------------------------------------------------
-- Handler setHandCursor gives the given sprite the hand
-- arrow cursor.

on setHandCursor handSprite
  global handCursor
  set the cursor of sprite handSprite = handCursor
end