home *** CD-ROM | disk | FTP | other *** search
/ Kompuutteri K-CD 2003 #1 / K-CD_2003-01.iso / Tools / K-CD.DCR / 00237.ls < prev    next >
Encoding:
Text File  |  2002-04-19  |  234 b   |  15 lines
  1. global BlinkObjekt
  2.  
  3. on new me
  4.   cursor(0)
  5.   set BlinkObject to 0
  6.   puppetSound("Oddsound")
  7.   set the locH of sprite 99 to 780
  8.   set BlinkObjekt to new(script "Blink", 4, 80)
  9. end
  10.  
  11. on exitFrame
  12.   checkBlink(BlinkObjekt)
  13.   go(#loop)
  14. end
  15.