first check-in of feisty meow codebase. many things broken still due to recent
[feisty_meow.git] / scripts / x_win / xtfont.sh
1 #!/bin/bash
2 XTFONT=$(xmenu -geometry +800+50 -heading "Font" \
3 "LucidaTypeWriter 12" "LucidaTypeWriter 12 Bold" \
4 "LucidaTypeWriter 14" "LucidaTypeWriter 14 Bold" \
5 "LucidaTypeWriter 18" "LucidaTypeWriter 18 Bold" \
6 "Courier 12" "Courier 12 Bold" \
7 "Courier 14" "Courier 14 Bold" \
8 "Courier 18" "Courier 18 Bold" \
9 "Gallant 19" "PC Font 14" \
10 "Screen 12" "Screen 12 Bold" \
11 "Screen 14" "Screen 14 Bold" \
12 "Screen 16" "Screen 16 Bold" \
13 "Fixed 10" \
14 "Fixed 12"  "Fixed 12 Bold" \
15 "Fixed 14" "Fixed 14 Bold" \
16 "Fixed 17" \
17 "Clean 12" "Clean 12 Bold" \
18 "Clean 14" "Clean 14 Bold" \
19 "Clean 16" "Clean 16 Bold" \
20 "Cancel") 
21
22 case $XTFONT in
23    'Clean 12')
24    xtattr -font '-*-clean-medium-r-*-*-*-120-*-*-*-*-*-*'
25    ;;
26
27    'Clean 12 Bold')
28    xtattr -font '-*-clean-bold-r-*-*-*-120-*-*-*-*-*-*'
29    ;;
30
31    'Clean 14')
32    xtattr -font '-*-clean-medium-r-*-*-*-140-*-*-*-*-*-*'
33    ;;
34
35    'Clean 14 Bold')
36    xtattr -font '-*-clean-bold-r-*-*-*-140-*-*-*-*-*-*'
37    ;;
38
39    'Clean 16')
40    xtattr -font '-*-clean-medium-r-*-*-*-160-*-*-*-*-*-*'
41    ;;
42
43    'Clean 16 Bold')
44    xtattr -font '-*-clean-bold-r-*-*-*-160-*-*-*-*-*-*'
45    ;;
46
47    'Fixed 10')
48    xtattr -font '-*-fixed-medium-*-*-*-*-100-*-*-*-*-*-*'
49    ;;
50
51    'Fixed 12')
52    xtattr -font '-*-fixed-medium-*-*-*-*-120-*-*-*-*-*-*'
53    ;;
54
55    'Fixed 12 Bold')
56    xtattr -font '-*-fixed-bold-*-*-*-*-120-*-*-*-*-*-*'
57    ;;
58
59    'Fixed 14')
60    xtattr -font '-*-fixed-medium-*-*-*-*-140-*-*-*-*-*-*'
61    ;;
62
63    'Fixed 14 Bold')
64    xtattr -font '-*-fixed-bold-*-*-*-*-140-*-*-*-*-*-*'
65    ;;
66
67    'Fixed 17')
68    xtattr -font '-*-fixed-medium-*-*-*-*-170-*-*-*-*-*-*'
69    ;;
70
71    'Screen 12')
72    xtattr -font '-*-screen-medium-*-*-*-*-120-*-*-m-*-*-*' 
73    ;;
74
75    'Screen 12 Bold')
76    xtattr -font '-*-screen-bold-*-*-*-*-120-*-*-m-*-*-*' 
77    ;;
78
79    'Screen 14')
80    xtattr -font '-*-screen-medium-*-*-*-*-140-*-*-m-*-*-*' 
81    ;;
82
83    'Screen 14 Bold')
84    xtattr -font '-*-screen-bold-*-*-*-*-140-*-*-m-*-*-*' 
85    ;;
86
87    'Screen 16')
88    xtattr -font '-*-screen-medium-*-*-*-*-160-*-*-m-*-*-*' 
89    ;;
90
91    'Screen 16 Bold')
92    xtattr -font '-*-screen-bold-*-*-*-*-160-*-*-m-*-*-*' 
93    ;;
94
95    'LucidaTypeWriter 12')
96    xtattr -font '-*-lucidatypewriter-medium-*-*-*-*-120-*-*-*-*-*-*'
97    ;;
98
99    'LucidaTypeWriter 14')
100    xtattr -font '-*-lucidatypewriter-medium-*-*-*-*-140-*-*-*-*-*-*'
101    ;;
102
103    'LucidaTypeWriter 18')
104    xtattr -font '-*-lucidatypewriter-medium-*-*-*-*-180-*-*-*-*-*-*'
105    ;;
106
107    'LucidaTypeWriter 12 Bold')
108    xtattr -font '-*-lucidatypewriter-bold-*-*-*-*-120-*-*-*-*-*-*'
109    ;;
110
111    'LucidaTypeWriter 14 Bold')
112    xtattr -font '-*-lucidatypewriter-bold-*-*-*-*-140-*-*-*-*-*-*'
113    ;;
114
115    'LucidaTypeWriter 18 Bold')
116    xtattr -font '-*-lucidatypewriter-bold-*-*-*-*-180-*-*-*-*-*-*'
117    ;;
118
119    'Courier 12')
120    xtattr -font '-*-courier-medium-r-*-*-*-120-*-*-*-*-*-*'
121    ;;
122    
123    'Courier 14')
124    xtattr -font '-*-courier-medium-r-*-*-*-140-*-*-*-*-*-*'
125    ;;
126    
127    'Courier 18')
128    xtattr -font '-*-courier-medium-r-*-*-*-180-*-*-*-*-*-*'
129    ;;
130
131    'Courier 12 Bold')
132    xtattr -font '-*-courier-bold-r-*-*-*-120-*-*-*-*-*-*'
133    ;;
134    
135    'Courier 14 Bold')
136    xtattr -font '-*-courier-bold-r-*-*-*-140-*-*-*-*-*-*'
137    ;;
138    
139    'Courier 18 Bold')
140    xtattr -font '-*-courier-bold-r-*-*-*-180-*-*-*-*-*-*'
141    ;;
142
143    'Gallant 19')
144    xtattr -font '-*-gallant-*-*-*-*-*-190-*-*-m-*-*-*'
145    ;;
146    
147    'PC Font 14')
148    xtattr -font '-*-pcfont-*-*-*-*-*-140-*-*-m-*-*-*'
149    ;;
150
151    'Cancel')
152    ;;
153    
154 esac