Warning: this is an htmlized version!
The original is across this link,
and the conversion rules are here.
#######
#
# E-scripts on (installing my environment on) W32.
#
# Note 1: use the eev command (defined in eev.el) and the
# ee alias (in my .zshrc) to execute parts of this file.
# Executing this file as a whole makes no sense.
#
# Note 2: be VERY careful and make sure you understand what
# you're doing.
#
# Note 3: If you use a shell other than zsh things like |&
# and the for loops may not work.
#
# Note 4: I always run as root.
#
# Note 5: some parts are too old and don't work anymore. Some
# never worked.
#
# Note 6: the definitions for the find-xxxfile commands are on my
# .emacs.
#
# Note 7: if you see a strange command check my .zshrc -- it may
# be defined there as a function or an alias.
#
# Note 8: the sections without dates are always older than the
# sections with dates.
#
# This file is at <http://angg.twu.net/e/w32.e>
#           or at <http://angg.twu.net/e/w32.e.html>.
#        See also <http://angg.twu.net/emacs.html>,
#                 <http://angg.twu.net/.emacs[.html]>,
#                 <http://angg.twu.net/.zshrc[.html]>,
#                 <http://angg.twu.net/escripts.html>,
#             and <http://angg.twu.net/>.
#
#######





# See:
# http://angg.twu.net/w32.html
# (find-anggfile "TH/w32.blogme")



# «.downloads»			(to "downloads")
# «.mkdirs»			(to "mkdirs")
# «.moves»			(to "moves")
# «.eepaste-one-line»		(to "eepaste-one-line")
# «.eshell-mvs»			(to "eshell-mvs")
# «.eshell-7zip»		(to "eshell-7zip")
# «.eshell-unxutils»		(to "eshell-unxutils")
# «.eshell-edrx.tgz»		(to "eshell-edrx.tgz")
# «.putty»			(to "putty")
# «.2008jan18»			(to "2008jan18")
# «.EmacsW32»			(to "EmacsW32")
# «.dns»			(to "dns")
# «.emacs-for-windows-2012»	(to "emacs-for-windows-2012")
# «.filezilla»			(to "filezilla")
# «.mingw»			(to "mingw")



