module colorin
!************************************************************************
!*                         SYMBOLIC CONSTANTS
!************************************************************************

integer, parameter, public ::   MAXCOLORS           = 8
integer, parameter, public ::   BACKGROUND_COLOR    = #0f0

!************************************************************************
!*                          GLOBAL VARIABLES
!************************************************************************

character*10  Color(MAXCOLORS)


end module

