d_sample_display.rc
author Claus Gittinger <cg@exept.de>
Wed, 01 Dec 1999 23:17:25 +0100
changeset 399 5a842f5d7196
parent 209 22793de5d56e
child 609 f0f51d4a0066
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
     1
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
     2
 * $Header$
84
06f58dd9b0ae *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 24
diff changeset
     3
 *
399
5a842f5d7196 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
     4
 * MIMEType: application/x-smalltalk-source
5a842f5d7196 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 209
diff changeset
     5
 *
209
22793de5d56e *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 123
diff changeset
     6
 * ST/X startup configuration file:
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
     7
 * display related configuration - generic
0cb137a77319 Initial revision
claus
parents:
diff changeset
     8
 *
0cb137a77319 Initial revision
claus
parents:
diff changeset
     9
 * this is a dummy script -
0cb137a77319 Initial revision
claus
parents:
diff changeset
    10
 * use this file as a guide for display-specific configurations
0cb137a77319 Initial revision
claus
parents:
diff changeset
    11
 * (see how display.rc figures out on what type of display we run)
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    12
 *
23
claus
parents: 8
diff changeset
    13
 * i.e. copy this file to d_<your_display_name>.rc and edit as needed
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    14
 * see d_sun.rc, d_iris.rc etc. as examples
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
    15
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
    16
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    17
"*
123
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    18
 * some X-windowManagers crash if you set
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    19
 * the icon to a deep (i.e. depth~~1) bitmap.
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    20
 * the default is false.
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    21
 *"
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    22
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    23
"/ Display supportsDeepIcons:true
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    24
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    25
a974136fe017 startup infoPrinting suppressable (-q flag)
Claus Gittinger <cg@exept.de>
parents: 84
diff changeset
    26
