# -*- fvwm -*- # # AfterStep の設定ファイル # # written by NegI # Lastupdate: Mon Dec 7 08:28:58 1998. # #////////////////////////////# # 特色のある見ためと感じの節 # #////////////////////////////# # フォーカスされていない窓の前景色とデフォルトの周辺色 StdForeColor #111111 # フォーカスされていない窓の背景色とハンドルの色 StdBackColor #bfbfbf # Text color for focused windows, menu highlights, and MenuTitle text HiForeColor White # Background Color of focused window and MenuTitle border #HiBackColor #000001 HiBackColor #000044 # Menu Border Color MenuBackColor #bfbfbf # Menu Text Color MenuForeColor Black # Set some cursors # Cursor 5 132 # Set the WAIT cursor to the normal top_left_arrow # Cursor 8 132 # Set the DESTROY cursor to the same # テクスチャのグラデーションの設定 # タイトルバー、フォーカスされていないタイトルバー、メニュータイトルバー # などのテクスチャタイプを定義する # 0 - テクスチャなし # 1 - Wharf-スタイルのグラデーション # 2 - Horizontal one way gradient # 3 - Horizontal from top/bottom to center # 4 - Vertical one way gradient from left to right # 5 - Vertical from left/right to center # 128 - User specified pixmap TextureTypes 128 1 1 1 1 1 TitlePixmap rocks-prelight.xpm # Set the number of colors to use on textures. # Default is 10 on 8bpp screens and 128 on +16bpp. TextureMaxColors 128 128 128 128 # Texture Colors, given in Standard RGB X numbering # Window TitleBar textures TitleTextureColor #303080 #000010 # Unfocused TitleBar textures UTitleTextureColor #a0a2a1 #606261 # Menu TitleBar textures MTitleTextureColor #303080 #000010 # Menu Item textures MenuTextureColor #606060 #d0d0d0 # Don't change the titlebar's highlight's upon mouse click TitlebarNoPush # Gives titles to icons IconTitle # Menu Font Font -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0208.1983-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0201.1976-* # Window TitleBar Font WindowFont -adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0208.1983-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0201.1976-* # Icon Font IconFont -adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0208.1983-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0201.1976-* # Area where icons should show up (RightX, RightY, LeftX, LeftY) IconBox +2 +2 -2 -2 #IconBox -64 0 -1 -1 #//////////# # 窓の配置 # #//////////# # RandomPlacement prevents user interaction while placing windows: RandomPlacement # SmartPlacement makes new windows pop-up in blank regions of screen # if possible, otherwise falls back to random or interactive placement SmartPlacement # Percentage of a page (horizontal, vertical) to scroll when the # cursor reaches the edge of a page ... 0 0 turns off scrolling EdgeScroll 100 100 # Amount of Resistance for moving from desk to desk with the # mouse ... 0 0 allows for only window moves and resizes to # reach into the next desk EdgeResistance 150 250 #EdgeResistance 0 0 # Raise the Window when it is clicked on, but do not pass the click # on to the application ... very handy for text editors # Change 1 to 0 in order to get the "normal" ClickToFocus effect # ClickToFocus 1 # Raise the Window when the mouse travels into it and keep focus # until the mouse enters a new window #SloppyFocus # Miscellaneous voodoo commands - they may help you, they may not AppsBackingStore BackingStore #SaveUnders # This style of window movement draws the entire window as it # moves, instead of the "rubber-band" outlines # It has a number (N) attached to it (default 5). If the # window occupies less than N% of the screen, OpaqueMove is # used. 0 <= N <= 100 OpaqueMove 50 #OpaqueResize # NoPPosition instructs fvwm to ignore the PPosition field in window # geometry hints. # Mule annoyingly sets PPosition to (0,0)! NoPPosition BoundaryWidth 4 #////////////////# # 種々雑多な設定 # #////////////////# # Set windows to auto-raise after 325 milliseconds if you like it. # Use with SloppyFocus or focus-follows-mouse mode #Module Auto 750 AutoRaise 750 # If you don't like the default 150 msec click delay for the complex functions # change this. #ClickTime 150 # Don't change to an icon when using Alt-Tab to page through open windows CirculateSkipIcons # StubbornIcons makes icons de-iconify into their original position on the # desktop, instead of on the current page. #StubbornIcons # Place a TitleBar and Handles on popup windows and dialog boxes DecorateTransients # With AutoPlacement, icons will normally place themselves underneath active # windows. This option changes that. #StubbornIconPlacement # If you want ALL you icons to follow you around the desktop (Sticky), try # this StickyIcons #////////////////////////////# # ページャと仮想デスクトップ # #////////////////////////////# # Set up the virtual desktop and pager # Set the desk top size in units of physical screen size DeskTopSize 2x2 # Sets the reduction scale used for the Pager DeskTopScale 36 #/////////////# # 共通のパス # #/////////////# # ModulePath is a colon-separated list, just like a regular unix PATH # Any Module must be found within the path in order to be located # and executed ModulePath /usr/lib/X11/afterstep:/usr/X11R6/lib/X11/afterstep:/usr/lib/X11/fvwm # Another colon-separated list pointing to your pixmaps (color icons) PixmapPath /home/negi/lib/icon:/home/negi/lib/image/:/usr/include/X11/pixmaps/ # Path for your ugly black&white icons IconPath /usr/include/X11/bitmaps/ # Various styles which can be associated with specific applications # Sticky -- remains "stuck" on all desks # NoTitle -- window has NoTitle # StaysOnTop -- a regular window will not obscure this window # WindowListSkip -- this window will not show up in the # window listing which can be used with a MiddleClick in # the root window (main background) # NoHandles -- No bottom bar Style "oclock" Sticky, NoTitle, StaysOnTop, WindowListSkip Style "emiclock" Sticky, NoTitle, WindowListSkip Style "*Pager" NoTitle, Sticky, WindowListSkip, NoHandles Style "xbiff" NoTitle, WindowListSkip Style "Minitabx11" StaysOnTop Style "Wharf" NoTitle, Sticky, WindowListSkip, NoHandles Style "Banner" NoTitle, NoHandles, WindowListSkip, Sticky, StaysOnTop Style "Fvwm*" NoHandles, NoTitle, Sticky, WindowListSkip Style "inventory" StaysOnTop Style "xppxp" NoTitle, Sticky, WindowListSkip, NoHandles, NoFocus Style "xcalc" NoHandles Style "X11Amp" NoTitle, Sticky, NoHandles Style "xconsole" NoTitle, Sticky, WindowListSkip, NoHandles, NoFocus Style "*MpegTV*" NoHandles Style "XAnim" NoHandles Style "WinList" NoTitle, Sticky, WindowListSkip, NoHandles Style "Netscape*" StartsOnDesk 2 Style "GIMP*" StartsOnDesk 1 Style "login" NoTitle, Sticky, WindowListSkip, NoHandles Style "asclock" NoTitle, Sticky, WindowListSkip, NoHandles Style "asload" NoTitle, Sticky, WindowListSkip, NoHandles Style "xv controls" NoIcon # Kinput2 の窓 Style "modeShell" NoTitle, Sticky, WindowListSkip, NoHandles ########################################## # アニメーションなアイコン化のカスタマイズ ########################################## #Module Animate # Draw the lines with black *AnimateColor black # Delay 1 ms in between frames of animation *AnimateDelay 1 # Break the animation into 12 steps *AnimateIterations 12 # Make 1 full revolution in a twisted animation *AnimateTwist 1 # Width of line used to animate...0 fastest, larger numbers slower *AnimateWidth 0 # Use the zoom method of resizing instead of the twist *AnimateResize zoom #*AnimateResize twist #/////////////////////# # Wharfカスタマイズ # #/////////////////////# # Customize your Wharf -- the pushable, pullable button bar on the right # hand of your display Module Wharf # Animate Wharf's folders *WharfAnimate # Animate Wharf's compression into one icon *WharfAnimateMain # Start on the right top side of the screen *WharfGeometry -0+0 #*WharfGeometry +1086+0 # One vertical column #*WharfColumns 1 *WharfRows 1 *WharfFullPush #*WharfTextureType 1 *WharfTextureType 128 *WharfPixmap bark.xpm # Create a pullout "Folder" as the first button on Wharf # AfterStep #*Wharf AfterStep NeXTLogo.xpm Folder #*Wharf AfterStep step.xpm Folder #*Wharf Shutdown shutdown.xpm Quit #*Wharf xlock KeysOnChain.xpm Exec "-" xlock -modelist "braid flame grav pyro qix rock spiral spline swarm worm" -mode random -duration 0 -allowroot -usefirst & #*Wharf ~Folder *Wharf xdic Bookshelf2.xpm Exec "" exec xdic -f /usr/share/dic/honmon -G /usr/share/dic/gai16f00 -H /usr/share/dic/gai16h00 & *Wharf Netscape netscape3.xpm Exec "" exec netscape 2>/dev/null 1>/dev/null & *Wharf gimp photoshop.xpm Exec "" exec gimp & *Wharf asmail nil Swallow "asmail" asmail & #*Wharf pager nil SwallowModule "Pager" Pager 0 0 *Wharf ascpu nil Swallow "ascpu" ascpu & *Wharf ascpu nil Exec "" exec xterm -ut -T top -e top & *Wharf asclock nil MaxSwallow "asclock" asclock -12 -shape -exec xcalendar& #*Wharf asmodem nil Swallow "asmodem" asmodem -s -m /var/lock/LCK..ttyS0 -d /usr/local/sbin/dial-on -h /usr/local/sbin/dial-off & #*Wharf XPPxP nil Swallow "xppxpm" xppxpm fsinet -geometry -70-2 & #*Wharf XPPxP nil Exec "xppxp" xppxp -geometry -130+1 & #*Wharf Mule author.xpm Exec "" exec mule & #*Wharf Kterm kterm.xpm Exec "" exec kterm & #*Wharf Tgif draw.xpm Exec "" exec tgif & #*Wharf Wingz Database.xpm Exec "" exec Wingz & #*Wharf Xarchie DeskGlobe.xpm Exec "" exec xarchie & #////////////////# # アイコンの選択 # #////////////////# # Select some common icon bitmaps for applications named in # column number two ... each icon file must be located in # your PixmapPath (color) or IconPath (b/w) as defined above Icon "KTerm" kterm.xpm Icon "XTerm" Monitor.xpm Icon "clotho*" kterm.xpm Icon "Diald*" Monitor.xpm Icon "Emacs" author.xpm Icon "ghostview" text.xpm Icon "xman" xman.xpm Icon "gimp" photoshop.xpm Icon "xli" monalisa.xpm Icon "xv" xv1.xpm Icon "moxfm*" FileFolders.xpm Icon "*lyx*" text.xpm Icon "LyX" text.xpm Icon "Untitled*" YellowBlueRedGeometry.xpm #//////////////# # 関数の初期化 # #//////////////# # Here we will put programs and modules that we wish to # load up automatically upon startup Function "InitFunction" # Wait until Wharf is done loading so that our xterm will have # the focus when it is first created Wait "I" Wharf Module "I" Pager 0 2 Exec "I" kterm -geometry 80x9+0+23 -C -T login -name login & Exec "I" kterm -geometry 80x35+0+162 -e screen & Exec "I" emacs -geometry 80x40-2+69 & # Place the green carpet image onto the background upon startup # I personally recommend xli/xloadimage, but xv seems to be # ubiquitous in the unix world so I'll use that # Exec "I" exec /usr/local/bin/sox /home/negi/lib/sound/mina06.wav -t ussdsp /dev/dsp & EndFunction # These will load up upon every subsequent Restart Function "RestartFunction" # Module "I" FvwmPager 0 0 Module "I" Pager 0 2 EndFunction #///////////# # Functions # #///////////# # Now define some handy complex functions # Each function can be bound to a specific Mouse Button and # a specific window location (Title, TitleButton, Root Window, # etc.) later on # This one will Raise the window on a Single Click, Shade # (display only the TitleBar) on a DoubleClick, and make # the window uncoverable by all other non-OnTop windows # with a TripleClick. A Click+Motion will move the # window around Function "Shade-or-Raise" Move "Motion" Raise "Click" Shade "DoubleClick" PutOnTop "TripleClick" EndFunction # This will move the window on mouse motion, maximize the # window (while leaving space for Wharf on the right) with a # single MouseClick, roll up the window for a Shade with a # DoubleClick, and put the window on top of all other windows # with a TripleClick (no regular window can be placed on top # of this window until the ontop window has been taken # another PutOnTop TripleClick Function "Maximize_Function" Move "Motion" Maximize "Click" 94 100 Shade "DoubleClick" PutOnTop "TripleClick" EndFunction # This one moves or (de)iconifies: # Icons will restore to full size with a single mouse click # Change "Click" to "DoubleClick" or "TripleClick" as desired Function "Move-or-Iconify" Move "Motion" Iconify "Click" EndFunction # Pretty Simple...Mouse Motion Raises and Resizes the given # window. A mouse click will also Raise it. DoubleClick # will perform a Shade while TripleClick grants unobscurable # status Function "Resize-or-Raise" Resize "Motion" Raise "Motion" Raise "Click" Shade "DoubleClick" PutOnTop "TripleClick" EndFunction # This is provided as a hint only. # Move to a known page on the desktop, then start an application in a # known location. Could also switch to a known desktop, I guess #Function "abs_coord" # GoToPage "Immediate" 1,1 # Exec "Immediate" exec xcalc -geometry +100+100& #EndFunction #//////////# # メニュー # #//////////# # Now define the menus - defer bindings until later # Here are some common applications...we will add this and the # following menus to our main HotList menu Popup "Networks" Title "ネットワーク" Exec "News/Mailの取り寄せ" exec xterm -T Fetch -e inetwork & Exec "Atropos を同期させる" exec xterm -e rdist -o remove -c /home/negi/Mail atropos:Mail Exec "Niftyの巡回" exec kterm -bg DarkSlateGrey -T Nifty4U+ -e /home/negi/n4u+/nifty4u & Exec "マニュアルPPP接続" exec xppxp fsi -geometry -70-2& EndPopup Popup "Applications" Title "アプリケーション" Exec "NcFTP" exec xterm -name NcFTP -T NcFTP -e ncftp & Exec "Tgif" exec tgif & Exec "Wingz" exec wings & Exec "ペイント" exec xpaint & Exec "ヘルプ" exec xman & Exec "虫めがね" exec xmag & Exec "電卓" exec xcalc & EndPopup # This menu allows you to quit, although why you would want # to do such a thing is beyond me Popup "Quit-Verify" Title "AfterStepを終了しますか？" Quit "終了します" Restart "再起動" afterstep Nop "キャンセル" EndPopup # Here is our main Menu that will be seen upon left MouseClick # in the root window (background area) ... note that we have added # our above Menus to this one ... also note that menus must be # defined first before they can be placed in a different menu Popup "HotList" Title "ルートメニュー" Popup "ネットワーク" Networks Popup "アプリケーション" Applications Popup "終了" Quit-Verify EndPopup # This defines the most common window operations Popup "Window Ops" Title "ウィンドウオプション" Function "移動" Shade-or-Raise Function "サイズ変更" Resize-or-Raise PutOnTop "上に固定" Stick "場所を固定" Close "閉じる" Destroy "強制終了" EndPopup Function "CirculateUp-and-Move" CirculateUp "Immediate" CursorMove "Immediate" 1 1 EndFunction #////////////////# # マウスバインド # #////////////////# # First, for the mouse in the root window # Button 1 gives the HotList menu # Button 2 gives the WindowList menu (Listing of current windows) # Button 3 gives the WindowOps # There are 4 colums to the table # First column is the event (Mouse Click or Key Press) # Mouse 0 specify any click in a TitleBar box # Where can be 1 or 2 for first or second box # Mouse 1 is left button, 2 is middle, 3 is right # Second Column is where the click takes place # R = Root window (main background) # F = Window Frame (the corners) # S = Bottom bar # I = Icon Window # T = TitleBar # W = Application Window # Third Column is the Context (ie, modifier keys) # N = No modifiers # A = Any context except for inside the TitleBar Boxes # C = Control # S = Shift # M = Meta # Combos are allowed (eg, CS = Control+Shift) # Fourth Column is the action to take upon click # Action can be a function, popup, or regular action # Key # # Where # # Context# # Action # Mouse 0 1 A Iconify Mouse 0 2 A Close Mouse 1 R A PopUp "HotList" Mouse 1 FS A Function "Resize-or-Raise" Mouse 1 I A Function "Move-or-Iconify" Mouse 1 T A Function "Shade-or-Raise" Mouse 2 R A PopUp "Window Ops" Mouse 2 FST A PopUp "Window Ops" Mouse 3 R A WindowList Mouse 3 TSIF A Function "Maximize_Function" #//////////////////////////# # キーボードショートカット # #//////////////////////////# Key F1 A M Popup "HotList" Key F2 A M Popup "Window Ops" Key F3 A M WindowList Key F1 A C Desk 0 0 Key F2 A C Desk 0 1 Key F3 A C Desk 0 2 # Alt-F4 will take a screenshot and save it in # the user's home directory as screen.xwd # Programs such as ImageMagick can then be used # to convert the xwd file into jpg or gif format Key Print A N Exec "import" import -interlace line -window root ~/root.jpg & Key F5 A A Iconify # Alt(Meta)-Tab pages through open, bordered windows Key Tab A M Function "CirculateUp-and-Move" # Arrow Keys # Control+Arrow scrolls to the next page on the desk Key Left A C Scroll -100 +0 Key Right A C Scroll +100 +0 Key Up A C Scroll +0 -100 Key Down A C Scroll +0 +100 Key Left A M Function "Shade-or-Raise" Key Right A M Function "Shade-or-Raise" Key Up A M Function "Shade-or-Raise" Key Down A M Function "Shade-or-Raise" Key Left A CM Function "Resize-or-Raise" Key Right A CM Function "Resize-or-Raise" Key Up A CM Function "Resize-or-Raise" Key Down A CM Function "Resize-or-Raise" key c R N Exec "xcalc" exec xcalc -geometry -0-0 & key d R N Exec "gdiald" exec gdiald & Key e R N Exec "Emacs" exec emacs & Key f R N Exec "NcFTP" exec xterm -name NcFTP -T NcFTP -e ncftp & Key k R N Exec "kterm" exec kterm & Key m R N Exec "Mule" exec emacs & key n R N Exec "ng" exec kterm -name Ng -T Ng -e ng & key p R N Exec "xppxp" exec xppxp fsi -geometry -70-3& Key t R N Exec "Tgif" exec tgif & key v R N Exec "XMixer" exec xmixer -geometry -0-0 & Key x R N Exec "xv" exec xv & #////////////////////# # モジュールをこずく # #////////////////////# # Pager Configuration -- We have Swallow-ed Pager into the Wharf # Now let's change colors and make labels Module Pager 0 2 *PagerBack #c2aea7 *PagerFore #745553 *PagerFont adobe-helvetica-bold-o-*-*-10-*-*-*-*-*-*-* *PagerHilight #ffeeee *PagerGeometry +1-1 #*PagerColumns 1 *PagerRows 1 *PagerLabel 0 Main *PagerLabel 1 Work *PagerLabel 2 WWW *PagerLabel 3 Mail *PagerSmallFont 5x8 # Start the Audio player #Module Audio # Select your normal audio player #*AudioPlayCmd /usr/bin/showaudio # Select the directory containing your sounds #*AudioDir /home/negi/lib/sound #*AudioDelay 0 # Attach sounds to window manager events...some don't appear to function # as well as they could #*Audio startup startup.wav #*Audio shutdown shutdown.wav #*Audio add_window bong.au #*Audio raise_window drip.au #*Audio lower_window drip.au #*Audio focus_change drip.au #*Audio destroy_window crash.au #*Audio iconify cowbell.au #*Audio deiconify cowbell.au #*Audio toggle_paging fwop.au #*Audio new_page beami.au #*Audio new_desk beam_trek.au #*Audio configure_window huh.au #*Audio window_name bong.au #*Audio icon_name beep.au #*Audio res_class bong.au #*Audio res_name beep.au #*Audio end_windowlist twang.au # qed #Module WinList #------------------------------------------------------------------------ # Tasks list # #*WinListBack Grey60 #*WinListFore #000000 #*WinListFont -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0208.1983-*,-ms-gothic-medium-r-normal--12-*-*-*-*-*-jisx0201.1976-* #*WinListAction Click1 Iconify -1,Focus #*WinListAction Click2 Shade #*WinListAction Click3 Ident #*WinListUseSkipList #*WinListUseIconNames #*WinListGeometry +0-0 # maxwidth for a vertical winlist or actual width for horizontal taskbar #*WinListMaxWidth 589 # down (vertical winlist) or across (horizontal titlebar) ? #*WinListOrientation across #*WinListLeftJustify #*WinListNoAnchor #*WinListBack #bfbfbf #*WinListFore Black #*WinListFont -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-* #*WinListGeometry +1+1 #*WinListUseSkipList #*WinListAction Click1 Iconify -1, Forcus #*WinListAction Click2 Iconify #*WinListAction Click3 Module "Ident" Ident # WinList Module WinList *WinListBack #c4b1ad *WinListFore #553634 *WinListFont -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-* *WinListAction Click1 Iconify -1,Raise *WinListAction Click2 Shade *WinListAction Click3 Module "Ident" Ident *WinListUseSkipList *WinListUseIconNames *WinListGeometry +0+0 # maxwidth for a vertical winlist or actual width for horizontal taskbar *WinListMaxWidth 640 # down (vertical winlist) or across (horizontal titlebar) ? *WinListOrientation across #*WinListLeftJustify #*WinListNoAnchor # Ident *IdentBack #383838 *IdentFore #20b2ae *IdentFont -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*