The Wiki for Tale 6 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:Obol/Macros

From ATITD6
< User:Obol
Revision as of 16:00, 3 January 2012 by Obol (talk | contribs)
Jump to navigationJump to search

Macros


  • ClaySlateV2.mac

//General purpose grass, slate and clay collector.  Works best without water jugs
//or a fishing pole.  To begin, hover your mouse over the icon
//you wish to collect in ATITD (i.e. be over a patch of clay or a piece of
//slate and have this program active.  Press F2, and the macro will start.
Constants
  clay = 0
  Red = 0
  Green = 0
  Blue = 0
  XPos = 0
  YPos = 0
  CurrKey = 0
  OrigX = 0
  OrigY = 0
  
End
SetConst XPos = {MouseX}
SetConst YPos = {MouseY}
LoadRGB $XPos, $YPos
SetConst Red = {RGBRed}
SetConst Blue = {RGBBlue}
SetConst Green = {RGBGreen}
SetConst CurrKey = {GlobalKeys}
Rightclick


While $CheckforLostFocus = 0
  GetRed  $XPos, $YPos = $Red
    GetGreen  $XPos, $YPos = $Green
      GetBlue  $XPos, $YPos = $Blue
        Set OrigX = {mousex}
        Set OrigY = {Mousey}
        MousePos $XPos, $YPos
        //delay 10
        if $clay = 1
          delay 150
        end
        RightClick
        
        MousePos $OrigX, $OrigY
        if $clay = 0
          delay 150
        end
      End
    End
  End
  Delay 60 //190
End

Function CheckforLostFocus
  if {activewindow} contains AC Tool 5.4.0 - C:\ACTool\Macros\ClaySlateV2.mac
    Compute Result = 1
    Exit
  Else
    Compute Result = 0
    Exit
  End
End



Clicker.mac

constants
  MouseX = 0
  MouseY = 0
  XOrig = 0
  YOrig = 0
  looping = 0
  wait4Timer = 2400 //6000 //10000 //23000 //15250
end


SetConst MouseX = {MouseX}
SetConst MouseY = {MouseY}

MousePos 873, 593
//MousePos 33, 141
Delay 150
RightClick
MousePos 873, 593
Delay 100


while $CheckforLostFocus = 0
  Call GoPick
End

MousePos 100, 100
Delay 100
Stop

Procedure GoPick
  SetConst XOrig = {mousex}
  SetConst YOrig = {mousey}
  MousePos $MouseX, $MouseY
  Delay 250
  Rightclick
  Delay 200
  
  // uh oh, dialog about being to tired
  IsObject ToTired at 822, 514
    // ok button
    MousePos 958, 647
    Compute $wait4Timer = $wait4Timer + 3000 //1000
    // make them wait double time this time
  	Delay $wait4Timer
  	// close dialog
    MousePos 958, 647
    If $CheckforLostFocus = 0
    	Rightclick
    End
    
    // reset mouse pointer
    Mousepos $XOrig, $YOrig
	Else
		// reduce wait time if no dialog
    Compute $wait4Timer = $wait4Timer - 500 //75
  End
  
  Mousepos $XOrig, $YOrig
  Delay $wait4Timer
End

Function CheckforLostFocus
  if {activewindow} contains AC Tool 5.4.0 - C:\ACTool\Macros\Picker.mac
    Compute Result = 1
    exit
  Else
    Compute Result = 0
    Exit
    //Stop
  End
End

