################################################################
#  PJE-0.1 桼ե륵ץ for fvwm2
#                       MATSUMOTO Shoji (shom@i.h.kyoto-u.ac.jp)
#                            Time-stamp: <97/09/05 16:05:13 pje>

## /usr/X11R6/lib/X11/fvwm2/system.fvwmrc 򥫥ޥΤǤ

# 16 bpp ǰưκݤȤʤʤԹб
XORvalue 255

# fvwm Υ⥸塼롢Υѥ: Ƕڤäʣ񤯤ȤǤ
ModulePath /usr/lib/X11/fvwm2
PixmapPath /usr/include/X11/pixmaps
IconPath   /usr/include/X11/bitmaps

# ̤ü 10 dot  250ms ʾ夤ȥ
# ػߤФϡ0 0 Ȥ
EdgeResistance 250 10

# ̤üˤȡʤ 50% / Ĥʤ 50% 
# ػߤФϡ0 0 Ȥ
EdgeScroll 50 50

# 󥰥륯åȤǧĹå (ms)
ClickTime 200

# ɥ˻Ѥե
WindowFont -adobe-times-bold-r-*-*-14-*-*-*-*-*-*-*,k14,r14

# ˻Ѥե
IconFont -adobe-helvetica-bold-r-*-*-14-*-*-*-*-*-*-*,k14,r14

# եäƤ륦ɥο (ȥƥ/ط)
HilightColor yellow darkblue

# ۥǥȥåפ礭
DeskTopSize 2x2

# ݥåץåץ˥塼Υ (ƥȿ/طʿ/ƿ/ե/{fvwm|mwm})
MenuStyle black grey60 grey40 -adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*,k14,r14 fvwm

# 顼ޥåפεư
ColormapFocus FollowsMouse

# ǥեȤΥ
Style "*"           BorderWidth 5, HandleWidth 5
Style "*"           Icon unknown1.xpm, Color black/dimgrey
Style "*"           MWMFunctions, MWMDecor, HintOverride
Style "*"           DecorateTransient, NoPPosition
Style "*"           IconBox 0 -10 -280 -1
Style "*"           FocusFollowsMouse
Style "*"           RandomPlacement, SmartPlacement

# Fvwm ⥸塼Υ
Style "Fvwm*"       NoTitle,  Sticky, WindowListSkip
Style "Fvwm*"       BorderWidth 2, CirculateSkipIcon, CirculateSkip
Style "FvwmPager"   StaysOnTop
Style "FvwmBanner"  StaysOnTop
Style "FvwmButtons" Icon toolbox.xpm, ClickToFocus

# ߥʥΥ
Style "*term"       Icon xterm.xpm, SloppyFocus, IconBox -70 1 -1 -140
Style "rxvt"        Icon term.xpm, SloppyFocus, IconBox -70 1 -1 -140
Style "rxvt"        MWMBorder, MWMButtons

# Styles for various common programs:
Style "*lock"       NoTitle, NoHandles, Sticky, WindowListSkip, ClickToFocus
Style "xbiff"       NoTitle, Sticky, WindowListSkip, ClickToFocus
Style "xcalc"       Icon xcalc.xpm, NoButton 2,RandomPlacement,ClickToFocus
Style "xmh"         Icon mail1.xpm, NoIconTitle,StickyIcon
Style "xmh"	    RandomPlacement, NoButton 2
Style "xman"	    Icon xman.xpm, RandomPlacement, ClickToFocus
Style "xmag"	    Icon mag_glass.xpm, RandomPlacement, ClickToFocus
Style "xgraph"      Icon graphs.xpm, RandomPlacement, ClickToFocus
Style "xmosaic"     Color Green/Yellow, ClickToFocus

# Ctrl+ Meta(Alt) + [PgUp|PgDn] ǥեư
Key Next         A       CM     Next [*] Focus
Key Prior        A       CM     Prev [*] Focus

# 롼ȥɥǤΥޥ (롼ȥ˥塼//ꥹ)
Mouse 1	R   	A       Menu RootMenu Nop
Mouse 2	R    	A      	Menu Window-Ops Nop
Mouse 3	R    	A      	WindowList

