; View defaultStyle:#iris
;
; silicon graphics style
; (somwehat like motif, but with smooth edges and bells&whistles)
;
; $Header: /cvs/stx/stx/libview/styles/iris.style,v 1.13 1996-06-12 12:13:04 cg Exp $
comment 'Silicon graphics'' Iris look alike'
#if (Language == #german) or:[Language == #de]
comment 'An Silicon Graphics Iris angelehnter Stil'
#endif
#if (Language == #french) or:[Language == #fr]
comment 'Un style qui resemble Silicon Graphics Irix'
#endif
is3D true
name #iris
#if Display hasGreyscales
viewGrey Color grey:67
#else
viewGrey Color white
lightColor Color grey:50
#endif
borderWidth 0
viewBackground =viewGrey
popupShadow true
popupLevel 2
popupBorderWidth 1
textFont Font family:'courier' size:12
#if Display hasColors
textSelectionForegroundColor Color black
textSelectionBackgroundColor Color green
#endif
textCursorForegroundColor Color white
#if Display hasColors
textCursorBackgroundColor Color red
#else
textCursorBackgroundColor Color black
#endif
#if (Display hasColors and:[Display depth > 4])
transcriptForegroundColor Color veryLightGrey
transcriptBackgroundColor Color red:0 green:0 blue:25
transcriptCursorForegroundColor =transcriptBackgroundColor
transcriptCursorBackgroundColor Color green
#else
transcriptForegroundColor Color white
transcriptBackgroundColor Color black
transcriptCursorForegroundColor =transcriptBackgroundColor
transcriptCursorBackgroundColor =transcriptForegroundColor
#endif
#if Display hasColors
; editFieldBackgroundColor Color red:100 green:75 blue:75
editFieldBackgroundColor Color scaledRed:16rB9B9 scaledGreen:16r8E8E scaledBlue:16r8E8E
editFieldSelectionBackgroundColor Color white
editFieldSelectionForegroundColor Color black
#endif
#if (Font family:'screen' face:'bold' style:'roman' size:16) existsOn:Display
editFieldFont Font family:'screen' face:'bold' style:'roman' size:16
#else
editFieldFont Font family:'courier' face:'medium' style:'roman' size:12
#endif
variableFont Font family:'helvetica' face:'medium' style:'roman' size:12
selectionFont =variableFont
labelFont =variableFont
#if Display hasColors
toggleShowLamp true
toggleLampColor Color yellow
checkToggleCheckColor Color red
radioButtonShowLamp false
radioButtonStyle #iris
#endif
scrollerLevel -1
scrollerThumbLevel 3
scrollerThumbColor =viewGrey
#if Display hasGreyscales
scrollerThumbEnteredColor Color veryLightGrey
#endif
scrollerThumbEdgeStyle #soft
scrollerNTallyMarks 3
scrollerTallyLevel 1
scrollerGhostColor Color grey:50
scrollerGhostLevel -1
#if Display hasGreyscales not
scrollerViewBackground Color white
#endif
sliderNTallyMarks 1
sliderTallyLevel 1
buttonEdgeStyle #soft
buttonActiveLevel -1
buttonPassiveLevel 3
buttonDisabledForegroundColor Color darkGrey
#if Display hasGreyscales
buttonEnteredBackgroundColor Color veryLightGrey
buttonActiveBackgroundColor nil
buttonActiveForegroundColor Color black
#else
buttonEnteredBackgroundColor Color white
buttonActiveForegroundColor Color white
buttonActiveBackgroundColor Color black
#endif
menuFont Font family:'helvetica' face:'bold' style:'roman' size:12
menuHilightBackgroundColor Color white
menuHilightLevel 1
; menuShowAccelerators false
#if Display hasColors
menuCheckColor Color red
#endif
pullDownMenuKeepMenu true
pullDownMenuLevel 0
pullDownMenuHilightLevel 2
pullDownMenuEdgeStyle #soft
variablePanelHandleColor Color darkGrey
#if Display hasGreyscales
variablePanelHandleEnteredColor Color veryLightGrey
#endif
activeHelpBackgroundColor Color yellow lightened
activeHelpBorderWidth 2