The Wiki for Tale 4 is in read-only mode and is available for archival and reference purposes only. Please visit the current Tale 11 Wiki in the meantime.

If you have any issues with this Wiki, please post in #wiki-editing on Discord or contact Brad in-game.

Difference between revisions of "HikahiStuff"

From A Tale in the Desert
Jump to navigationJump to search
m
m
Line 3: Line 3:
 
// barley
 
// barley
 
// 2 rows of 5
 
// 2 rows of 5
// waters each to full
+
// waters each bed to full
// waters 6 more times
+
// keeps water topped up for a set time
 
// harvests - should produce 2 barley
 
// harvests - should produce 2 barley
 
// MUST HAVE CHAT MINIMIZED AND 'use arrow keys to move' ENABLED FOR THIS MACRO TO WORK
 
// MUST HAVE CHAT MINIMIZED AND 'use arrow keys to move' ENABLED FOR THIS MACRO TO WORK
// takes 90 water in jugs per round so best be near to a water source
+
// cartographer view zoomed all the way in
// made for resolution XXX by XXX
+
// must be standing on grass with the ability to gather water
// taskbar hidden
+
// made for resolution 1920 by 1200
 +
// windows taskbar hidden
  
 
constants
 
constants

Revision as of 18:34, 13 March 2009


// barley
// 2 rows of 5
// waters each bed to full
// keeps water topped up for a set time
// harvests - should produce 2 barley
// MUST HAVE CHAT MINIMIZED AND 'use arrow keys to move' ENABLED FOR THIS MACRO TO WORK
// cartographer view zoomed all the way in
// must be standing on grass with the ability to gather water
// made for resolution 1920 by 1200
// windows taskbar hidden

constants
coordMod = 200
watering = 0
red = 6
green = 6
blue = 253
blue2 = 252
end


loop 20
call moveR
	call bed1
	
call moveR
	call bed2
	
call moveR
	call bed3
	
call moveR
	call bed4
	
call moveR
	call bed5

call moveD

call moveL
	call bed6

call moveL
	call bed7
	
call moveL
	call bed8

call moveL
	call bed9

call moveL
	call bed10
	
call watergather

loop 6
	call watercheck	
end

	call watergather


loop 6
	call watercheck	
end

	call watergather


loop 6
	call watercheck	
end

	call watergather


loop 6
	call watercheck	
end

	call watergather


loop 6
	call watercheck	
end

	call watergather


loop 6
	call watercheck	
end


	
call harvest
delay 100

call closewindows
delay 100	

call moveU
	
// water button 1	
///MousePos 1060, 195
// water bar 1
///MousePos 1038, 195
// harvest button 1
///MousePos 974, 260
// rightclick here to close 1
///MousePos 910, 137

end

procedure watergather
delay 100
MousePos 1701, 40
delay 100
leftclick
delay 100
MousePos 959, 652
delay 100
leftclick
delay 100

end

procedure harvest

MousePos 974, 250
delay 100
leftclick
delay 100
MousePos 1174, 250
delay 100
leftclick
delay 100
MousePos 1374, 250
delay 100
leftclick
delay 100
MousePos 1574, 250
delay 100
leftclick
delay 100
MousePos 1774, 250
delay 100
leftclick
delay 100

MousePos 974, 460
delay 100
leftclick
delay 100
MousePos 1174, 460
delay 100
leftclick
delay 100
MousePos 1374, 460
delay 100
leftclick
delay 100
MousePos 1574, 460
delay 100
leftclick
delay 100
MousePos 1774, 460
delay 100
leftclick
delay 100

end

procedure closewindows

MousePos 910, 137
delay 100
rightclick
delay 100
MousePos 1110, 137
delay 100
rightclick
delay 100
MousePos 1310, 137
delay 100
rightclick
delay 100
MousePos 1510, 137
delay 100
rightclick
delay 100
MousePos 1710, 137
delay 100
rightclick
delay 100


