.emacs

 ;; (custom-set-variables
;;   ;; custom-set-variables was added by Custom -- don't edit or cut/paste it!
;;   ;; Your init file should contain only one such instance.
;;  '(case-fold-search t)
;;  '(ecb-options-version "2.32")
;;  ;;'(ecb-source-path (quote ("/root/ylu2/ids_main/bldapps/target/sources/rima/a10web" "/root/ylu2/ids_Lancope/bldapps/target/sources/rima/a10web")))
;;  '(show-paren-mode t nil (paren))
;;  '(transient-mark-mode t))
;; (custom-set-faces
;;   ;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
;;   ;; Your init file should contain only one such instance.
;;  )


(add-to-list 'load-path "/data/setups/emacs/elisp/src/emacs-lisp")

(require 'color-theme)
;; (color-theme-scintilla)

(defun my-color-theme ()
  "Color theme by root, created 2005-07-20."
  (interactive)
  (color-theme-install
   '(my-color-theme
     ((background-color . "white")
      (background-mode . light)
      (border-color . "black")
      (cursor-color . "black")
      (foreground-color . "gray10")
      (mouse-color . "black")
       )
     ((help-highlight-face . underline)
      (list-matching-lines-face . bold)
      (view-highlight-face . highlight)
      (widget-mouse-face . highlight)
       )
;;     (default ((t (:stipple nil :background "white" :foreground "gray20" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 125 :width normal :family "adobe-courier"))))
     (default ((t (:stipple nil :background "gray99" :foreground "gray20" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 125 :width normal :family "adobe-courier"))))
     (bg:erc-color-face0 ((t (:background "White"))))
     (bg:erc-color-face1 ((t (:background "black"))))
     (bg:erc-color-face10 ((t (:background "lightblue1"))))
     (bg:erc-color-face11 ((t (:background "cyan"))))
     (bg:erc-color-face12 ((t (:background "blue"))))
     (bg:erc-color-face13 ((t (:background "deeppink"))))
     (bg:erc-color-face14 ((t (:background "gray50"))))
     (bg:erc-color-face15 ((t (:background "gray90"))))
     (bg:erc-color-face2 ((t (:background "blue4"))))
     (bg:erc-color-face3 ((t (:background "green4"))))
     (bg:erc-color-face4 ((t (:background "red"))))
     (bg:erc-color-face5 ((t (:background "brown"))))
     (bg:erc-color-face6 ((t (:background "purple"))))
     (bg:erc-color-face7 ((t (:background "orange"))))
     (bg:erc-color-face8 ((t (:background "yellow"))))
     (bg:erc-color-face9 ((t (:background "green"))))
     (bold ((t (:bold t :weight bold))))
     (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
     (border ((t (:background "black"))))
     (button ((t (:underline t))))
     (comint-highlight-input ((t (:bold t :weight bold))))
     (comint-highlight-prompt ((t (:foreground "dark blue"))))
     (cursor ((t (:background "black"))))
     (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
     (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
     (custom-changed-face ((t (:background "blue" :foreground "white"))))
     (custom-comment-face ((t (:background "gray85"))))
     (custom-comment-tag-face ((t (:foreground "blue4"))))
     (custom-documentation-face ((t (nil))))
     (custom-face-tag-face ((t (:bold t :weight bold :height 1.2 :family "helv"))))
     (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
     (custom-group-tag-face-1 ((t (:bold t :foreground "red" :weight bold :height 1.2 :family "helv"))))
     (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
     (custom-modified-face ((t (:background "blue" :foreground "white"))))
     (custom-rogue-face ((t (:background "black" :foreground "pink"))))
     (custom-saved-face ((t (:underline t))))
     (custom-set-face ((t (:background "white" :foreground "blue"))))
     (custom-state-face ((t (:foreground "dark green"))))
     (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
     (custom-variable-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2 :family "helv"))))
     (erc-action-face ((t (:bold t :weight bold))))
     (erc-bold-face ((t (:bold t :weight bold))))
     (erc-default-face ((t (nil))))
     (erc-direct-msg-face ((t (:foreground "IndianRed"))))
     (erc-error-face ((t (:background "Red" :foreground "White"))))
     (erc-input-face ((t (:foreground "brown"))))
     (erc-inverse-face ((t (:background "Black" :foreground "White"))))
     (erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold))))
     (erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold))))
     (erc-timestamp-face ((t (:bold t :foreground "green" :weight bold))))
     (erc-underline-face ((t (:underline t))))
     (fg:erc-color-face0 ((t (:foreground "White"))))
     (fg:erc-color-face1 ((t (:foreground "black"))))
     (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
     (fg:erc-color-face11 ((t (:foreground "cyan"))))
     (fg:erc-color-face12 ((t (:foreground "blue"))))
     (fg:erc-color-face13 ((t (:foreground "deeppink"))))
     (fg:erc-color-face14 ((t (:foreground "gray50"))))
     (fg:erc-color-face15 ((t (:foreground "gray90"))))
     (fg:erc-color-face2 ((t (:foreground "blue4"))))
     (fg:erc-color-face3 ((t (:foreground "green4"))))
     (fg:erc-color-face4 ((t (:foreground "red"))))
     (fg:erc-color-face5 ((t (:foreground "brown"))))
     (fg:erc-color-face6 ((t (:foreground "purple"))))
     (fg:erc-color-face7 ((t (:foreground "orange"))))
     (fg:erc-color-face8 ((t (:foreground "yellow"))))
     (fg:erc-color-face9 ((t (:foreground "green"))))
     (fixed-pitch ((t (:family "courier"))))
     ;;(font-lock-builtin-face ((t (:foreground "magenta3" :underline t ))))
     (font-lock-builtin-face ((t (:foreground "magenta3"))))
     ;;(font-lock-comment-face ((t (:italic t :foreground "gray60" :slant oblique :height 0.9))))
     (font-lock-comment-face ((t (:italic t :foreground "gray60" :slant oblique))))
     (font-lock-constant-face ((t (:bold t :foreground "medium purple" :weight bold))))
     (font-lock-doc-face ((t (:foreground "red"))))
     (font-lock-function-name-face ((t (:bold t :foreground "black" :weight bold))))
     (font-lock-keyword-face ((t (:bold t :foreground "blue" :weight bold))))
     (font-lock-string-face ((t (:foreground "red"))))
     (font-lock-type-face ((t (:foreground "Royalblue"))))
     (font-lock-variable-name-face ((t (:bold t :foreground "maroon" :weight bold))))
     (font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold))))
     (fringe ((t (:background "bisque"))))
     (header-line ((t (:background "grey90" :foreground "grey20" :box nil :overline "red" :underline "red"))))
     (highlight ((t (:background "darkseagreen2"))))
     (highline-face ((t (:background "Grey95"))))
     (isearch ((t (:background "magenta2" :foreground "lightskyblue1"))))
     (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
     (italic ((t (:italic t :slant italic))))
     (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
     (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
     (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
     (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
     (jde-java-font-lock-api-face ((t (:foreground "dark goldenrod"))))
     (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
     (jde-java-font-lock-code-face ((t (nil))))
     (jde-java-font-lock-constant-face ((t (:foreground "CadetBlue"))))
     (jde-java-font-lock-doc-tag-face ((t (:foreground "green4"))))
     (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
     (jde-java-font-lock-link-face ((t (:foreground "cadetblue" :underline t :slant normal))))
     (jde-java-font-lock-modifier-face ((t (:foreground "Orchid"))))
     (jde-java-font-lock-number-face ((t (:foreground "RosyBrown"))))
     (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
     (jde-java-font-lock-package-face ((t (:foreground "blue3"))))
     (jde-java-font-lock-pre-face ((t (nil))))
     (jde-java-font-lock-underline-face ((t (:underline t))))
     (menu ((t (nil))))
     (minibuffer-prompt ((t (:foreground "dark blue"))))
     (mode-line ((t (:background "LightSkyBlue1" :foreground "black" :box (:line-width -1 :style released-button) :overline "light blue" :underline "light blue"))))
     (mode-line-inactive ((t (:italic t :background "white" :foreground "cadetblue" :box (:line-width -1 :color "grey75") :overline "red" :underline "red" :slant oblique :weight light))))
     (modeline-buffer-id ((t (:background "dodgerblue" :foreground "black"))))
     (modeline-mousable ((t (:background "dodgerblue" :foreground "black"))))
     (modeline-mousable-minor-mode ((t (:background "dodgerblue" :foreground "black"))))
     (mouse ((t (:background "black"))))
     (primary-selection ((t (:background "lightgoldenrod2"))))
     (region ((t (:background "lightgoldenrod2"))))
     (scroll-bar ((t (:background "seashell1" :foreground "#00ff00"))))
     ;;(scroll-bar ((t (:background "grey75"))))
     (secondary-selection ((t (:background "yellow"))))
     (semantic-dirty-token-face ((t (:background "lightyellow"))))
     (semantic-unmatched-syntax-face ((t (:underline "red"))))
     (senator-intangible-face ((t (:foreground "gray25"))))
     (senator-momentary-highlight-face ((t (:background "gray70"))))
     (senator-read-only-face ((t (:background "#CCBBBB"))))
     (show-paren-match-face ((t (:background "turquoise"))))
     (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
     (speedbar-button-face ((t (:foreground "green4"))))
     (speedbar-directory-face ((t (:foreground "blue4"))))
     (speedbar-file-face ((t (:foreground "cyan4"))))
     (speedbar-highlight-face ((t (:background "green"))))
     (speedbar-selected-face ((t (:foreground "red" :underline t))))
     (speedbar-tag-face ((t (:foreground "brown"))))
     (template-message-face ((t (:bold t :weight bold))))
     (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
     (tooltip ((t (:background "lightyellow" :foreground "black"))))
     (trailing-whitespace ((t (:background "red"))))
     (underline ((t (:underline t))))
     (variable-pitch ((t (:family "helv"))))
     (widget-button-face ((t (:bold t :weight bold))))
     (widget-button-pressed-face ((t (:foreground "red"))))
     (widget-documentation-face ((t (:foreground "dark green"))))
     (widget-field-face ((t (:background "gray85"))))
     (widget-inactive-face ((t (:foreground "dim gray"))))
     (widget-single-line-field-face ((t (:background "gray85"))))
     (zmacs-region ((t (:background "lightgoldenrod2"))))
     (font-lock-outline1-name-face ((t (:bold t :foreground "#0000B0" :weight bold))))
     (font-lock-outline2-name-face ((t (:bold t :foreground "#0000C0" :weight bold))))
     (font-lock-outline3-name-face ((t (:bold t :foreground "#0000D0" :weight bold))))
     (font-lock-outline4-name-face ((t (:bold t :foreground "#0000E0" :weight bold))))
     (font-lock-outline5-name-face ((t (:bold t :foreground "#0000F0" :weight bold))))
     (font-lock-outline6-name-face ((t (:bold t :foreground "#0000FF" :weight bold))))
     (font-lock-outline7-name-face ((t (:bold t :foreground "#0000FF" :weight bold))))
     (font-lock-outline8-name-face ((t (:bold t :foreground "#0000FF" :weight bold))))
     (font-lock-outline9-name-face ((t (:bold t :foreground "#0000FF" :weight bold))))
)))


(my-color-theme)
(set-face-foreground 'menu "black")
;; (set-face-background 'menu "navy")


(column-number-mode t)


(transient-mark-mode t)


(show-paren-mode t)


(tool-bar-mode -1)


(setq visible-bell t)


;;(setq default-tab-width 4)
(setq-default indent-tabs-mode nil)
;;(setq tab-stop-list ())
;; (loop for x downfrom 40 to 1 do (setq tab-stop-list (cons (* x 4) tab-stop-list)))

(display-time)


;; (fset 'yes-or-no-p 'y-or-n-p)


;; (setq-default make-backup-files nil)


;; (setq mouse-yank-at-point t)

;; (mouse-wheel-mode)


(setq scroll-step 1
      scroll-margin 3
      scroll-conservatively 10000)


(setq default-major-mode 'text-mode)


;; (global-font-lock-mode t)


;;(global-set-key "/C-b" 'other-window)


;; ;; Load CEDET
;; (load-file "/data/setups/emacs/elisp/cedet-1.0pre3/common/cedet.el")
;; ;; Enabling various SEMANTIC minor modes. See semantic/INSTALL for more ideas.
;; ;; Select one of the following;
;; (semantic-load-enable-code-helpers)
;; ;; (semantic-load-enable-guady-code-helpers)
;; ;; (semantic-load-enable-excessive-code-helper)

;; (add-to-list 'load-path
;;          "/data/setups/emacs/elisp/ecb-2.32/")
;; (load-file "/data/setups/emacs/elisp/ecb-2.32/ecb.el")
;; (require 'ecb)
;; (require 'ecb-autoloads)


;; Misc
(global-set-key [C-tab] "/C-q/t")   ; Control tab quotes a tab.
(setq backup-by-copying-when-mismatch t)


;; ;; locale coding
;; (setq locale-coding-system'utf-8)
;; (prefer-coding-system'utf-8)
;; (set-keyboard-coding-system'utf-8)
;; (set-terminal-coding-system'utf-8)
;; (set-selection-coding-system'utf-8)
;; (set-clipboard-coding-system 'ctext)
;; (set-buffer-file-coding-system 'utf-8)


(require 'tabbar)
(tabbar-mode)
   (global-set-key "/C-f" 'tabbar-forward)
   (global-set-key "/C-b" 'tabbar-backward)
   (global-set-key "/C-v" 'tabbar-forward-group)


(require 'xcscope)


;; for iiimf chinese input
;;(add-to-list 'load-path "/usr/share/emacs/site-lisp/iiimf")
;;(setq iiimcf-server-control-hostlist '("unix/:9010"))
;;  (setq default-input-method 'iiim-server-control)
;;  (require 'iiimcf-sc)


;; Load CEDET
;;ppp(load-file "~/cedet-VERSION/common/cedet.el")

;; Enabling various SEMANTIC minor modes.  See semantic/INSTALL for more ideas.
;; Select one of the following
;;ppp(load-file "~/cedet-VERSION/common/cedet.el")
;;ppp(setq semanticdb-project-roots
;;ppp      (list
;;ppp        (expand-file-name "/root/ylu2/ids_main/bldapps/target/sources/rima/a10web/")))
;;ppp(semantic-load-enable-code-helpers)
;; (semantic-load-enable-guady-code-helpers)
;; (semantic-load-enable-excessive-code-helpers)
;;(setq semanticdb-project-roots
;;      (list
;;       (expand-file-name "/root/ylu2/ids_main/bldapps/target/sources/rima/a10web/")))

;; Enable this if you develop in semantic, or develop grammars
;; (semantic-load-enable-semantic-debugging-helpers)


;; for comment - #if 0
;;(autoload 'comment-out-region "comment" nil t)
;;(global-set-key "/C-cq" 'comment-out-region)


;; Javascript mode
;;(autoload 'javascript-mode "javascript-mode" "JavaScript mode" t)
;;(setq auto-mode-alist (append '(("//.js$" . javascript-mode))
;;                   auto-mode-alist))

;;(setq auto-mode-alist (append '(("//.js$" . c-mode)) auto-mode-alist))



;; Set font
;;(set-default-font "-Misc-Fixed-Medium-R-Normal--13-120-75-75-C-70-ISO8859-1")


;; vvvvvvvvvvvvvvvvvvvvvvvvvvv
;;(prefer-coding-system 'utf-8)

(setq face-medium-str "-wenquanyi-wenquanyi bitmap song-medium-r-normal--15-150-75-75-p-80-iso10646-1")

;; ---- ;; "-wenquanyi-wenquanyi bitmap song-medium-r-normal--14-130-75-75-p-80-iso10646-1")

(setq face-medium
      (create-fontset-from-fontset-spec
         (concat
          "-*-fixed-medium-r-normal-*-13-*-*-*-c-*-fontset-facemedium"
          ",chinese-gb2312:" face-medium-str
          ",chinese-big5-1:" face-medium-str
          ",chinese-big5-2:" face-medium-str
          ",chinese-sisheng:" face-medium-str
          ",chinese-cns11643-1:" face-medium-str
          ",chinese-cns11643-2:" face-medium-str
          ",chinese-cns11643-3:" face-medium-str
          ",chinese-cns11643-4:" face-medium-str
          ",chinese-cns11643-5:" face-medium-str
          ",chinese-cns11643-6:" face-medium-str
          ",chinese-cns11643-7:" face-medium-str
          ",japanese-jisx0208-1978:" face-medium-str
          ",japanese-jisx0208:" face-medium-str
          ",japanese-jisx0212:" face-medium-str
          ",japanese-jisx0213-1:" face-medium-str
          ",japanese-jisx0213-2:" face-medium-str)))

(defun setallfontsets ()
    (set-default-font face-medium))

(add-to-list 'after-init-hook 'setallfontsets);

(add-to-list 'after-make-frame-functions
             (lambda (new-frame) (select-frame new-frame) (setallfontsets)))


;; Auto fill
;; (global-set-key [menu] 'semantic-ia-complete-symbol-menu)

;; ;; html mode
;; (require 'html-helper-mode)
;; (autoload 'html-helper-mode "html-helper-mode" "Yay HTML" t)
;; (setq auto-mode-alist (cons '("//.html$" . html-helper-mode) auto-mode-alist))
;; (setq auto-mode-alist (cons '("//.asp$" . html-helper-mode) auto-mode-alist))
;; (setq auto-mode-alist (cons '("//.phtml$" . html-helper-mode) auto-mode-alist))

;; css mode
(require 'css)
(add-hook 'html-helper-load-hook  (function (lambda () (load "css.el"))))
(autoload 'css-mode "css-mode")
(setq auto-mode-alist (cons '("//.css//'" . css-mode) auto-mode-alist))


;; image view
;;(require 'thumbs)


;; Display tab
(require 'tab-display)


;;
;;(require 'comment)


(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(outline-regexp "[_]+"))