Вот модуль, который из Action-а опрашивает состояние интересующих кнопок клавиатуры, а при нажатии ищет в чужой программе экранную кнопку и её нажимает.
История этого модуля: обратилась частная медклиника, у них в гинекологическом кабинете возникла проблема с цифровым кольпоскопом. Доктор должен прицелиться и навести резкость оптически, а потом развернуться к компу и мышкой тыкнуть кнопку "Получить снимок". Пока он поворачивается, резкость уплывает (кольпоскоп съезжает или цель дёргается).
В итоге взяли плату из клавиатуры, привязали к ней "курок", который прикрутили прямо к кольпоскопу, а на компе запустили вот этот модуль
Код:
StdCoder.Decode ..,, ..26,...3Qw7uP5PRPPNR9Rbf9b8R79FTvMf1GomCrlAy2xhX,Cb2x
hXhC6FU1xhiZiVBhihgmRiioedhgrZcZRiXFfaqmSrtuGfa4700zdGrr8rmCLLCJuyKtYcZRiX
7.2.s,MWX.0k,5TWyql.bnayKmKKqGomC5XzET1.PuP.MHT9N9ntumaU2,CJuyKtQC98P9PP7O
NbXmb.2.wuEk2kb1V.2.cUGpmWLuOpoKqvCbHZiYpedhA704TeKKw.bHfEWUmL.6..D.n926.C
cIhgsNHT9N9ntQ8qorG4704D.CbB,708T1U.k,v.T.rf12.,U,ot,U00.bnUGLu8ro8quGrmCL
WKqtE0E.kHE.0.p.0.4E.6.JFA0z.U.2m,.jC.AU0KyB.,UgX.UO.,.16.c8.2UwK.616.dc.A
U22.0EwE.8zzzzzB.6xzzzz5cuzzzzLaH.8D2V,UszzzzT72,6yk.E.Ozzzzz,uzzzzz,mzzzz
z,eCY12UuzzzzT1.OD.uD.mD.eCw6c0kp.EG4.2.WMP9UERe0cUXDF9fR5uPPPP1fP7PNZvQRt
IdHf.2UlbcZpC.c9h0E.8z,E.0.,F.2.o.6.K,4,0E.E2,cwR.0..o.6.K,K,yzayIWKJaKIEi
ImmqoCrZyKq0rrCrRqk2aoa0pb8Je0mdKKtOroCqmCLK0mfaKr4IsaKK0GWaqkmqrSKK0Gayqn
0GRqHECJuGKayqnmWHZiYRchZgnRbBgV7QcDpdHZeBAV7QggBhXRhEBgpRiZ3Yx2Ym2akQbBgV
7YeN3e3hV7AV,RgoBhjphUgbU2eDBdCZe3JeUYeD3YGhc1xdGZcU2ZHhgm,umUCKua4H769eH7
uCPM1OpU8p4ak20LtKqtCrmGKR0GVyobmoW4Ibin4ak2mqkCLuCIqaqlIbUYdDpd5BdCZevgV7
A,HfPLPH9vQbPMDPNPdC,NEZeI1OK,dAfdB,tHB8658G1eIrN1H.ggYJ5.M1H6IZuH5OF7OJZO
F,dL,tHRvENPO5nRqk20Jd.UIJitZddphfRbBg,.EI4KR0mUCKua4YcjRbBAV7oe,76ZPNCKK0
GtKqt4KR0mYuIeKoXKIdin4Ic3xc7pdBAV7IiZRiX3Yug5jOORHsoZ5hgoBcnBjiRg9hgtReoB
gohgcwedpBcJLuLZuETeHdeIT8HHtCPM0HcQAgUIbx22.D0...o8CJb4IcCJYyIeamRq.HeF,7
8ZPNbvMmHE0nI0GH0GI851HS0GM6JFOFRO1Hk205C5,dCv76deIfOFPM0HMFNuI9O1HM0HMG2i
mhgn,B76FtI91EeaqliqtWmI0mK0Gq4qtG566x7659PHXE,H76d8G.H6P1vQ.,dCvldKKt.Unl
Rq.HM0TeP58PM1HM0KIbGoRA,05UuEX4IaCpWkW.GJtaLa.HkdKKtO56FT9H19R9fQFNMN76bO
N.uqrSrIqk2KIb2Y2xhvM103.8puuKJin4aUKVVJbU.QbBAV0,cH9uJFNMHtCPM0C3.70..Erk
Rqk26R7vEc9T8Q9fPduPT9P7OO11Ft7L8NNPOyGdCLtCqLiorm4SGK0mHGF01I01H0bH09H0LH
01I01GRGsSGMTGsTGMRGMQGMEeXyYkvYkAZkzYkyYk,ZkuYkysD0H0TmIq.cIffPrN1P..2emB
hiZi13hdZhYRiU2ZkBgmhgiZiu2YLBhi7Q2d,pd2Zd3BZvg,O3CKoeHES3.kR0GtKqteHEaIb.
M0H6Rl9Rp761eI...30klWKEenSw8R1S2jOOR9NTvRF7Q1fQ69,tJHnUULxf13d7Zd2BZvUX,.
MNEmklWKK0mfMEkf2dLpd2pc7JeHZedQ5we6BdAhcUQgc3YX2Yk2Y2xdBAV7AVAxhbpZ7phopc
jJih3ZX3hg6HTHLWqmWrkGqmCqoqqkmKK0GMmGE8GE8GK0Gay4b9OTvR3OMbPNHtCP.ZXUIbx.
UZ,7XIhgsZiL3ZX3BGLwGLK0GaKIbWGuWLuamK4nIin4EakdGLtaKrSKIGLwGbv2YAxhb7HRvC
PM0Hkl.ME.6N2ZXVLlUUL,uoWWJeam4ak2k4akWuYU2emBBd1sCPM1.U4BhiZg13hdFEWGs44I
5.W2U7pdUYiZ3joJbU.wd432M8p76jOO..PM0O3...0Gt..k2G5.I4.sCM1HM0VeI.gclZeZ3D
,78HdC,dET0.3OF.HcQ..SomUYFekf.dXg.kIqmM.ZOFdOJZeH,7Rl9R,ND,7R99Sqk2akWkW4
LekRq.PEVK2kl.ME.6N2Zk,m0A6sJC2G2sM..K4YAQAw842w8F0B0.j09GICKo00aGEOWyhclZ
eZFIaGE0GWU7QA..91G4.A6sJUC,MFQ58pW.59OPM09WUocdpBUvgVB..O28ouGLuyKr0GIaGR
w8U6dHk4cJMP1POR99,tMFfC...HcQI5.EV.ghVBhi3YugbU.cFHfP7vJHHmEFGJXaKtCLuyJX
yKtqKFmGE8GfKKtCroyKr0mMumM8mIin4aUX,kUkXK4YAghVBBNlfaa,,jmVEW.HeFCKo000Ge
WoWU7QAEXa450WmlWKKIYnYkvYkkYkmYkxYkkYkDZkWAZBAV7UvM0H....sJ.K4uKmklkfMEkf
.gV7.......91G4.A6sJ........K4YA.MEkf.......B0.EFGI0vH09I0vH09mIqU7.I8cHM1
EEU0,in4q..6JZPSsOcE.mqoMN00.UcAZUQYU2avM0H.NPORvO6JF0AVgVB,2Yug53N37QE7gE
7AH7A618VZ7VT8Vj7VN8V,VUwX2qX24YuYEi1y1.y18m4aU3Z7M0H...qF0LH09I01mUGMN.l7
V,NE00.i1.UzUVIYBAV7cHi1Goo4Kqc9f8Q7PMdndGLtaab7PHfP.AZBAV3FEGJta5Q5P..Ydd
phfxcpBgmZge2Ycoe,JeU2iVJiu2Y2BhV,VOMZP8rN182U7FzmqouaZ,U72iVJiiYgdRiVJggh
gY3YuEe.K2P.0GaaKrw6sCPM1.UHhA7vENPOIZvgV7AVKVXdC.2d,,M0HcQkY.EV.QAEX..rN1
A7CaUUU.M066sJu4QeZphYhdZRinVcQgclf.8oaypVmoYCoZmGE0HK2adQbBk2..MH9vQb13ON
99QFdEH8Jb88PNAHN8PM0H.P.0mdK450iXB..yIrC2k2.sI9fP71g,9eHwdiR6sCqEVKoXUGhC
PMFR8FiImm4L0oZBgV0QdYZhd,EdKLrqk48..kdKaY,8ssHpmsETfPdnrmKqKKtCLLCZYRcoJi
gZcZRiX3Ulb8..umVyKrG5EWQiX3.5011o3cQ...sQR,.G20EtH.0.G,,6.M00U.2..AU0CyIh
A8pumqm8rtumdcIf9PY62Ulb8.CLL8pumqmY62UmT.6.QJ,k1kFF.0U1CS.QiiQ8CJuaLqKKWK
qt2Ul1.RVtZBE.8z16.0.E2Eh6.0.32.oZ,Zio,dX2tQ0U2U...GG.6.16.6.665hKE.4vl5UT
yB4.4.0E.cUZT1E..UO.,.1.e0.,6Y1.0.UA2Tm.mmBjZ92T,eUXDFTXh,Cor..c2,.,..W.0.
A,,UMSdn76Dtc0MyfU.az864T8O0OJW7,8....
--- end of encoding ---