ViewerSpecs.mesa; Written by S. McGregor
Last Edited by: McGregor on July 13, 1983 10:37 am
Last Edited by: Maxwell, December 17, 1982 9:58 am
Last Edited by: Pausch, June 20, 1983 2:42 pm
DIRECTORY
Icons USING [iconH, iconW];
ViewerSpecs: CEDAR DEFINITIONS = BEGIN
screenW: INTEGER = 1024;
screenH: INTEGER = 808;
windowBorderSize: INTEGER = 1;
captionHeight: INTEGER = 12;
menuHeight: INTEGER = 12;
menuBarHeight: INTEGER = 1;
messageWindowHeight: INTEGER = 18;
messageWindowWidth: INTEGER = screenW;
openLeftLeftX: INTEGER = 0;
openLeftTopY: INTEGER = screenH - messageWindowHeight;
openLeftWidth: INTEGER;
initialOpenLeftWidth: INTEGER = 600;
openRightLeftX: INTEGER; -- openLeftLeftX+openLeftWidth
openRightTopY: INTEGER = screenH - messageWindowHeight;
openRightWidth: INTEGER; -- screenW-openLeftWidth
openBottomY: INTEGER; -- iconHeight+iconSpacing
scrollBarW: INTEGER = 12;
iconSpacing: INTEGER = 4; -- should be multiple of 4 for grey background alignment
iconLeftX: INTEGER = iconSpacing;
iconRightX: INTEGER = screenW;
iconWidth: INTEGER = Icons.iconW;
iconBottomY: INTEGER = 0;
iconHeight: INTEGER = Icons.iconH;
iconRows: INTEGER = 2;
iconTopY: INTEGER = iconRows*(iconHeight+iconSpacing);
END.