;; If edrx.tgz is already unpacked, use this:
;;
(progn
  (setenv "HOME" "c:/home/edrx")
  (add-to-list 'load-path "/home/edrx/")
  (load ".emacs")
  )




#####
#
# Downloads: Emacs, 7-zip, UnxUtils, edrx.tgz
# 2007aug27
#
#####

# «downloads»  (to ".downloads")

# Lennart Borgman's w32 builds:
# http://ourcomments.org/Emacs/EmacsW32.html
# http://ourcomments.org/Emacs/EmacsW32.html#download
# http://ourcomments.org/cgi-bin/emacsw32-dl-latest.pl

# 7-zip:
# http://www.7-zip.org/
# http://ufpr.dl.sourceforge.net/sourceforge/sevenzip/7z442.exe

# UnxUtils:
# http://unxutils.sourceforge.net/
# http://sourceforge.net/projects/unxutils/
# http://sourceforge.net/project/showfiles.php?group_id=9328
# http://ufpr.dl.sourceforge.net/sourceforge/unxutils/UnxUtils.zip

# edrx.tgz:
# http://angg.twu.net/edrx.tgz




#####
#
# Emacs, 7-zip, UnxUtils, edrx.tgz (unpacking)
# 2007aug27
#
#####

# «mkdirs»  (to ".mkdirs")
# Usually I run this by hand on a "cmd" window...
# The "eepitch"es are for testing from inside Emacs.
# (eepitch-kill)
# (eepitch-comint "cmd" "cmd")
#
mkdir \home\
mkdir \home\emacs\
mkdir \home\edrx\
mkdir \home\zip\
mkdir \home\7zip\
mkdir \home\unxutils\

# «moves»  (to ".moves")
# (find-file "c:")
# (find-file "c:/Documents and Settings/")
# (find-file "c:/Documents and Settings/desenvolvedores/Desktop/")
# (eepitch-kill)
# (eepitch-comint "cmd" "cmd")
#
cd "c:\Documents and Settings\desenvolvedores\Desktop"
cd c:\home\edrx
move Emacs-22-CvsP070523-EmacsW32-1.54.exe c:\home\zip
move 7z442.exe    c:\home\zip
move UnxUtils.zip c:\home\zip
move edrx.tgz     c:\home\zip

rem «emacs0»

cd c:\home\zip
rem install Emacs on /home/emacs...
.\Emacs-22-CvsP070523-EmacsW32-1.54.exe

rem -----------------------
rem At this point we should have a running Emacs,
rem and we can run the rest from it...




#####
#
# eepaste-one-line
# 2007aug27
#
#####

;; «eepaste-one-line»  (to ".eepaste-one-line")
;; (find-efunction 'eepaste-one-line)
;; (find-eev "eev-mini-steps.el" "eepaste-one-line")
;; (global-set-key "\M-P" 'eepaste-one-line)
;;
(defun eepaste-one-line ()
 "Paste (yank) the first line of the top of the kill-ring here and do a RET."
 (interactive)
 (let ((bigstr (car kill-ring)))
  (if (equal bigstr "") (error "No more lines"))
  (string-match "^\\([^\n]*\\)\\(\n\\|$\\)" bigstr)
  (let ((line (match-string 1 bigstr))           ; first line from the kill
        (rest (substring bigstr (match-end 0)))) ; rest of the kill
    (if (string-match "^ \\(.*\\)" line)         ; lines with a red star
        (ee-eval-string (match-string 1 line))   ; are eval'ed
      (insert line)                              ; other lines are "typed"
      (call-interactively (key-binding "\r")))   ; and then we do a RET
    (setcar kill-ring rest))))                   ; remove the first line



#####
#
# Installing 7-Zip and UnxUtils from Emacs
# 2007aug29
#
#####

# «eshell-mvs»  (to ".eshell-mvs")
# (eepitch-eshell)
# (execute-kbd-macro (kbd "C-x 1 C-x 2 C-x o <<eshell>> C-x o") 1)

cd "c:/Documents and Settings/desenvolvedores/Desktop/"
mv -iv Emacs-22-CvsP070523-EmacsW32-1.54.exe /home/zip/
mv -iv 7z442.exe    /home/zip/
mv -iv UnxUtils.zip /home/zip/
mv -iv edrx.tgz     /home/zip/

# (find-fline "c:/home/7zip/")
# (find-fline "c:/home/unxutils/")
# (find-fline "c:/home/edrx/")

# «eshell-7zip»  (to ".eshell-7zip")
# (find-file "/home/zip/")
#
mkdir                /home/7zip/
rem install 7-Zip on /home/7zip ...
cd /home/zip/
./7z442.exe

# «eshell-unxutils»  (to ".eshell-unxutils")
# (find-file "/home/unxutils/")
#
mkdir /home/unxutils/
cd    /home/unxutils/
../7zip/7z.exe
../7zip/7z.exe x -y ..\zip\UnxUtils.zip
cd    /home/unxutils/usr/local/wbin/
mv -iv * ../../../




#####
#
# downloading and unpacking edrx.tgz from Emacs
# 2007aug29
#
#####

# «eshell-edrx.tgz»  (to ".eshell-edrx.tgz")
# (eepitch-eshell)
# (execute-kbd-macro (kbd "C-x 1 C-x 2 C-x o <<eshell>> C-x o") 1)

cd /home/zip/
mv -v edrx.tgz edrx-old.tgz
# ../unxutils/wget       http://angg.twu.net/edrx.tgz
  ../unxutils/wget http://192.168.51.40/TH/L/edrx.tgz

cd /home/zip/
mv -v         edrx.tgz edrx-tar.gz
../unxutils/gunzip.exe edrx-tar.gz
mv -v                  edrx-tar    edrx.tar

mkdir /home/edrx/
cd    /home/edrx/
../unxutils/tar.exe -xvf    ../zip/edrx.tar






#####
#
# Notes for a batch to run Emacs with the right settings
# 2007aug29
#
#####

# (find-enode "Windows HOME")
# (find-fline "~/TH/")
# (find-fline "~/TH/w32.blogme")
# (find-fline "~/4NT/")
# (find-fline "~/4NT/4start.btm")
# http://angg.twu.net/w32.html

# (find-fline "~/4NT/4start.btm")
alias ae=c:\edrx\emacs\bin\emacs -fg bisque -bg black %HOME/NOTES

# (find-fline "c:/home/emacs/emacs/bin/emacs.exe")
# (find-fline "c:/home/emacs/emacs/bin/_emacs")

# (find-fline "/home/eemacs.bat")
# (find-fline "c:/home/emacs/emacs/bin/_emacs")

# http://www.jpsoft.com/







#####
#
# 
#
#####

# (getenv "HOME")
# (setenv "HOME" "c:/home/edrx")
# (find-fline "~/")
# (find-file  "c:/Documents and Settings/tatiana/Desktop/")
# (setenv "D" "c:/Documents and Settings/tatiana/Desktop")
# (find-fline "$D/")

(getenv "PATH")
# (find-angg ".emacs.local.w32")
# (find-fline "/home/zip/")
# (find-file  "c:/Documents and Settings/tatiana/Desktop/")
# (setenv "D" "c:/Documents and Settings/tatiana/Desktop")
# (find-fline "$D/")

(progn
  (setenv "HOME" "c:/home/edrx")
  (add-to-list 'load-path "/home/edrx/")
  (load ".emacs")
  )

# (find-fline "c:/home/emacs/EmacsW32/lisp/emacsw32-custom.el")





#####
#
# putty (from the source, on unix, for testing tramp)
# 2008jan18 / 2012may23
#
#####

# «putty»  (to ".putty")
# http://www.chiark.greenend.org.uk/~sgtatham/putty/download.html
# http://the.earth.li/~sgtatham/putty/latest/x86/putty-0.62-installer.exe

# (find-node "(tramp)Inline methods" "`plink'")
# (find-efile "net/")
# (find-egrep "grep -nH -e plink net/tramp*")
# http://the.earth.li/~sgtatham/putty/latest/putty-0.60.tar.gz
#*
rm -Rv ~/usrc/putty-0.60/
tar -C ~/usrc/ -xvzf \
  $S/http/the.earth.li/~sgtatham/putty/latest/putty-0.60.tar.gz
cd     ~/usrc/putty-0.60/

cd     ~/usrc/putty-0.60/unix/
./configure |& tee oc
make        |& tee om

#*
# (code-c-d "puttysrc" "~/usrc/putty-0.60/")
# (find-puttysrcfile "")

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
cd      ~/usrc/putty-0.60/unix/
./plink -ssh edrx@caramelo

cd ~/bin/
ln -sf ../usrc/putty-0.60/unix/plink .

plink -ssh edrx@caramelo
exit
plink

http://zumbi/
http://zumbi/software/




#####
#
# Notes, 2008jan18
#
#####

# «2008jan18»  (to ".2008jan18")
# (find-angg "4NT/")
# (find-angg "4NT/4start.btm")

# Lennart Borgman's w32 builds:
# http://ourcomments.org/Emacs/EmacsW32.html
# http://ourcomments.org/Emacs/EmacsW32.html#download
# http://ourcomments.org/cgi-bin/emacsw32-dl-latest.pl

# Official builds (2010jan20):
# http://www.gnu.org/software/emacs/#Obtaining
# http://www.emacswiki.org/emacs/CategoryWThirtyTwo
# http://www.emacswiki.org/emacs/CategoryPorts
#   ftp://ftp.gnu.org/gnu/emacs/windows/README
#   ftp://ftp.gnu.org/gnu/emacs/windows/emacs-23.1-bin-i386.zip
#
# «EmacsW32»  (to ".EmacsW32")
#  (find-es "wine" "EmacsW32")
# http://www.emacswiki.org/emacs/EmacsW32
# http://ourcomments.org/Emacs/EmacsW32.html
# http://ourcomments.org/Emacs/DL/EmacsW32/EmacsCVS/ptch/
# http://ourcomments.org/Emacs/DL/EmacsW32/EmacsCVS/ptch/Emacs-23-CvsP091103-EmacsW32-1.58.exe
# http://ourcomments.org/Emacs/DL/EmacsW32/EmacsCVS/ptch/readme-CvsP091103.txt

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
cd $S/http/ourcomments.org/Emacs/DL/EmacsW32/EmacsCVS/ptch/
wine Emacs-23-CvsP091103-EmacsW32-1.58.exe
# (find-fline "~/.wine/")
# (find-fline "~/.wine/drive_c/home/emacs/")
# (find-fline "~/.wine/drive_c/home/emacs/EmacsW32/")
# (find-fline "~/.wine/drive_c/home/emacs/emacs/")
#   C:\Program Files\Emacs
#   C:\home\emacs

# (find-sh "cd ~/.wine/ && find | sort")
# (find-sh "rm -Rfv ~/.wine/")



# http://www.emacswiki.org/emacs/PrintWithWebBrowser

# 7-zip:
# http://www.7-zip.org/
# http://ufpr.dl.sourceforge.net/sourceforge/sevenzip/7z442.exe

# UnxUtils:
# http://unxutils.sourceforge.net/
# http://sourceforge.net/projects/unxutils/
# http://sourceforge.net/project/showfiles.php?group_id=9328
# http://ufpr.dl.sourceforge.net/sourceforge/unxutils/UnxUtils.zip

# edrx.tgz:
# http://angg.twu.net/edrx.tgz

# http://www.chiark.greenend.org.uk/~sgtatham/putty/
# http://www.chiark.greenend.org.uk/~sgtatham/putty/download.html
# http://the.earth.li/~sgtatham/putty/latest/x86/putty-0.60-installer.exe

# start -> program -> cmd
# iniciar -> executar -> cmd

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)

mkdir c:\home
cd      \home
mkdir zip
mkdir emacs
mkdir 7zip
mkdir 4NT
mkdir unxutils
mkdir putty




#####
#
# Getting the DNS IPs on w32
# 2010feb24
#
#####

# «dns»  (to ".dns")
# netsh is useless.

ipconfig /all





#####
#
# Emacs for Windows (2012)
# 2012apr27
#
#####

# «emacs-for-windows-2012»  (to ".emacs-for-windows-2012")
# http://www.gnu.org/software/emacs/emacs.html#Obtaining
# http://www.gnu.org/software/emacs/emacs.html
# http://ftp.gnu.org/pub/gnu/emacs/windows/
# http://ftp.gnu.org/pub/gnu/emacs/windows/emacs-23.4-bin-i386.zip
# http://ftp.gnu.org/pub/gnu/emacs/windows/emacs-24.3-bin-i386.zip
# (find-pen-links)

* (eepitch-shell)
mkdir /tmp/pen/
sudo mount -o uid=$UID         /dev/sdb1 /tmp/pen/
sudo mount -o uid=$UID         /dev/sdc1 /tmp/pen/
# (find-fline "/tmp/pen/")

cd $S/http/ftp.gnu.org/pub/gnu/emacs/windows/
cp -v emacs-23.4-bin-i386.zip /tmp/pen/

cd $S/http/the.earth.li/~sgtatham/putty/latest/x86/
cp -v putty-0.62-installer.exe /tmp/pen/

cd $S/http/luaforwindows.googlecode.com/files/
cp -v LuaForWindows_v5.1.4-45.exe /tmp/pen/
cp -v vcredist_x86.exe            /tmp/pen/

sudo umount /tmp/pen




#####
#
# FileZilla
# 2012may23
#
#####

# «filezilla»  (to ".filezilla")
# http://filezilla-project.org/
# http://wiki.filezilla-project.org/Documentation
# http://wiki.filezilla-project.org/Command-line_arguments_(Client)
# (find-status   "filezilla")
# (find-vldifile "filezilla.list")
# (find-udfile   "filezilla/")
# (find-man "1 fzputtygen")
# (find-man "1 filezilla")
# (find-man "1 fzsftp")

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
filezilla




#####
#
# MinGW
# 2012may27
#
#####

# «mingw»  (to ".mingw")
# (find-zsh "availabledebs | sort | grep mingw")
# (find-available "gcc-mingw32")
# (find-available "mingw-w64")
# (find-available "mingw32-binutils")
# (find-available "mingw32-ocaml")
# (find-available "mingw32-runtime")
# (find-available "mingw32")
# (find-status   "mingw32")
# (find-vldifile "mingw32.list")
# (find-udfile   "mingw32/")
# (find-node "(gcc)Target Options")
# (find-gccnode "Target Options")
# (find-gccnode "i386 and x86-64 Windows Options" "`-mconsole'")


# (find-es "lua5" "install-5.1.4")

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
rm -Rv ~/usrc/mingw/
mkdir  ~/usrc/mingw/
tar -C ~/usrc/mingw/ -xvzf $S/http/www.lua.org/ftp/lua-5.1.4.tar.gz
cd     ~/usrc/mingw/lua-5.1.4/
make CC=i586-mingw32msvc-gcc mingw   |& tee om

(code-c-d "mingwlua" "~/usrc/mingw/lua-5.1.4/")
;; (find-mingwluafile "")
# (find-mingwluafile "Makefile")
# (find-mingwluafile "src/Makefile")



# http://wiki.njh.eu/Cross_Compiling_for_Win32

http://ss64.com/nt/




Winapi (for Lua):
http://stevedonovan.github.com/winapi/
http://stevedonovan.github.com/winapi/api.html

http://en.wikipedia.org/wiki/Windows_PowerShellShareWindows



http://nsis.sourceforge.net/Main_Page






#  Local Variables:
#  coding:               raw-text-unix
#  modes:                (fundamental-mode emacs-lisp-mode)
#  ee-delimiter-hash:    "\n#*\n"
#  ee-delimiter-percent: "\n%*\n"
#  ee-anchor-format:     "«%s»"
#  End: