//Paint Macro

//Simply change Batch to = the number of paints your want (Have enough supplies on hand)
//  Written to handle 6 ingredients but you can add more easily
//  Change the Loop on each ingredient to the # of that ingredient you want to add
//  Copy and paste the Call statement of the ingredient you want and put it in the
//  the ingredient slot you want.  Just leave the ingedient loop at zero if you dont
//  want to use that ingredient.

//  Enjoy Anka

Constants
  Batch = 10
  MDelay = 200
End

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

//Call Cabbage
//Call Carrots
//Call Clay
//Call Dead
//Call Toad
//Call Earth
//Call Red
//Call Lead
//Call Silver
//Call Iron
//Call Copper
//Call Sulfur
//Call Potash
//Call Lime
//Call Salt

Loop $Batch
  Loop 0              //# of ingredient to add
    //1st Ingredient
  End
  Loop 0              //# of ingredient to add
    //2nd Ingredient
  End
  Loop 0              //# of ingredient to add
    //3rd Ingredient
  End
  Loop 0              //# of ingredient to add
    //4th Ingredient
  End
  Loop 0              //# of ingredient to add
    //5th Ingredient
  End
  Loop 0              //# of ingredient to add
    //6th Ingredient
  End
  Call Take
End

Procedure Take
MousePos 17, 93
  Delay 200
  Rightclick
  Delay 200
End

Procedure Cabbage
  MousePos 17, 255
  Delay 200
  Rightclick
  Delay 200
End

Procedure Carrots
  MousePos 17, 273
  Delay 200
  Rightclick
  Delay 200
End

Procedure Clay
  MousePos 17, 291
  Delay 200
  Rightclick
  Delay 200
End

Procedure Dead
  MousePos 17, 309
  Delay 200
  Rightclick
  Delay 200
End

Procedure Toad
  MousePos 17, 327
  Delay 200
  Rightclick
  Delay 200
End

Procedure Earth
  MousePos 17, 345
  Delay 200
  Rightclick
  Delay 200
End

Procedure Red
  MousePos 17, 363
  Delay 200
  Rightclick
  Delay 200
End

Procedure Lead
  MousePos 17, 381
  Delay 200
  Rightclick
  Delay 200
End

Procedure Silver
  MousePos 17, 399
  Delay 200
  Rightclick
  Delay 200
End

Procedure Iron
  MousePos 17, 417
  Delay 200
  Rightclick
  Delay 200
End

Procedure Copper
  MousePos 17, 435
  Delay 200
  Rightclick
  Delay 200
End

Procedure Sulfur
  MousePos 17, 453
  Delay 200
  Rightclick
  Delay 200
End

Procedure Potash
  MousePos 17, 471
  Delay 200
  Rightclick
  Delay 200
End

Procedure Lime
  MousePos 17, 489
  Delay 200
  Rightclick
  Delay 200
End

Procedure Saltpeter
  MousePos 17, 507
  Delay 200
  Rightclick
  Delay 200
End
//Written with ACTool 5.3.0 by Anka