Computer Music Interactif 7/cd.iso/pc/PC/Demos/GroovMak/data1.cab/Program_Executable_Files/Media/LoadU.dxr/00046.ls

Text File | 1999-09-17 | 490 b | 20 lines

on mouseDown
  if the last char in field "fieldUserPath" <> "\" then
    repeat while the mouseDown
      set the memberNum of sprite 16 to the number of member "Hpreview"
      updateStage()
    end repeat
  end if
end

on mouseUp
  if the last char in field "fieldUserPath" <> "\" then
    if soundBusy(1) then
      sound stop 1
    else
      set the volume of sound 1 to 255 * integer(field "fieldMasterVol") / 128
      sound playFile 1, field "fieldUserPath"
    end if
  end if
end