Emacs eye candy

I'm looking to customize emacs in confortable work space.
But i'm not a lisp programmator and i'm not know emacs in deep.

I'm looking for nice font, syntax highlight (scite, kate, editplus),
directory tree (optional), list of functions in a file.

I have not much time to spend to configuring emacs very fine.
I have a lot of work to do!!!
I'd like use emacs and learn it day after day because it is very
extensible.

I looking for a good configuration file and advises plugin to hava a
confortable emacs to programming in php, html, c , java (optional)
otherwise i have to use an other editor (like editplus for linux)

This is my .emacs:
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; GENERALE
;;
;;path plugin ( add dir to load-path)
(add-to-list 'load-path "~/emacs-mode")

;; make text mode the default mode for new buffer
;; turn on auto fill mode automatically in text mode
(setq default-major-mode 'c-mode)
(add-hook 'text-mode-hook 'turn-on-auto-fill)

;; corrispondenza parentesi (parentheses highlighting)
(show-paren-mode 1)
(setq blink-matching-paren t)
;; highlight during query
(setq query-replace-highlight t)
;; highlight incremental search
(setq search-highlight t)

;; imposta lunghezza riga (line length is 95 chars)
(setq fill-column 120)
(setq-default comment-coulumn 120)

;; risposte brevi (make things more consistent, yes and y)
(fset 'yes-or-no-p 'y-or-n-p)

;; display line and column
(setq-default line-number-mode t)
(setq-default column-number-mode t)
;; display time
(setq display-time-24hr-format t)
(display-time)

;; define offset
(setq c-basic-offset 2)

;;abilita tab
;;manualmente C-q TAB
(global-set-key (kbd "TAB") 'self-insert-command); #ineverymode
;;(define-key cc-mode (kbd "TAB") 'self-insert-command); # only in text-mode








;;ampiezza tabulazione (tab width)
(setq-default tab-width 8)
;; treat tab as space from now on

;;intentazione (non usare i tab)
;; The use of setq-default means this only affects modes that don't
;; overwrite this setting.
(setq indent-tabs-mode nil)

(setq c-default-style "bsd"
c-basic-offset 4)


;; Use F1 to get man page help
(global-set-key [(f1)] (lambda () (interactive) (manual-entry (current-word))))

;; Supress the GNU startup message
(setq inhibit-startup-message t)

;; Turn off the menu bar
;;(menu-bar-mode -1)

;; Turn off the scroll bar
;;(scroll-bar-mode -1)

;; Make the buffer re-highlight when we recenter
(global-set-key "\C-\\" 'hilit-highlight-buffer)
(global-set-key "\C-l" 'recenter)

;; Get backspace key to work properly on many machines.
;;(setq term-setup-hook
;; '(lambda()
;; (setq keyboard-translate-table "\C-@\C-a\C-b\C-c\C-d\C-e\C-f\C-g\C-?")
;; (global-set-key "\M-h" 'help-for-help)))

;; No tabs-- use spaces when indenting (doesn't affect Makefiles,
;; does affect text files and code, doesn't affect existing tabs).
(setq-default indent-tabs-mode nil)

;; get C and C++ editting to work on the proper files
(setq auto-mode-alist
(append '(("\\.c$" . c-mode)
("\\.h$" . c++-mode)
("\\.C$" . c++-mode)
("\\.c[+][+]$" . c++-mode))
auto-mode-alist))

;; give us perl editting features on .pl files (instead of prolog)
;;(load-file "/usr/gnu/lib/emacs/19.22/lisp/perl-mode.el")
;(setq auto-mode-alist
; (append '(("\\.pl$" . perl-mode))
; auto-mode-alist))

;; make a shortcut for the goto-line function
(global-set-key [?\C-1] 'goto-line)

(add-hook 'comint-output-filter-functions 'shell-strip-ctrl-m)

(setq font-lock-maximum-decoration t)
(global-font-lock-mode t)


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;FONT E COLORI
; selection
(transient-mark-mode 1) ; show selections
(set-face-foreground 'region "white")
(set-face-background 'region "Navy")

; status bar
(set-face-foreground 'modeline "black") ; status bar
(set-face-background 'modeline "grey")

(set-background-color "white")
(set-foreground-color "black")

(set-face-foreground 'highlight "DarkGreen") ; hyperlink
(set-face-background 'highlight "white") ; hyperlink

;;commento
(set-face-foreground 'font-lock-comment-face "DarkGreen")
;;variabile
(set-face-foreground 'font-lock-variable-name-face "Brown")
;;stringa
(set-face-foreground 'font-lock-string-face "DarkOrchid")
;;keyword
(set-face-foreground 'font-lock-keyword-face "blue")

;;costante ??
(set-face-foreground 'font-lock-function-name-face "Navy")
(set-face-foreground 'font-lock-type-face "Red")

;; selezione font (my preferite font (require jmk font))
(set-face-font 'menu "-jmk-neep alt-medium-r-*-*-20-*-*-*-c-*-iso8859-1")
(set-face-font 'default "-jmk-neep alt-medium-r-*-*-20-*-*-*-c-*-iso8859-1")



(defun unixify ()
"Convert to unix linefeeds only."
(interactive)
'(untabify (point-min) (point-max))
(set-buffer-file-coding-system (quote undecided-unix) nil))

(global-set-key "\M-\C-m" 'unixify)
(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.
'(coding-system-for-write (quote undecided-unix) t)
'(column-number-mode t)
'(default-buffer-file-coding-system (quote undecided-unix) t)
'(ecb-directories-menu-user-extension-function nil)
'(ecb-history-menu-user-extension-function nil)
'(ecb-methods-menu-user-extension-function nil)
'(ecb-options-version "2.27")
'(ecb-sources-menu-user-extension-function nil)
'(require-final-newline (quote ask))
'(speedbar-frame-parameters (quote ((minibuffer) (width . 20) (border-width . 0) (menu-bar-lines . 0) (tool-bar-lines . 0) (unsplittable . t) (set-background-color "black")))))

;; Show buffer in window title
(setq frame-title-format "%b - Emacs")


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;PLUGIN
;; swbuff -- buffer switching utility (sf.net/projects/emhacks)
;;
(defun swbuff-set-keys ()
"Define keyboard shortcut \[M-right] for `swbuff-switch-to-next-buffer' and
[M-left] for `swbuff-switch-to-previous-buffe r'."
(global-set-key [M-right] 'swbuff-switch-to-next-buffer)
(global-set-key [M-left] 'swbuff-switch-to-previous-buffer))
(setq swbuff-load-hook '(swbuff-set-keys))
(require 'swbuff)

;; SHELL MODE
;; strip away those ***
(add-hook 'comint-output-filter-functions 'comint-strip-ctrl-m)
;; send invisble word for password in shell
(add-hook 'comint-output-filter-functions
'comint-watch-for-password-prompt)
(setq explicit-shell-file-name "bash")
(setq shell-file-name explicit-shell-file-name)
(setq comint-completion-addsuffix t)



;;zoom in/out font
;(require zoom-frm)

(local-set-key (kbd "RET") (function newline-and-indent))
(local-set-key (kbd "TAB") (lambda ()
(interactive)
(funcall indent-line-function)))







.