<> <> <> <> <> <<>> DIRECTORY Imager USING [Context], MusicDefs USING [Accidental, LookCommand, NotePTR, ScorePTR, SheetPTR, Time, TimeSignature], Rope USING [ROPE]; Score: CEDAR DEFINITIONS = BEGIN OPEN MusicDefs; ROPE: TYPE ~ Rope.ROPE; <<****************************************************************************>> <> <<****************************************************************************>> Initialize: PROC[score: ScorePTR, context: Imager.Context]; BuildCache: PROC[score: ScorePTR, time: Time]; Draw: PROC[score: ScorePTR, erase: BOOL _ TRUE]; Redraw: PROC[score: ScorePTR, t1, t2: Time]; Print: PROC[score: ScorePTR, splines: BOOL]; SetKey: PROC[score: ScorePTR, key: INTEGER, time1, time2: Time]; GetKey: PROC[score: ScorePTR, t: Time] RETURNS[key: INTEGER]; GetAccidental: PROC[score: ScorePTR, n: NotePTR] RETURNS[Accidental]; SetMetronome: PROC[score: ScorePTR, m: INTEGER, time1, time2: Time]; GetMetronome: PROC[score: ScorePTR, t: Time] RETURNS[metronome: INTEGER]; DrawMetronome: PROC[score: ScorePTR, metronome: INTEGER, time: Time]; SetTimeSignature: PROC[score: ScorePTR, ts: TimeSignature, time1, time2: Time]; GetTimeSignature: PROC[score: ScorePTR, t: Time] RETURNS[TimeSignature]; DrawTimeSignature: PROC[score: ScorePTR, ts: TimeSignature, time: Time]; SetStyle: PROC[score: ScorePTR, index: INTEGER, t1, t2: Time]; GetStyle: PROC[score: ScorePTR, time: Time] RETURNS[INTEGER]; SetClef: PROC[score: ScorePTR, pitch, staff: INTEGER, time: Time]; SetOctava: PROC[score: ScorePTR, pitch, staff, height: INTEGER, t1, t2: Time]; Justify: PROC[score: ScorePTR, begin, end: Time]; LogicalToPhysical: PROC[score: ScorePTR, begin, end: Time]; ScalePhysical: PROC[score: ScorePTR, n: INTEGER]; ShowLogical: PROC[score: ScorePTR, firstEvent, lastEvent: CARDINAL]; Look: PROC[score: ScorePTR, look: LookCommand, switch: BOOL_ TRUE, n: INTEGER _ 0]; <> AddToPitch: PROC[key, pitch, delta: INTEGER] RETURNS[INTEGER]; KeyHeight: PROC[key, pitch: INTEGER] RETURNS[INTEGER]; NormalAcc: PROC[key, pitch: INTEGER] RETURNS[Accidental]; PriorNote: PROC[score: ScorePTR, pitch, height: INTEGER, index: CARDINAL] RETURNS[NotePTR]; ShowPitch: PROC[sheet: SheetPTR, pitch: INTEGER, spelled: Accidental, key: INTEGER] RETURNS[INTEGER]; <<****************************************************************************>> <> <<****************************************************************************>> FileIn: PROC[fileName: ROPE] RETURNS[ScorePTR]; FileOut: PROC[score: ScorePTR, fileName: ROPE] RETURNS[BOOL]; FileStats: PROC[score: ScorePTR]; InitializeSynthesizer: PROC; StartListening: PROC[score: ScorePTR]; StartPlaying: PROC[score: ScorePTR, first: CARDINAL, physical: BOOL, displayCursor: PROC[score: ScorePTR, time: Time]]; <> StopListening: PROC[score: ScorePTR]; StopPlaying: PROC[score: ScorePTR]; Test: PROC[score: ScorePTR] RETURNS[errors: BOOL]; END.