DEFINITION MODULE MsColors;
(*
 *  REPERTOIRE
 *  Release 1.6
 *  By Charles Bradford and Cole Brecheen
 *  (c) Copyright 1985-1992 PMI
 *  Green Bay, Wisconsin
 *  All rights reserved
 *  (414) 468-6040
 *
 *  $Header:   D:/logfiles/defs/mscolors.dev   1.4   30 Dec 1990 18:02:22   coleb  $
 *
 *)


TYPE
  AColor = CHAR;
    (*will change to LONGINT in next release *)
  AMonoAttribute = CHAR;

VAR
  plain, bold, underscored, blinking,
      ReverseVideo, invisible: AMonoAttribute;

  black, blue, green, cyan, red, magenta, brown,
      lightgrey, darkgrey, lightblue, lightgreen,
      lightcyan, lightred, lightmagenta, yellow,
      brightwhite: AColor;

  PROCEDURE Init();

END MsColors.