-- Author: John Maxwell -- Last Edited by: Maxwell, November 21, 1983 9:20 am DIRECTORY MusicDefs USING [NoteRec, NotePTR, ScorePTR]; Interface: DEFINITIONS = BEGIN OPEN MusicDefs; count: BOOLEAN; Object: TYPE = {note, rest, measure, staves, doubleMeasure, repeat1, repeat2, endMeasure, treble, bass, octava, doubleFlat, flat, natural, inKey, sharp, doubleSharp, trill, mordent1, mordent2, none}; DeleteGraphical: PROCEDURE[score: ScorePTR]; Flash: PROCEDURE[score: ScorePTR]; InsertNote: PROCEDURE[score: ScorePTR, object: Object]; -- may raise Piece.Overflow MoveGraphical: PROCEDURE[score: ScorePTR, object: Object]; -- may raise Piece.Overflow MoveNote: PROCEDURE[score: ScorePTR, n: NotePTR]; -- may raise Piece.Overflow Wait: PROCEDURE[ticks: CARDINAL]; END.