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.

User:Heplotep

From A Tale in the Desert
Revision as of 23:55, 15 April 2009 by Heplotep (talk | contribs)
Jump to navigationJump to search

That's right. I am the player formerly known as DisShovel. My main camp is around -650, 400 in Khmun. Drop by some time.


And now Barrel Master 1000 !

// This will not load the barrels.. and it important to get the vise window size correct.
// it changes size after you load... so load one barrel, close the vise window, click to
// reopen, then pin it in upper left corner
// After the first barrel, the window will remain the correct size, just unload, and load 
// and then start the macro.

// IT IS NOT AUTOMATIC YET, it will not stop when the barrel completes, you must stop it
// As allow, you screen size may affect the constants.. the descriptions are pretty 
// self descriptive. The decision method is the fuel level and flamebar as described
// on the wiki.

Constants
//User Definable variables
LeftBarendX = 65
FuelBarY = 151
FlameBarDecisionX = 160
FlameBarY = 169
ProgreesBarY = 215  
FuelPixelPerTick =  5
TempX = 0
TempY = 0
Fuel = 0
Flame = 0
ColorDetect = 50

End



MousePos 100, 20  //Activates eGenesis window.. Don't run ACTool maximized.
Delay 200
LeftClick
Delay 2000


// Start up - 7 stokes
Loop 7

	Call Stoke
	Delay 1500
End

// Then Main Control Loop until stopped

While 1 = 1

	Call CheckBars
	
	If $Flame = 0
		If $Fuel < 2 
			If $Fuel < 1
				Call Stoke
				Delay 1000
				Call Stoke
			Else	
				Call Stoke
			End
		End
	End
	
	Delay 2500
end

Procedure CheckBars
	
	Compute TempX = $LeftBarendX + $FuelPixelPerTick
	Compute TempY = $FuelBarY
	// Point Mouse at fuel bar as indication of action	
  MousePos $TempX, $TempY
 	delay 200
	//check if fuel is fist tick or above
  LoadRGB $TempX, $TempY
  if {RGBRed} < $ColorDetect
    SetConst Fuel = 1
    
  Else
    SetConst Fuel = 0
    
  End
	// if it is, check one tick left
	If $Fuel > 0 
		Compute TempX = $TempX + $FuelPixelPerTick
		LoadRGB $TempX, $TempY
  	if {RGBRed} < $ColorDetect
    	Compute Fuel = $Fuel + 1
   	End
   End
   
  // Now check the flame
	Compute TempX = $FlameBarDecisionX
	Compute TempY = $FlameBarY
	// Point Mouse at flame bar as indication of action	
  MousePos $TempX, $TempY
 	delay 200
	//check if fuel is fist tick or above
  LoadRGB $TempX, $TempY
  if {RGBRed} < $ColorDetect
    SetConst Flame = 1
  	//Bell Asterisk 
  Else
    SetConst Flame = 0
  End

End



Procedure Stoke
	
	MousePos 161, 220
	delay 100
	Leftclick
	//Bell
  
End
	
	
	Bell