BlueStacks+ввод текста

[keepsv]

Доброго времени суток. Столкнулся с проблемой. Написал скрипт, всё работает, но иногда на этапе ввода логина и пароля случается сбой. Реализовал это я  так:

Code: (clickermann) [Select]

SUB(login2)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "login.bmp", -1, 80)
         $check = 1 //
         LCLICK($_return1, $_return2)
         WAITMS(800)
         LCLICK($_return1, $_return2)
         WAITMS(400)
         KEYPRESS(#F)
         WAITMS(60)
         KEYPRESS(#7)
         WAITMS(60)
         KEYPRESS(#9)
         WAITMS(60)
         KEYPRESS(#0)
         WAITMS(60)
         KEYPRESS(#9)
         WAITMS(60)
         KEYPRESS(#6)
         WAITMS(60)
         KEYPRESS(#5)
         WAITMS(60)
         KEYPRESS(#5)
         WAITMS(60)
         KEYPRESS(#7)
         WAITMS(60)
         KEYPRESS(#1)
         WAITMS(60)
         KEYPRESS(#9)
         WAITMS(60)
         KEYPRESS(#7)
         WAITMS(300)
      ELSE
         WAITMS(100)
      END_IF
   END_CYC
END_SUB
SUB(parol1)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "parol.bmp", -1, 80)
         $check = 1 //
         LCLICK($_return1, $_return2)
         WAITMS(800)
         LCLICK($_return1, $_return2)
         WAITMS(400)
         KEYPRESS(#7)
         WAITMS(60)
         KEYPRESS(#9)
         WAITMS(60)
         KEYPRESS(#6)
         WAITMS(60)
         KEYPRESS(#5)
         WAITMS(60)
         KEYPRESS(#1)
         WAITMS(60)
         KEYPRESS(#5)
         WAITMS(60)
         KEYPRESS(#5)
         WAITMS(60)
         KEYPRESS(#3)
         WAITMS(60)
         KEYPRESS(#3)
         WAITMS(60)
         KEYPRESS(#3)
         WAITMS(60)
         KEYPRESS(#4)
         WAITMS(700)
         KEYPRESS(#ENTER)
         WAITMS(2000)
      ELSE
         WAITMS(100)
      END_IF
   END_CYC
END_SUBМожет есть вариант как еще можно это сделать, без посимвольного ввода?

[Oraven]

Можно через буфер обмена сделать

Code: (clickermann) [Select]

SUB(login2)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "login.bmp", -1, 80)
         $check = 1 //
         LCLICK($_return1, $_return2)
         WAITMS(800)
         LCLICK($_return1, $_return2)
         WAITMS(300)
         TOCLIP("F79096557197") // скопировать в буфер
         WAITMS(100)
         KEYDOWN (#CTRL) // вставить
         WAITMS (50)
         KEYDOWN (#V)
         WAITMS (50)
         KEYUP (#V)
         KEYUP (#CTRL)
         WAITMS(300)
      ELSE
         WAITMS(100)
      END_IF
   END_CYC
END_SUB

SUB(parol1)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "parol.bmp", -1, 80)
         $check = 1 //
         LCLICK($_return1, $_return2)
         WAITMS(800)
         LCLICK($_return1, $_return2)
         WAITMS(300)
         TOCLIP("79651553334") // скопировать в буфер
         WAITMS(100)
         KEYDOWN (#CTRL) // вставить
         WAITMS (50)
         KEYDOWN (#V)
         WAITMS (50)
         KEYUP (#V)
         KEYUP (#CTRL)
         WAITMS(700)
         KEYPRESS(#ENTER)
         WAITMS(2000)
      ELSE
         WAITMS(100)
      END_IF
   END_CYC
END_SUB