styles/iris.style
author claus
Sun, 23 Jul 1995 04:29:59 +0200
changeset 157 891eff44c2e7
parent 144 cf645a1ebbb3
child 172 8488665ce798
permissions -rw-r--r--
.

; 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.4 1995-07-23 02:29:59 claus Exp $

comment  'Silicon graphics'' iris look alike'

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     

#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
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
#endif

scrollerLevel                   -1
scrollerThumbLevel              3
scrollerThumbColor              =viewGrey
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
#if Display hasColors   
menuCheckColor                  Color red
#endif

pullDownMenuKeepMenu            true
pullDownMenuLevel               0
pullDownMenuHilightLevel        2
pullDownMenuEdgeStyle           #soft

variablePanelHandleColor        Color darkGrey