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

Text File | 1999-09-17 | 539 b | 29 lines

on mouseEnter
  if the visible of window "Help" then
    tell window "help"
      go("grooveM16")
    end tell
  end if
end

on mouseLeave
  if the visible of window "Help" then
    tell window "help"
      go("start")
    end tell
  end if
end

on mouseDown
  global gTraccia, gOn, stateTrackList, gOnVol
  if (gTraccia <> 0) and gOn and not (the visible of window "help") then
    if getAt(stateTrackList, gTraccia) <> "off" then
      set gOnVol to 1
    end if
  end if
end

on mouseUp
  set the editable of member "fieldBpm" to 0
end