; View defaultStyle:#sgmotif
;
; silicon graphics motif style
; (somwehat like motif, but with smooth edges and bells&whistles)
;
; $Header: /cvs/stx/stx/libview/styles/iris.style,v 1.30 1999/10/27 13:28:02 stefan Exp $

name                            #sgmotif

comment                 'Silicon Craphics'' enhanced Motif style by Jan Vrany'
previewFileName         'viewStyleSample_sgmotif.png'


editorBG                        Color r:0.82 g:0.71 b:0.71
listBG                          Color r:0.56 g:0.67 b:0.69

#if Screen current hasGreyscales
viewGrey                        Color gray:85
veryLightGray                   (Color veryLightGray) exactOrNearestOn:(Screen current)
darkGray                        Color gray:74
mediumGray                      (Color gray:50) exactOrNearestOn:(Screen current)
#else
viewGrey                        Color white
lightColor                      Color grey:50
veryLightGray                   Color veryLightGray
darkGray                        Color darkGray
mediumGray                      Color gray:50
#endif

miniScroller.size               2.5     "/ in millimeters


is3D                            true

borderWidth                     0
viewBackground                  =viewGrey

#if (Screen current platformName = 'WIN32')
popup.shadow                    false
#else
; popup.shadow                    true
popup.shadow                    false
#endif
popup.level                     1
popup.borderWidth               1

font                             Font family:'courier' size:10

text.font                        Font family:'courier' size:12
text.lightColor                  =viewGrey

text.alternativeSelectionForegroundColor    Color black
text.alternativeSelectionBackgroundColor    (Color redByte:150 "255" greenByte:255 blueByte:100 "204")

#if Screen current hasColors
textSelection.foregroundColor    Color black
textSelection.backgroundColor    Color green
#endif

textCursor.foregroundColor       Color white
#if Screen current hasColors
textCursor.backgroundColor       Color red
#else
textCursor.backgroundColor       Color black
#endif

#if (Screen current hasColors and:[Screen current depth > 4])
transcript.foregroundColor       Color black
transcript.backgroundColor       =listBG
transcript.cursorForegroundColor =transcript.backgroundColor
transcript.cursorBackgroundColor Color green
#else
transcript.foregroundColor       Color white
transcript.backgroundColor       Color black
transcript.cursorForegroundColor =transcript.backgroundColor
transcript.cursorBackgroundColor =transcript.foregroundColor
#endif

#if Screen current hasColors
; editField.backgroundColor           Color red:100 green:75 blue:75
; editField.backgroundColor           (Color scaledRed:16rB9B9 scaledGreen:16r8E8E scaledBlue:16r8E8E) exactOrNearestOn:(Screen current)
editField.backgroundColor           =editorBG
editField.selectionBackgroundColor  =viewGrey
editField.selectionForegroundColor  Color black
#endif

#if (Screen current serverVendor = 'Silicon Graphics' and:[(Font family:'screen' face:'bold' style:'roman' size:16) existsOn:Screen current])
editField.font                   Font family:'screen' face:'bold' style:'roman' size:16
#else
editField.font                   Font family:'courier' face:'medium' style:'roman' size:12
#endif

#if (Screen current serverVendor = 'microsoft')
variableFont                     Font family:'helvetica' face:'medium' style:'roman' size:10
#else
variableFont                     Font family:'helvetica' face:'medium' style:'roman' size:12
#endif
selection.font                   =variableFont
label.font                       =variableFont

#if Screen current hasColors
toggle.showLamp                  true
toggle.lampColor                 Color yellow
toggle.lampWidthMM       1.8           "mm"
toggle.lampHeightMM      3.5           "mm"
toggle.backgroundColor          =darkGray
toggle.enteredBackgroundColor   =viewGrey
toggle.actoveBackgroundColor    =darkGray

checkToggle.checkColor           Color red
checkToggle.bitmapFile           'CheckOnColor.xpm'
checkToggle.labelOverMargin      true
checkToggle.activeBackgroundColor =viewGrey
radioButton.showLamp             true
radioButton.backgroundColor      =viewGrey
radioButton.lampWidthMM       1.8           "mm"
radioButton.lampHeightMM      3.5           "mm"

#endif

