styles/motif.common
author Claus Gittinger <cg@exept.de>
Wed, 20 Aug 1997 19:26:30 +0200
changeset 1879 b8e2fd41d466
parent 1624 46064adf74a0
child 1924 5d09bd2ff0c7
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
;
309
8cc4d0e7b41b germanism
Claus Gittinger <cg@exept.de>
parents: 199
diff changeset
     2
; common motif stuff (not a style, but included by all motif style variations)
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
;
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
;
1879
b8e2fd41d466 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1624
diff changeset
     5
; $Header: /cvs/stx/stx/libview/styles/motif.common,v 1.15 1997-08-20 17:26:30 cg Exp $
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
;
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
; this is to be included from the real style,
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
; with (at least) viewGrey, shadowColor, lightColor and mediumColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
; being predefined
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
;
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
is3D                            true
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
name                            #motif
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
fatFont                         Font family:'helvetica' face:'bold' style:'roman' size:12
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
selectionFont                   =fatFont
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
labelFont                       =fatFont
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
menuFont                        =fatFont
468
8c5bd9fa6038 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 451
diff changeset
    21
textFont                        Font family:'courier' size:12 
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
viewBackground                  =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
borderWidth                     0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
popupBorderWidth                1     
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
popupHideOnRelease              false    
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
focusColor                      Color black
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
; focusColor                      Color yellow
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
scrollBarPosition               #right 
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
scrollBarButtonPositions        #around     
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
scrollBarLevel                  -2
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
scrollBarElementSpacing         0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
scrollBarDisableButtons         true
1447
968c4326f1b9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1360
diff changeset
    37
; scrollBarHiding                 true
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
#if Display hasGreyscales
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
scrollerThumbColor               =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
scrollerViewBackground           =mediumColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
#else
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
; grey 50 is too heavy - isn't it ?
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
; scrollerViewBackground          Color grey:50
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
scrollerViewBackground           Color white
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
scrollerThumbColor               Color white
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
#endif
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
scrollerThumbLevel               2
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
scrollerThumbInset               0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
scrolledViewLevel               -2
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
451
df6eb30df68c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    52
scrollerGhostFrameColor         Color black
1879
b8e2fd41d466 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1624
diff changeset
    53
scrollerMiddleButtonJump        true
451
df6eb30df68c *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 309
diff changeset
    54
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
sliderLevel                      -1
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
1450
7466c2d60558 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1447
diff changeset
    57
variablePanelTrackingStyle       #solidLine
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
framedBoxLabelPosition           #topLeft
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
labelForegroundColor             Color black
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
buttonActiveLevel                -2 
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
buttonPassiveLevel               2
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
buttonReturnButtonHasBorder      true
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
buttonActiveBackgroundColor      =mediumColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
buttonActiveForegroundColor      Color black
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
buttonDisabledForegroundColor    =shadowColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
#if Display hasGreyscales not
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
buttonActiveBackgroundColor      Color grey:80
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
#endif
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
arrowButtonStyle                 #motif
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
arrowButtonActiveLevel           0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
arrowButtonPassiveLevel          0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
arrowButtonForegroundColor         =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
arrowButtonBackgroundColor         =mediumColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
arrowButtonActiveForegroundColor   =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
arrowButtonActiveBackgroundColor   =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
arrowButtonDisabledForegroundColor =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
editFieldBackgroundColor           =mediumColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
menuHilightLevel                 2
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
menuSeparatingLineInset          0
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
menuViewBackgroundColor         =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
menuDisabledForegroundColor     =shadowColor
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
534
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
    92
pullDownMenuKeepMenu                 true
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
    93
pullDownMenuLevel                    1
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
    94
pullDownMenuHilightLevel             2
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
#if Display hasGreyscales not
534
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
    96
pullDownMenuHilightForegroundColor   Color white
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
    97
pullDownMenuHilightBackgroundColor   Color black
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
#endif
669
8c36132eb492 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 534
diff changeset
    99
pullDownMenuAutoselectFirst         true
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
1107
41d3f6dee022 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1106
diff changeset
   101
#selectionMultiSelectionModifier      #Control
534
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   102
selectionRightArrowLevel             -1
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   103
selectionRightArrowLevel             2
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   104
selectionLineSpacing                 4
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   105
selectionForegroundColor             Color black
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   106
selectionHilightBackgroundColor      Color black
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   107
selectionHilightStyle                #motif
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   108
selectionDisabledForegroundColor     =shadowColor
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
1360
574d47019176 better noFocus cursors
Claus Gittinger <cg@exept.de>
parents: 1107
diff changeset
   110
#textCursorType                       #caret
574d47019176 better noFocus cursors
Claus Gittinger <cg@exept.de>
parents: 1107
diff changeset
   111
textCursorType                       #ibeam
574d47019176 better noFocus cursors
Claus Gittinger <cg@exept.de>
parents: 1107
diff changeset
   112
textCursorNoFocusForegroundColor     Color grey
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
534
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   114
activeHelpBackgroundColor            Color yellow lightened
ae5caa947d14 better motif-style selectionInListView highlighting
Claus Gittinger <cg@exept.de>
parents: 468
diff changeset
   115
