Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - lopux

Pages: [1]
1
Во общем в вк есть игра Звездные войны там  можно заработать кредиты путем уничтожения астероидов. Вот только сам процесс скучный до невыносимости. Так вот как можно написать скрипт для того чтоб кораблик летал и атаковал астероиды? Скрипт как там все выглядит ниже http://prntscr.com/gghxhx спасибо за внимание.

2
Здравствуйте все нужна помощь по написанию макроса для скрипта, вообще мне нужна его урезать он вышел аж на 1000 столбика в поэтому нудна урезать Начнем с самого макроса

Code: (clickermann) [Select]
// RECORDED SCRIPT 27/04/2017
// waitms correction
$S_CORR = 900
$S1_CORR = 100
$y = 560
$z = 473
$y1 = 773
$z1 = 418

waitms(700 + $S_CORR)
move(525,749)

move($y,$z)
waitms($S1_CORR + $S_CORR)
lDown($y,$z)
waitms($S1_CORR + $S_CORR)
lUp($y,$z)
waitms($S1_CORR + $S_CORR)
move($y,$z)

move($y1,$z1)
waitms($S1_CORR + $S_CORR)
lDown($y1,$z1)
waitms($S1_CORR + $S_CORR)
lUp($y1,$z1)
waitms($S1_CORR + $S_CORR)
move($y1,$z1)

move(810,240)
waitms($S1_CORR + $S_CORR)
lDown(810,240)1
waitms($S1_CORR + $S_CORR)
lUp(810,240)
waitms($S1_CORR + $S_CORR)
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)1
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)
keyDown(55) 705
waitms(200 + $S_CORR)
keyUp(55)
waitms(200 + $S_CORR)
keyDown(48)
waitms(200 + $S_CORR)
keyUp(48)
waitms(200 + $S_CORR)
keyDown(53)
waitms(200 + $S_CORR)
keyUp(53)
waitms(600 + $S_CORR)
move(812,239)

move(861,234)
waitms(600 + $S_CORR)
lDown(861,234)
waitms(600 + $S_CORR)
lUp(861,234)
waitms(600 + $S_CORR)
move(861,235)

move(861,236)
waitms(600 + $S_CORR)
keyDown(8)
waitms(600 + $S_CORR)
keyUp(8)
waitms(600 + $S_CORR)
keyDown(8)
waitms(400 + $S_CORR)
keyUp(8)
waitms(500 + $S_CORR)

waitms(400 + $S_CORR)
keyDown(50) 20
waitms(500 + $S_CORR)
keyUp(50)
waitms(400 + $S_CORR)
keyDown(48)
waitms(500 + $S_CORR)
keyUp(48)
waitms(999 + $S_CORR)
move(861,242)

move(757,569)
waitms(600 + $S_CORR)
lDown(757,569)
waitms(600 + $S_CORR)
lUp(757,569)
waitms(1480 + $S_CORR)
move(758,569)

move(521,265)
waitms(600 + $S_CORR)
lDown(521,265)
waitms(600 + $S_CORR)
lUp(521,265)
waitms(600 + $S_CORR)
move(522,264)

move(996,347)
waitms(900 + $S_CORR)
lDown(996,347)
waitms(999 + $S_CORR)
move(996,346)
waitms(999 + $S_CORR)
lUp(996,346)
waitms(911 + $S_CORR)
move(997,346)

move(62,419)
waitms(600 + $S_CORR)
lDown(62,419)
waitms(600 + $S_CORR)
lUp(62,419)

move($y,$z)
waitms($S1_CORR + $S_CORR)
lDown($y,$z)
waitms($S1_CORR + $S_CORR)
lUp($y,$z)
waitms($S1_CORR + $S_CORR)
move($y,$z)

move($y1,$z1)
waitms($S1_CORR + $S_CORR)
lDown($y1,$z1)
waitms($S1_CORR + $S_CORR)
lUp($y1,$z1)
waitms($S1_CORR + $S_CORR)
move($y1,$z1) вот этот кусок макроса постоянна повторяется можно ли его как нибудь сделать на подобие вот этой функций


$S_CORR = 900
$S1_CORR = 100
$y = 560
$z = 473
$y1 = 773
$z1 = 418

эта же постоянна меняющие координаты с 2 ячеек их надо вынести в отдельный текстовый файл, а сюда лишь вставить адрес к каждой координате

move(810,240)
waitms($S1_CORR + $S_CORR)
lDown(810,240)1
waitms($S1_CORR + $S_CORR)
lUp(810,240)
waitms($S1_CORR + $S_CORR)
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)1
keyDown(8)
waitms(200 + $S_CORR)
keyUp(8)
waitms(200 + $S_CORR)
keyDown(55)                                                         705
waitms(200 + $S_CORR)
keyUp(55)
waitms(200 + $S_CORR)
keyDown(48)
waitms(200 + $S_CORR)
keyUp(48)
waitms(200 + $S_CORR)
keyDown(53)
waitms(200 + $S_CORR)
keyUp(53)
waitms(600 + $S_CORR)
move(812,239)

move(861,234)
waitms(600 + $S_CORR)
lDown(861,234)
waitms(600 + $S_CORR)
lUp(861,234)
waitms(600 + $S_CORR)
move(861,235)

move(861,236)
waitms(600 + $S_CORR)
keyDown(8)
waitms(600 + $S_CORR)
keyUp(8)
waitms(600 + $S_CORR)
keyDown(8)
waitms(400 + $S_CORR)
keyUp(8)
waitms(500 + $S_CORR)

waitms(400 + $S_CORR)
keyDown(50)                                                       20
waitms(500 + $S_CORR)
keyUp(50)
waitms(400 + $S_CORR)
keyDown(48)
waitms(500 + $S_CORR)
keyUp(48)
waitms(999 + $S_CORR)
move(861,242)

Как это сделать? кто подскажет?

Pages: [1]