.ctwmrc

define(taillemax, translit(eval(WIDTH)*eval(HEIGHT-110),*,x))

#**********************************************************************
#
#    .ctwmrc
#
#**********************************************************************


LeftTitleButton "menu12" = f.menu "windowmenu"	# add a menu to each window
#TitleButtonBorderWidth 0	# don't want to see box around button
#ButtonIndent 0			# button doesn't have to be smaller


UsePPosition "on"		# use program-specified size hints accepted
#NoHighlight			# do not flash borders on enter events
#OpaqueMove			# actually move window instead of outline
AutoRelativeResize		# don't require resize to cross border to start
#RestartPreviousState		# reiconify iconified things on startup
ClientBorderWidth		# use the application border width on frameBorderWidth 5
		                # width of top level windows created by twm
NoGrabServer			# don't grab server during menus, etc.
NoRaiseOnMove			# allow moving under other windows
NoRaiseOnResize			# allow resizing under other windows
NoTitleFocus			# avoid keystrokes in wrong window cause of lag
DecorateTransients		# put titlebars on transients
NoSaveUnders			# faster to just repaint then save
XORvalue 1			# tend to use visually distinct adjacent colors
ConstrainedMoveTime 0		# turn off horizontal/vertical only moving
NoCaseSensitive			# turn off case-sensitivity in sorting icons
#Warpmapped			# allow warping to unmapped windows
BorderResizeCursors              # curseurs d'agrandissement aux coins des fenetres
#WarpRingOnScreen


MaxWindowSize	"taillemax"
ShowIconManager
UseThreeDIconManagers
UseThreeDMenus
UseThreeDTitles
UseThreeDBorders

IconifyByUnmapping
ShowWorkSpaceManager
UseThreeDWMap
#SortIconManager
StartInMapState
NoShowOccupyAll
#ReallyMoveInWorkSpaceManager
MapWindowDefaultWorkSpace { "black" "black" "Ivory"}
MapWindowCurrentWorkspace { "black" "Ivory" "Ivory" }
TitleJustification "center"


IconDirectory "/net/i2/lacazedi/perso/icones"

IconManagerGeometry "295x75+120-0" 4
WorkSpaceManagerGeometry "100x75-0-0"


TitleFont "-adobe-helvetica-medium-r-normal-*-8-*-*-*-*"
MenuFont "-adobe-helvetica-medium-r-normal-*-8-*-*-*-*"
IconFont  "-adobe-helvetica-medium-r-normal-*-8-*-*-*-*"
IconManagerFont "-adobe-helvetica-medium-r-normal-*-8-*-*-*-*"



NoHighLight
{
	"dclock"
        "gkrellm"
        "trayer"
        "panel"
	"TWM Icon Manager"
	"xmeter"
	"WorkSpaceManager"
        "xload"
        "Xload"
}

NoBorder
{
	"Aplimanager"
        "trayer"
        "panel"
        "gkrellm"
        "Xload"
        "xload"
}

IconManagerDontShow
{
	"emiclock"
        "trayer"
        "panel"
        "gkrellm"
        "xload"
        "Xload"
}

Monochrome
{
    IconManagerHighlight  "black"
    IconManagerForeground "white"
    IconManagerBackground "black"
    BorderColor "black"
    TitleForeground "black"
    TitleBackground "white"
    MenuForeground "white"
    MenuBackground "black"
    MenuTitleForeground "white"
    MenuTitleBackground "black"
    IconForeground "white"
    IconBackground "black"
    IconBorderColor "black"

}

Color
{

    BorderColor 	"slategray3"
    BorderTileForeground "slategray4"
    BorderTileBackground "Slategray4"
	{		"TWM Icon Manager"	"Ivory"
			"WorkSpaceManager"	"Ivory"
	}


    TitleBackground     "Slategray4"
    TitleForeground 	"Ivory"
    MenuShadowColor 	"slategray4"
    MenuBackground      "Ivory"
    MenuForeground      "slategray4"
    MenuTitleBackground "slategray4"
    MenuTitleForeground "Ivory"

    IconManagerBackground "Slategray4"
    IconManagerForeground "Ivory"
}





##########################
#                        #
#     workspaces         #
#                        #
##########################

WorkSpaces
{
      "Demarrage"
      "Netscape"
      "Travail"
      "Misc."
}


Occupy
{
	Window		"Netscape"	{ "Netscape" }
	Window		"Emacs"		{ "Travail" }
#	Window		"xv"		{ "Misc." }
        Window          "xblast"        { "Misc." }
}


OccupyAll
{
	"Aplimanager"
	"Irc"
        "trayer"
        "panel"
        "xmeter"
	"dclock"
        "gkrellm"
        "xload"
        "Xload"
}




###############################################################################
#                                                                             #
#                             Define user functions                           #
#                                                                             #
###############################################################################

Function "quitter"
{
    f.exec "rm -f ${HOME}/.display"
    f.quit
}





DefaultFunction f.nop		# ignore extraneous events

