|
1893
|
1 |
; View defaultStyle:#motif2
|
|
|
2 |
;
|
|
|
3 |
; just a demo:
|
|
|
4 |
; like motif, but with a brighter grey
|
|
|
5 |
;
|
|
|
6 |
; $Header: /cvs/stx/stx/libview/styles/motifLight.style,v 1.1 1997-09-06 17:29:59 cg Exp $
|
|
|
7 |
|
|
|
8 |
#if Display hasGreyscales
|
|
|
9 |
viewGrey (Color grey:80) exactOrNearestOn:(Screen current)
|
|
|
10 |
lightColor (Color grey:100) exactOrNearestOn:(Screen current)
|
|
|
11 |
shadowColor (Color grey:50) exactOrNearestOn:(Screen current)
|
|
|
12 |
mediumColor (Color grey:67) exactOrNearestOn:(Screen current)
|
|
|
13 |
#else
|
|
|
14 |
viewGrey Color white
|
|
|
15 |
lightColor Color grey:25
|
|
|
16 |
shadowColor Color black
|
|
|
17 |
mediumColor Color grey:50.
|
|
|
18 |
#endif
|
|
|
19 |
|
|
|
20 |
#include 'motif.common'
|
|
|
21 |
|
|
|
22 |
comment 'Like `motif'' style.\\With brighter viewBackground.'
|
|
|
23 |
|
|
|
24 |
#if (Language == #german) or:[Language == #de]
|
|
|
25 |
comment 'Wie `motif'', mit hellerem Hintergrund'
|
|
|
26 |
#endif
|
|
|
27 |
#if (Language == #french) or:[Language == #fr]
|
|
|
28 |
comment 'Comme `motif'', avec des couleurs differentes'
|
|
|
29 |
#endif
|
|
|
30 |
|