How do you fix this script? It is for Tanki online

int col, ex, ey;
getdisplay (col, ex, ey);
int C_ex = ex / 2, C_ey = ey / 2;
int v_X [5000], v_Y [5000];
int k;
int rast;
int color_vrag [1] [1];

color_vrag [0] [0] = 13597755; // I'm red // You can choose the color of the blue nickname more optimally using the Cybore editor
// color_vrag [0] [0] = 1389551; // I am blue // You can choose the color of red nickname with the help of the editor Cybore

int rotation ratio = 2; // The pickup speed, but also the inertia of the slip depends on this.
int precision_setting = 10; // This keeps accuracy when firing e
int tochnost_navodki = 50; // This is the accuracy when aiming
int precision_of_disks_bit = 100;// This is the accuracy at which it starts to beat.
int engage_pri_inavodka_korpus = 0; // 0-do not use 1-engage with a tower
int min_max = 15; // razbeznost color. The accuracy of the determination (to reduce while normally leads to the enemy)


int razn;


int rast1;
int pr;
int bp = 0;



sleep (1000);

key ('z');
key ('x');
key (SPACE);


lo :;
key ('c');


if (bp == 1) {bp = 0; keyup (SPACE);}
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], 0, 118, ex-280, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);


if (k> 0)
{
sort (C_ex, C_ey, #v_X [0], #v_Y [0], k);
rast = C_ex-v_X [0];
if (rast> setpoint precision) Pov_z ();
if (rast <-precision accuracy) Pov_x ();

rast1 = rast;
if (rast1 <0) rast1 = -rast1;
if (rast1 <precision_totvodka_bit)
{
bp = 1; keydown (SPACE);
if (rast> clean_point_decision) {keydown ('z'); sleep (100); keyup ('z');}
if (rast <- clean_tour_accuracy) {keydown ('x'); sleep (100); keyup (' x ');}
bit ();
}
if (bp == 1) {bp = 0; keyup (SPACE);}

}
goto lo;

/////////////////////////////////////////

function Pov_z ()
{
r: rast1 = rast;
if (rast1 <0) rast1 = -rast1;
razn = rast1 * turn ratio;

keydown ('z');

sleep (razn);
if (enable_with_input_korpus == 1) keyup (LEFT);
keyup ('z');
sleep (100);
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], 0, 118 , C_ex, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0)
{
sort (C_ex, C_ey-188, #v_X [0], #v_Y [0], k);
rast = C_ex-v_X [0];

if (rast> razn / 2) goto r;
if (rast1 <precision_totvodka_bit) {bp = 1; keydown (SPACE);}
sleep (100);
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], 0, 118 , C_ex, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0) {sort (C_ex, C_ey, #v_X [0], #v_Y [0], k); rast = C_ex-v_X [0];}
return;
}
if (rast1 <beat_disks_tobit) {bp = 1; keydown (SPACE);}
sleep (100);
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], 0, 118 , C_ex, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0) {sort (C_ex, C_ey, #v_X [0], #v_Y [0], k); rast = C_ex-v_X [0];}
}

function Pov_x ()
{
r: rast1 = rast;
if (rast1 <0) rast1 = -rast1;
razn = rast1 * turn ratio;

keydown ('x');
if (enable_with_input_korpus == 1) keydown (RIGHT);
sleep (razn);
if (enable_with_input_korpus == 1) keyup (RIGHT);
keyup ('x');
sleep (100);
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], C_ex, 118 , ex-280, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0)
{
sort (0, C_ey, #v_X [0], #v_Y [0], k);
rast = v_X [0];

if (rast <- (razn / 2)) goto r;
if (rast1 <precision_totvodka_bit) {bp = 1; keydown (SPACE);}
sleep (100);
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], C_ex, 118, ex-280, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0) {sort (0, C_ey, #v_X [0], #v_Y [0], k); rast = v_X [0];}
return;
}
if (rast1 <precision_totvodka_bit) {bp = 1; keydown (SPACE);}
sleep (100);
k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], C_ex, 118, ex-280, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0) {sort (0, C_ey, #v_X [0], #v_Y [0], k); rast = v_X [0];}
}



function bit ()
{
pr = 0;
q: k = findimage (-1, #color_vrag [0] [0], 0, #v_X [0], #v_Y [0], 0, 118, ex-280, ey-150 , min_max, min_max, min_max, min_max, min_max, min_max, 100, 1, -1);
if (k> 0)
{
sort (C_ex, C_ey, #v_X [0], #v_Y [0], k);
rast = C_ex-v_X [0];
if (rast> setpoint precision) Pov_z ();
if (rast <-precision accuracy) Pov_x ();
if (rast> clean_point_decision) {keydown ('z'); sleep (100); keyup ('z');}
if (rast <- clean_tour_accuracy) {keydown ('x'); sleep (100); keyup (' x ');}
rast1 = rast;
if (rast1 <0) rast1 = -rast1;
if (rast1 <precision_totvodka_bit)
{
pr = 0;
sleep (20);
goto q;
}

}
if (pr <20)
{
pr ++;
sleep (5);
goto q;
}
}

Это старый скрипт.

Can you fix it to make it work?
(Добавление)
I will pay you.