home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / optimus / agata / home.dir / 00027_loungeSpark.ls < prev    next >
Encoding:
Text File  |  1997-02-20  |  411 b   |  12 lines
  1. property ancestor
  2.  
  3. on birth me, loc, chan
  4.   set ancestor to birth(script "sparkle ancestor", chan)
  5.   set the x of me to getAt(loc, 1)
  6.   set the y of me to getAt(loc, 2)
  7.   set the castList of me to [154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165]
  8.   set the colList of me to [241, 51, 85, 51, 25, 244, 37, 71, 101, 149, 122, 149]
  9.   set the maxFrames of me to count(the castList of me)
  10.   return me
  11. end
  12.