<> <> <> <> <> DIRECTORY Imager USING [Context], MusicDefs USING [ColorType, FontType, PaintMode], Rope USING [ROPE]; Utility: CEDAR DEFINITIONS ~ BEGIN ROPE: TYPE ~ Rope.ROPE; <<*************************************************************************>> <> <<*************************************************************************>> <> < the music should be drawn on a press file.>> < the music should be drawn using the music font rather than splines>> Context: TYPE ~ Imager.Context; DrawChar: PROC[dc: Context, c: CHAR]; DrawLine: PROC[dc: Context, x1, y1, x2, y2: INTEGER]; DrawCubic: PROC[dc: Context, x1, y1, x2, y2, height: INTEGER]; DrawString: PROC[dc: Context, s: ROPE]; Flash: PROC[dc: Context]; Box: TYPE ~ RECORD[xmin, ymin, xmax, ymax: REAL]; DrawBox: PROC[dc: Context, box: Box]; FontType: TYPE ~ MusicDefs.FontType; -- {text, music}; SetFont: PROC[dc: Context, font: FontType, size: INTEGER]; ColorType: TYPE ~ MusicDefs.ColorType; -- {black, grey, light, white}; SetColor: PROC[dc: Context, color: ColorType]; PaintMode: TYPE ~ MusicDefs.PaintMode; -- {opaque, transparent, invert}; SetBrush: PROC[dc: Context, color: ColorType, mode: PaintMode]; SetCP: PROC[dc: Context, x, y: REAL]; END.