home *** CD-ROM | disk | FTP | other *** search
/ Blender Volume 1 #1 / Blender_1_1.iso / BLENDER / FILES / SONIC.DIR / 00130.ls < prev    next >
Encoding:
Text File  |  1994-11-01  |  726 b   |  35 lines
  1. on startMovie
  2.   set the soundEnabled to 1
  3.   set the keyDownScript to "checkKey"
  4. end
  5.  
  6. on checkKey
  7.   if the key = "1" then
  8.     set the soundLevel to 1
  9.   else
  10.     if the key = "2" then
  11.       set the soundLevel to 2
  12.     else
  13.       if the key = "3" then
  14.         set the soundLevel to 3
  15.       else
  16.         if the key = "4" then
  17.           set the soundLevel to 4
  18.         else
  19.           if the key = "5" then
  20.             set the soundLevel to 5
  21.           else
  22.             if the key = "6" then
  23.               set the soundLevel to 6
  24.             else
  25.               if the key = "7" then
  26.                 set the soundLevel to 7
  27.               end if
  28.             end if
  29.           end if
  30.         end if
  31.       end if
  32.     end if
  33.   end if
  34. end
  35.