home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 September / WPCSEP96.ISO / grow08f.dxr / 00014_groanimatesection.ls < prev    next >
Encoding:
Text File  |  1996-07-09  |  2.5 KB  |  79 lines

  1. on groanimatesection
  2.   global playvid
  3.   if the castNum of sprite 10 <> "93" then
  4.     set the castNum of sprite 4 to 19
  5.   end if
  6.   if the castNum of sprite 10 <> "94" then
  7.     set the castNum of sprite 5 to 20
  8.   end if
  9.   if the castNum of sprite 10 <> "95" then
  10.     set the castNum of sprite 6 to 21
  11.   end if
  12.   set the castNum of sprite 27 to 99
  13.   set the castNum of sprite 28 to 98
  14.   if the mouseUp then
  15.     case the rollOver of
  16.       "4":
  17.         if the castNum of sprite 10 <> "93" then
  18.           set the castNum of sprite 4 to 47
  19.         end if
  20.       "5":
  21.         if the castNum of sprite 10 <> "94" then
  22.           set the castNum of sprite 5 to 48
  23.         end if
  24.       "6":
  25.         if the castNum of sprite 10 <> "95" then
  26.           set the castNum of sprite 6 to 49
  27.         end if
  28.       "27":
  29.         set the castNum of sprite 27 to 101
  30.       "28":
  31.         set the castNum of sprite 28 to 100
  32.     end case
  33.   end if
  34.   case the clickOn of
  35.     "4":
  36.       puppetSound(0)
  37.       set the castNum of sprite 10 to 93
  38.       set the castNum of sprite 4 to 51
  39.       if the castNum of sprite 21 <> the number of member "NameOne" then
  40.         set the castNum of sprite 21 to the number of member "NameOne"
  41.         set the loc of sprite 21 to point(10, 400)
  42.       end if
  43.       updateStage()
  44.       set the movieRate of sprite 10 to 1
  45.     "5":
  46.       puppetSound(0)
  47.       set the castNum of sprite 10 to 94
  48.       set the castNum of sprite 5 to 52
  49.       if the castNum of sprite 21 <> the number of member "NameTwo" then
  50.         set the castNum of sprite 21 to the number of member "NameTwo"
  51.         set the loc of sprite 21 to point(10, 400)
  52.       end if
  53.       updateStage()
  54.       set the movieRate of sprite 10 to 1
  55.     "6":
  56.       puppetSound(0)
  57.       set the castNum of sprite 10 to 95
  58.       set the castNum of sprite 6 to 53
  59.       if the castNum of sprite 21 <> the number of member "NameOne" then
  60.         set the castNum of sprite 21 to the number of member "NameOne"
  61.         set the loc of sprite 21 to point(10, 400)
  62.       end if
  63.       updateStage()
  64.       set the movieRate of sprite 10 to 1
  65.     "28":
  66.       if the castNum of sprite 10 <> "0" then
  67.         if the type of member the member of sprite 10 = #digitalVideo then
  68.           set the movieRate of sprite 10 to 1
  69.         end if
  70.       end if
  71.     "27":
  72.       if the castNum of sprite 10 <> "0" then
  73.         if the type of member the member of sprite 10 = #digitalVideo then
  74.           set the movieRate of sprite 10 to 0
  75.         end if
  76.       end if
  77.   end case
  78. end
  79.