; View defaultStyle:#st80
;
; simulation of the old st80 style - looks somewhat like os2
;
; $Header: /cvs/stx/stx/libview/styles/st80.style,v 1.8 1996-05-14 10:02:28 cg Exp $
comment 'old `ST80'' 3D look alike'
#if (Language == #german) or:[Language == #de]
comment 'An früheres `ST-80'' angelehnt'
#endif
#if (Language == #french) or:[Language == #fr]
comment 'Comme `ST-80'''
#endif
name #st80
;
; take a smaller font on VGA displays
;
#if Display width == 640
; take smaller fonts on VGA screens
font Font family:'courier' face:'medium' style:'roman' size:10
selectionFont Font family:'helvetica' face:'medium' style:'roman' size:10
#else
selectionFont Font family:'helvetica' face:'medium' style:'roman' size:12
#endif
#if Display hasGreyscales
is3D true
borderWidth 0
viewGrey Color grey:80
selectionHilightForegroundColor Color black
selectionHilightBackgroundColor Color grey:50
#else
viewGrey Color white
lightColor Color grey:50
borderWidth 1
#endif
viewBackground =viewGrey
scrollBarPosition #right
scrollBarButtonPositions #around
scrollBarLevel 0
scrollBarElementSpacing 0
scrollerLevel 1
scrollerViewBackground =viewGrey
scrollerThumbColor Color black
scrollerThumbFrameColor nil
scrollerThumbLevel 0
scrollerThumbInset 3
textCursorType #solidCaret
textCursorBackgroundColor Color black
#if Display hasColors
textSelectionBackgroundColor Color green
textSelectionForegroundColor Color black
#else
# if Display hasGreyscales
textSelectionBackgroundColor =viewGrey "Color grey"
textSelectionForegroundColor Color black
# endif
#endif
popupBorderWidth 1
arrowButtonStyle #st80
arrowButtonActiveForegroundColor Color white
; buttonActiveForegroundColor Color white
buttonActiveBackgroundColor Color grey
menuViewBackground Color white
menuForegroundColor Color black
menuBackgroundColor Color white
menuHilightForegroundColor =menuBackgroundColor
menuHilightBackgroundColor =menuForegroundColor
menuHighlightLevel 0
menuSeparatingLineLevel 0
menuSeparatingLineInset 0
pullDownMenuViewBackground =viewGrey
pullDownMenuLevel 1
pullDownMenuHilightLevel -1
pullDownMenuHilightBackgroundColor Color grey