home *** CD-ROM | disk | FTP | other *** search
/ Let's Get Started! with Coolpix / LetsGetStartedWithCoolpix.iso / mac / macdata / quickstart_31.dxr / 00011.ls < prev    next >
Encoding:
Text File  |  2003-02-28  |  2.3 KB  |  115 lines
  1. on startMovie
  2.   global pause, fast, welcome, batteries
  3.   pause = 0
  4.   fast = 0
  5.   welcome = 0
  6.   sprite(3).memberNum = 15
  7. end
  8.  
  9. on movcon
  10.   global rewind, pause, forward, fast, welcome, batteries, memorycard, firstpic, quickrev, fastrew
  11.   if (forward = 1) and (sprite(2).movieRate <> 1) then
  12.     sprite(2).movieRate = 1
  13.     forward = 0
  14.     fastrew = 0
  15.   end if
  16.   if fastrew = 1 then
  17.     frflag = 1
  18.     sprite(2).movieRate = 0
  19.     sprite(2).movieTime = sprite(2).movieTime - 66
  20.     if sprite(2).movieTime < 140 then
  21.       fastrew = 0
  22.     end if
  23.   end if
  24.   if rewind = 1 then
  25.     go(1)
  26.     rewind = 0
  27.   end if
  28.   if (fast = 1) and (sprite(2).movieRate <> 2) then
  29.     sprite(2).movieRate = 2
  30.     fast = 0
  31.     fastrew = 0
  32.   end if
  33.   if pause = 1 then
  34.     sprite(2).movieRate = 0
  35.     pause = 0
  36.     fastrew = 0
  37.   end if
  38.   if welcome = 1 then
  39.     fastrew = 0
  40.     sprite(2).movieRate = 1
  41.     sprite(2).movieTime = 33
  42.     welcome = 0
  43.   end if
  44.   if batteries = 1 then
  45.     fastrew = 0
  46.     sprite(2).movieRate = 1
  47.     sprite(2).movieTime = 3675
  48.     batteries = 0
  49.   end if
  50.   if memorycard = 1 then
  51.     fastrew = 0
  52.     sprite(2).movieRate = 1
  53.     sprite(2).movieTime = 4720
  54.     memorycard = 0
  55.   end if
  56.   if firstpic = 1 then
  57.     fastrew = 0
  58.     sprite(2).movieRate = 1
  59.     sprite(2).movieTime = 6196
  60.     firtspic = 0
  61.   end if
  62. end
  63.  
  64. on whichpart
  65.   global welcomeflag, batteriesflag, memorycardflag, firstpicflag
  66.   if sprite(2).movieTime < 3623 then
  67.     welcomeflag = 1
  68.     batteriesflag = 0
  69.     memorycardflag = 0
  70.     firstpicflag = 0
  71.   end if
  72.   if sprite(2).movieTime > 3623 then
  73.     welcomeflag = 0
  74.     batteriesflag = 1
  75.     memorycardflag = 0
  76.     firstpicflag = 0
  77.   end if
  78.   if sprite(2).movieTime > 4676 then
  79.     welcomeflag = 0
  80.     batteriesflag = 0
  81.     memorycardflag = 1
  82.     firstpicflag = 0
  83.   end if
  84.   if sprite(2).movieTime > 6176 then
  85.     welcomeflag = 0
  86.     batteriesflag = 0
  87.     memorycardflag = 0
  88.     firstpicflag = 1
  89.   end if
  90. end
  91.  
  92. on namechanger
  93.   repeat with i = 15 to 44
  94.     member(i, "castthree").name = member(i, "internal").name
  95.   end repeat
  96. end
  97.  
  98. on divider
  99.   global thecast, newcast
  100.   repeat with i = 15 to 52
  101.     thecast = member(i).name
  102.     newcast = thecast / 17
  103.     member(i).name = EMPTY & newcast & EMPTY
  104.   end repeat
  105. end
  106.  
  107. on add
  108.   global thecast, newcast
  109.   repeat with i = 35 to 50
  110.     thecast = member(i).name
  111.     newcast = thecast + 45
  112.     member(i).name = EMPTY & newcast & EMPTY
  113.   end repeat
  114. end
  115.