The Wiki for Tale 8 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 "User:Cegaiel/Macros"

From A Wiki in the Desert
Jump to navigation Jump to search
Line 59: Line 59:
 
  srKeyUp2(VK_MENU);
 
  srKeyUp2(VK_MENU);
 
end
 
end
 +
end
 +
</pre>
 +
 +
 +
*'''learnUniversity.lua''' - Quickly click all the Learn buttons at a University. Download [https://atitd.sharpnetwork.net/macros/learnuniversity/learnUniversity.zip learnUniversity.zip] which includes learn.png and learnUniversity.lua . You will need learn.png for this script to work!
 +
 +
<pre>
 +
dofile("common.inc");
 +
 +
 +
askText = "Quickly Learn all skills offered by a University\n\nClick on a University, Choose Learn to open the Technologies window.\n\nMake sure this window is not near the center, where popup boxes will occur!\n\nThe macro will do 5 passes of clicking all the Learn buttons and closing all the popups. The reason for multiple passes is to be sure there aren't multiple new levels for any existing skill you might have already";
 +
 +
 +
 +
function doit()
 +
  askForWindow(askText);
 +
 +
 +
  for i = 1,5 do
 +
  checkBreak();
 +
  sleepWithStatus(750,"[" .. i .. "/5] Clicking Learn buttons, closing popups ...", nil, 0.7, 0.7);
 +
 +
  --clickAllImages(image_name, offsetX, offsetY, rightClick, tol)
 +
  clickAllImages("learn.png", nil, nil, true, nil)
 +
 +
    while 1 do
 +
    checkBreak();
 +
    srReadScreen();
 +
    OK = srFindImage("OK.png");
 +
      if OK then
 +
        srClickMouseNoMove(OK[0],OK[1],1);
 +
      else
 +
        break;
 +
      end
 +
    lsSleep(10);
 +
    end
 +
 +
  lsSleep(10);
 +
  end
 +
 +
lsPlaySound("Complete.wav");
 
end
 
end
 
</pre>
 
</pre>

Revision as of 21:33, 1 September 2018

Go Back

  • LearnLessons.lua - Useful if someone is teaching you lessons and you're slow to pay attention. Will click the Yes and OK popups as they appear so lesson can continue in a timely manner.
dofile("common.inc");


function doit()
	local done = false
	
	askForWindow("This will always click OK or Yes whenever found. Typical when someone is teaching you lessons.") ;

	while not done do
                -- checkBreak(); is already included in function sleepWithStatus
		sleepWithStatus(100, "Looking for Yes/OK");
		srReadScreen();

		local pos = srFindImage("yes3.png");
		if (pos) then
			safeClick(pos[0] + 1, pos[1] + 1);
                        sleepWithStatus(1000,"Found and clicked Yes!");
		end

		local pos2 = srFindImage("OK.png");
		if (pos2) then
			safeClick(pos2[0] + 1, pos2[1] + 1);
                        sleepWithStatus(1000,"Found and clicked OK!");
		end

         lsSleep(200);
	end
end


  • Screenshot.lua - Sends Alt+C to the game at intervals to take a screenshot. The frame000,001,002,etc.png file will appear in your ATITD GAME folder.
dofile("common.inc");
dofile("constants.inc");


askText = "Presses Alt+C to create .png in ATITD folder";

timer = 900000; --  15 mins - time is in ms. 60000 = 1 minute

function doit()
	askForWindow(askText);


	while 1 do
          -- checkBreak(); is already included in function sleepWithStatus
	  sleepWithStatus(timer,"Waiting to take screenshot...");
	  srKeyDown2(VK_MENU);
	  lsSleep(100);
	  srKeyEvent('c');
	  lsSleep(100);
	  srKeyUp2(VK_MENU);
	end
end


  • learnUniversity.lua - Quickly click all the Learn buttons at a University. Download learnUniversity.zip which includes learn.png and learnUniversity.lua . You will need learn.png for this script to work!
dofile("common.inc");


askText = "Quickly Learn all skills offered by a University\n\nClick on a University, Choose Learn to open the Technologies window.\n\nMake sure this window is not near the center, where popup boxes will occur!\n\nThe macro will do 5 passes of clicking all the Learn buttons and closing all the popups. The reason for multiple passes is to be sure there aren't multiple new levels for any existing skill you might have already";



function doit()
  askForWindow(askText);


  for i = 1,5 do
  checkBreak();
  sleepWithStatus(750,"[" .. i .. "/5] Clicking Learn buttons, closing popups ...", nil, 0.7, 0.7);

  --clickAllImages(image_name, offsetX, offsetY, rightClick, tol)
  clickAllImages("learn.png", nil, nil, true, nil)

    while 1 do
    checkBreak();
    srReadScreen();
    OK = srFindImage("OK.png");
      if OK then
        srClickMouseNoMove(OK[0],OK[1],1);
      else
        break;
      end
    lsSleep(10);
    end

  lsSleep(10);
  end

lsPlaySound("Complete.wav");
end