home *** CD-ROM | disk | FTP | other *** search
/ Spawn Figure Collection / spawn collection cd.iso / setup / data1.cab / Program_Executable_Files / Collection.dir / 00032.ls < prev    next >
Encoding:
Text File  |  1998-01-19  |  408 b   |  16 lines

  1. on whatbitmaps
  2.   global gebitmap, geditstack
  3.   set the puppet of sprite 3 to 1
  4.   set the blend of sprite 3 to 20
  5.   if the mouseWord = -1 then
  6.     return 
  7.   else
  8.     if the mouseDown then
  9.       hilite word the mouseWord of field "├ó├è├½├║├á├ì├│├│"
  10.       set gebitmap to word the mouseWord of the text of member "├ó├è├½├║├á├ì├│├│"
  11.       set geditstack to geditstack + 1
  12.       go(#next)
  13.     end if
  14.   end if
  15. end
  16.