2 # DecorHook DecorWin95 "&W. Decor Windows"
3 # -- Start of Win 95 decor -- (If you like this sort of thing)
4 # For decor changing to work, add to DecorBase
5 DestroyDecor recreate DecorBase
7 + TitleStyle LeftJustified ActiveUp (Solid Navy -- flat) \
8 ActiveDown (Solid Navy -- flat) \
9 Inactive (Solid grey51 -- flat)
10 + ButtonStyle All ActiveUp (Solid Navy -- flat) \
11 ActiveDown (Solid Navy -- flat) \
12 Inactive (Solid grey51 -- flat)
13 + AddButtonStyle 1 MiniIcon
14 + AddButtonStyle 2 Pixmap win95-close-full.xpm
15 + AddButtonStyle 4 Pixmap win95-maximize-full.xpm
16 + AddButtonStyle 6 Pixmap win95-minimize-full.xpm
17 + BorderStyle Active -- HiddenHandles NoInset
18 + BorderStyle Inactive -- HiddenHandles NoInset
20 Style "*" Button 1, Button 2, Button 4, Button 6
21 Mouse 0 1 N Menu Window-Ops Close
25 Style "*" UseDecor DecorBase, Color Black/grey75
26 Style "*" HilightFore white, HilightBack grey60
27 Style "*" Font -adobe-helvetica-bold-r-*-120-*
28 MenuStyle "*" WIN, PopupDelayed, PopupDelay 150
29 MenuStyle "*" Foreground Black, Background grey75, Greyed grey40
30 MenuStyle "*" Font -adobe-helvetica-medium-r-*-120-*
31 MenuStyle "*" Animation, Hilight3DThin
32 MenuStyle "*" ActiveFore white, HilightBack navy
33 MenuStyle "*" PopupOffset 1 100
34 SetAnimation 1 .1 .2 .3 .4 .5 .6 .7 .8 .9 1.0
36 # Undo things specific to this decor:
37 DestroyFunc DecorRemoveHook
38 AddToFunc DecorRemoveHook
39 + I Style "*" !Button 1
40 + I Style "*" !Button 2
41 + I Style "*" !Button 4
42 + I Style "*" !Button 6