Версия для печати темы

//Дефолтного параметра не нашел у процедур, поэтому так
proc Jump
  wait 300
  get mouse_pos #x #y
  for #i 1 5
    double_kleft #x #y 7 13 13 7
    wait 20 + random(15)
  end_for
end_proc
//Кол-во квадратов которые нужно пробежать и потом прыгнуть, из-за рандома могут быть смещения - учитывайте это.
proc runwait #squares
  for #i 1 #squares
    wait 265 + random(2)
  end_for
  get mouse_pos #x #y
  double_kleft #x #y 7 13 13 7
end_proc

//start
//set MouseClickDelay 20
wait 500
get mouse_pos #x #y
kleft #x #y
wait 80
double_kleft #x #y
wait 10
double_kleft #x #y
wait 1700
kleft #x #y
wait 10300 //ugol zhdem
kleft #x #y
wait 1000  //sehali
kleft #x #y
wait 1000  //letim
double_kleft #x #y
wait 10
double_kleft #x #y
wait 1300 //stena
double_kleft #x #y
wait 1600 //ugol
double_kleft #x #y
wait 600
double_kleft #x #y
wait 2400 //dalniy ugol
double_kleft #x #y
wait 1200 //letim vniz
kleft #x #y
wait 1800 //bejim
kleft #x #y
wait 190
kleft #x #y
wait 300
double_kleft #x #y
wait 50
double_kleft #x #y
wait 50
double_kleft #x #y
End_script

//start KOTdb BASE 89 - LAYOUT 4738
proc Jump
  wait 300
  get mouse_pos #x #y
  for #i 1 5
    double_kleft #x #y 7 13 13 7
    wait 20 + random(15)
  end_for
end_proc

proc runwait #squares
  for #i 1 #squares
    wait 265 + random(2)
  end_for
  get mouse_pos #x #y
  double_kleft #x #y 7 13 13 7
end_proc

wait 500 + random(250)
get mouse_pos #x #y
kleft #x #y 7 13 13 7
wait 1373
kleft #x #y 7 13 13 7
//call runwait 5 //в угол
call Jump
call Jump
call Jump
call runwait 7 //пробежка в другой угол
call runwait 6 //—катываемс¤
call Jump
call Jump
call Jump
call runwait 3 //—катываемс¤ и прыжек
call Jump
call Jump
call Jump
wait 30
call runwait 6 //бежим в угол
call Jump
call Jump
call runwait 2
call Jump
End_script