styles/iris.style
author Claus Gittinger <cg@exept.de>
Mon, 21 Apr 1997 11:08:38 +0200
changeset 1620 49812898bfe2
parent 1445 be52c0c0ede4
child 1853 c3d87b4f6051
permissions -rw-r--r--
html defs for monochrome displays
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     1
; View defaultStyle:#iris 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     2
;
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     3
; silicon graphics style
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     4
; (somwehat like motif, but with smooth edges and bells&whistles)
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
     5
;
1620
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
     6
; $Header: /cvs/stx/stx/libview/styles/iris.style,v 1.18 1997-04-21 09:08:33 cg Exp $
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
     7
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
     8
comment  'Silicon graphics'' Iris look alike'
144
claus
parents: 129
diff changeset
     9
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
    10
#if (Language == #german) or:[Language == #de]
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
    11
comment  'An Silicon Graphics Iris angelehnter Stil'
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 189
diff changeset
    12
#endif
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    13
498
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 482
diff changeset
    14
#if (Language == #french) or:[Language == #fr]
1162
01c49bf5c296 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1119
diff changeset
    15
comment  'Un style qui résemble Silicon Graphics Irix'
498
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 482
diff changeset
    16
#endif
ca1d11e446ce some french strings
Claus Gittinger <cg@exept.de>
parents: 482
diff changeset
    17
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    18
is3D                            true
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    19
name                            #iris
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    20
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    21
#if Display hasGreyscales
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    22
viewGrey                        Color grey:67
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    23
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    24
viewGrey                        Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    25
lightColor                      Color grey:50
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    26
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    27
borderWidth                     0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    28
viewBackground                  =viewGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    29
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    30
popupShadow                     true
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    31
popupLevel                      2     
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    32
popupBorderWidth                1     
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    33
468
8c5bd9fa6038 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    34
textFont                        Font family:'courier' size:12 
1445
be52c0c0ede4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1162
diff changeset
    35
textLightColor                  =viewGrey
468
8c5bd9fa6038 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    36
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    37
#if Display hasColors   
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    38
textSelectionForegroundColor    Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    39
textSelectionBackgroundColor    Color green
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    40
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    41
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    42
textCursorForegroundColor       Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    43
#if Display hasColors
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    44
textCursorBackgroundColor       Color red
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    45
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    46
textCursorBackgroundColor       Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    47
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    48
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    49
#if (Display hasColors and:[Display depth > 4])
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    50
transcriptForegroundColor       Color veryLightGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    51
transcriptBackgroundColor       Color red:0 green:0 blue:25
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    52
transcriptCursorForegroundColor =transcriptBackgroundColor
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    53
transcriptCursorBackgroundColor Color green
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    54
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    55
transcriptForegroundColor       Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    56
transcriptBackgroundColor       Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    57
transcriptCursorForegroundColor =transcriptBackgroundColor 
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    58
transcriptCursorBackgroundColor =transcriptForegroundColor
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    59
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    60
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    61
#if Display hasColors   
833
5628715a15c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 521
diff changeset
    62
; editFieldBackgroundColor           Color red:100 green:75 blue:75
5628715a15c3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 521
diff changeset
    63
editFieldBackgroundColor           Color scaledRed:16rB9B9 scaledGreen:16r8E8E scaledBlue:16r8E8E
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    64
editFieldSelectionBackgroundColor  Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    65
editFieldSelectionForegroundColor  Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    66
#endif
157
claus
parents: 144
diff changeset
    67
claus
parents: 144
diff changeset
    68
#if (Font family:'screen' face:'bold' style:'roman' size:16) existsOn:Display
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    69
editFieldFont                   Font family:'screen' face:'bold' style:'roman' size:16
157
claus
parents: 144
diff changeset
    70
#else
claus
parents: 144
diff changeset
    71
editFieldFont                   Font family:'courier' face:'medium' style:'roman' size:12
claus
parents: 144
diff changeset
    72
#endif
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    73
129
752fbb07635a *** empty log message ***
claus
parents: 122
diff changeset
    74
variableFont                    Font family:'helvetica' face:'medium' style:'roman' size:12
752fbb07635a *** empty log message ***
claus
parents: 122
diff changeset
    75
selectionFont                   =variableFont
752fbb07635a *** empty log message ***
claus
parents: 122
diff changeset
    76
