Anonymous

AutoItSetOption("MouseCoordMode", 2) ;This way it works with any window placement, or full screen

Global $Paused
HotKeySet("{INSERT}", "TogglePause")
HotKeySet("{DELETE}", "Terminate")

While 1
    Sleep(100)
Wend

Func TogglePause()
    $Paused = NOT $Paused
    For $Paused = 1 to 1 step +1
   $xu = "168" ;This is the center of the first column of your inventory
   $yu = "157" ;Same but of row
   $xt = "431" ;Center of first column of trade screen
   $yt = "331" ;Same yet again *gasp*
   $times = "1"
   $times2 = "1"
   
   For $times = 1 to 4 Step +1
   
      For $times2 = 1 to 6 Step +1
         Sleep(100)
		 MouseMove($xu, $yu, 3)
         MouseClick("Left")
         MouseMove($xt, $yt, 3)
         MouseClick("Left")
         $xu = $xu + "29" ;Moves mouse forward 29 pixels
         $xt = $xt + "29"
      Next

   $yu = $yu + "27" ;Moves mouse down 27 pixels
   $yt = $yt + "27"
   $xu = "168" ;Reset to first Column of items
   $xt = "431"

   Next
    Next
EndFunc

Func Terminate()
    Exit 0
EndFunc