styles/motif_dec2.style
author matilk
Wed, 13 Sep 2017 09:40:34 +0200
changeset 8174 2704c965b97b
parent 2991 918e2f570098
permissions -rw-r--r--
#BUGFIX by Maren class: DeviceGraphicsContext changed: #displayDeviceOpaqueForm:x:y: nil check
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     1
; View defaultStyle:#'motif_dec2' 
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)
246
77e353b0ba79 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 180
diff changeset
     4
; like motif, but using different (brown, pessimistic, newEngland-weather) colors
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: 1948
diff changeset
     7
; $Header: /cvs/stx/stx/libview/styles/motif_dec2.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: 1948
diff changeset
     9
#if Screen current hasGreyscales
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 1948
diff changeset
    10
# if Screen current hasColors
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    11
viewGrey                    Color red:79 green:67 blue:57 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    12
scrollerVB                  Color red:72 green:60 blue:52
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
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 246
diff changeset
    21
comment  'another DEC motif look alike\\brownish colors & larger fonts.'
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 246
diff changeset
    22
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 246
diff changeset
    23
#if (Language == #german) or:[Language == #de]
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 246
diff changeset
    24
comment  'Angelehnt an `motif'' auf DEC Systemen\Brauner Hintergrund und großer Zeichensatz.'
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 246
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: 246
diff changeset
    29
144
claus
parents: 122
diff changeset
    30
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    31
menuFont             Font family:'helvetica' face:'medium' style:'roman' size:14
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    32
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 1948
diff changeset
    33
#if Screen current hasColors
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    34
lightColor                Color red:90 green:75 blue:63
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    35
shadowColor               Color red:36 green:30 blue:26
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    36
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    37
lightColor                Color grey:85
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    38
shadowColor               Color grey:30
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    39
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    40
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    41
textCursor.type            #block
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    42
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    43
scroller.viewBackground    =scrollerVB 
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    44
scroller.thumbColor        =viewGrey
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    45
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    46
selection.foregroundColor  Color black
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    47
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    48
label.foregroundColor      Color black
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    49
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    50
button.activeBackgroundColor      =scrollerVB
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    51
button.activeForegroundColor      Color black
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    52
arrowButton.activeForegroundColor =viewGrey  
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    53
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    54
menu.viewBackgroundColor         =scrollerVB
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    55
menu.disabledForegroundColor     Color darkGrey
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    56
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    57
ruler.backgroundColor            =scrollerVB
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    58
2991
918e2f570098 removed all direct references to Display (must use Screen current)
Stefan Vogel <sv@exept.de>
parents: 1948
diff changeset
    59
#if (Screen current hasColors and:[Screen current depth > 4])
1948
6a9b754ca6d3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    60
transcript.backgroundColor       =viewGrey
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    61
#endif