home *** CD-ROM | disk | FTP | other *** search
/ Seeker / Seeker.iso / files_w / minka_a.dir / 00048_Script_48 < prev    next >
Text File  |  1994-12-06  |  535b  |  23 lines
  1. on mousedown
  2.   if the castnum of sprite clickon()<>0 then
  3.     cursor [247,248]
  4.     repeat while the stilldown
  5.       set the loch of sprite clickon()=mouseh()
  6.       set the locv of sprite clickon()=mousev()
  7.       updatestage
  8.     end repeat
  9.     cursor 200
  10.     if rollover(4) then
  11.       global getitems
  12.       setat getitems,6,0
  13.       puppetsprite 36,1
  14.       set the castnum of sprite 36=0
  15.       repeat with i=1 to 27
  16.         set the cursor of sprite i=0
  17.       end repeat
  18.       go to "DOG_2"
  19.     end if
  20.   end if
  21. end
  22.  
  23.