activeHelpBorderWidth                2
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   117
rulerForegroundColor            Color black
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   118
rulerBackgroundColor            =viewGrey
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   119
1620
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   120
#if Display hasGrayscales not
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   121
htmlAnchorUnderline                true
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   122
htmlAnchorForegroundColor          Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   123
htmlBackgroundColor                Color white
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   124
htmlActiveAnchorForegroundColor    Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   125
htmlActiveAnchorBackgroundColor    =htmlBackgroundColor
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   126
htmlVisitedAnchorForegroundColor   Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   127
htmlExampleAnchorForegroundColor   Color black
49812898bfe2 html defs for monochrome displays
Claus Gittinger <cg@exept.de>
parents: 1504
diff changeset
   128
#endif
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
1504
e9f6b4eadecf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1450
diff changeset
   130
infoBoxSeparator                  true
e9f6b4eadecf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1450
diff changeset
   131
infoBoxIconFile                   'bitmaps/Information_motif.xbm'
e9f6b4eadecf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1450
diff changeset
   132
warningBoxIconFile                'bitmaps/Warning_motif.xbm'
e9f6b4eadecf *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 1450
diff changeset
   133
requestBoxIconFile                'bitmaps/Request_motif.xbm'
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   135
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   136
#if Display hasGrayscales
199
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   137
arrowButtonUpForm                 Image extent:11@12 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   138
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
					bits:#[4r0000 4r0100 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   140
					       4r0000 4r1120 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   141
					       4r0000 4r1120 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   142
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   143
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   144
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   145
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   146
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   147
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
					       4r1122 4r2222 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
					       4r1222 4r2222 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
					       4r0000 4r0000 4r0000] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
					pad:8
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   152
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
arrowButtonDownForm               Image extent:11@12 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
					bits:#[ \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   156
					       4r0000 4r0000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
					       4r1111 4r1111 4r1110 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   158
					       4r1111 4r1111 4r1220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   159
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   160
					       4r0113 4r3333 4r2200 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   161
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   162
					       4r0011 4r3332 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   163
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   164
					       4r0001 4r1322 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   165
					       4r0000 4r1220 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   166
					       4r0000 4r1220 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   167
					       4r0000 4r0200 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   168
					      ] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   169
					pad:8
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   170
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   171
arrowButtonLeftForm               Image extent:12@11 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   172
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   173
					bits:#[ \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   174
					       4r0000 4r0000 4r0110 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   175
					       4r0000 4r0001 4r1120 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   176
					       4r0000 4r0111 4r1220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   177
					       4r0001 4r1113 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   178
					       4r0111 4r1333 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   179
					       4r1113 4r3333 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   180
					       4r0222 4r2333 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   181
					       4r0002 4r2223 4r3220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   182
					       4r0000 4r0222 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   183
					       4r0000 4r0002 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   184
					       4r0000 4r0000 4r0220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   185
					      ] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   186
					pad:8
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   187
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   188
arrowButtonRightForm              Image extent:12@11 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   189
					depth:2      \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   190
					bits:#[ \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   191
					       4r0110 4r0000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   192
					       4r0111 4r1000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   193
					       4r0111 4r1110 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   194
					       4r0113 4r3111 4r1000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   195
					       4r0113 4r3331 4r1110 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   196
					       4r0113 4r3333 4r3222 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   197
					       4r0113 4r3332 4r2220 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   198
					       4r0113 4r3222 4r2000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   199
					       4r0112 4r2220 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   200
					       4r0122 4r2000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   201
					       4r0120 4r0000 4r0000 \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   202
					      ] \
b8f89a06090b Initial revision
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   203
					pad:8
1624
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   204
#else
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   205
arrowButtonUpForm                 Image extent:11@12 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   206
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   207
					bits:#[2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   208
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   209
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   210
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   211
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   212
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   213
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   214
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   215
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   216
					       2r01111111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   217
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   218
					       2r00000000 2r00000000] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   219
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   220
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   221
arrowButtonDownForm               Image extent:11@12 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   222
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   223
					bits:#[2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   224
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   225
					       2r01111111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   226
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   227
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   228
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   229
					       2r00011111 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   230
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   231
					       2r00001110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   232
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   233
					       2r00000100 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   234
					       2r00000000 2r00000000] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   235
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   236
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   237
arrowButtonLeftForm               Image extent:12@11 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   238
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   239
					bits:#[ \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   240
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   241
					       2r00000000 2r01000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   242
					       2r00000001 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   243
					       2r00000111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   244
					       2r00011111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   245
					       2r01111111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   246
					       2r00011111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   247
					       2r00000111 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   248
					       2r00000001 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   249
					       2r00000000 2r11000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   250
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   251
					      ] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   252
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   253
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   254
arrowButtonRightForm              Image extent:12@11 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   255
					depth:1      \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   256
					bits:#[ \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   257
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   258
					       2r00100000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   259
					       2r00111000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   260
					       2r00111110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   261
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   262
					       2r00111111 2r11100000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   263
					       2r00111111 2r10000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   264
					       2r00111110 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   265
					       2r00111000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   266
					       2r00100000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   267
					       2r00000000 2r00000000 \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   268
					      ] \
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   269
					pad:8
46064adf74a0 b&w display fixes
Claus Gittinger <cg@exept.de>
parents: 1620
diff changeset
   270
#endif