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

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

on mouseEnter
  if the visible of window "Help" then
    tell window "help"
      go("synth11")
    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 mouseUp
  global gOn, gOnSynth, gSynthSel, folderSynthList
  if gOn and (folderSynthList <> []) and not (the visible of window "help") then
    IKSynthStop()
    set the visible of sprite 3 to 1
    set gOnSynth to 0
    if gSynthSel then
      set the locH of sprite 74 to -20
      set gSynthSel to 0
    end if
  end if
end