# ȥСǤΥޥ
#  ֹ [[1][       3       ][4][2]]
Mouse 0	1    	A      	Menu Window-Ops2 Close
Mouse 0	2    	A     	Maximize-Func
Mouse 0	4    	A     	Iconify

# //ǤΥޥ
Mouse 1	F	A	Resize-or-Raise
Mouse 1	TS	A	Move-or-Raise
Mouse 1	I	A	Move-or-Iconify
Mouse 2	I	A	Iconify
Mouse 2	FST	A	Menu Window-Ops2 Nop
Mouse 3	TSIF	A	RaiseLower

######################## Initialization Functions ############################
# ư
AddToFunc InitFunction	"I" Module FvwmButtons
#+			"I" exec xsetroot -mod 2 2 -fg \#554055 -bg \#705070
+		"I" exec xpmroot /usr/X11R6/include/X11/pixmaps/world.xpm
# Ƶư
AddToFunc RestartFunction "I" Module FvwmButtons
#+			"I" exec xsetroot -mod 2 2 -fg \#554055 -bg \#705070
+		"I" exec xpmroot /usr/X11R6/include/X11/pixmaps/world.xpm

######################## Menus ###################
AddToMenu RootMenu	"롼ȥ˥塼"	Title
+			"KTerm"		Exec exec kterm
+			"Rxvt"		Exec exec rxvt
+			"XTerm"		Exec exec xterm
+			"Mule"		Exec exec mule
+			""		Nop
+                       "⡼ȥ"      Module FvwmForm Rlogin
+			""		Nop
+                       "桼ƥƥ"     Popup Utilities
+			""		Nop
+			"Fvwm Modules"	          Popup Module-Popup
+                       "Fvwm "         Popup Window-Ops
+                       "Fvwm Simple Config"  Popup Misc-Ops
+			""		Nop
+                       "̺"   Refresh
#+                       "Recapture Screen" Recapture
+			""		Nop
+			"Fvwm λ"	Popup Quit-Verify

AddToMenu Utilities     "桼ƥƥ" Title
+			"Top"		Exec exec xterm -T Top -n Top -e top
+			"Calculator"	Exec exec xcalc
+			"Calendar"	Exec exec xcalendar
+			"GhostView"	Exec exec gv
+			""		Nop
+                       "XLock"         Exec exec xlock -mode random
#+			""		Nop
#+                       "Reset X defaults" Exec xrdb -load $HOME/.Xdefaults 

AddToMenu Misc-Ops "Misc Config Opts" Title
+                  "Sloppy Focus"        ChangeDefaultFocus SloppyFocus
+                  "Click To Focus"      ChangeDefaultFocus ClickToFocus
+                  "Focus Follows Mouse" ChangeDefaultFocus FocusFollowsMouse
+                  "" Nop
+                  "Colormap Follows Mouse" ColormapFocus FollowsMouse
+                  "Colormap Follows Focus" ColormapFocus FollowsFocus
+                  "" Nop
+                  "ػ"	EdgeScroll 0 0
+                  "̥"	EdgeScroll 100 100
+                  "Ⱦ̥"	EdgeScroll 50 50
+                  "ʿΤߥ"	EdgeScroll 100 0
+                  "ľΤߥ"	EdgeScroll 0 100
+                  "뤪ӥå׶ػ" EdgeScroll 100000 100000

AddToMenu Window-Ops	""	Title		
+			"ư"		Move
+			"ѹ"	Resize
+			""		Raise
+			""		Lower 
+		 	""	Iconify
+			""		Stick		
+			"粽"	Maximize
+			"ĺ粽"	Maximize 0 100
+			"粽"	Maximize 100 0
+			""		Nop
+			"λ"		Delete
+			""		Close
+			"λ"	Destroy
+			""		Nop
+			"" RefreshWindow

