home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / optimus / agata / home.dir / 00022_bird2.ls < prev    next >
Encoding:
Text File  |  1997-02-20  |  4.8 KB  |  14 lines
  1. property ancestor
  2.  
  3. on birth me, chan1, chan2
  4.   set ancestor to birth(script "2 chan mov", chan1, chan2)
  5.   set the x1List of me to [272, 273, 273, 273, 274, 274, 274, 274, 274, 274, 275, 275, 277, 278, 281, 287, 293, 297, 302, 307, 313, 313, 313, 313, 313, 313, 313, 313, 313, 314, 314, 315, 316, 318, 320, 323, 324, 326, 332, 351, 372, 396, 415, 428, 431, 434, 438, 441, 445, 448, 449, 453, 457, 460, 465, 471, 475, 475, 472, 472, 476, 481, 481, 479, 474, 471, 474, 483, 487, 490, 493, 498, 506, 512, 520, 526, 532, 535, 538, 538, 538, 538, 538, 538, 538, 538, 538, 538, 538, 538, 538, 539, 539, 540, 542, 543, 545, 548, 551, 557, 562, 570, 577, 583, 587, 591, 595, 600, 604, 610, 618, 623, 623, 624, 624, 624, 624, 623, 622, 621, 619, 616, 613, 610, 607, 604, 601, 596, 592, 587, 583, 576, 574, 574, 574, 574, 574, 574, 574, 574, 574, 574, 574, 574, 573, 572, 571, 569, 565, 560, 555, 553, 553, 553, 553, 553, 553, 554, 554, 554, 555, 559, 562, 564, 565, 566, 566, 566, 566, 566, 566, 566, 566, 566, 566, 566, 567, 567, 567, 568, 569, 571, 574, 577, 581, 584, 588, 593, 599, 602, 603, 607, 610, 613, 617, 622, 628, 632, 637, 637]
  6.   set the y1List of me to [20, 19, 19, 19, 20, 20, 20, 20, 22, 22, 21, 20, 18, 16, 14, 9, 7, 9, 13, 15, 17, 17, 17, 17, 17, 18, 18, 18, 18, 17, 16, 15, 14, 9, 6, 3, 1, -3, -7, -21, -26, -23, -19, -15, -12, -6, 1, 9, 16, 20, 16, 8, 7, 10, 13, 17, 15, 10, 9, 13, 19, 20, 17, 13, 13, 17, 20, 18, 17, 14, 12, 11, 9, 9, 11, 15, 20, 25, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 30, 29, 28, 26, 23, 20, 15, 10, 7, 6, 5, 5, 5, 6, 7, 8, 9, 11, 12, 14, 17, 18, 18, 17, 17, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 18, 22, 26, 31, 35, 35, 35, 35, 35, 35, 37, 37, 36, 36, 35, 32, 31, 29, 25, 23, 18, 15, 14, 17, 22, 21, 22, 22, 21, 21, 19, 17, 12, 8, 7, 13, 19, 23, 22, 22, 22, 22, 25, 25, 25, 24, 24, 24, 24, 24, 24, 23, 23, 22, 20, 17, 14, 12, 10, 7, 6, 6, 5, 4, 2, 2, 3, 5, 7, 11, 17, 21, 21]
  7.   set the cast1List of me to [586, 588, 588, 588, 587, 587, 587, 587, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 588, 588, 588, 588, 588, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 588, 588, 588, 588, 588, 588, 588, 588, 588, 588, 588, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 588, 588, 587, 587, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 587, 587, 587, 587, 587, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 587, 587, 587, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 588, 588, 587, 587, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585, 586, 585]
  8.   set the x2List of me to [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 578, 578, 578, 578, 578, 578, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  9.   set the y2List of me to [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 53, 64, 77, 95, 118, 140, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  10.   set the cast2List of me to [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 589, 589, 589, 589, 589, 589, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  11.   set the maxFrames of me to count(the x1List of me)
  12.   return me
  13. end
  14.