Blender Volume 3 #4/Blender_3_4.iso/BLENDER/FILES/Shared.Cst/00064.ls

Text File | 1997-01-01 | 466 b | 21 lines

--VOLUME CONTROL FOR MOVIES
on SETSPEAKER
  global VOLUME
  if (VOLUME >= 0) and (VOLUME <= 7) then
    set the soundLevel to VOLUME
    updateStage
  end if
end

--RANDOM MOTION FOR TRAPDOORS
on TRAPDOOR
  puppetSprite 40, TRUE
  set X to the locH of sprite 40
  set Y to the locV of sprite 40
  set X = X + 50 - random (35)
  set Y = Y + 40 - random (35)
  set X = X mod 640
  set Y = Y mod 480
  set the locH of Sprite 40 = X
  set the locV of Sprite 40 = Y
end