Computer Music Interactive 20/CMi20.iso/pc/tutorials.dir/00078_tut2step7.ls

Text File | 2000-03-28 | 498 b | 12 lines

on mouseUp
  puppetSound(1, 0)
  set the text of field "infoField" to "Here we have a piano part based around the diminished note intervals. What we’ve done is start with a fairly simple chord based part which, when used with suitable rhythmic punctuation and dynamics, gives a good starting point from where we can further elaborate."
  repeat with x = 75 to 95
    sprite(x).visible = 0
  end repeat
  sprite(91).visible = 1
  if not soundBusy(1) then
    puppetSound(1, "2step7")
  end if
end