MousePos 910, 337
delay 100
rightclick
delay 100
MousePos 1110, 337
delay 100
rightclick
delay 100
MousePos 1310, 337
delay 100
rightclick
delay 100
MousePos 1510, 337
delay 100
rightclick
delay 100
MousePos 1710, 337
delay 100
rightclick
delay 100

end



procedure watercheck
//  this should check the water level on each, and only water if it's not full, should water 1 using a constant for x/y plus a modifier to move from menu to menu



// bed1
mousepos 1038, 195

      GetBlue  1038, 195 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1060, 195 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End


// bed2
mousepos 1238, 195

      GetBlue  1238, 195 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1260, 195 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End

// bed3
mousepos 1438, 195 

      GetBlue  1438, 195 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1460, 195 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End



// bed4
mousepos 1638, 195

      GetBlue  1638, 195 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1660, 195 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End



// bed5
mousepos 1838, 195

      GetBlue  1838, 195 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1860, 195 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End


//////////// second row
// bed6
mousepos 1038, 395

      GetBlue  1038, 395 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1060, 395 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End



// bed7
mousepos 1238, 395

      GetBlue  1238, 395 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1260, 395 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End



// bed8
mousepos 1438, 395

      GetBlue  1438, 395 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1460, 395 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End



// bed9
mousepos 1638, 395

      GetBlue  1638, 395 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1660, 395 // water button
	       	Delay 100
        	leftclick
        	Delay 100

  End



// bed10
mousepos 1838, 395
      GetBlue  1838, 395 = $Blue
					// if color matches rgb 6,6,253 then the water is topped up, do nothing
					delay 100
					
				else // if the color does not match 6, 6, 253 then the bed needs watering
  				MousePos 1860, 395 // water button
	       	Delay 100
        	leftclick
        	Delay 100
        	
  End




end // watercheck procedure





procedure moveR
// this plants and moves the avatar RIGHT between plantings
MousePos 25, 44
delay 100
leftclick
delay 400
keydown {right} 300
delay 200

end

procedure moveL
// this plants and moves the avatar LEFT between plantings
MousePos 25, 44
delay 100
leftclick
delay 400
keydown {left} 300
delay 200

end

procedure moveD
// this moves the avatar DOWN between Rows

delay 400
keydown {down} 300
delay 200

end

procedure moveU
// this moves the avatar UP between Rows

delay 400
keydown {up} 300
delay 200

end

// the bed# procedures place the menus for you
procedure bed1
	MousePos 498, 608
		delay 200
		rightclick
		delay 100
	MousePos 530, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 900, 84
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed2
	MousePos 498, 608
		delay 200
		rightclick
		delay 100
	MousePos 530, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1100, 84			
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed3
	MousePos 498, 608
		delay 200
		rightclick
		delay 100
	MousePos 530, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1300, 84
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed4
	MousePos 498, 608
		delay 200
		rightclick
		delay 100
	MousePos 530, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1500, 84
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed5
	MousePos 498, 608
		delay 200
		rightclick
		delay 100
	MousePos 530, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1700, 84	
			delay 100
			LeftMouseUp
		delay 100
end



// Second Row
procedure bed6
	MousePos 1400, 608
		delay 200
		rightclick
		delay 100
	MousePos 1430, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 900, 284	
		
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed7
	MousePos 1400, 608
		delay 200
		rightclick
		delay 100
	MousePos 1430, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1100, 284	
		
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed8
	MousePos 1400, 608
		delay 200
		rightclick
		delay 100
	MousePos 1430, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1300, 284	
		
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed9
	MousePos 1400, 608
		delay 200
		rightclick
		delay 100
	MousePos 1430, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1500, 284	
		
			delay 100
			LeftMouseUp
		delay 100
end

procedure bed10
	MousePos 1400, 608
		delay 200
		rightclick
		delay 100
	MousePos 1430, 522
		delay 100
			LeftMouseDown
			delay 100
			// menu position
			MousePos 1700, 284	
		
			delay 100
			LeftMouseUp
		delay 100
end