home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 November / chip_special1.iso / _word / Inter.dxr / 01656_Field_1656.txt < prev   
Text File  |  1998-10-18  |  636b  |  35 lines
  1. -- instaluj
  2. on mouseUp
  3.   set the locH of sprite 5 to 409
  4.   set the locV of sprite 5 to 266 
  5.   puppetSprite 5, FALSE  
  6.   global myCD
  7.   open myCD&"\qteasy32"
  8.   halt
  9. end
  10.  
  11.  
  12. on mouseDown
  13.   puppetSprite 5, true
  14.   set the locH of sprite 5 to 412
  15.   set the locV of sprite 5 to 269
  16. end 
  17.  
  18. on mouseUpOutside
  19.   set the locH of sprite 5 to 409
  20.   set the locV of sprite 5 to 266 
  21.   set the ink of sprite 5 to 7
  22. end mouseUpOutside
  23.  
  24.  
  25. on mouseLEave  
  26.   set the locH of sprite 5 to 409
  27.   set the locV of sprite 5 to 266 
  28.   set the ink of sprite 5 to 7  
  29. end
  30.  
  31.  
  32.  
  33. on mouseEnter
  34.   set the ink of sprite 5 to 5
  35. end mouseEnter