AddToMenu Window-Ops2	"&Move (ư)"		Move
+			"&Resize (ѹ)"	Resize
+			"R&aise ()"	Raise   	
+			"&Lower ()"	Lower   	
+			"(De)&Iconify ()"	Iconify 	
+			"(Un)&Stick ()"	Stick		
+                       "(Un)Ma&ximize (粽)" Maximize
+                       "(Un)Maximize &Vert(ĺ粽)" Maximize 0 100
+                       "(Un)Ma&ximize &Horiz" Maximize 100 0
+			""		Nop     	
+			"&Delete (λ)"	Delete	
+			"&Close ()"	Close
+			"Destroy (λ)"	Destroy 	
+			""		Nop
+			"ScrollBar" 	Module FvwmScroll 2 2	
#+			"Print"         PrintFunction
#+                       "Print Reverse" PrintReverseFunction

# be sure to fill these in with your correct machine names:
AddToMenu Remote-Logins	"dopey"	 Exec rsh dopey rxvt -display $HOSTDISPLAY &
+			"snoopy" Exec rsh snoopy rxvt -display $HOSTDISPLAY &
+			"grumpy" Exec rsh grumpy rxvt -display $HOSTDISPLAY &
+			"happy"	 Exec rsh happy rxvt -display $HOSTDISPLAY &
+			"bailey" Exec rsh bailey rxvt -display $HOSTDISPLAY &
+			"barnum" Exec rsh barnum rxvt -display $HOSTDISPLAY &
+			"joker"	 Exec rsh joker rxvt -display $HOSTDISPLAY &
+			"signal" Exec rxterm signal

AddToMenu Module-Popup	"FvwmModules"	Title
+			"Identify"	Module	FvwmIdent
+			"Talk"  	Module	FvwmTalk
+			""		Nop
+			"Button-Bar"	Module	FvwmButtons
+			"Pager"		Module  FvwmPager 0 0
+			"Pager (2 desks)" Module  FvwmPager 0 1
+			"WinList"	Module  FvwmWinList
+			""		Nop
+			"Banner"	Module	FvwmBanner
+                       "ScrollBar"     Module  FvwmScroll 50 50
+			"Background"	Module  FvwmBacker
+                       "AutoRaise"     Module  FvwmAuto 200 Raise Nop
+                       "Stop AutoRaise" KillModule FvwmAuto
+			""		Nop
+			"IconBox"	Module	FvwmIconBox
+                       "IconMan"       Module  FvwmIconMan
+			""		Nop
+                       "Form - Rlogin"      Module FvwmForm Rlogin
+                       "Form - MyFvwmTalk"  Module FvwmForm MyFvwmTalk
+                       "Form - QuitVerify"  Module FvwmForm QuitVerify

AddToMenu Quit-Verify 	"Fvwm λޤ?" Title	
+		      	"λ"  Quit	
+                       "Fvwm2 Ƶư"     Restart fvwm2
#+		      	"Restart Fvwm"	    Restart fvwm
#+		      	""		    Nop	
#+		      	"Start twm"         Restart twm
#+		      	"Start ctwm"        Restart ctwm
#+		        "Start tvtwm"       Restart tvtwm
#+		        "Start vtwm"        Restart vtwm
#+		      	"Start mwm"    	    Restart mwm
#+	      	      	"Start olwm"        Restart /usr/openwin/bin/olwm
#+		      	""		    Nop	
#+		      	"Start dummy"       Restart xterm
+		      	""		    Nop	
+		      	"No, Don't Quit"    Nop	

######################## Sample Functions ##########################

AddToFunc MailFunction	   "I" Next [$0] Iconify -1
+		           "I" Next [$0] Focus
+			   "I" None [$0] Exec $0 $1

AddToFunc Move-or-Raise		"I" Raise
+				"M" Move
+  				"D" Lower

AddToFunc Move-or-Raise2	"M" Raise
+				"M" Move
+  				"D" Lower

AddToFunc Maximize-Func		"C" Maximize	 0 100
+				"M" Maximize	 0 80
+				"D" Maximize	 100 100

AddToFunc Move-or-Iconify	"I" Raise
+				"M" Move
+				"D" Iconify

AddToFunc Resize-or-Raise	"I" Raise
+				"M" Resize
+				"D" Lower

AddToFunc Resize-or-Raise2	"M" Raise
+				"M" Resize
+				"D" Lower

