Computer Music Interactive 20/CMi20.iso/pc/tutorials.dir/00075_tut2step4.ls

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

on mouseUp
  puppetSound(1, 0)
  set the text of field "infoField" to "Finally, we see an entire piano motif based around our original chord. The descending series of chords in the first bar work well against the walking bassline, whilst the simple motif in the second bar rounds the section off quite nicely."
  repeat with x = 75 to 95
    sprite(x).visible = 0
  end repeat
  sprite(88).visible = 1
  if not soundBusy(1) then
    puppetSound(1, "2step4")
  end if
end