Object ToTired   // Test at coords 822, 514
211=0,0|219=2,0|225=4,0|227=6,0|220=8,0|223=10,0|232=12,0|232=14,0|234=16,0|231=18,0|238=20,0|229=22,0|223=24,0|225=26,0|241=28,0|222=30,0|227=32,0|226=34,0|234=36,0|222=38,0|227=40,0|218=42,0|219=44,0|215=46,0|229=48,0|219=50,0|218=52,0|227=54,0|228=56,0|224=58,0|228=60,0|220=62,0|234=64,0|227=66,0|229=68,0|224=70,0|222=72,0|226=74,0|229=76,0|231=78,0|229=80,0|228=82,0|236=84,0|235=86,0|237=88,0|237=90,0|226=92,0|236=94,0|235=96,0|232=98,0|
214=0,2|225=2,2|227=4,2|230=6,2|236=8,2|232=10,2|240=12,2|233=14,2|235=16,2|233=18,2|238=20,2|234=22,2|225=24,2|231=26,2|238=28,2|224=30,2|227=32,2|227=34,2|232=36,2|216=38,2|227=40,2|219=42,2|220=44,2|216=46,2|223=48,2|223=50,2|220=52,2|222=54,2|225=56,2|224=58,2|226=60,2|220=62,2|232=64,2|225=66,2|227=68,2|224=70,2|219=72,2|227=74,2|224=76,2|228=78,2|228=80,2|227=82,2|231=84,2|229=86,2|233=88,2|236=90,2|228=92,2|235=94,2|232=96,2|234=98,2|
216=0,4|233=2,4|56=4,4|225=6,4|231=8,4|57=10,4|235=12,4|229=14,4|233=16,4|230=18,4|235=20,4|230=22,4|226=24,4|229=26,4|237=28,4|226=30,4|228=32,4|227=34,4|227=36,4|224=38,4|232=40,4|222=42,4|225=44,4|219=46,4|225=48,4|227=50,4|228=52,4|223=54,4|229=56,4|224=58,4|231=60,4|223=62,4|231=64,4|227=66,4|229=68,4|227=70,4|230=72,4|233=74,4|229=76,4|0=78,4|227=80,4|0=82,4|238=84,4|235=86,4|237=88,4|240=90,4|236=92,4|237=94,4|233=96,4|236=98,4|
214=0,6|232=2,6|225=4,6|110=6,6|114=8,6|226=10,6|57=12,6|0=14,6|233=16,6|0=18,6|236=20,6|229=22,6|231=24,6|235=26,6|238=28,6|231=30,6|0=32,6|0=34,6|229=36,6|167=38,6|0=40,6|222=42,6|55=44,6|54=46,6|223=48,6|227=50,6|233=52,6|0=54,6|0=56,6|227=58,6|0=60,6|55=62,6|233=64,6|56=66,6|0=68,6|230=70,6|224=72,6|232=74,6|229=76,6|0=78,6|0=80,6|0=82,6|0=84,6|57=86,6|240=88,6|118=90,6|116=92,6|234=94,6|234=96,6|0=98,6|
226=0,8|232=2,8|225=4,8|169=6,8|174=8,8|233=10,8|233=12,8|232=14,8|0=16,8|0=18,8|235=20,8|233=22,8|227=24,8|234=26,8|237=28,8|229=30,8|230=32,8|230=34,8|235=36,8|224=38,8|234=40,8|0=42,8|230=44,8|225=46,8|226=48,8|231=50,8|228=52,8|227=54,8|228=56,8|0=58,8|233=60,8|224=62,8|230=64,8|226=66,8|228=68,8|0=70,8|226=72,8|238=74,8|230=76,8|0=78,8|230=80,8|0=82,8|0=84,8|236=86,8|244=88,8|241=90,8|236=92,8|0=94,8|0=96,8|238=98,8|
225=0,10|229=2,10|226=4,10|227=6,10|234=8,10|238=10,10|235=12,10|235=14,10|0=16,10|0=18,10|238=20,10|236=22,10|227=24,10|235=26,10|240=28,10|0=30,10|233=32,10|228=34,10|233=36,10|225=38,10|236=40,10|0=42,10|236=44,10|225=46,10|225=48,10|227=50,10|229=52,10|229=54,10|232=56,10|0=58,10|233=60,10|230=62,10|236=64,10|230=66,10|230=68,10|0=70,10|231=72,10|235=74,10|235=76,10|0=78,10|233=80,10|0=82,10|0=84,10|230=86,10|242=88,10|237=90,10|233=92,10|234=94,10|0=96,10|240=98,10|
224=0,12|228=2,12|232=4,12|224=6,12|234=8,12|236=10,12|57=12,12|0=14,12|235=16,12|172=18,12|0=20,12|175=22,12|220=24,12|233=26,12|235=28,12|172=30,12|0=32,12|169=34,12|230=36,12|220=38,12|231=40,12|223=42,12|0=44,12|55=46,12|227=48,12|225=50,12|227=52,12|225=54,12|0=56,12|229=58,12|0=60,12|56=62,12|231=64,12|56=66,12|0=68,12|228=70,12|232=72,12|233=74,12|235=76,12|175=78,12|0=80,12|0=82,12|0=84,12|230=86,12|242=88,12|117=90,12|0=92,12|177=94,12|238=96,12|0=98,12|
220=0,14|228=2,14|225=4,14|222=6,14|228=8,14|232=10,14|230=12,14|230=14,14|233=16,14|230=18,14|236=20,14|233=22,14|222=24,14|235=26,14|238=28,14|226=30,14|226=32,14|225=34,14|227=36,14|225=38,14|233=40,14|224=42,14|230=44,14|229=46,14|227=48,14|229=50,14|231=52,14|231=54,14|233=56,14|234=58,14|234=60,14|235=62,14|237=64,14|232=66,14|228=68,14|231=70,14|236=72,14|242=74,14|240=76,14|243=78,14|233=80,14|236=82,14|238=84,14|235=86,14|238=88,14|235=90,14|237=92,14|236=94,14|240=96,14|241=98,14|
227=0,16|229=2,16|228=4,16|225=6,16|230=8,16|241=10,16|233=12,16|232=14,16|234=16,16|234=18,16|240=20,16|233=22,16|227=24,16|231=26,16|241=28,16|228=30,16|230=32,16|229=34,16|226=36,16|230=38,16|234=40,16|224=42,16|229=44,16|230=46,16|233=48,16|232=50,16|235=52,16|233=54,16|233=56,16|235=58,16|229=60,16|232=62,16|233=64,16|223=66,16|223=68,16|230=70,16|235=72,16|232=74,16|235=76,16|234=78,16|229=80,16|226=82,16|231=84,16|230=86,16|236=88,16|236=90,16|237=92,16|233=94,16|237=96,16|237=98,16|
End