Func cubemouse($x2,$y2,$Range,$speed) While $Range > 10 MouseMove($x2-$Range , $y2-$Range ,$speed) $pos = MouseGetPos() $poscurY = $pos[1] while $poscurY < $y2 + $Range $poscurY += 20 _MouseClickPlus("", "right", $x2-$Range, $poscurY, 1) ;~ MouseClick("right",$x2-$Range ,$poscurY,1,$speed) WEnd MouseMove($x2-$Range , $y2+$Range ,$speed) $pos = MouseGetPos() $poscurX = $pos[0] while $poscurX < $x2 + $Range $poscurX += 20 _MouseClickPlus("", "right", $poscurX, $y2+$Range, 1) ;~ MouseClic