"*
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    27
 * view style - uncomment the one you like most (I prefer #iris :-)
7
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    28
 * (there are actually more possibilities - see style-files in the
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    29
 *  resources directory)
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    30
 *"
7
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    31
"/ View defaultStyle:#next
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    32
"/ View defaultStyle:#iris
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    33
"/ View defaultStyle:#openwin
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    34
"/ View defaultStyle:#motif
8
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    35
"/ View defaultStyle:#'motif_red' 
7
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    36
"/ View defaultStyle:#normal
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    37
"/ View defaultStyle:#mswindows
57c09d1b7f69 *** empty log message ***
claus
parents: 5
diff changeset
    38
"/ View defaultStyle:#st80
8
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    39
"/ View defaultStyle:#greenPC 
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    40
"/ View defaultStyle:#rocky 
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
    41
0cb137a77319 Initial revision
claus
parents:
diff changeset
    42
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
    43
 * define keys/keyboard abbreviations etc. which are not handled by xmodmap
0cb137a77319 Initial revision
claus
parents:
diff changeset
    44
 *"
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    45
|map|
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    46
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    47
map := Display keyboardMap.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    48
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    49
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    50
map bindValue:#Again to:#F1.   
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    51
map bindValue:#Copy  to:#F2.   
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    52
map bindValue:#Cut   to:#F3.   
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    53
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    54
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    55
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    56
 * on some german keyboards, we get already translated characters
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    57
 * (plus the ALT-key)
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    58
 *"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    59
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    60
map bindValue:$[ to:#'Alt['.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    61
map bindValue:$] to:#'Alt]'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    62
map bindValue:${ to:#'Alt{'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    63
map bindValue:$} to:#'Alt}'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    64
map bindValue:$\ to:#'Alt\'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    65
map bindValue:$| to:#'Alt|'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    66
map bindValue:$@ to:#'Alt@'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    67
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    68
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    69
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    70
 * on others, they come untranslated
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    71
 * (plus the ALT-key)
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    72
 *"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    73
"
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    74
map bindValue:$[ to:#'Alt8'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    75
map bindValue:$] to:#'Alt9'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    76
map bindValue:${ to:#'Alt7'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    77
map bindValue:$} to:#'Alt0'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    78
map bindValue:$\ to:#'Alt?'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    79
map bindValue:$| to:#'Alt<'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    80
map bindValue:$@ to:#'Altq'.
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
    81
"
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
    82
!
0cb137a77319 Initial revision
claus
parents:
diff changeset
    83
0cb137a77319 Initial revision
claus
parents:
diff changeset
    84
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
    85
 * define the size of the screen
0cb137a77319 Initial revision
claus
parents:
diff changeset
    86
 * most X-Servers do not (cannot) tell the truth ...
0cb137a77319 Initial revision
claus
parents:
diff changeset
    87
 * (how should it know what size of monitor you have ?)
0cb137a77319 Initial revision
claus
parents:
diff changeset
    88
 * if yours does, make the next one a comment
0cb137a77319 Initial revision
claus
parents:
diff changeset
    89
 *
0cb137a77319 Initial revision
claus
parents:
diff changeset
    90
 * (check out by measuring your display, and compare
0cb137a77319 Initial revision
claus
parents:
diff changeset
    91
 *  the values returned by 'Display widthInMillimeter'
0cb137a77319 Initial revision
claus
parents:
diff changeset
    92
 *  and 'Display heightInMillimeter')
0cb137a77319 Initial revision
claus
parents:
diff changeset
    93
 *
0cb137a77319 Initial revision
claus
parents:
diff changeset
    94
 * do not trust the numbers I have written below - size given
0cb137a77319 Initial revision
claus
parents:
diff changeset
    95
 * should be the visible picture size, which depends on display
0cb137a77319 Initial revision
claus
parents:
diff changeset
    96
 * adjusts (many monitors have hSize & vSize adjusts)
8
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    97
 *
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    98
 * you only need this definition to be exact, if you want
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
    99
 * correct sizes/ratios in the DrawTool
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   100
 * If you leave the statements below commented, ST/X will ask
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   101
 * the X-server and take these values.
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
   102
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   103
0cb137a77319 Initial revision
claus
parents:
diff changeset
   104
"*
8
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   105
 * this is for a  VGA gas plasma display
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   106
 * (may also be ok for most LCD displays)
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   107
 *"
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   108
"
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   109
Display heightInMillimeter:160.
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   110
Display widthInMillimeter:212
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   111
"
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   112
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   113
"*
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
   114
 * this is for a 14' monitor ...
0cb137a77319 Initial revision
claus
parents:
diff changeset
   115
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   116
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   117
Display heightInMillimeter:175.
0cb137a77319 Initial revision
claus
parents:
diff changeset
   118
Display widthInMillimeter:235
0cb137a77319 Initial revision
claus
parents:
diff changeset
   119
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   120
0cb137a77319 Initial revision
claus
parents:
diff changeset
   121
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
   122
 * this is for a 16' monitor (measured on a jvc quadsync)
0cb137a77319 Initial revision
claus
parents:
diff changeset
   123
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   124
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   125
Display heightInMillimeter:208.
0cb137a77319 Initial revision
claus
parents:
diff changeset
   126
Display widthInMillimeter:275
0cb137a77319 Initial revision
claus
parents:
diff changeset
   127
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   128
0cb137a77319 Initial revision
claus
parents:
diff changeset
   129
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
   130
 * this is for a 20' (megascan) ...
0cb137a77319 Initial revision
claus
parents:
diff changeset
   131
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   132
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   133
Display heightInMillimeter:279.
0cb137a77319 Initial revision
claus
parents:
diff changeset
   134
Display widthInMillimeter:346
0cb137a77319 Initial revision
claus
parents:
diff changeset
   135
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   136
0cb137a77319 Initial revision
claus
parents:
diff changeset
   137
"*
0cb137a77319 Initial revision
claus
parents:
diff changeset
   138
 * this is for a 21' (eizo flexscan) ...
0cb137a77319 Initial revision
claus
parents:
diff changeset
   139
 *"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   140
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   141
Display heightInMillimeter:275.
0cb137a77319 Initial revision
claus
parents:
diff changeset
   142
Display widthInMillimeter:370
0cb137a77319 Initial revision
claus
parents:
diff changeset
   143
"
0cb137a77319 Initial revision
claus
parents:
diff changeset
   144
!
0cb137a77319 Initial revision
claus
parents:
diff changeset
   145
0cb137a77319 Initial revision
claus
parents:
diff changeset
   146
"*
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
   147
 * uncomment if you have a b&w monitor connected to a
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
   148
 * color server (which the server wouldn't know)
5
420e4af41733 *** empty log message ***
claus
parents: 0
diff changeset
   149
 * try 'Display visualType' to see what X thinks.
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
   150
 *"
8
d82829c0d867 *** empty log message ***
claus
parents: 7
diff changeset
   151
"/ Display hasColors:false
24
claus
parents: 23
diff changeset
   152
claus
parents: 23
diff changeset
   153
"*
claus
parents: 23
diff changeset
   154
 * uncomment to force black&white operation
claus
parents: 23
diff changeset
   155
 * (makes sense on 4-plane servers)
claus
parents: 23
diff changeset
   156
 *"
claus
parents: 23
diff changeset
   157
"/ Display hasGreyscales:false
0
0cb137a77319 Initial revision
claus
parents:
diff changeset
   158
!