User talk:Boo radley

;
;  This script will designate a rectangle of stone to be dumped.
;  Invoke while at the top left of the region to be dumped.
;

DetectHiddenWindows, on
Gui, Add, Text,, Rows to dump
Gui, Add, Text,, Cols to dump
Gui, Add, Edit, vRows ym 
Gui, Add, Edit, vCols
Gui, Add, Button, Default, OK
Gui, Add, Button, Default, Cancel
Gui, Show,, Autodumper
Return

;
;  end autoexec.
;
Enter::
GuiClose:
ButtonOK:
	Gui, Submit  ; Save the input from the user to each control's associated variable.

	dir=r
	IfWinExist, Dwarf Fortress ; make sure df is running 
		WinActivate
		Cols--
		loop, %Rows% {
			loop, %Cols% {
				send, d   ; dump
				if (dir == "r") {
					send, {RIGHT}
				} else {
					send, {LEFT}
				}
			}
			send,d  ; one last dump for the tail end of the row
			if (dir=="r") {
				dir = l
			} else {
				dir = r
			}
			send, {DOWN}
		}
	ExitApp
	
Escape::
ButtonCancel:
ExitApp

Messages

Looks pretty impressive! I'll have to try it out later. --Jackard 15:04, 1 January 2008 (EST)