Messages

31

Использование / Re: Ввод текста

« on: November 14, 2015, 10:00:07 PM »

ну вот мне кажется все же какая-то специфика есть в этом эмуляторе(

32

Использование / Re: Ввод текста

« on: November 14, 2015, 09:47:46 PM »

Попробовал твой вариант, к сожалению тоже не поддерживаются символ точка и собака, его и в справке нету.
Я поменял размер регистра букв и сразу все заработало в моем коде, только не печатается как уже говорил точка и @.
Эх, как жаль( Похоже нету больше вариантов

33

Использование / Re: Ввод текста

« on: November 14, 2015, 09:13:13 PM »

Ой, забыл еще добавить. Почему-то эмулятор переходит в полноэкранный вид, хотя в коде этого нету!

34

Использование / Re: Ввод текста

« on: November 14, 2015, 09:11:27 PM »

Попробовал, ваш вариант в поле ввелось вместо моего текста -/0/-, попробовал на основе ваших исходников написать свою функцию, получилось то же самое.
Весь код прикладываю

Code: (clickermann) [Select]

#name "test"
 
$hwnd = wndfind("BlueStacks App Player")
$pause = 1000

if($hwnd > 0)
wndgetinfo($hwnd, $x, $y, $size_x, $size_y)
hset($hwnd, 1)
else
print("BlueStasks не найден")
halt
end_if

sub(sendkeys, $string)

for($j = 1, $j < strlen($string) + 1)

$char = strcut($string, $j, 1)
$key = 0

switch($char)

case("a")
$key=97
print("a")

case("b")
$key=98
print("b")

case("c")
$key=99
print("c")

case("d")
$key=100
print("d")

case("e")
$key=101
print("e")

case("f")
$key=102
print("f")

case("g")
$key=103
print("g")

case("h")
$key=104
print("h")

case("i")
$key=105
print("i")

case("j")
$key=106
print("j")

case("k")
$key=107
print("k")

case("l")
$key=108
print("l")

case("m")
$key=109
print("m")

case("n")
$key=110
print("n")

case("o")
$key=111
print("o")

case("p")
$key=112
print("p")

case("q")
$key=113
print("q")

case("r")
$key=114
print("r")

case("s")
$key=115
print("s")

case("t")
$key=116
print("t")

case("u")
$key=117
print("u")

case("v")
$key=118
print("v")

case("w")
$key=119
print("w")

case("x")
$key=120
print("x")

case("y")
$key=121
print("y")

case("z")
$key=122
print("z")

case("0")
$key=48
print("0")

case("1")
$key=49
print("1")

case("2")
$key=50
print("2")

case("3")
$key=51
print("3")

case("4")
$key=52
print("4")

case("5")
$key=53
print("5")

case("6")
$key=54
print("6")

case("7")
$key=55
print("7")

case("8")
$key=56
print("8")

case("9")
$key=57
print("9")

case("@")
$key=64
print("@")

case(".")
$key=46
print(".")


end_switch

keypress($key)
waitms(rnd(16, 64))

end_cyc

end_sub

for($i = 1, $i < tfcount("accounts.txt") + 1)

$line = tfread("accounts.txt", $i)
$username = strcut2($line, 1, strpos($line, ":") - 1)
$password = strcut2($line, strpos($line, ":") + 1, strlen($line))

lclick(36, 100)
waitms($pause)

lclick(532, 655)
waitms($pause)

lclick(800, 400)
waitms($pause)

sendkeys($username)
waitms($pause)

keypress(#Enter)
waitms(50)

end_cyc

halt

Для любопытных записал видео работы.
Скажите пожалуйста, что может быть не так?
http://rghost.ru/7xzkYbh9s

35

Использование / Re: Ввод текста

« on: November 14, 2015, 07:48:41 PM »

dramster, благодарю. Сейчас попробую. Я просто думал keystring которая встроенная в clickermann

36

Использование / Re: Ввод текста

« on: November 14, 2015, 07:12:19 PM »

Спасибо, прочитал. Жаль, что не работает. Postmessage тоже не получилось, а keystring к сожалению не получился еще с самого начала, я это тоже укащщзывал. так как же быть может стоит написать процедуру как я предложил? в цикле побуквенно читаем и нажимаем. у меня единственная трудность как из символа получить его ASCII код и как читается строка посимвольно в clickermann?

37

Использование / Re: Ввод текста

« on: November 14, 2015, 07:02:56 PM »

Дак я скидывал код, там привязка активируется автоматически, да

38

Использование / Re: Ввод текста

« on: November 14, 2015, 06:50:39 PM »

Попробовал трижды активировать, ставил слипы по секунде, к сожалению ктрл+в не работает, не вставляет в поле ввода

39

Использование / Re: Ввод текста

« on: November 14, 2015, 06:29:38 PM »

Спасибо за совет, саб команды или как я их называю процедуурами действительно удобнее пользоваться и код компактнее выходит.
Ваш вариант

Ничего не происходит

Code: (clickermann) [Select]

sub(paste)
waitms(150)
keydown(#CTRL)
waitms(rnd(15,65))
keydown(#V)
waitms(rnd(15,65))
keyup(#V)
keyup(#CTRL)
waitms(150)
end_sub
если вместо keydown на клавишу v, я ставлю keypress, то вставляется как я писал выше в поле только буква v
(до этого вставлялась м, я отключил вообще русскую
раскладку в блюстэксе)

Code: (clickermann) [Select]

sub(paste)
waitms(150)
keydown(#CTRL)
waitms(rnd(15,65))
keypress(#V)
waitms(rnd(15,65))
keyup(#CTRL)
waitms(150)
end_sub
Возможно в эмуляторе как-то коряво работает данная комбинация, не смогли бы мне помочь написать процедуру, которая берет исходную строку
разбивает посимвольно, и нажимает keypress так же посимпольно? так как в этом варианте я хотя бы уверен, что он сработает

40

Использование / Re: Ввод текста

« on: November 14, 2015, 06:03:32 PM »

Спасибо за помощь, поискал по форуму чтение, совместил код

Code: (clickermann) [Select]

#name "test"
 
$hwnd = wndfind("BlueStacks App Player")
$pause = 1000

if($hwnd > 0)
wndgetinfo($hwnd, $x, $y, $size_x, $size_y)
hset($hwnd, 1)
else
print("BlueStasks не найден")
halt
end_if

for($a = 1, $a < tfcount("accounts.txt") + 1)

$line = tfread("accounts.txt", $a)
$username = strcut2($line, 1, strpos($line, ":") - 1)
$password = strcut2($line, strpos($line, ":") + 1, strlen($line))

// Нажимаем на аватар
lclick(36, 100)
waitms($pause)

// Нажимаем поменять аккаунт
lclick(532, 655)
waitms($pause)

// Нажимаем ввод почты
lclick(800, 400)
waitms(50)

// Копируем имя пользователя в буфер
toclip($username)
waitms(50)

// Зажимаем клавишу ctrl
keydown(#CTRL)
waitms(50)

// Нажимаем клавишу v
keypress(#V)
waitms(50)

// Отпускаем клавишу ctrl
keyup(#CTRL)
waitms(50)

// Кликаем на пустое поле для подтверждение ввода
lclick(800, 450)
waitms($pause)

end_cyc

halt
Возникла другая проблема, после копирования в буфер сtrl + v не выполняется, вместо него в поле появляется буква м кириллическая, что на английской раскладке v.
Пытался слипы сделать побольше, все равно не помогает, кто-то сталкивался?

41

Использование / Re: Ввод текста

« on: November 14, 2015, 03:49:40 PM »

Подскажите пожалуйста еще вот что, как организовать цикл (список аккаунтов с логинами и паролями), я хочу сделать скрипт для обхода всех своих мультов ежедневно для получения бонусов. А занятие буфера обмена на доли секунд не должны повлиять на параллельную работу все же я думаю

42

Предложения / Re: CTRL + S в редакторе

« on: November 14, 2015, 12:02:12 AM »

И кстати, я не говорил отменить кнопки применить, а просто как дополнительную горячую комбинацию

43

Предложения / Re: CTRL + S в редакторе

« on: November 14, 2015, 12:00:37 AM »

я кстати так и делаю, а можно хотя бы тогда сделать так, чтобы редактор подхватывал изменения в скрипте в режиме реал-тайм?

44

Использование / Re: Ввод текста

« on: November 13, 2015, 11:58:43 PM »

Пока вижу только одну проблему - использование буфера обмена, так как если человек работает активно за компьютером, так же активно использует и clipboard, но думаю это не большая проблема. Как только разберусь с задачей обязательно отпишу о результатах

45

Использование / Re: Ввод текста

« on: November 13, 2015, 11:56:48 PM »

Спасибо большое, да еще и за готовый пример. Очень ценный форум!
Сейчас попробую это добавить в свой проект.
P.S. Отдельное спасибо за оперативный ответ