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.

Difference between revisions of "User:TeaAira/Macros"

From ATITD6
Jump to navigationJump to search
m
Line 1: Line 1:
−
 
 
<pre>
 
<pre>
  
Line 92: Line 91:
  
 
</pre>
 
</pre>
−
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:\Users\Tea\Documents\macros\clay slateV2.mac
 
−
    Compute Result = 1
 
−
    Exit
 
−
  Else
 
−
    Compute Result = 0
 
−
    Exit
 
−
  End
 
−
End
 

Revision as of 19:31, 17 January 2012


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


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

MousePos 873, 593
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 703, 537
    // ok button
    MousePos 703, 537
    Compute $wait4Timer = $wait4Timer + $add2Wait //1000
    // make them wait double time this time
  	Delay $wait4Timer
  	// close dialog
    MousePos 703, 537
    If $CheckforLostFocus = 0
    	Rightclick
    End
    
    // reset mouse pointer
    Mousepos $XOrig, $YOrig
	Else
		// reduce wait time if no dialog
    Compute $wait4Timer = $wait4Timer - $reduceWait //75
  End
  
  Mousepos $XOrig, $YOrig
  Delay $wait4Timer
End

Function CheckforLostFocus
  if {activewindow} contains AC Tool 5.4.0 - C:\Users\Tea\Documents\macros\clicker.mac
    Compute Result = 1
    exit
  Else
    Compute Result = 0
    Exit
    //Stop
  End
End

