styles/motif_dec.style
author Claus Gittinger <cg@exept.de>
Sat, 21 Jan 2017 04:04:02 +0100
changeset 7779 5931d9c57148
parent 2991 918e2f570098
permissions -rw-r--r--
#DOCUMENTATION by cg class: SimpleView changed: #controller:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     1
; View defaultStyle:#'motif_dec' 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     2
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     3
; dec's motif style (as seen on an ultrix4.4 system)
2562
9628fa11ba4a dec motif style3 added
Claus Gittinger <cg@exept.de>
parents: 1948
diff changeset
     4
; like motif, but using different colors (baby blue)
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     5
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     6
;
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2562
diff changeset
     7
; $Header: /cvs/stx/stx/libview/styles/motif_dec.style,v 1.9 1999-10-27 13:28:03 stefan Exp $
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     8
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2562
diff changeset
     9
#if Screen current hasGreyscales
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2562
diff changeset
    10
# if Screen current hasColors
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    11
viewGrey                    Color red:45 green:62.5 blue:100 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    12
scrollerVB                  Color red:38 green:53 blue:86
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    13
# else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    14
viewGrey                    Color grey:67 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    15
scrollerVB                  Color grey:50
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    16
# endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    17
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    18
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    19
#include 'motif.common'
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    20
180
claus
parents: 152
diff changeset
    21
comment  'DEC motif look alike\\baby blue & larger fonts'
144
claus
parents: 122
diff changeset
    22
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 180
diff changeset
    23
#if (Language == #german) or:[Language == #de]
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 180
diff changeset
    24
comment  'Angelehnt an `motif'' auf DEC Systemen\``Babyblau'''' und großer Zeichensatz.'
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 180
diff changeset
    25
#endif
498
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    26
#if (Language == #french) or:[Language == #fr]
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    27
comment  'Comme 'motif'' avec les systèmes de DEC'
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    28
#endif
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 180
diff changeset
    29
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    30
menuFont             Font family:'helvetica' face:'medium' style:'roman' size:14
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    31
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 2562
diff changeset
    32
#if Screen current hasColors
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    33
lightColor                Color red:77 green:84.5 blue:100
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    34
shadowColor               Color red:24 green:34.0 blue:54
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    35
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    36
lightColor                Color grey:85
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    37
shadowColor               Color grey:30
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    38
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    39
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    40
textCursor.type            #block
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    41
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    42
scroller.viewBackground    =scrollerVB 
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    43
scroller.thumbColor        =viewGrey
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    44
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    45
selection.foregroundColor  Color black
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    46
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    47
label.foregroundColor      Color black
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    48
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    49
button.activeBackgroundColor      =scrollerVB
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    50
button.activeForegroundColor      Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    51
arrowButton.activeForegroundColor =viewGrey  
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    52
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    53
menu.viewBackgroundColor         =scrollerVB
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    54
menu.disabledForegroundColor     Color darkGrey
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    55
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    56
ruler.backgroundColor            =scrollerVB