Function "Deplace_vers_D" {f.addtoworkspace "Demarrage" f.vanish}
Function "Deplace_vers_T" {f.addtoworkspace "Travail" f.vanish}
Function "Deplace_vers_N" {f.addtoworkspace "Netscape" f.vanish}
Function "Deplace_vers_M" {f.addtoworkspace "Misc." f.vanish}

###############################################################################
#                                                                             #
#                             Define key bindings                             #2
#                                                                             #
###############################################################################


#Button = KEYS : CONTEXT : FUNCTION
#----------------------------------
Button1 =      : title   : f.raiselower
Button2 =      : title   : f.move
Button3 =      : title   : f.menu "windowmenu"

Button2 =      : frame   : f.resize


Button2 =      : icon    : f.move
Button3 =      : icon    : f.raise

Button3 = s|m  : window  : f.destroy

Button1 =      : root	 : f.menu "twmops"
Button2 =      : root	 : f.menu "Login"
Button3 =      : root	 : f.menu "windowops"

Button1 =      : iconmgr : f.iconify
Button2 =      : iconmgr : f.raise
Button3 =      : iconmgr : f.lower

"F9"	=      : window	 : f.destroy
"F8"	=      : window  : f.fullzoom
"F7"    =      : window  : f.iconify
"F7"    =      : iconmgr : f.deiconify

"F6"	=	: window : f.raiselower

"F1"	= 	: all         			: f.gotoworkspace "Demarrage"
"F3"    =       : all	                        : f.gotoworkspace "Netscape"
"F2"    =       : all	                        : f.gotoworkspace "Travail"
"F4"    =       : all	                        : f.gotoworkspace "Misc."



"D"     =      : root  :  f.gotoworkspace "Demarrage"
"N"     =      : root  :  f.gotoworkspace "Netscape"
"T"     =      : root  :  f.gotoworkspace "Travail"
"M"     =      : root  :  f.gotoworkspace "Misc."


###############################################################################
#                                                                             #
#     Display an icon manager across the top of the screen.  Don't manage     #
#                the windows for which you don't show a title.                #
#                                                                             #
###############################################################################


NoTitle				# little programs that look like icons

{
  "Aplimanager"
  "trayer"
  "panel"
  "dclock"
  "xmeter"
  "TWM Icon Manager"
  "WorkSpaceManager"
  "xload"
  "gkrellm"
}



IconManagerDontShow
{
  "Aplimanager"
  "dclock"
  "xload"
  "xrn"
  "xmail"
  "xman"
  "xmeter"
  "gkrellm"
}



DontIconifyByUnmapping
{
  "WorkSpaceManager"
  "trayer"
  "panel"
  "xload"
  "gkrellm"
}



###############################################################################
#                                                                             #
#                          Define some useful  menus.                          #
#                                                                             #
###############################################################################


menu "windowmenu"
{
"WINDOWMENU"		f.title
"AgrandirMax"           f.fullzoom
"Info"                  f.identify
"Lower"                 f.lower
"Raise"                 f.raise
"Vanish"		f.vanish
"MoveWindow"		f.menu "Deplace"
"RemF WSpace"           f.menu "remfromWS"
"Send Delete"           f.delete
"kill"                  f.menu "confwin"
}



menu "Deplace"
{
"MoveWindow"		f.title
"Demarrage"		f.function "Deplace_vers_D"
"Travail"		f.function "Deplace_vers_T"
"Netscape"		f.function "Deplace_vers_N"
"Misc."			f.function "Deplace_vers_M"
}



menu "confwin"       ("black":"red")
{
"Please confirm"        f.title
"No"                    f.nop
"Yes"			f.destroy
}



menu "twmops"
{
"DIVERS"		f.title
"Gedit"			!"gedit &"
"Pcmanfm"               !"pcmanfm &"
"Shell"			!"atermX &"
"Xterm"                 !"xterm &"
"Thunderbird"		!"thunderbird-bin &"
"I.R.C."		!"xterm -T Irc -e weechat-curses &"
"Opera"		        !"opera &"
"pidgin"                !"pidgin &"
"Gimp"   		!"gimp &"
"X.V."			!"xv &"
"Moc"                   !"xterm -e mocp &"
"Calculatrice"		!"xcalc &"
"net load"              !"xnetload -i eth0 &"
"Exec..."               !"gmrun &"
}




menu "confirm"       	("black":"red")
{
"Please confirm"        f.title
"No"                    f.nop
"Yes"			f.function "quitter"
}

menu "windowops"
{
"Windows"		f.title
"Resize"		f.resize
"Refresh all"		f.refresh
"Restart twm"		f.twmrc
"Info"			f.identify
"Move"                  f.move
"Raise"			f.raise
"Lower"			f.lower
"Iconify"		f.iconify
""			f.nop
"Send Delete"           f.delete
"Kill"			f.destroy
"Logout"		f.menu "confirm"
"Exit"                  f.menu "Exit"
}

menu "Exit"
{
"Please confirm"        f.title
"Restart"               !"sudo shutdown -r now &"
"Shutdown"              !"sudo shutdown -h now &"
}

menu "Login"
{
"Machines"			f.title
"Root"		!"xterm -bg black -fg green -e su - &"
"Xcore"         !"xterm -T Xcore -e ssh xc0re@shellmix.com &"
}