home *** CD-ROM | disk | FTP | other *** search
/ Hiper 2 / HIPERCD_2.iso / hipercd3.exe / hipercd3.dxr / 00045.ls < prev    next >
Encoding:
Text File  |  1997-07-25  |  2.9 KB  |  98 lines
  1. on exitFrame
  2.   global rola
  3.   if rollOver(2) then
  4.     if rola <> 2 then
  5.       puppetSound(0)
  6.     end if
  7.     set rola to 2
  8.     puppetSprite(2, 1)
  9.     set the member of sprite 2 to member 43 of castLib 1
  10.     updateStage()
  11.     puppetSprite(2, 0)
  12.   else
  13.     if rollOver(3) then
  14.       if rola <> 3 then
  15.         puppetSound(0)
  16.       end if
  17.       set rola to 3
  18.       puppetSprite(3, 1)
  19.       set the member of sprite 3 to member 49 of castLib 1
  20.       updateStage()
  21.       puppetSprite(3, 0)
  22.     else
  23.       if rollOver(4) then
  24.         if rola <> 4 then
  25.           puppetSound(0)
  26.         end if
  27.         set rola to 4
  28.         puppetSprite(4, 1)
  29.         set the member of sprite 4 to member 51 of castLib 1
  30.         updateStage()
  31.         puppetSprite(4, 0)
  32.       else
  33.         if rollOver(5) then
  34.           if rola <> 5 then
  35.             puppetSound(0)
  36.           end if
  37.           set rola to 5
  38.           set the visible of sprite 18 to 1
  39.           set the visible of sprite 19 to 0
  40.           set the visible of sprite 20 to 0
  41.           set the visible of sprite 21 to 0
  42.         else
  43.           if rollOver(6) then
  44.             if rola <> 6 then
  45.               puppetSound(0)
  46.             end if
  47.             set rola to 6
  48.             set the visible of sprite 18 to 0
  49.             set the visible of sprite 19 to 1
  50.             set the visible of sprite 20 to 0
  51.             set the visible of sprite 21 to 0
  52.           else
  53.             if rollOver(7) then
  54.               if rola <> 7 then
  55.                 puppetSound(0)
  56.               end if
  57.               set rola to 7
  58.               set the visible of sprite 18 to 0
  59.               set the visible of sprite 19 to 0
  60.               set the visible of sprite 20 to 1
  61.               set the visible of sprite 21 to 0
  62.             else
  63.               if rollOver(8) then
  64.                 if rola <> 8 then
  65.                   puppetSound(0)
  66.                 end if
  67.                 set rola to 8
  68.                 set the visible of sprite 18 to 0
  69.                 set the visible of sprite 19 to 0
  70.                 set the visible of sprite 20 to 0
  71.                 set the visible of sprite 21 to 1
  72.               else
  73.                 if rollOver(1) then
  74.                   set rola to 0
  75.                   puppetSprite(2, 1)
  76.                   set the member of sprite 2 to member 42 of castLib 1
  77.                   puppetSprite(2, 0)
  78.                   puppetSprite(3, 1)
  79.                   set the member of sprite 3 to member 48 of castLib 1
  80.                   puppetSprite(3, 0)
  81.                   puppetSprite(4, 1)
  82.                   set the member of sprite 4 to member 50 of castLib 1
  83.                   puppetSprite(4, 0)
  84.                   set the visible of sprite 18 to 0
  85.                   set the visible of sprite 19 to 0
  86.                   set the visible of sprite 20 to 0
  87.                   set the visible of sprite 21 to 0
  88.                 end if
  89.               end if
  90.             end if
  91.           end if
  92.         end if
  93.       end if
  94.     end if
  95.   end if
  96.   go(the frame)
  97. end
  98.