http://www.atitd.org/wiki/t5w/index.php?action=history&feed=atom&title=User%3APeshet%2Fcarpblade User:Peshet/carpblade - Revision history 2026-07-05T13:48:49Z Revision history for this page on the wiki MediaWiki 1.35.2 http://www.atitd.org/wiki/t5w/index.php?title=User:Peshet/carpblade&diff=21368&oldid=prev Peshet: Created page with "* Read notes! * NOW with Menu goodness. Will prompt for batches and either Iron or Copper.<br> <br> <br> Ver 3.0 - 04/05/09<br> Oni's Carpentry blade macro: Will make a 7.1k ..." 2010-09-19T18:12:31Z <p>Created page with &quot;* Read notes! * NOW with Menu goodness. Will prompt for batches and either Iron or Copper.&lt;br&gt; &lt;br&gt; &lt;br&gt; Ver 3.0 - 04/05/09&lt;br&gt; Oni&#039;s Carpentry blade macro: Will make a 7.1k ...&quot;</p> <p><b>New page</b></p><div>* Read notes!<br /> * NOW with Menu goodness. Will prompt for batches and either Iron or Copper.&lt;br&gt;<br /> &lt;br&gt;<br /> &lt;br&gt;<br /> <br /> Ver 3.0 - 04/05/09&lt;br&gt;<br /> Oni's Carpentry blade macro: Will make a 7.1k to 7.2k blade in about 5 seconds.&lt;br&gt; <br /> Works only in screen resolution of 1680x1050.&lt;br&gt;<br /> &lt;br&gt;<br /> &lt;b&gt;Your Anvil MUST be alligned North to South, with the blade edge facing West.&lt;/b&gt;&lt;br&gt;<br /> Have: Copper or Iron, Ball Peen Hammer, Shaping Mallet, and Wide Tungsten Chisel in your inventory.&lt;br&gt; <br /> See pic for mouse starting position.&lt;br&gt;<br /> Turn Chat Off.&lt;br&gt;<br /> Double F8 View zoom all the way in.&lt;br&gt;<br /> Place mouse on starting position.&lt;br&gt;<br /> Tab over to ACtool, hit F2 (without moving the mouse).&lt;br&gt;<br /> <br /> *Starting Position screenie&lt;br&gt;<br /> <br /> [[Image:CarpStart.PNG]]<br /> <br /> *&lt;b&gt; Credit: &lt;/b&gt;<br /> This macro was created using the method described in the Lollipop guild carp blade guide.&lt;br&gt;<br /> I would like to extend my thanks to them for the great tutorial!&lt;br&gt;<br /> ==Lollipop Carpentry Blade Guide==<br /> * Link to [http://wiki.atitd.org/tale3/Guilds/The_Lollipop_Guild/CarpGuide Lollipop Guild 7K carpentry blade guide] from T3 (archived copy) LINK NO LONGER WORKING<br /> <br /> ====Paste the following in to ACTool.====<br /> <br /> &lt;Pre&gt;<br /> // Ver 3.0 - 04/05/09<br /> // ** fixed when new metals broke the last one. Added menu.<br /> // Oni's Carb blade macro: Will make a 7.1k to 7.2k blade<br /> // in about 5 seconds. Works only in screen resolution of 1600x1050.<br /> // Uses COPPER only. Have: Copper, Ball Peen Hammer, Shaping Mallet,<br /> // and Wide Tungsten Chisel in your inventory. See pic for mouse starting<br /> // position. Place mouse on starting position, Tab over to ACtool, hit F2.<br /> <br /> constants<br /> StartX = 0<br /> StartY = 0<br /> NewX = 0<br /> NewY = 0<br /> Job = 0<br /> Batch = 0<br /> MetalX = 0<br /> MetalY = 0<br /> TempX = 0<br /> UnloadX = 0<br /> UnloadY = 0<br /> FinX = 0<br /> FinY = 0<br /> end<br /> SetConst StartX = {MouseX}<br /> SetConst StartY = {MouseY}<br /> SetConst UnloadX = {MouseX}<br /> SetConst UnloadY = {MouseY}<br /> SetConst FinX = {MouseX}<br /> SetConst FinY = {MouseY}<br /> <br /> Form Anvil, Settings<br /> ed1=Editbox:Batch:1<br /> ed2=Combobox:Project:Carpentry Blade<br /> ed3=Combobox:Metal:Copper, Iron<br /> END<br /> <br /> FormLoad Anvil, Anvil.frm<br /> <br /> if ShowForm Anvil<br /> Set Batch = Anvil[ed1]<br /> Case<br /> When Anvil[ed2] = Carpentry Blade<br /> Set Job = Carp<br /> End<br /> else<br /> stop<br /> end<br /> <br /> FormSave Anvil, Anvil.frm<br /> <br /> MousePos 74, 10 // Zoom in<br /> delay 50<br /> leftclick<br /> delay 1000<br /> //<br /> Loop $Batch<br /> Call Anvil[ed3]<br /> Call $Job<br /> Call unload<br /> End<br /> //<br /> Procedure Iron<br /> Setconst MetalX = 93<br /> SetConst MetalY = 72<br /> End<br /> <br /> Procedure Copper<br /> SetConst MetalX = 93<br /> SetConst MetalY = 89<br /> End<br /> <br /> // START POS MousePos 916, 381<br /> <br /> ////////////////////////////<br /> Procedure Unload<br /> delay 100<br /> MousePos $UnloadX, $UnloadY<br /> delay 100<br /> Rightclick<br /> delay 100<br /> //Compute NewX = $UnloadX + 62 // Discard<br /> //Compute NewY = $UnloadY // Discard<br /> //<br /> Compute NewX = $UnloadX + 68 // Complete<br /> Compute NewY = $UnloadY - 15 // Complete<br /> //<br /> MousePos $NewX, $NewY<br /> delay 100<br /> leftclick<br /> delay 100<br /> Compute NewX = $StartX - 99 // YES<br /> Compute NewY = $StartY + 168 // YES<br /> delay 100<br /> MousePos $NewX, $NewY<br /> delay 2000<br /> leftclick<br /> delay 100<br /> End<br /> <br /> //////// BLADE START ///////////////////// LOAD<br /> Procedure Carp /// CARP START<br /> delay 100<br /> MousePos $StartX, $StartY<br /> delay 100<br /> Rightclick<br /> // Load click<br /> Compute NewX = $StartX + 53<br /> Compute NewY = $StartY - 8<br /> MousePos $NewX, $NewY<br /> delay 100<br /> Rightclick<br /> // choose metal<br /> Compute NewX = $StartX + $MetalX<br /> Compute NewY = $StartY - $MetalY<br /> MousePos $NewX, $NewY<br /> delay 100<br /> Rightclick<br /> // metal click<br /> Compute TempX = $NewX + 10<br /> MousePos $TempX, $NewY<br /> delay 100<br /> Rightclick<br /> <br /> // Shaping mallet //<br /> Compute NewX = $StartX + 81<br /> Compute NewY = $StartY - 27<br /> MousePos $NewX, $NewY<br /> delay 50<br /> Keys S<br /> Keys 8<br /> // end Shaping mallet //<br /> <br /> Delay 100<br /> <br /> // round 1 front edge<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 27<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 66<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 105<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 144<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 183<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 219<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 261<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 300<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> // end 1<br /> <br /> // Wide Chisel //<br /> Compute NewX = $StartX + 81<br /> Compute NewY = $StartY - 27<br /> MousePos $NewX, $NewY<br /> delay 50<br /> Keys C<br /> Keys 9<br /> // end Wide Chisel //<br /> <br /> // start round 2 //<br /> // 2 edges //<br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 27<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 300<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> // end 2 edges //<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 105<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX - 14<br /> Compute NewY = $StartY + 219<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> // end center 2 front<br /> // end Round 2<br /> <br /> // Wide Chisel //<br /> Compute NewX = $StartX + 81<br /> Compute NewY = $StartY - 27<br /> MousePos $NewX, $NewY<br /> delay 50<br /> Keys C<br /> Keys 4<br /> // end Wide Chisel //<br /> <br /> delay 100<br /> <br /> // Center<br /> Compute NewX = $StartX + 71<br /> Compute NewY = $StartY + 165<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 71<br /> Compute NewY = $StartY + 122<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 71<br /> Compute NewY = $StartY + 208<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> // end Center<br /> <br /> delay 100<br /> <br /> // Wide Chisel //<br /> Compute NewX = $StartX + 81<br /> Compute NewY = $StartY - 27<br /> MousePos $NewX, $NewY<br /> delay 50<br /> Keys B<br /> Keys 9<br /> // end Wide Chisel //<br /> <br /> // middle points<br /> Compute NewX = $StartX + 90<br /> Compute NewY = $StartY + 60<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 90<br /> Compute NewY = $StartY + 269<br /> MousePos $NewX, $NewY<br /> Delay 100<br /> Rightclick<br /> // end middle points<br /> <br /> Compute NewX = $StartX + 173<br /> Compute NewY = $StartY + 60<br /> MousePos $NewX, $NewY<br /> delay 200<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 154<br /> Compute NewY = $StartY + 65<br /> MousePos $NewX, $NewY<br /> delay 200<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 173<br /> Compute NewY = $StartY + 275<br /> MousePos $NewX, $NewY<br /> delay 200<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 154<br /> Compute NewY = $StartY + 270<br /> MousePos $NewX, $NewY<br /> delay 200<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 173<br /> Compute NewY = $StartY + 73<br /> MousePos $NewX, $NewY<br /> delay 200<br /> Rightclick<br /> <br /> Compute NewX = $StartX + 173<br /> Compute NewY = $StartY + 250<br /> MousePos $NewX, $NewY<br /> delay 200<br /> Rightclick<br /> <br /> //<br /> Keys Q<br /> Keys Q<br /> delay 2000<br /> END<br /> MousePos $FinX, $FinY<br /> // END Blade //<br /> <br /> <br /> &lt;/Pre&gt;</div> Peshet