AddToFunc PrintFunction		"I" Raise
+				"I" Exec xdpr -id $w

AddToFunc PrintReverseFunction  "I" Raise
+                               "I" Exec xdpr 1/2 -h -rv -id $w

AddToFunc Iconify-and-Raise     "I" Iconify
+                               "I" Raise

# RLOGIN machine fg bg
AddToFunc RLOGIN "I" Exec kterm -fg $1 -bg $2 -e rlogin $0 -8

# TELNET machine fg bg
AddToFunc TELNET "I" Exec kterm -fg $1 -bg $2 -e telnet $0

AddToFunc FocusAndWarp "I" Focus
+                      "I" WarpToWindow 2p 2p

AddToFunc DeiconifyFocusAndWarp "I" Iconify -1
+                               "I" FocusAndWarp

AddToFunc ChangeDefaultFocus "I" Style "*" $0
+                            "I" Recapture

################## FvwmButtons button-bar ################################
#*FvwmButtonsBack bisque3
#*FvwmButtons(Frame 2 Padding 2 2 Container(Rows 2 Frame 1 Padding 10 0 \
#                                           Swallow(Respawn)))
#*FvwmButtons(NoSize Title Close, Icon bomb.xpm, Action Close)
#*FvwmButtons(Title Resize Icon mini.resize.xpm Back bisque4 Action Resize)
#*FvwmButtons(Frame -3 Swallow(Respawn,NoHints) xclock \
#       `Exec exec xclock -bg darkolivegreen -padding 0 -geometry +2000+0`)
#*FvwmButtons(3x1 Back darkolivegreen Fore white Frame 2 Padding 2 2 \
#                 Container(Rows 1 Frame -2 Padding 1 1 Back darkolivegreen))
#*FvwmButtons(Frame 2 Title(Side,Right) Mail Fore white \
#         Swallow(UseOld,NoRespawn)\
#         xbiff `Exec exec xbiff -bg darkolivegreen -geometry +200+200`)
#*FvwmButtons(2x1 Swallow (NoHints) "FvwmTalk" "FvwmTalk")
#*FvwmButtons(End)
#*FvwmButtons(End)

*FvwmButtonsBack gray40
*FvwmButtonsFore white
*FvwmButtonsFont -adobe-helvetica-*--12-*-iso8859-1,r14,k14
*FvwmButtonsGeometry -1-1
#*FvwmButtonsColumns 1
*FvwmButtonsRows 1
#*FvwmButtons(Frame -1, Swallow(Respawn,NoHints) oclock \
#				'Exec exec oclock -geometry -1500-1500')
*FvwmButtons(Frame -1, Swallow(Respawn,NoHints) oclock \
			'Exec exec oclock -noshape -geometry -1500-1500')