scroller.level                   -1
scroller.thumbLevel              3
scroller.thumbColor              =darkGray
#if Screen current hasGreyscales
scroller.thumbEnteredColor       =viewGrey
#endif
scroller.thumbEdgeStyle          #soft
scroller.NTallyMarks             3
scroller.tallyLevel              1
scroller.ghostColor              =mediumGray
scroller.ghostLevel              -1
#if Screen current hasGreyscales not
scroller.viewBackground          Color white
#endif
scroller.middleButtonJump        true

slider.NTallyMarks               1
slider.tallyLevel                1

button.edgeStyle                 #soft
button.activeLevel               -1
button.passiveLevel              3
button.backgroundColor           =darkGray
button.disabledForegroundColor   Color gray:25
#if Screen current hasGreyscales
button.enteredBackgroundColor    =viewGrey
button.activeBackgroundColor     nil
button.activeForegroundColor     Color black
#else
button.enteredBackgroundColor    Color white
button.activeForegroundColor     Color white
button.activeBackgroundColor     Color black
#endif


selection.backgroundColor       =listBG
text.backgroundColor             =editorBG
text.selectionBackgroundColor   =viewGrey
text.selectionForegroundColor   Color black
scrollBar.position              #right



;#if (Screen current serverVendor = 'Silicon Graphics')
menu.font                        Font family:'helvetica' face:'bold' style:'oblique' size:10
;#else
;menu.font                        Font family:'helvetica' face:'bold' style:'roman' size:12
;#endif

noteBook.halfLightColor          Color gray:87
noteBook.halfShadowColor         Color gray:55
noteBook.shadowColor             Color gray:37
noteBook.lightColor              Color gray:92

;noteBook.foregroundColor         Color red
noteBook.viewBackgroundColor     Color black
noteBook.disabledForegroundColor Color gray:25
noteBook.canvasFrameLevel          2
noteBook.edgeStyle               nil
noteBook.borderWidth            5

menu.hilightBackgroundColor      Color white
menu.hilightForegroundColor      Color black
menu.hilightLevel                1
; menuShowAccelerators            false
menu.checkColor                  Color red
menu.mainMenu.tabable            true
menu.extraMargin                    2
menu.suppressSeparatingLinesInToolbar        true

pullDownMenu.font                =menu.font
pullDownMenu.menuLevel           2
pullDownMenu.level               1
;; pullDownMenu.level               0
pullDownMenu.hilightLevel        2
pullDownMenu.edgeStyle           #soft

variablePanel.handleColor        =darkGray
#if Screen current hasGreyscales
variablePanel.handleEnteredColor =veryLightGray
#endif
variablePanel.barHeight          10

activeHelp.backgroundColor         Color yellow lightened
activeHelp.borderWidth             2

#if Screen current hasGrayscales not
html.anchorUnderline                true
html.anchorForegroundColor          Color black
html.backgroundColor                Color white
html.activeAnchorForegroundColor    Color black
html.activeAnchorBackgroundColor    =html.backgroundColor
html.visitedAnchorForegroundColor   Color black
html.exampleAnchorForegroundColor   Color black
#endif

#if Screen current width > 800

viewSpacing                      3 "/ pixels
arrowButton.downFormFile         'ScrollDn.14.xbm'
arrowButton.upFormFile           'ScrollUp.14.xbm'
arrowButton.leftFormFile         'ScrollLt.14.xbm'
arrowButton.rightFormFile        'ScrollRt.14.xbm'
comboView.downFormFile           'ComboDn.14.xbm'

#endif



#if Screen current width <= 800

viewSpacing                      2 "/ pixels
arrowButton.downFormFile         'ScrollDn.12.xbm'
arrowButton.upFormFile           'ScrollUp.12.xbm'
arrowButton.leftFormFile         'ScrollLt.12.xbm'
arrowButton.rightFormFile        'ScrollRt.12.xbm'
comboView.downFormFile           'ComboDn.12.xbm'

#endif



#if Screen current width <= 640

arrowButton.downFormFile         'ScrollDn.8.xbm'
arrowButton.upFormFile           'ScrollUp.8.xbm'
arrowButton.leftFormFile         'ScrollLt.8.xbm'
arrowButton.rightFormFile        'ScrollRt.8.xbm'
comboView.downFormFile           'ComboDn.8.xbm'

#endif

comboView.button.activeLevel    -1