Micromanía 25/CDMM_25.iso/takeru/g079.dxr/00064.ls

Text File | 1996-09-04 | 320 b | 16 lines

on startMovie
  set the volume of sound 4 to 0
  set the volume of sound 1 to 255
  set the volume of sound 2 to 255
  puppetSound(4, 200)
  unLoad()
end

on fdout y
  set myvolume to the volume of sound y
  repeat with x = 1 to 15
    set the volume of sound 4 to myvolume - (x * 20)
    updateStage()
  end repeat
end