*FvwmButtons(Frame -1, Swallow "FvwmPager" "FvwmPager 0 0")
*FvwmButtons(Frame 1, Container(Frame 1, Rows 3, Columns 2)
  *FvwmButtons(2x1, Title "Scroll Half", Action 'EdgeScroll 50 50')
  *FvwmButtons(Title "Full", Action 'EdgeScroll 100 100')
  *FvwmButtons(Title Off, Action 'EdgeScroll 0 0')
  *FvwmButtons(Title Horz, Action 'EdgeScroll 50 0')
  *FvwmButtons(Title Vert, Action 'EdgeScroll 0 50')
*FvwmButtons(End)
*FvwmButtons(Frame 0, Container(Frame 1 Rows 3, Columns 1)
  *FvwmButtons(Title "AutoRaise", Frame 0,  Action 'Nop')
  *FvwmButtons(Title "On", Frame 2, Action 'FvwmAuto 500 Raise Nop')
  *FvwmButtons(Title "Off", Frame 2, Action 'KillModule FvwmAuto')
*FvwmButtons(End)
#*FvwmButtons(Frame 1, Container(Columns 2, Frame 1,\
#		Font -adobe-helvetica-*--10-*-iso8859-1, Swallow(Respawn)))
#  *FvwmButtons(Icon jterm.xpm, Action 'Exec exec kterm &')
#  *FvwmButtons(Icon mini.xterm.xpm, Action 'FvwmForm Rlogin')
#*FvwmButtons(End)
*FvwmButtons(Title Kterm, Icon jterm.xpm, Action 'Exec exec kterm &')
*FvwmButtons(Title Mule, Icon word_processor.xpm, Action 'Exec exec mule &')
*FvwmButtons(Title λ, Icon exit.xpm, Action 'FvwmForm QuitVerify')

########################## Window-Identifier ###############################
# Just choose colors and a fonts
*FvwmIdentBack MidnightBlue
*FvwmIdentFore Yellow
*FvwmIdentFont -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*

########################### Pager #########################################
*FvwmPagerBack #908090
*FvwmPagerFore #484048
*FvwmPagerFont -adobe-helvetica-bold-r-*-*-10-*-*-*-*-*-*-*
*FvwmPagerHilight #cab3ca
*FvwmPagerGeometry -1-1
*FvwmPagerLabel 0 Misc
*FvwmPagerLabel 1 Maker
*FvwmPagerLabel 2 Mail
*FvwmPagerLabel 3 Matlab
*FvwmPagerSmallFont 5x8

##########################FvwmWinList##################################
*FvwmWinListBack #908090
*FvwmWinListFore Black
*FvwmWinListFont -adobe-helvetica-bold-r-*-*-14-*-*-*-*-*-*-*,k14,r14
*FvwmWinListAction Click1 Iconify -1,Focus
*FvwmWinListAction Click2 Iconify
*FvwmWinListAction Click3 Module "FvwmIdent" FvwmIdent
*FvwmWinListUseSkipList
*FvwmWinListGeometry +0-1
                                      

*FvwmBackerDesk 0 -solid steelblue
*FvwmBackerDesk 1 -solid midnightblue

*FvwmScrollBack grey40
*FvwmScrollFore green
	
############################################################
############################################################
# Note that icons are shown in the module
#    only if NoIcon commnand is applied.
#Style     "*"  NoIcon

############################################################
*FvwmIconBoxIconBack    #cfcfcf
*FvwmIconBoxIconHiFore  black
*FvwmIconBoxIconHiBack  LightSkyBlue
*FvwmIconBoxBack        #5f9ea0
#*FvwmIconBoxFore       blue
*FvwmIconBoxGeometry    5x1+0+0
*FvwmIconBoxMaxIconSize 64x38
*FvwmIconBoxFont        -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*
*FvwmIconBoxSortIcons   IconName
*FvwmIconBoxPadding     4
*FvwmIconBoxLines       10
*FvwmIconBoxSBWidth     11
*FvwmIconBoxPlacement   Left Top
*FvwmIconBoxPixmap      fvwm.xpm
#*FvwmIconBoxHideSC Horizontal
*FvwmIconBoxSetWMIconSize
*FvwmIconBoxHilightFocusWin
#*FvwmIconBoxResolution          Desk
*FvwmIconBoxMouse       1       Click           RaiseLower
*FvwmIconBoxMouse       1       DoubleClick     Iconify
*FvwmIconBoxMouse       2       Click           Iconify -1, Focus
*FvwmIconBoxMouse       3       Click           Module FvwmIdent
*FvwmIconBoxKey         r       RaiseLower
*FvwmIconBoxKey         space   Iconify
*FvwmIconBoxKey         d       Close
*FvwmIconBoxKey         n       Next
*FvwmIconBoxKey         p       Prev
*FvwmIconBoxKey         h       Left
*FvwmIconBoxKey         j       Down
*FvwmIconBoxKey         k       Up
*FvwmIconBoxKey         l       Right
#
# Icon file specifications
#
# Mostly, you don't have to specify icon files, as FvwmIconBox now
# reads icon files specified in Style commands.
#
*FvwmIconBox            "Fvwm*"         -

# FvwmForm alias - rlogin to host via xterm
*RloginWarpPointer
*RloginFont         *helvetica*m*r*n*14*,r14,k14
*RloginButtonFont   *helvetica*m*o*n*14*,r14,k14
*RloginInputFont    *cour*m*r*n*14*
*RloginFore         Black
*RloginBack         Light Gray
*RloginItemFore          Wheat
*RloginItemBack          Gray50
# begin items
*RloginLine         center
*RloginText         "⡼ȥۥȤ rlogin"
*RloginLine         center
*RloginText         "ۥ̾:"
*RloginInput        HostName  20   ""
*RloginLine         center
*RloginSelection    UserSel   single
*RloginChoice       Default   Default   on   "same user"
*RloginChoice       Custom    Custom    off  "user:"
*RloginInput        UserName  10   ""
*RloginLine         expand
*RloginButton       quit "Login" ^M
*RloginCommand Exec kterm  -T kterm@$(HostName) -e rlogin $(HostName) $(Custom?-l $(UserName))
#*RloginButton       restart   "Clear"
*RloginButton       restart   "ꥢ"
*RloginCommand Beep
#*RloginButton       quit "Cancel"
*RloginButton       quit "󥻥"
*RloginCommand Nop

# FvwmForm alias - query exit ala mwm
*QuitVerifyGrabServer
*QuitVerifyWarpPointer
#*QuitVerifyFont          *helvetica*m*r*n*14*,r14,k14
*QuitVerifyFont          7x14bold,r14,k14
#*QuitVerifyButtonFont    *helvetica*m*o*n*14*
*QuitVerifyButtonFont    7x13bold,r14,k14
*QuitVerifyFore          Black
*QuitVerifyBack          Light Gray
*QuitVerifyItemFore Wheat
*QuitVerifyItemBack Gray50
# begin items
*QuitVerifyLine          center
#*QuitVerifyText          "Do you really want to exit FVWM?"
*QuitVerifyText          "FVWM λޤ"
*QuitVerifyLine          expand
*QuitVerifyButton   quit      " λ "
*QuitVerifyCommand  Quit
*QuitVerifyButton   restart   "Ƶư"
*QuitVerifyCommand  Restart fvwm2
*QuitVerifyButton   quit      "󥻥"
*QuitVerifyCommand  Nop

# MyTalk & MyFvwmTalk from Dave Goldberg
# MyTalk Form - dissappears after use
*MyTalkWarpPointer
*MyTalkFont *helvetica*m*r*n*14*
*MyTalkButtonFont *helvetica*m*o*n*14*
*MyTalkInputFont *cour*m*r*n*14*
*MyTalkFore Red
*MyTalkBack Gray
*MyTalkItemFore Blue
*MyTalkItemBack Gray
*MyTalkLine center
*MyTalkText "Fvwm Function"
*MyTalkInput Func 40 ""
*MyTalkLine expand
*MyTalkButton quit "Run" ^M
*MyTalkCommand $(Func)
*MyTalkButton restart "Clear" ^R
*MyTalkButton quit "Cancel" ^C
*MyTalkCommand Nop
# MyFvwmTalk Form - sticks around
*MyFvwmTalkWarpPointer
*MyFvwmTalkFont *helvetica*m*r*n*14*
*MyFvwmTalkButtonFont *helvetica*m*o*n*14*
*MyFvwmTalkInputFont *cour*m*r*n*14*
*MyFvwmTalkFore Red
*MyFvwmTalkBack Gray
*MyFvwmTalkItemFore Blue
*MyFvwmTalkItemBack Gray
*MyFvwmTalkLine center
*MyFvwmTalkText "Fvwm Function"
*MyFvwmTalkInput Func 40 ""
*MyFvwmTalkLine expand
*MyFvwmTalkButton restart "Run" ^M
*MyFvwmTalkCommand $(Func)
*MyFvwmTalkButton restart "Clear" ^R
*MyFvwmTalkCommand Nop
*MyFvwmTalkButton restart "Iconify" ^Z
*MyFvwmTalkCommand Next [MyFvwmTalk] Iconify
*MyFvwmTalkButton quit "Quit" ^C
*MyFvwmTalkCommand Nop

# to change banner pixmap
#*FvwmBannerPixmap fvwm3.xpm
#*FvwmBannerTimeout 2

