ищу скриптера который помог бы разобраться. кто согласен пишите

вообщем вот скрипт если можно подправьте пожалуйста я играю в игру world of tanks на артилерии он попадает мимо цели что можно сделать?
begin
Exec d:\Games\World_of_Tanks\WorldOfTanks
wait 15s
set #handleWin findwindow (WoT Client)
set workwindow #handleWin
wait 1s
:start
Set #time [1000] + random(3000)
set #clik [200] + random(1800)
set $a findcolor ( 434, 30 578, 60 1 1 ( 15987701, 15066601, 16711422, 1450132, 1187223) %close 2)
if $a > 0
wait #time
set #tank [1] + random(1)
if #tank = 1
move 171, 702
move 171, 703
wait #clik
double_left 171, 703
wait #clik
double_left 171, 703
end_if
if #tank = 2
move 358, 701
move 358, 700
wait #clik
double_left 358, 700
wait #clik
double_left 358, 700
end_if
wait #time
move 464, 55
move 464, 56
double_left 464, 56
end_if
set #handleWin findwindow (WoT Client)
if #handleWin = 0
wait 2s
set timer
goto begin
end_if
set $l findcolor ( 566, 679 598, 705 1 1 (16777215-16249847, 918207, 15724270) %close 2)
if $l > 0
move 513, 614
move 513, 615
wait #clik
double_left 513, 615
wait #clik
double_kleft 513, 615
set timer
end_if
set $c1 findcolor ( 634, 434 661, 448 1 1 (11910854, 11911878, 1909540, 8292490) %close 2 )
if $c1 > 0
set #vremya [12000] + random(6000)
wait #vremya
move 639, 441
move 639, 442
double_left 639, 442
wait #time
set timer
end_if
set #wait [145000] + random (130000)
if timer > #wait
end_if
set $z findcolor (766, 512 1020, 740 1 1 (4351, 5375, 3327, 531711-2177021) %arr 2)
if $z > 0
sendex ^
wait 300
move %arr [1 1], %arr [1 2]
wait 1000
double_kright %arr [1 1], %arr [1 2]
sendex 1
wait 3s
sendex ^
wait 300
move %arr [1 1], %arr [1 2]
wait 100
double_kright %arr [1 1], %arr [1 2]
sendex 1
wait 200
left 0, 0
wait 6s
end_if

goto start