labelFont                       =variableFont
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    77
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    78
#if Display hasColors   
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    79
toggleShowLamp                  true
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    80
toggleLampColor                 Color yellow
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    81
checkToggleCheckColor           Color red
1445
be52c0c0ede4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1162
diff changeset
    82
checkToggleBitmapFile           'CheckOnColor.xpm'
be52c0c0ede4 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1162
diff changeset
    83
checkToggleLabelOverMargin      true
172
claus
parents: 157
diff changeset
    84
radioButtonShowLamp             false
claus
parents: 157
diff changeset
    85
radioButtonStyle                #iris
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    86
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    87
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    88
scrollerLevel                   -1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    89
scrollerThumbLevel              3
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    90
scrollerThumbColor              =viewGrey
521
3f8720f42b7f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    91
#if Display hasGreyscales
3f8720f42b7f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    92
scrollerThumbEnteredColor       Color veryLightGrey
3f8720f42b7f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
    93
#endif
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    94
scrollerThumbEdgeStyle          #soft
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    95
scrollerNTallyMarks             3
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    96
scrollerTallyLevel              1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    97
scrollerGhostColor              Color grey:50
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    98
scrollerGhostLevel              -1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
    99
#if Display hasGreyscales not
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   100
scrollerViewBackground          Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   101
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   102
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   103
sliderNTallyMarks               1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   104
sliderTallyLevel                1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   105
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   106
buttonEdgeStyle                 #soft
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   107
buttonActiveLevel               -1
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   108
buttonPassiveLevel              3
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   109
buttonDisabledForegroundColor   Color darkGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   110
#if Display hasGreyscales
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   111
buttonEnteredBackgroundColor    Color veryLightGrey
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   112
buttonActiveBackgroundColor     nil
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   113
buttonActiveForegroundColor     Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   114
#else
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   115
buttonEnteredBackgroundColor    Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   116
buttonActiveForegroundColor     Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   117
buttonActiveBackgroundColor     Color black
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   118
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   119
1118
b492741697b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 833
diff changeset
   120
#if OperatingSystem getOSType = 'irix'
1119
bf8720f0d730 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1118
diff changeset
   121
menuFont                        Font family:'helvetica' face:'bold' style:'oblique' size:10
1118
b492741697b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 833
diff changeset
   122
#else
1119
bf8720f0d730 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1118
diff changeset
   123
menuFont                        Font family:'helvetica' face:'bold' style:'roman' size:12
1118
b492741697b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 833
diff changeset
   124
#endif
b492741697b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 833
diff changeset
   125
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   126
menuHilightBackgroundColor      Color white
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   127
menuHilightLevel                1
482
a618e1b62b40 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   128
; menuShowAccelerators            false
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   129
#if Display hasColors   
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   130
menuCheckColor                  Color red
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   131
#endif
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   132
1118
b492741697b6 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 833
diff changeset
   133
pullDownMenuFont                =menuFont
122
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   134
pullDownMenuKeepMenu            true
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   135
pullDownMenuLevel               0
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   136
pullDownMenuHilightLevel        2
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   137
pullDownMenuEdgeStyle           #soft
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   138
c84d8d1e8d48 Initial revision
claus
parents:
diff changeset
   139
variablePanelHandleColor        Color darkGrey
521
3f8720f42b7f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
   140
#if Display hasGreyscales
3f8720f42b7f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
   141
variablePanelHandleEnteredColor Color veryLightGrey
3f8720f42b7f *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 498
diff changeset
   142
#endif
174
claus
parents: 172
diff changeset
   143
claus
parents: 172
diff changeset
   144
activeHelpBackgroundColor         Color yellow lightened
claus
parents: 172
diff changeset
   145
activeHelpBorderWidth             2
1620
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   146
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   147
#if Display hasGrayscales not
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   148
htmlAnchorUnderline                true
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   149
htmlAnchorForegroundColor          Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   150
htmlBackgroundColor                Color white
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   151
htmlActiveAnchorForegroundColor    Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   152
htmlActiveAnchorBackgroundColor    =htmlBackgroundColor
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   153
htmlVisitedAnchorForegroundColor   Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   154
htmlExampleAnchorForegroundColor   Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1445
diff changeset
   155
#endif