|
|
| Line 1: |
Line 1: |
| − | ==Torch Macro==
| |
| | | | |
| − | loadfile("luaScripts/screen_reader_common.inc")();
| |
| − | loadfile("luaScripts/ui_utils.inc")();
| |
| − |
| |
| − | window_w = 285;
| |
| − | window_h = 420;
| |
| − | temp_width = 75;
| |
| − | tol = 6500;
| |
| − |
| |
| − | -- It will make the first in the list if available, otherwise the next, etc
| |
| − | -- This will let you make, e.g. Rods on your Soda Glass and Sheet Glass on your normal, by putting
| |
| − | -- sheet glass before rods (on soda it'll fail to find sheet)
| |
| − | item_priority = {"GlassMakeTorch.png", "GlassMakeJar.png", "GlassMakeRod.png", "GlassMakePipe.png", "GlassMakeSheet.png", "GlassMakeBlade.png", "GlassMakeWine.png", "GlassMakeFineRod.png", "GlassMakeFinePipe.png"};
| |
| − |
| |
| − | -- max temperature in which we will contine heating it, wait until it gets below this before adding
| |
| − | max_add_temp = 2300;
| |
| − | -- minimum temperature in which we will start a new project, otherwise will reheat
| |
| − | min_new_temp = 1750;
| |
| − |
| |
| − | tick_time = 3000;
| |
| − |
| |
| − | function ocrNumber(x, y)
| |
| − | -- find first number
| |
| − | local digit=nil;
| |
| − | local offset=0;
| |
| − | while (not digit) and (offset < 10) do
| |
| − | for i=0, 9 do
| |
| − | local pos = srFindImageInRange(i .. ".png", x, y, 6, 9, tol);
| |
| − | if pos then
| |
| − | digit=i;
| |
| − | break;
| |
| − | end
| |
| − | end
| |
| − | if not digit then
| |
| − | x = x+1;
| |
| − | offset = offset + 1;
| |
| − | end
| |
| − | end
| |
| − | if (offset > 0) then
| |
| − | lsPrintln("Perf warning: OCR non-0 offset of " .. offset);
| |
| − | end
| |
| − | local ret = digit;
| |
| − | while 1 do
| |
| − | digit = nil;
| |
| − | x = x + 7;
| |
| − | for i=0, 9 do
| |
| − | local pos = srFindImageInRange(i .. ".png", x, y, 6, 9, tol);
| |
| − | if pos then
| |
| − | digit=i;
| |
| − | break;
| |
| − | end
| |
| − | end
| |
| − | if digit then
| |
| − | ret = ret * 10 + digit;
| |
| − | else
| |
| − | break;
| |
| − | end
| |
| − | end
| |
| − | return ret;
| |
| − | end
| |
| − |
| |
| − | function addCC(window_pos, state)
| |
| − | if state.just_added then
| |
| − | return;
| |
| − | end
| |
| − | -- lsPrintln(window_pos[0] .. " " .. window_pos[1] .. " " .. window_w .. " " .. window_h);
| |
| − | local pos = srFindImageInRange("GlassAdd2Charcoal.png", window_pos[0], window_pos[1], window_w, window_h, tol);
| |
| − |
| |
| − | state.just_added = 1;
| |
| − | srClickMouseNoMove(pos[0]+5, pos[1]+2);
| |
| − | state.status = state.status .. " Added 2 CC";
| |
| − | end
| |
| − |
| |
| − | function glassTick(window_pos, state)
| |
| − | state.status = "";
| |
| − | local pos;
| |
| − | local out_of_glass = nil;
| |
| − | if state.want_spike then
| |
| − | state.timer = state.timer - (tick_time / 1000);
| |
| − | end
| |
| − |
| |
| − | pos = srFindImageInRange("GlassTimeToStop.png", window_pos[0], window_pos[1], window_w, window_h, tol);
| |
| − | if pos then
| |
| − | out_of_glass = 1;
| |
| − | end
| |
| − | pos = srFindImageInRange("GlassTemperature.png", window_pos[0], window_pos[1], window_w, window_h, tol);
| |
| − | if not pos then
| |
| − | state.status = state.status .. " No temperature found, ignoring";
| |
| − | return state.status;
| |
| − | end
| |
| − | local temp = ocrNumber(pos[0] + temp_width, pos[1]);
| |
| − |
| |
| − |
| |
| − | state.status = (state.status .. " Temp:" .. temp);
| |
| − |
| |
| − | nothing_cooking = srFindImageInRange("GlassNothingCooking.png", window_pos[0]-5, window_pos[1], window_w, window_h, tol);
| |
| − |
| |
| − | if (stop_cooking or out_of_glass) and nothing_cooking then
| |
| − | return nil;
| |
| − | end
| |
| − |
| |
| − | -- Monitor temperature
| |
| − | local last_frame_just_added = state.just_added;
| |
| − | if state.last_temp then
| |
| − | local fell = temp < state.last_temp;
| |
| − | local rose = temp > state.last_temp;
| |
| − | if fell then
| |
| − | state.status = state.status .. " (fell)";
| |
| − | state.spiking = nil;
| |
| − | end
| |
| − | if rose then
| |
| − | state.status = state.status .. " (rose)";
| |
| − | end
| |
| − | -- if just fell, and under max threshold, add 1 CC
| |
| − | if fell and (temp < max_add_temp) then
| |
| − | state.status = state.status .. " Fell,Adding";
| |
| − | addCC(window_pos, state);
| |
| − | end
| |
| − |
| |
| − | -- if just fell, and is under 1600+threshold, add one
| |
| − | -- item, add another and wait for spike or fall
| |
| − | if fell and (temp < min_new_temp) then
| |
| − | -- addCC(window_pos, state); -- done above
| |
| − | state.timer = 72;
| |
| − | state.want_spike = 1;
| |
| − | state.status = state.status .. " WaitingToSpike";
| |
| − | end
| |
| − |
| |
| − | --if it's time to add for spike, add
| |
| − | if state.want_spike and state.timer <= 0 then
| |
| − | state.want_spike = nil;
| |
| − | state.spiking = 1;
| |
| − | state.timer = 0;
| |
| − | addCC(window_pos, state);
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | if state.want_spike then
| |
| − | state.status = state.status .. " (wait to spike: " .. state.timer .. ")";
| |
| − | end
| |
| − |
| |
| − | if state.spiking then
| |
| − | state.status = state.status .. " (spiking)";
| |
| − | end
| |
| − |
| |
| − | state.last_temp = temp;
| |
| − | if last_frame_just_added then
| |
| − | state.just_added = nil;
| |
| − | end
| |
| − |
| |
| − | -- Monitor what we're making
| |
| − |
| |
| − | if nothing_cooking then
| |
| − | state.status = state.status .. " NothingCooking";
| |
| − | if not stop_cooking then
| |
| − | if temp > 1600 and temp < 2400 then
| |
| − | local made_one=nil;
| |
| − | for item_index=1, #item_priority do
| |
| − | pos = srFindImageInRange(item_priority[item_index], window_pos[0], window_pos[1], window_w, window_h, tol);
| |
| − | if pos then
| |
| − | state.status = state.status .. " Making:" .. item_priority[item_index];
| |
| − | srClickMouseNoMove(pos[0]+5, pos[1]+2);
| |
| − | made_one = 1;
| |
| − | break;
| |
| − | end
| |
| − | end
| |
| − | if not made_one then
| |
| − | state.status = state.status .. " NothingToMake";
| |
| − | -- refresh window
| |
| − | srClickMouseNoMove(window_pos[0], window_pos[1]);
| |
| − | end
| |
| − | else
| |
| − | state.status = state.status .. " (temp out of range)";
| |
| − | end
| |
| − | end
| |
| − | else
| |
| − | -- Something cooking, leave it be
| |
| − | state.status = state.status .. " InUse";
| |
| − | end
| |
| − |
| |
| − | state.last_nothing_cooking = nothing_cooking;
| |
| − | lsPrintln(state.status);
| |
| − | return state.status; -- keep going and return status
| |
| − | end
| |
| − |
| |
| − | function allowReorder(x, y)
| |
| − | local z = 0
| |
| − | local scale=0.7;
| |
| − | local dy = 26;
| |
| − | lsPrint(x, y, z, scale, scale, 0xFFFFFFff, "Click an item to raise priority");
| |
| − | y=y+20;
| |
| − | x=x+5;
| |
| − | local item_index;
| |
| − | for item_index=1, #item_priority do
| |
| − | if lsButtonText(x, y, z, 100, 0xFFFFFFff, string.sub(string.sub(item_priority[item_index], 10), 1, -5)) then
| |
| − | if item_index > 1 then
| |
| − | local temp = item_priority[item_index-1];
| |
| − | item_priority[item_index-1] = item_priority[item_index];
| |
| − | item_priority[item_index] = temp;
| |
| − | end
| |
| − | end
| |
| − | -- debug code for checking image matching
| |
| − | if false then
| |
| − | local list = findAllImages(item_priority[item_index], tol);
| |
| − | lsPrint(x+110, y, z, scale, scale, 0xFFFFFFff, #list);
| |
| − | end
| |
| − | y=y+dy;
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | function testReorder()
| |
| − | while 1 do
| |
| − | lsSleep(100);
| |
| − | allowReorder(10, 10);
| |
| − | checkBreak();
| |
| − | lsDoFrame();
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | function doit()
| |
| − |
| |
| − | -- testReorder();
| |
| − |
| |
| − | askForWindow("Pin your benches, put the cursor over the ATITD window, press Shift. Then add charcoal until the benches are hot enough, melt your materials, an as it cools back down into useable temperature ranges, the macro will take over. Please pause the macro when you need to use your mouse.");
| |
| − |
| |
| − | srReadScreen();
| |
| − |
| |
| − | local glass_windows = findAllImages("ThisIs.png");
| |
| − |
| |
| − | if #glass_windows == 0 then
| |
| − | error 'Could not find any \'Glazier\'s Bench\' windows.';
| |
| − | end
| |
| − |
| |
| − | local glass_state = {};
| |
| − | for window_index=1, #glass_windows do
| |
| − | glass_state[window_index] = {};
| |
| − | end
| |
| − |
| |
| − | local last_ret = {};
| |
| − |
| |
| − | while 1 do
| |
| − |
| |
| − | -- Tick
| |
| − |
| |
| − | srReadScreen();
| |
| − |
| |
| − | local glass_windows2 = findAllImages("ThisIs.png");
| |
| − | local should_continue=nil;
| |
| − | if #glass_windows == #glass_windows2 then
| |
| − | for window_index=1, #glass_windows do
| |
| − | local r = glassTick(glass_windows[window_index], glass_state[window_index]);
| |
| − | last_ret[window_index] = r;
| |
| − | if r then
| |
| − | should_continue = 1;
| |
| − | end
| |
| − | end
| |
| − | end
| |
| − |
| |
| − | -- Display status and sleep
| |
| − |
| |
| − | local start_time = lsGetTimer();
| |
| − | while tick_time - (lsGetTimer() - start_time) > 0 do
| |
| − | time_left = tick_time - (lsGetTimer() - start_time);
| |
| − |
| |
| − | lsPrint(10, 6, 0, 0.7, 0.7, 0xB0B0B0ff, "Hold Ctrl+Shift to end this script.");
| |
| − | lsPrint(10, 18, 0, 0.7, 0.7, 0xB0B0B0ff, "Hold Alt+Shift to pause this script.");
| |
| − | lsPrint(10, 30, 0, 0.7, 0.7, 0xFFFFFFff, "Waiting " .. time_left .. "ms...");
| |
| − |
| |
| − | if not (#glass_windows == #glass_windows2) then
| |
| − | lsPrintWrapped(10, 45, 5, lsScreenX-15, 1, 1, 0xFF7070ff, "Expected " .. #glass_windows .. " windows, found " .. #glass_windows2 .. ", not ticking.");
| |
| − | elseif not should_continue then
| |
| − | lsPrint(10, 45, 5, 1.5, 1.5, 0x70FF70ff, "All benches done.");
| |
| − | end
| |
| − |
| |
| − | for window_index=1, #glass_windows do
| |
| − | if last_ret[window_index] then
| |
| − | should_continue = 1;
| |
| − | lsPrint(10, 80 + 15*window_index, 0, 0.7, 0.7, 0xFFFFFFff, "#" .. window_index .. " - " .. last_ret[window_index]);
| |
| − | else
| |
| − | lsPrint(10, 80 + 15*window_index, 0, 0.7, 0.7, 0xFFFFFFff, "#" .. window_index .. " - COOL DOWN");
| |
| − | end
| |
| − | end
| |
| − | if lsButtonText(lsScreenX - 110, lsScreenY - 60, z, 100, 0xFFFFFFff, "Finish up") then
| |
| − | stop_cooking = 1;
| |
| − | end
| |
| − | if lsButtonText(lsScreenX - 110, lsScreenY - 30, z, 100, 0xFFFFFFff, "End script") then
| |
| − | error "Clicked End Script button";
| |
| − | end
| |
| − |
| |
| − | allowReorder(10, 100+15*#glass_windows);
| |
| − |
| |
| − | checkBreak();
| |
| − | lsDoFrame();
| |
| − | lsSleep(25);
| |
| − | end
| |
| − |
| |
| − | checkBreak();
| |
| − | -- error 'done';
| |
| − | end
| |
| − | end
| |