Object ToTired   // Test at coords 703, 537
217=0,0|221=1,0|217=2,0|220=3,0|223=4,0|221=5,0|222=6,0|215=7,0|217=8,0|217=9,0|223=10,0|218=11,0|217=12,0|214=13,0|212=14,0|217=15,0|217=16,0|215=17,0|212=18,0|218=19,0|215=20,0|219=21,0|222=22,0|222=23,0|220=24,0|220=25,0|222=26,0|224=27,0|221=28,0|221=29,0|220=30,0|222=31,0|222=32,0|
220=0,1|220=1,1|217=2,1|221=3,1|226=4,1|222=5,1|221=6,1|215=7,1|217=8,1|221=9,1|221=10,1|217=11,1|215=12,1|215=13,1|212=14,1|215=15,1|215=16,1|214=17,1|210=18,1|215=19,1|215=20,1|218=21,1|217=22,1|216=23,1|218=24,1|220=25,1|220=26,1|220=27,1|223=28,1|217=29,1|220=30,1|221=31,1|223=32,1|
221=0,2|224=1,2|218=2,2|222=3,2|227=4,2|222=5,2|217=6,2|213=7,2|216=8,2|219=9,2|222=10,2|216=11,2|211=12,2|215=13,2|213=14,2|214=15,2|216=16,2|215=17,2|214=18,2|218=19,2|220=20,2|223=21,2|222=22,2|221=23,2|221=24,2|220=25,2|221=26,2|221=27,2|226=28,2|217=29,2|222=30,2|221=31,2|223=32,2|
223=0,3|227=1,3|221=2,3|223=3,3|226=4,3|223=5,3|218=6,3|215=7,3|214=8,3|222=9,3|111=10,3|0=11,3|0=12,3|0=13,3|0=14,3|107=15,3|215=16,3|217=17,3|0=18,3|0=19,3|219=20,3|220=21,3|168=22,3|0=23,3|55=24,3|220=25,3|223=26,3|224=27,3|227=28,3|217=29,3|223=30,3|221=31,3|226=32,3|
220=0,4|224=1,4|223=2,4|223=3,4|221=4,4|221=5,4|220=6,4|217=7,4|212=8,4|110=9,4|0=10,4|109=11,4|213=12,4|215=13,4|107=14,4|0=15,4|107=16,4|218=17,4|0=18,4|0=19,4|217=20,4|163=21,4|0=22,4|55=23,4|223=24,4|221=25,4|227=26,4|227=27,4|228=28,4|220=29,4|224=30,4|220=31,4|224=32,4|
223=0,5|224=1,5|220=2,5|222=3,5|221=4,5|221=5,5|220=6,5|218=7,5|212=8,5|0=9,5|0=10,5|162=11,5|214=12,5|218=13,5|161=14,5|0=15,5|0=16,5|218=17,5|0=18,5|0=19,5|167=20,5|0=21,5|54=22,5|220=23,5|223=24,5|220=25,5|227=26,5|226=27,5|227=28,5|220=29,5|224=30,5|220=31,5|224=32,5|
223=0,6|227=1,6|217=2,6|220=3,6|220=4,6|222=5,6|220=6,6|213=7,6|214=8,6|0=9,6|0=10,6|216=11,6|215=12,6|218=13,6|218=14,6|0=15,6|0=16,6|217=17,6|0=18,6|0=19,6|0=20,6|55=21,6|220=22,6|222=23,6|224=24,6|220=25,6|223=26,6|227=27,6|227=28,6|223=29,6|224=30,6|224=31,6|228=32,6|
226=0,7|228=1,7|222=2,7|220=3,7|217=4,7|222=5,7|220=6,7|214=7,7|217=8,7|0=9,7|0=10,7|217=11,7|217=12,7|219=13,7|217=14,7|0=15,7|0=16,7|218=17,7|0=18,7|0=19,7|0=20,7|165=21,7|215=22,7|218=23,7|220=24,7|219=25,7|220=26,7|223=27,7|227=28,7|226=29,7|224=30,7|223=31,7|228=32,7|
222=0,8|228=1,8|223=2,8|219=3,8|219=4,8|217=5,8|219=6,8|215=7,8|218=8,8|0=9,8|0=10,8|217=11,8|215=12,8|215=13,8|215=14,8|0=15,8|0=16,8|217=17,8|0=18,8|0=19,8|54=20,8|0=21,8|163=22,8|215=23,8|219=24,8|220=25,8|220=26,8|222=27,8|223=28,8|223=29,8|222=30,8|223=31,8|223=32,8|
218=0,9|227=1,9|223=2,9|218=3,9|220=4,9|215=5,9|220=6,9|215=7,9|218=8,9|0=9,9|0=10,9|163=11,9|215=12,9|214=13,9|160=14,9|0=15,9|0=16,9|216=17,9|0=18,9|0=19,9|217=20,9|55=21,9|0=22,9|220=23,9|220=24,9|220=25,9|220=26,9|223=27,9|222=28,9|224=29,9|219=30,9|222=31,9|219=32,9|
218=0,10|226=1,10|223=2,10|215=3,10|221=4,10|217=5,10|220=6,10|218=7,10|221=8,10|109=9,10|0=10,10|108=11,10|212=12,10|212=13,10|106=14,10|0=15,10|107=16,10|215=17,10|0=18,10|0=19,10|217=20,10|165=21,10|0=22,10|54=23,10|221=24,10|218=25,10|219=26,10|223=27,10|226=28,10|226=29,10|219=30,10|222=31,10|220=32,10|
220=0,11|226=1,11|221=2,11|215=3,11|222=4,11|216=5,11|219=6,11|220=7,11|221=8,11|215=9,11|110=10,11|0=11,11|0=12,11|0=13,11|0=14,11|106=15,11|214=16,11|218=17,11|0=18,11|0=19,11|218=20,11|224=21,11|165=22,11|0=23,11|55=24,11|221=25,11|222=26,11|223=27,11|224=28,11|223=29,11|218=30,11|224=31,11|224=32,11|
221=0,12|228=1,12|224=2,12|216=3,12|224=4,12|220=5,12|221=6,12|220=7,12|221=8,12|218=9,12|221=10,12|218=11,12|207=12,12|215=13,12|207=14,12|212=15,12|212=16,12|218=17,12|218=18,12|218=19,12|219=20,12|221=21,12|220=22,12|217=23,12|223=24,12|218=25,12|219=26,12|222=27,12|224=28,12|224=29,12|220=30,12|223=31,12|224=32,12|
223=0,13|228=1,13|223=2,13|217=3,13|223=4,13|220=5,13|224=6,13|221=7,13|219=8,13|220=9,13|223=10,13|217=11,13|210=12,13|219=13,13|209=14,13|211=15,13|207=16,13|220=17,13|219=18,13|222=19,13|220=20,13|223=21,13|220=22,13|216=23,13|222=24,13|218=25,13|219=26,13|223=27,13|227=28,13|222=29,13|222=30,13|223=31,13|226=32,13|
End Object
Retrieved from "http://www.atitd.org/wiki/t6w/index.php?title=User:TeaAira/Macros&oldid=141596"