//Bonfire macro v1.6a
//written by Helpmaboab, 27th march 2005

//set up cartographers view, fully zoomed in, pin bonfire window in upper right corner before starting

//makes an array of bonfires in cartographer view (set rows and columns variables in lines 12 & 13)


constants  //set constants
	x1 = 300 // top left x-coord of search grid
	y1 = 200 // top left y-coord of search grid
	xpos = 0 //mousepos during search
	ypos = 0
	rows = 4
	columns = 4
	countx = 0
	rightx = 0
	down = -5
	leftx=412
	getx = 935
	gety = 587
	winx = 119
	winy = 40
	unx = 592
	uny = 46
end


mousepos 500,20
leftclick
delay 500



loop $rows //number of rows
	compute down = $down+5
		loop $columns //number of columns
			call plantbonfire
			compute rightx = $rightx+5
			call moveright //sets bonfires 5 coords apart on x axis
			call movedown //sets rows 5 coords apart on y axis
			MousePos 29, 163
			delay 1000
			leftclick
			delay 500
		end
	Set RIGHTX = 0		
end	
MousePos 763, 542
delay 500
leftclick
delay 2000



procedure plantbonfire
	MousePos 965, 36
	delay 250
	leftclick
	delay 500
	keyascii 50 //2 wood bonfire
	MousePos 585, 409
	delay 500
	leftclick
	delay 1000
end
	
procedure moveright
	MousePos 83, 101
	 loop $rightx
	 	leftclick
	 	delay 100
	 end	
end	 

procedure movedown
	MousePos 59, 122
	loop $down
		leftclick
		delay 100
	end
end