├── .gitattributes ├── .gitignore ├── App.config ├── Form1.Designer.vb ├── Form1.resx ├── Form1.vb ├── Form2.Designer.vb ├── Form2.resx ├── Form2.vb ├── Gestures.Designer.vb ├── Gestures.resx ├── Gestures.vb ├── My Project ├── Application.Designer.vb ├── Application.myapp ├── AssemblyInfo.vb ├── Resources.Designer.vb ├── Resources.resx ├── Settings.Designer.vb └── Settings.settings ├── Resources ├── AdbWinApi.dll ├── AdbWinUsbApi.dll ├── adb.exe ├── apps.png ├── back.png ├── droidAtScreen-1.1.jar └── home.png ├── WindowsApplication1.sln ├── WindowsApplication1.userprefs └── WindowsApplication1.vbproj /.gitattributes: -------------------------------------------------------------------------------- 1 | # Auto detect text files and perform LF normalization 2 | * text=auto 3 | 4 | # Custom for Visual Studio 5 | *.cs diff=csharp 6 | *.sln merge=union 7 | *.csproj merge=union 8 | *.vbproj merge=union 9 | *.fsproj merge=union 10 | *.dbproj merge=union 11 | 12 | # Standard to msysgit 13 | *.doc diff=astextplain 14 | *.DOC diff=astextplain 15 | *.docx diff=astextplain 16 | *.DOCX diff=astextplain 17 | *.dot diff=astextplain 18 | *.DOT diff=astextplain 19 | *.pdf diff=astextplain 20 | *.PDF diff=astextplain 21 | *.rtf diff=astextplain 22 | *.RTF diff=astextplain 23 | -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- 1 | ################# 2 | ## Eclipse 3 | ################# 4 | 5 | *.pydevproject 6 | .project 7 | .metadata 8 | bin/ 9 | tmp/ 10 | *.tmp 11 | *.bak 12 | *.swp 13 | *~.nib 14 | local.properties 15 | .classpath 16 | .settings/ 17 | .loadpath 18 | 19 | # External tool builders 20 | .externalToolBuilders/ 21 | 22 | # Locally stored "Eclipse launch configurations" 23 | *.launch 24 | 25 | # CDT-specific 26 | .cproject 27 | 28 | # PDT-specific 29 | .buildpath 30 | 31 | 32 | ################# 33 | ## Visual Studio 34 | ################# 35 | 36 | ## Ignore Visual Studio temporary files, build results, and 37 | ## files generated by popular Visual Studio add-ons. 38 | 39 | # User-specific files 40 | *.suo 41 | *.user 42 | *.sln.docstates 43 | 44 | # Build results 45 | 46 | [Dd]ebug/ 47 | [Rr]elease/ 48 | x64/ 49 | build/ 50 | [Bb]in/ 51 | [Oo]bj/ 52 | 53 | # MSTest test Results 54 | [Tt]est[Rr]esult*/ 55 | [Bb]uild[Ll]og.* 56 | 57 | *_i.c 58 | *_p.c 59 | *.ilk 60 | *.meta 61 | *.obj 62 | *.pch 63 | *.pdb 64 | *.pgc 65 | *.pgd 66 | *.rsp 67 | *.sbr 68 | *.tlb 69 | *.tli 70 | *.tlh 71 | *.tmp 72 | *.tmp_proj 73 | *.log 74 | *.vspscc 75 | *.vssscc 76 | .builds 77 | *.pidb 78 | *.log 79 | *.scc 80 | 81 | # Visual C++ cache files 82 | ipch/ 83 | *.aps 84 | *.ncb 85 | *.opensdf 86 | *.sdf 87 | *.cachefile 88 | 89 | # Visual Studio profiler 90 | *.psess 91 | *.vsp 92 | *.vspx 93 | 94 | # Guidance Automation Toolkit 95 | *.gpState 96 | 97 | # ReSharper is a .NET coding add-in 98 | _ReSharper*/ 99 | *.[Rr]e[Ss]harper 100 | 101 | # TeamCity is a build add-in 102 | _TeamCity* 103 | 104 | # DotCover is a Code Coverage Tool 105 | *.dotCover 106 | 107 | # NCrunch 108 | *.ncrunch* 109 | .*crunch*.local.xml 110 | 111 | # Installshield output folder 112 | [Ee]xpress/ 113 | 114 | # DocProject is a documentation generator add-in 115 | DocProject/buildhelp/ 116 | DocProject/Help/*.HxT 117 | DocProject/Help/*.HxC 118 | DocProject/Help/*.hhc 119 | DocProject/Help/*.hhk 120 | DocProject/Help/*.hhp 121 | DocProject/Help/Html2 122 | DocProject/Help/html 123 | 124 | # Click-Once directory 125 | publish/ 126 | 127 | # Publish Web Output 128 | *.Publish.xml 129 | *.pubxml 130 | 131 | # NuGet Packages Directory 132 | ## TODO: If you have NuGet Package Restore enabled, uncomment the next line 133 | #packages/ 134 | 135 | # Windows Azure Build Output 136 | csx 137 | *.build.csdef 138 | 139 | # Windows Store app package directory 140 | AppPackages/ 141 | 142 | # Others 143 | sql/ 144 | *.Cache 145 | ClientBin/ 146 | [Ss]tyle[Cc]op.* 147 | ~$* 148 | *~ 149 | *.dbmdl 150 | *.[Pp]ublish.xml 151 | *.pfx 152 | *.publishsettings 153 | 154 | # RIA/Silverlight projects 155 | Generated_Code/ 156 | 157 | # Backup & report files from converting an old project file to a newer 158 | # Visual Studio version. Backup files are not needed, because we have git ;-) 159 | _UpgradeReport_Files/ 160 | Backup*/ 161 | UpgradeLog*.XML 162 | UpgradeLog*.htm 163 | 164 | # SQL Server files 165 | App_Data/*.mdf 166 | App_Data/*.ldf 167 | 168 | ############# 169 | ## Windows detritus 170 | ############# 171 | 172 | # Windows image file caches 173 | Thumbs.db 174 | ehthumbs.db 175 | 176 | # Folder config file 177 | Desktop.ini 178 | 179 | # Recycle Bin used on file shares 180 | $RECYCLE.BIN/ 181 | 182 | # Mac crap 183 | .DS_Store 184 | 185 | 186 | ############# 187 | ## Python 188 | ############# 189 | 190 | *.py[co] 191 | 192 | # Packages 193 | *.egg 194 | *.egg-info 195 | dist/ 196 | build/ 197 | eggs/ 198 | parts/ 199 | var/ 200 | sdist/ 201 | develop-eggs/ 202 | .installed.cfg 203 | 204 | # Installer logs 205 | pip-log.txt 206 | 207 | # Unit test / coverage reports 208 | .coverage 209 | .tox 210 | 211 | #Translations 212 | *.mo 213 | 214 | #Mr Developer 215 | .mr.developer.cfg 216 | -------------------------------------------------------------------------------- /App.config: -------------------------------------------------------------------------------- 1 |  2 | 3 | 4 | 5 | 6 | -------------------------------------------------------------------------------- /Form1.Designer.vb: -------------------------------------------------------------------------------- 1 |  _ 2 | Partial Class Form1 3 | Inherits System.Windows.Forms.Form 4 | 5 | 'Form overrides dispose to clean up the component list. 6 | _ 7 | Protected Overrides Sub Dispose(ByVal disposing As Boolean) 8 | Try 9 | If disposing AndAlso components IsNot Nothing Then 10 | components.Dispose() 11 | End If 12 | Finally 13 | MyBase.Dispose(disposing) 14 | End Try 15 | End Sub 16 | 17 | 'Required by the Windows Form Designer 18 | Private components As System.ComponentModel.IContainer 19 | 20 | 'NOTE: The following procedure is required by the Windows Form Designer 21 | 'It can be modified using the Windows Form Designer. 22 | 'Do not modify it using the code editor. 23 | _ 24 | Private Sub InitializeComponent() 25 | Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) 26 | Me.Button1 = New System.Windows.Forms.Button() 27 | Me.Button2 = New System.Windows.Forms.Button() 28 | Me.Button3 = New System.Windows.Forms.Button() 29 | Me.Button4 = New System.Windows.Forms.Button() 30 | Me.Button0 = New System.Windows.Forms.Button() 31 | Me.Button9 = New System.Windows.Forms.Button() 32 | Me.Button8 = New System.Windows.Forms.Button() 33 | Me.Button7 = New System.Windows.Forms.Button() 34 | Me.Button6 = New System.Windows.Forms.Button() 35 | Me.Button5 = New System.Windows.Forms.Button() 36 | Me.Buttonh = New System.Windows.Forms.Button() 37 | Me.Buttonj = New System.Windows.Forms.Button() 38 | Me.Buttonm = New System.Windows.Forms.Button() 39 | Me.Buttonb = New System.Windows.Forms.Button() 40 | Me.Buttonn = New System.Windows.Forms.Button() 41 | Me.Buttong = New System.Windows.Forms.Button() 42 | Me.Buttonv = New System.Windows.Forms.Button() 43 | Me.Buttonf = New System.Windows.Forms.Button() 44 | Me.Buttonc = New System.Windows.Forms.Button() 45 | Me.Buttond = New System.Windows.Forms.Button() 46 | Me.Buttonk = New System.Windows.Forms.Button() 47 | Me.Buttonl = New System.Windows.Forms.Button() 48 | Me.Buttonp = New System.Windows.Forms.Button() 49 | Me.Buttono = New System.Windows.Forms.Button() 50 | Me.Buttoni = New System.Windows.Forms.Button() 51 | Me.Buttonu = New System.Windows.Forms.Button() 52 | Me.Buttony = New System.Windows.Forms.Button() 53 | Me.Buttont = New System.Windows.Forms.Button() 54 | Me.Buttons = New System.Windows.Forms.Button() 55 | Me.Buttonx = New System.Windows.Forms.Button() 56 | Me.Buttonz = New System.Windows.Forms.Button() 57 | Me.Buttona = New System.Windows.Forms.Button() 58 | Me.Buttonq = New System.Windows.Forms.Button() 59 | Me.Buttonr = New System.Windows.Forms.Button() 60 | Me.Buttone = New System.Windows.Forms.Button() 61 | Me.Buttonw = New System.Windows.Forms.Button() 62 | Me.Buttonspace = New System.Windows.Forms.Button() 63 | Me.Buttondot = New System.Windows.Forms.Button() 64 | Me.Buttonback = New System.Windows.Forms.Button() 65 | Me.Buttoncaps = New System.Windows.Forms.Button() 66 | Me.Buttoncomma = New System.Windows.Forms.Button() 67 | Me.Buttonenter = New System.Windows.Forms.Button() 68 | Me.Buttonslash = New System.Windows.Forms.Button() 69 | Me.bsym = New System.Windows.Forms.Button() 70 | Me.bRight = New System.Windows.Forms.Button() 71 | Me.Down = New System.Windows.Forms.Button() 72 | Me.Up = New System.Windows.Forms.Button() 73 | Me.bLeft = New System.Windows.Forms.Button() 74 | Me.Center = New System.Windows.Forms.Button() 75 | Me.Powerbtn = New System.Windows.Forms.Button() 76 | Me.adb = New System.Windows.Forms.Button() 77 | Me.Button10 = New System.Windows.Forms.Button() 78 | Me.TextBox1 = New System.Windows.Forms.TextBox() 79 | Me.Label1 = New System.Windows.Forms.Label() 80 | Me.Label2 = New System.Windows.Forms.Label() 81 | Me.Label3 = New System.Windows.Forms.Label() 82 | Me.ComboBox1 = New System.Windows.Forms.ComboBox() 83 | Me.Button11 = New System.Windows.Forms.Button() 84 | Me.Button12 = New System.Windows.Forms.Button() 85 | Me.Button13 = New System.Windows.Forms.Button() 86 | Me.Button14 = New System.Windows.Forms.Button() 87 | Me.Button15 = New System.Windows.Forms.Button() 88 | Me.GoBack = New System.Windows.Forms.Button() 89 | Me.Home = New System.Windows.Forms.Button() 90 | Me.Apps = New System.Windows.Forms.Button() 91 | Me.Button16 = New System.Windows.Forms.Button() 92 | Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() 93 | Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() 94 | Me.AndroidControlByToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() 95 | Me.Version010ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() 96 | Me.MenuStrip1.SuspendLayout() 97 | Me.SuspendLayout() 98 | ' 99 | 'Button1 100 | ' 101 | Me.Button1.Location = New System.Drawing.Point(54, 47) 102 | Me.Button1.Name = "Button1" 103 | Me.Button1.Size = New System.Drawing.Size(42, 39) 104 | Me.Button1.TabIndex = 0 105 | Me.Button1.Text = "1" 106 | Me.Button1.UseVisualStyleBackColor = True 107 | ' 108 | 'Button2 109 | ' 110 | Me.Button2.Location = New System.Drawing.Point(102, 47) 111 | Me.Button2.Name = "Button2" 112 | Me.Button2.Size = New System.Drawing.Size(42, 39) 113 | Me.Button2.TabIndex = 1 114 | Me.Button2.Text = "2" 115 | Me.Button2.UseVisualStyleBackColor = True 116 | ' 117 | 'Button3 118 | ' 119 | Me.Button3.Location = New System.Drawing.Point(150, 47) 120 | Me.Button3.Name = "Button3" 121 | Me.Button3.Size = New System.Drawing.Size(42, 39) 122 | Me.Button3.TabIndex = 2 123 | Me.Button3.Text = "3" 124 | Me.Button3.UseVisualStyleBackColor = True 125 | ' 126 | 'Button4 127 | ' 128 | Me.Button4.Location = New System.Drawing.Point(198, 47) 129 | Me.Button4.Name = "Button4" 130 | Me.Button4.Size = New System.Drawing.Size(42, 39) 131 | Me.Button4.TabIndex = 3 132 | Me.Button4.Text = "4" 133 | Me.Button4.UseVisualStyleBackColor = True 134 | ' 135 | 'Button0 136 | ' 137 | Me.Button0.Location = New System.Drawing.Point(486, 47) 138 | Me.Button0.Name = "Button0" 139 | Me.Button0.Size = New System.Drawing.Size(42, 39) 140 | Me.Button0.TabIndex = 4 141 | Me.Button0.Text = "0" 142 | Me.Button0.UseVisualStyleBackColor = True 143 | ' 144 | 'Button9 145 | ' 146 | Me.Button9.Location = New System.Drawing.Point(438, 47) 147 | Me.Button9.Name = "Button9" 148 | Me.Button9.Size = New System.Drawing.Size(42, 39) 149 | Me.Button9.TabIndex = 5 150 | Me.Button9.Text = "9" 151 | Me.Button9.UseVisualStyleBackColor = True 152 | ' 153 | 'Button8 154 | ' 155 | Me.Button8.Location = New System.Drawing.Point(390, 47) 156 | Me.Button8.Name = "Button8" 157 | Me.Button8.Size = New System.Drawing.Size(42, 39) 158 | Me.Button8.TabIndex = 6 159 | Me.Button8.Text = "8" 160 | Me.Button8.UseVisualStyleBackColor = True 161 | ' 162 | 'Button7 163 | ' 164 | Me.Button7.Location = New System.Drawing.Point(342, 47) 165 | Me.Button7.Name = "Button7" 166 | Me.Button7.Size = New System.Drawing.Size(42, 39) 167 | Me.Button7.TabIndex = 7 168 | Me.Button7.Text = "7" 169 | Me.Button7.UseVisualStyleBackColor = True 170 | ' 171 | 'Button6 172 | ' 173 | Me.Button6.Location = New System.Drawing.Point(294, 47) 174 | Me.Button6.Name = "Button6" 175 | Me.Button6.Size = New System.Drawing.Size(42, 39) 176 | Me.Button6.TabIndex = 8 177 | Me.Button6.Text = "6" 178 | Me.Button6.UseVisualStyleBackColor = True 179 | ' 180 | 'Button5 181 | ' 182 | Me.Button5.Location = New System.Drawing.Point(246, 47) 183 | Me.Button5.Name = "Button5" 184 | Me.Button5.Size = New System.Drawing.Size(42, 39) 185 | Me.Button5.TabIndex = 9 186 | Me.Button5.Text = "5" 187 | Me.Button5.UseVisualStyleBackColor = True 188 | ' 189 | 'Buttonh 190 | ' 191 | Me.Buttonh.Location = New System.Drawing.Point(341, 137) 192 | Me.Buttonh.Name = "Buttonh" 193 | Me.Buttonh.Size = New System.Drawing.Size(42, 39) 194 | Me.Buttonh.TabIndex = 10 195 | Me.Buttonh.Text = "H" 196 | Me.Buttonh.UseVisualStyleBackColor = True 197 | ' 198 | 'Buttonj 199 | ' 200 | Me.Buttonj.Location = New System.Drawing.Point(390, 137) 201 | Me.Buttonj.Name = "Buttonj" 202 | Me.Buttonj.Size = New System.Drawing.Size(42, 39) 203 | Me.Buttonj.TabIndex = 11 204 | Me.Buttonj.Text = "J" 205 | Me.Buttonj.UseVisualStyleBackColor = True 206 | ' 207 | 'Buttonm 208 | ' 209 | Me.Buttonm.Location = New System.Drawing.Point(438, 182) 210 | Me.Buttonm.Name = "Buttonm" 211 | Me.Buttonm.Size = New System.Drawing.Size(42, 39) 212 | Me.Buttonm.TabIndex = 12 213 | Me.Buttonm.Text = "M" 214 | Me.Buttonm.UseVisualStyleBackColor = True 215 | ' 216 | 'Buttonb 217 | ' 218 | Me.Buttonb.Location = New System.Drawing.Point(342, 182) 219 | Me.Buttonb.Name = "Buttonb" 220 | Me.Buttonb.Size = New System.Drawing.Size(42, 39) 221 | Me.Buttonb.TabIndex = 13 222 | Me.Buttonb.Text = "B" 223 | Me.Buttonb.UseVisualStyleBackColor = True 224 | ' 225 | 'Buttonn 226 | ' 227 | Me.Buttonn.Location = New System.Drawing.Point(390, 182) 228 | Me.Buttonn.Name = "Buttonn" 229 | Me.Buttonn.Size = New System.Drawing.Size(42, 39) 230 | Me.Buttonn.TabIndex = 14 231 | Me.Buttonn.Text = "N" 232 | Me.Buttonn.UseVisualStyleBackColor = True 233 | ' 234 | 'Buttong 235 | ' 236 | Me.Buttong.Location = New System.Drawing.Point(293, 137) 237 | Me.Buttong.Name = "Buttong" 238 | Me.Buttong.Size = New System.Drawing.Size(42, 39) 239 | Me.Buttong.TabIndex = 15 240 | Me.Buttong.Text = "G" 241 | Me.Buttong.UseVisualStyleBackColor = True 242 | ' 243 | 'Buttonv 244 | ' 245 | Me.Buttonv.Location = New System.Drawing.Point(294, 182) 246 | Me.Buttonv.Name = "Buttonv" 247 | Me.Buttonv.Size = New System.Drawing.Size(42, 39) 248 | Me.Buttonv.TabIndex = 16 249 | Me.Buttonv.Text = "V" 250 | Me.Buttonv.UseVisualStyleBackColor = True 251 | ' 252 | 'Buttonf 253 | ' 254 | Me.Buttonf.Location = New System.Drawing.Point(246, 137) 255 | Me.Buttonf.Name = "Buttonf" 256 | Me.Buttonf.Size = New System.Drawing.Size(42, 39) 257 | Me.Buttonf.TabIndex = 17 258 | Me.Buttonf.Text = "F" 259 | Me.Buttonf.UseVisualStyleBackColor = True 260 | ' 261 | 'Buttonc 262 | ' 263 | Me.Buttonc.Location = New System.Drawing.Point(246, 182) 264 | Me.Buttonc.Name = "Buttonc" 265 | Me.Buttonc.Size = New System.Drawing.Size(42, 39) 266 | Me.Buttonc.TabIndex = 18 267 | Me.Buttonc.Text = "C" 268 | Me.Buttonc.UseVisualStyleBackColor = True 269 | ' 270 | 'Buttond 271 | ' 272 | Me.Buttond.Location = New System.Drawing.Point(198, 137) 273 | Me.Buttond.Name = "Buttond" 274 | Me.Buttond.Size = New System.Drawing.Size(42, 39) 275 | Me.Buttond.TabIndex = 19 276 | Me.Buttond.Text = "D" 277 | Me.Buttond.UseVisualStyleBackColor = True 278 | ' 279 | 'Buttonk 280 | ' 281 | Me.Buttonk.Location = New System.Drawing.Point(438, 137) 282 | Me.Buttonk.Name = "Buttonk" 283 | Me.Buttonk.Size = New System.Drawing.Size(42, 39) 284 | Me.Buttonk.TabIndex = 20 285 | Me.Buttonk.Text = "K" 286 | Me.Buttonk.UseVisualStyleBackColor = True 287 | ' 288 | 'Buttonl 289 | ' 290 | Me.Buttonl.Location = New System.Drawing.Point(486, 137) 291 | Me.Buttonl.Name = "Buttonl" 292 | Me.Buttonl.Size = New System.Drawing.Size(42, 39) 293 | Me.Buttonl.TabIndex = 21 294 | Me.Buttonl.Text = "L" 295 | Me.Buttonl.UseVisualStyleBackColor = True 296 | ' 297 | 'Buttonp 298 | ' 299 | Me.Buttonp.Location = New System.Drawing.Point(510, 92) 300 | Me.Buttonp.Name = "Buttonp" 301 | Me.Buttonp.Size = New System.Drawing.Size(42, 39) 302 | Me.Buttonp.TabIndex = 22 303 | Me.Buttonp.Text = "P" 304 | Me.Buttonp.UseVisualStyleBackColor = True 305 | ' 306 | 'Buttono 307 | ' 308 | Me.Buttono.Location = New System.Drawing.Point(462, 92) 309 | Me.Buttono.Name = "Buttono" 310 | Me.Buttono.Size = New System.Drawing.Size(42, 39) 311 | Me.Buttono.TabIndex = 23 312 | Me.Buttono.Text = "O" 313 | Me.Buttono.UseVisualStyleBackColor = True 314 | ' 315 | 'Buttoni 316 | ' 317 | Me.Buttoni.Location = New System.Drawing.Point(414, 92) 318 | Me.Buttoni.Name = "Buttoni" 319 | Me.Buttoni.Size = New System.Drawing.Size(42, 39) 320 | Me.Buttoni.TabIndex = 24 321 | Me.Buttoni.Text = "I" 322 | Me.Buttoni.UseVisualStyleBackColor = True 323 | ' 324 | 'Buttonu 325 | ' 326 | Me.Buttonu.Location = New System.Drawing.Point(366, 92) 327 | Me.Buttonu.Name = "Buttonu" 328 | Me.Buttonu.Size = New System.Drawing.Size(42, 39) 329 | Me.Buttonu.TabIndex = 25 330 | Me.Buttonu.Text = "U" 331 | Me.Buttonu.UseVisualStyleBackColor = True 332 | ' 333 | 'Buttony 334 | ' 335 | Me.Buttony.Location = New System.Drawing.Point(318, 92) 336 | Me.Buttony.Name = "Buttony" 337 | Me.Buttony.Size = New System.Drawing.Size(42, 39) 338 | Me.Buttony.TabIndex = 26 339 | Me.Buttony.Text = "Y" 340 | Me.Buttony.UseVisualStyleBackColor = True 341 | ' 342 | 'Buttont 343 | ' 344 | Me.Buttont.Location = New System.Drawing.Point(270, 92) 345 | Me.Buttont.Name = "Buttont" 346 | Me.Buttont.Size = New System.Drawing.Size(42, 39) 347 | Me.Buttont.TabIndex = 27 348 | Me.Buttont.Text = "T" 349 | Me.Buttont.UseVisualStyleBackColor = True 350 | ' 351 | 'Buttons 352 | ' 353 | Me.Buttons.Location = New System.Drawing.Point(150, 137) 354 | Me.Buttons.Name = "Buttons" 355 | Me.Buttons.Size = New System.Drawing.Size(42, 39) 356 | Me.Buttons.TabIndex = 28 357 | Me.Buttons.Text = "S" 358 | Me.Buttons.UseVisualStyleBackColor = True 359 | ' 360 | 'Buttonx 361 | ' 362 | Me.Buttonx.Location = New System.Drawing.Point(198, 182) 363 | Me.Buttonx.Name = "Buttonx" 364 | Me.Buttonx.Size = New System.Drawing.Size(42, 39) 365 | Me.Buttonx.TabIndex = 29 366 | Me.Buttonx.Text = "X" 367 | Me.Buttonx.UseVisualStyleBackColor = True 368 | ' 369 | 'Buttonz 370 | ' 371 | Me.Buttonz.Location = New System.Drawing.Point(150, 182) 372 | Me.Buttonz.Name = "Buttonz" 373 | Me.Buttonz.Size = New System.Drawing.Size(42, 39) 374 | Me.Buttonz.TabIndex = 30 375 | Me.Buttonz.Text = "Z" 376 | Me.Buttonz.UseVisualStyleBackColor = True 377 | ' 378 | 'Buttona 379 | ' 380 | Me.Buttona.Location = New System.Drawing.Point(102, 137) 381 | Me.Buttona.Name = "Buttona" 382 | Me.Buttona.Size = New System.Drawing.Size(42, 39) 383 | Me.Buttona.TabIndex = 31 384 | Me.Buttona.Text = "A" 385 | Me.Buttona.UseVisualStyleBackColor = True 386 | ' 387 | 'Buttonq 388 | ' 389 | Me.Buttonq.Location = New System.Drawing.Point(78, 92) 390 | Me.Buttonq.Name = "Buttonq" 391 | Me.Buttonq.Size = New System.Drawing.Size(42, 39) 392 | Me.Buttonq.TabIndex = 32 393 | Me.Buttonq.Text = "Q" 394 | Me.Buttonq.UseVisualStyleBackColor = True 395 | ' 396 | 'Buttonr 397 | ' 398 | Me.Buttonr.Location = New System.Drawing.Point(222, 92) 399 | Me.Buttonr.Name = "Buttonr" 400 | Me.Buttonr.Size = New System.Drawing.Size(42, 39) 401 | Me.Buttonr.TabIndex = 33 402 | Me.Buttonr.Text = "R" 403 | Me.Buttonr.UseVisualStyleBackColor = True 404 | ' 405 | 'Buttone 406 | ' 407 | Me.Buttone.Location = New System.Drawing.Point(174, 92) 408 | Me.Buttone.Name = "Buttone" 409 | Me.Buttone.Size = New System.Drawing.Size(42, 39) 410 | Me.Buttone.TabIndex = 34 411 | Me.Buttone.Text = "E" 412 | Me.Buttone.UseVisualStyleBackColor = True 413 | ' 414 | 'Buttonw 415 | ' 416 | Me.Buttonw.Location = New System.Drawing.Point(126, 92) 417 | Me.Buttonw.Name = "Buttonw" 418 | Me.Buttonw.Size = New System.Drawing.Size(42, 39) 419 | Me.Buttonw.TabIndex = 35 420 | Me.Buttonw.Text = "W" 421 | Me.Buttonw.UseVisualStyleBackColor = True 422 | ' 423 | 'Buttonspace 424 | ' 425 | Me.Buttonspace.Location = New System.Drawing.Point(294, 227) 426 | Me.Buttonspace.Name = "Buttonspace" 427 | Me.Buttonspace.Size = New System.Drawing.Size(234, 39) 428 | Me.Buttonspace.TabIndex = 38 429 | Me.Buttonspace.UseVisualStyleBackColor = True 430 | ' 431 | 'Buttondot 432 | ' 433 | Me.Buttondot.Location = New System.Drawing.Point(534, 182) 434 | Me.Buttondot.Name = "Buttondot" 435 | Me.Buttondot.Size = New System.Drawing.Size(42, 39) 436 | Me.Buttondot.TabIndex = 39 437 | Me.Buttondot.Text = "." 438 | Me.Buttondot.UseVisualStyleBackColor = True 439 | ' 440 | 'Buttonback 441 | ' 442 | Me.Buttonback.Location = New System.Drawing.Point(534, 47) 443 | Me.Buttonback.Name = "Buttonback" 444 | Me.Buttonback.Size = New System.Drawing.Size(100, 39) 445 | Me.Buttonback.TabIndex = 40 446 | Me.Buttonback.Text = "<-- back" 447 | Me.Buttonback.UseVisualStyleBackColor = True 448 | ' 449 | 'Buttoncaps 450 | ' 451 | Me.Buttoncaps.Location = New System.Drawing.Point(54, 137) 452 | Me.Buttoncaps.Name = "Buttoncaps" 453 | Me.Buttoncaps.Size = New System.Drawing.Size(42, 39) 454 | Me.Buttoncaps.TabIndex = 41 455 | Me.Buttoncaps.Text = "caps lock" 456 | Me.Buttoncaps.UseVisualStyleBackColor = True 457 | ' 458 | 'Buttoncomma 459 | ' 460 | Me.Buttoncomma.Location = New System.Drawing.Point(486, 182) 461 | Me.Buttoncomma.Name = "Buttoncomma" 462 | Me.Buttoncomma.Size = New System.Drawing.Size(42, 39) 463 | Me.Buttoncomma.TabIndex = 43 464 | Me.Buttoncomma.Text = "," 465 | Me.Buttoncomma.UseVisualStyleBackColor = True 466 | ' 467 | 'Buttonenter 468 | ' 469 | Me.Buttonenter.Location = New System.Drawing.Point(534, 137) 470 | Me.Buttonenter.Name = "Buttonenter" 471 | Me.Buttonenter.Size = New System.Drawing.Size(100, 39) 472 | Me.Buttonenter.TabIndex = 44 473 | Me.Buttonenter.Text = "enter" 474 | Me.Buttonenter.UseVisualStyleBackColor = True 475 | ' 476 | 'Buttonslash 477 | ' 478 | Me.Buttonslash.Location = New System.Drawing.Point(558, 92) 479 | Me.Buttonslash.Name = "Buttonslash" 480 | Me.Buttonslash.Size = New System.Drawing.Size(42, 39) 481 | Me.Buttonslash.TabIndex = 45 482 | Me.Buttonslash.Text = "/" 483 | Me.Buttonslash.UseVisualStyleBackColor = True 484 | ' 485 | 'bsym 486 | ' 487 | Me.bsym.Location = New System.Drawing.Point(54, 182) 488 | Me.bsym.Name = "bsym" 489 | Me.bsym.Size = New System.Drawing.Size(90, 39) 490 | Me.bsym.TabIndex = 37 491 | Me.bsym.Text = "?123" 492 | Me.bsym.UseVisualStyleBackColor = True 493 | ' 494 | 'bRight 495 | ' 496 | Me.bRight.Location = New System.Drawing.Point(640, 227) 497 | Me.bRight.Name = "bRight" 498 | Me.bRight.Size = New System.Drawing.Size(42, 39) 499 | Me.bRight.TabIndex = 46 500 | Me.bRight.Text = "Right" 501 | Me.bRight.UseVisualStyleBackColor = True 502 | ' 503 | 'Down 504 | ' 505 | Me.Down.Location = New System.Drawing.Point(582, 272) 506 | Me.Down.Name = "Down" 507 | Me.Down.Size = New System.Drawing.Size(52, 39) 508 | Me.Down.TabIndex = 47 509 | Me.Down.Text = "Down" 510 | Me.Down.UseVisualStyleBackColor = True 511 | ' 512 | 'Up 513 | ' 514 | Me.Up.Location = New System.Drawing.Point(582, 182) 515 | Me.Up.Name = "Up" 516 | Me.Up.Size = New System.Drawing.Size(52, 39) 517 | Me.Up.TabIndex = 48 518 | Me.Up.Text = "Up" 519 | Me.Up.UseVisualStyleBackColor = True 520 | ' 521 | 'bLeft 522 | ' 523 | Me.bLeft.Location = New System.Drawing.Point(534, 227) 524 | Me.bLeft.Name = "bLeft" 525 | Me.bLeft.Size = New System.Drawing.Size(42, 39) 526 | Me.bLeft.TabIndex = 49 527 | Me.bLeft.Text = "Left" 528 | Me.bLeft.UseVisualStyleBackColor = True 529 | ' 530 | 'Center 531 | ' 532 | Me.Center.Location = New System.Drawing.Point(582, 227) 533 | Me.Center.Name = "Center" 534 | Me.Center.Size = New System.Drawing.Size(52, 39) 535 | Me.Center.TabIndex = 53 536 | Me.Center.Text = "Center" 537 | Me.Center.UseVisualStyleBackColor = True 538 | ' 539 | 'Powerbtn 540 | ' 541 | Me.Powerbtn.Location = New System.Drawing.Point(222, 227) 542 | Me.Powerbtn.Name = "Powerbtn" 543 | Me.Powerbtn.Size = New System.Drawing.Size(66, 39) 544 | Me.Powerbtn.TabIndex = 54 545 | Me.Powerbtn.Text = "Power" 546 | Me.Powerbtn.UseVisualStyleBackColor = True 547 | ' 548 | 'adb 549 | ' 550 | Me.adb.Location = New System.Drawing.Point(695, 264) 551 | Me.adb.Name = "adb" 552 | Me.adb.Size = New System.Drawing.Size(171, 39) 553 | Me.adb.TabIndex = 55 554 | Me.adb.Text = "Open adb path to connect via wifi (advanced)" 555 | Me.adb.UseVisualStyleBackColor = True 556 | ' 557 | 'Button10 558 | ' 559 | Me.Button10.Location = New System.Drawing.Point(782, 174) 560 | Me.Button10.Name = "Button10" 561 | Me.Button10.Size = New System.Drawing.Size(83, 39) 562 | Me.Button10.TabIndex = 56 563 | Me.Button10.Text = "Swipe to unlock ( --> )" 564 | Me.Button10.UseVisualStyleBackColor = True 565 | ' 566 | 'TextBox1 567 | ' 568 | Me.TextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!) 569 | Me.TextBox1.Location = New System.Drawing.Point(697, 76) 570 | Me.TextBox1.Multiline = True 571 | Me.TextBox1.Name = "TextBox1" 572 | Me.TextBox1.Size = New System.Drawing.Size(205, 63) 573 | Me.TextBox1.TabIndex = 57 574 | ' 575 | 'Label1 576 | ' 577 | Me.Label1.AutoSize = True 578 | Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.25!) 579 | Me.Label1.Location = New System.Drawing.Point(159, 9) 580 | Me.Label1.Name = "Label1" 581 | Me.Label1.Size = New System.Drawing.Size(299, 20) 582 | Me.Label1.TabIndex = 58 583 | Me.Label1.Text = "Click the keys below or use the textbox" 584 | ' 585 | 'Label2 586 | ' 587 | Me.Label2.AutoSize = True 588 | Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.25!) 589 | Me.Label2.Location = New System.Drawing.Point(693, 27) 590 | Me.Label2.Name = "Label2" 591 | Me.Label2.Size = New System.Drawing.Size(175, 20) 592 | Me.Label2.TabIndex = 59 593 | Me.Label2.Text = "Type something below" 594 | ' 595 | 'Label3 596 | ' 597 | Me.Label3.AutoSize = True 598 | Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.25!) 599 | Me.Label3.Location = New System.Drawing.Point(691, 47) 600 | Me.Label3.Name = "Label3" 601 | Me.Label3.Size = New System.Drawing.Size(211, 20) 602 | Me.Label3.TabIndex = 60 603 | Me.Label3.Text = " and press enter to confirm" 604 | ' 605 | 'ComboBox1 606 | ' 607 | Me.ComboBox1.FormattingEnabled = True 608 | Me.ComboBox1.Items.AddRange(New Object() {"1440x2560", "1080x1920", "800x1280", "768x1280", "720x1280", "720x1200", "480x800", "400x800", "540x960", "240x320"}) 609 | Me.ComboBox1.Location = New System.Drawing.Point(697, 147) 610 | Me.ComboBox1.Name = "ComboBox1" 611 | Me.ComboBox1.Size = New System.Drawing.Size(121, 21) 612 | Me.ComboBox1.TabIndex = 61 613 | Me.ComboBox1.Text = "Choose your screen resolution" 614 | ' 615 | 'Button11 616 | ' 617 | Me.Button11.Location = New System.Drawing.Point(695, 219) 618 | Me.Button11.Name = "Button11" 619 | Me.Button11.Size = New System.Drawing.Size(171, 39) 620 | Me.Button11.TabIndex = 62 621 | Me.Button11.Text = "Disable pattern lock (reboot needed)" 622 | Me.Button11.UseVisualStyleBackColor = True 623 | ' 624 | 'Button12 625 | ' 626 | Me.Button12.Location = New System.Drawing.Point(255, 272) 627 | Me.Button12.Name = "Button12" 628 | Me.Button12.Size = New System.Drawing.Size(93, 39) 629 | Me.Button12.TabIndex = 63 630 | Me.Button12.Text = "Power off" 631 | Me.Button12.UseVisualStyleBackColor = True 632 | ' 633 | 'Button13 634 | ' 635 | Me.Button13.Location = New System.Drawing.Point(150, 272) 636 | Me.Button13.Name = "Button13" 637 | Me.Button13.Size = New System.Drawing.Size(99, 39) 638 | Me.Button13.TabIndex = 64 639 | Me.Button13.Text = "Recovery" 640 | Me.Button13.UseVisualStyleBackColor = True 641 | ' 642 | 'Button14 643 | ' 644 | Me.Button14.Location = New System.Drawing.Point(45, 272) 645 | Me.Button14.Name = "Button14" 646 | Me.Button14.Size = New System.Drawing.Size(99, 39) 647 | Me.Button14.TabIndex = 65 648 | Me.Button14.Text = "Reboot" 649 | Me.Button14.UseVisualStyleBackColor = True 650 | ' 651 | 'Button15 652 | ' 653 | Me.Button15.Location = New System.Drawing.Point(376, 272) 654 | Me.Button15.Name = "Button15" 655 | Me.Button15.Size = New System.Drawing.Size(128, 39) 656 | Me.Button15.TabIndex = 66 657 | Me.Button15.Text = "Gestures" 658 | Me.Button15.UseVisualStyleBackColor = True 659 | ' 660 | 'GoBack 661 | ' 662 | Me.GoBack.Image = CType(resources.GetObject("GoBack.Image"), System.Drawing.Image) 663 | Me.GoBack.Location = New System.Drawing.Point(45, 227) 664 | Me.GoBack.Name = "GoBack" 665 | Me.GoBack.Size = New System.Drawing.Size(51, 39) 666 | Me.GoBack.TabIndex = 52 667 | Me.GoBack.UseVisualStyleBackColor = True 668 | ' 669 | 'Home 670 | ' 671 | Me.Home.Image = CType(resources.GetObject("Home.Image"), System.Drawing.Image) 672 | Me.Home.Location = New System.Drawing.Point(102, 227) 673 | Me.Home.Name = "Home" 674 | Me.Home.Size = New System.Drawing.Size(55, 39) 675 | Me.Home.TabIndex = 51 676 | Me.Home.UseVisualStyleBackColor = True 677 | ' 678 | 'Apps 679 | ' 680 | Me.Apps.Image = CType(resources.GetObject("Apps.Image"), System.Drawing.Image) 681 | Me.Apps.Location = New System.Drawing.Point(163, 227) 682 | Me.Apps.Name = "Apps" 683 | Me.Apps.Size = New System.Drawing.Size(53, 39) 684 | Me.Apps.TabIndex = 50 685 | Me.Apps.UseVisualStyleBackColor = True 686 | ' 687 | 'Button16 688 | ' 689 | Me.Button16.Location = New System.Drawing.Point(695, 174) 690 | Me.Button16.Name = "Button16" 691 | Me.Button16.Size = New System.Drawing.Size(81, 39) 692 | Me.Button16.TabIndex = 67 693 | Me.Button16.Text = "Swipe to unlock (up)" 694 | Me.Button16.UseVisualStyleBackColor = True 695 | ' 696 | 'MenuStrip1 697 | ' 698 | Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AboutToolStripMenuItem}) 699 | Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) 700 | Me.MenuStrip1.Name = "MenuStrip1" 701 | Me.MenuStrip1.Size = New System.Drawing.Size(924, 24) 702 | Me.MenuStrip1.TabIndex = 68 703 | Me.MenuStrip1.Text = "MenuStrip1" 704 | ' 705 | 'AboutToolStripMenuItem 706 | ' 707 | Me.AboutToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AndroidControlByToolStripMenuItem, Me.Version010ToolStripMenuItem}) 708 | Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem" 709 | Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(61, 20) 710 | Me.AboutToolStripMenuItem.Text = "About..." 711 | ' 712 | 'AndroidControlByToolStripMenuItem 713 | ' 714 | Me.AndroidControlByToolStripMenuItem.Name = "AndroidControlByToolStripMenuItem" 715 | Me.AndroidControlByToolStripMenuItem.Size = New System.Drawing.Size(226, 22) 716 | Me.AndroidControlByToolStripMenuItem.Text = "Android Control by kjanku1 " 717 | ' 718 | 'Version010ToolStripMenuItem 719 | ' 720 | Me.Version010ToolStripMenuItem.Name = "Version010ToolStripMenuItem" 721 | Me.Version010ToolStripMenuItem.Size = New System.Drawing.Size(226, 22) 722 | Me.Version010ToolStripMenuItem.Text = "version: 0.10" 723 | ' 724 | 'Form1 725 | ' 726 | Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) 727 | Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font 728 | Me.ClientSize = New System.Drawing.Size(924, 329) 729 | Me.Controls.Add(Me.Button16) 730 | Me.Controls.Add(Me.Button15) 731 | Me.Controls.Add(Me.Button14) 732 | Me.Controls.Add(Me.Button13) 733 | Me.Controls.Add(Me.Button12) 734 | Me.Controls.Add(Me.Button11) 735 | Me.Controls.Add(Me.ComboBox1) 736 | Me.Controls.Add(Me.Label3) 737 | Me.Controls.Add(Me.Label2) 738 | Me.Controls.Add(Me.Label1) 739 | Me.Controls.Add(Me.TextBox1) 740 | Me.Controls.Add(Me.Button10) 741 | Me.Controls.Add(Me.adb) 742 | Me.Controls.Add(Me.Powerbtn) 743 | Me.Controls.Add(Me.Center) 744 | Me.Controls.Add(Me.GoBack) 745 | Me.Controls.Add(Me.Home) 746 | Me.Controls.Add(Me.Apps) 747 | Me.Controls.Add(Me.bLeft) 748 | Me.Controls.Add(Me.Up) 749 | Me.Controls.Add(Me.Down) 750 | Me.Controls.Add(Me.bRight) 751 | Me.Controls.Add(Me.Buttonslash) 752 | Me.Controls.Add(Me.Buttonenter) 753 | Me.Controls.Add(Me.Buttoncomma) 754 | Me.Controls.Add(Me.Buttoncaps) 755 | Me.Controls.Add(Me.Buttonback) 756 | Me.Controls.Add(Me.Buttondot) 757 | Me.Controls.Add(Me.Buttonspace) 758 | Me.Controls.Add(Me.bsym) 759 | Me.Controls.Add(Me.Buttonw) 760 | Me.Controls.Add(Me.Buttone) 761 | Me.Controls.Add(Me.Buttonr) 762 | Me.Controls.Add(Me.Buttonq) 763 | Me.Controls.Add(Me.Buttona) 764 | Me.Controls.Add(Me.Buttonz) 765 | Me.Controls.Add(Me.Buttonx) 766 | Me.Controls.Add(Me.Buttons) 767 | Me.Controls.Add(Me.Buttont) 768 | Me.Controls.Add(Me.Buttony) 769 | Me.Controls.Add(Me.Buttonu) 770 | Me.Controls.Add(Me.Buttoni) 771 | Me.Controls.Add(Me.Buttono) 772 | Me.Controls.Add(Me.Buttonp) 773 | Me.Controls.Add(Me.Buttonl) 774 | Me.Controls.Add(Me.Buttonk) 775 | Me.Controls.Add(Me.Buttond) 776 | Me.Controls.Add(Me.Buttonc) 777 | Me.Controls.Add(Me.Buttonf) 778 | Me.Controls.Add(Me.Buttonv) 779 | Me.Controls.Add(Me.Buttong) 780 | Me.Controls.Add(Me.Buttonn) 781 | Me.Controls.Add(Me.Buttonb) 782 | Me.Controls.Add(Me.Buttonm) 783 | Me.Controls.Add(Me.Buttonj) 784 | Me.Controls.Add(Me.Buttonh) 785 | Me.Controls.Add(Me.Button5) 786 | Me.Controls.Add(Me.Button6) 787 | Me.Controls.Add(Me.Button7) 788 | Me.Controls.Add(Me.Button8) 789 | Me.Controls.Add(Me.Button9) 790 | Me.Controls.Add(Me.Button0) 791 | Me.Controls.Add(Me.Button4) 792 | Me.Controls.Add(Me.Button3) 793 | Me.Controls.Add(Me.Button2) 794 | Me.Controls.Add(Me.Button1) 795 | Me.Controls.Add(Me.MenuStrip1) 796 | Me.MainMenuStrip = Me.MenuStrip1 797 | Me.Name = "Form1" 798 | Me.Text = "Ultimate touchscreen control for android" 799 | Me.MenuStrip1.ResumeLayout(False) 800 | Me.MenuStrip1.PerformLayout() 801 | Me.ResumeLayout(False) 802 | Me.PerformLayout() 803 | 804 | End Sub 805 | Friend WithEvents Button1 As System.Windows.Forms.Button 806 | Friend WithEvents Button2 As System.Windows.Forms.Button 807 | Friend WithEvents Button3 As System.Windows.Forms.Button 808 | Friend WithEvents Button4 As System.Windows.Forms.Button 809 | Friend WithEvents Button0 As System.Windows.Forms.Button 810 | Friend WithEvents Button9 As System.Windows.Forms.Button 811 | Friend WithEvents Button8 As System.Windows.Forms.Button 812 | Friend WithEvents Button7 As System.Windows.Forms.Button 813 | Friend WithEvents Button6 As System.Windows.Forms.Button 814 | Friend WithEvents Button5 As System.Windows.Forms.Button 815 | Friend WithEvents Buttonh As System.Windows.Forms.Button 816 | Friend WithEvents Buttonj As System.Windows.Forms.Button 817 | Friend WithEvents Buttonm As System.Windows.Forms.Button 818 | Friend WithEvents Buttonb As System.Windows.Forms.Button 819 | Friend WithEvents Buttonn As System.Windows.Forms.Button 820 | Friend WithEvents Buttong As System.Windows.Forms.Button 821 | Friend WithEvents Buttonv As System.Windows.Forms.Button 822 | Friend WithEvents Buttonf As System.Windows.Forms.Button 823 | Friend WithEvents Buttonc As System.Windows.Forms.Button 824 | Friend WithEvents Buttond As System.Windows.Forms.Button 825 | Friend WithEvents Buttonk As System.Windows.Forms.Button 826 | Friend WithEvents Buttonl As System.Windows.Forms.Button 827 | Friend WithEvents Buttonp As System.Windows.Forms.Button 828 | Friend WithEvents Buttono As System.Windows.Forms.Button 829 | Friend WithEvents Buttoni As System.Windows.Forms.Button 830 | Friend WithEvents Buttonu As System.Windows.Forms.Button 831 | Friend WithEvents Buttony As System.Windows.Forms.Button 832 | Friend WithEvents Buttont As System.Windows.Forms.Button 833 | Friend WithEvents Buttons As System.Windows.Forms.Button 834 | Friend WithEvents Buttonx As System.Windows.Forms.Button 835 | Friend WithEvents Buttonz As System.Windows.Forms.Button 836 | Friend WithEvents Buttona As System.Windows.Forms.Button 837 | Friend WithEvents Buttonq As System.Windows.Forms.Button 838 | Friend WithEvents Buttonr As System.Windows.Forms.Button 839 | Friend WithEvents Buttone As System.Windows.Forms.Button 840 | Friend WithEvents Buttonw As System.Windows.Forms.Button 841 | Friend WithEvents Buttonspace As System.Windows.Forms.Button 842 | Friend WithEvents Buttondot As System.Windows.Forms.Button 843 | Friend WithEvents Buttonback As System.Windows.Forms.Button 844 | Friend WithEvents Buttoncaps As System.Windows.Forms.Button 845 | Friend WithEvents Buttoncomma As System.Windows.Forms.Button 846 | Friend WithEvents Buttonenter As System.Windows.Forms.Button 847 | Friend WithEvents Buttonslash As System.Windows.Forms.Button 848 | Friend WithEvents bsym As System.Windows.Forms.Button 849 | Friend WithEvents bRight As System.Windows.Forms.Button 850 | Friend WithEvents Down As System.Windows.Forms.Button 851 | Friend WithEvents Up As System.Windows.Forms.Button 852 | Friend WithEvents bLeft As System.Windows.Forms.Button 853 | Friend WithEvents Apps As System.Windows.Forms.Button 854 | Friend WithEvents Home As System.Windows.Forms.Button 855 | Friend WithEvents GoBack As System.Windows.Forms.Button 856 | Friend WithEvents Center As System.Windows.Forms.Button 857 | Friend WithEvents Powerbtn As System.Windows.Forms.Button 858 | Friend WithEvents adb As System.Windows.Forms.Button 859 | Friend WithEvents Button10 As System.Windows.Forms.Button 860 | Friend WithEvents TextBox1 As System.Windows.Forms.TextBox 861 | Friend WithEvents Label1 As System.Windows.Forms.Label 862 | Friend WithEvents Label2 As System.Windows.Forms.Label 863 | Friend WithEvents Label3 As System.Windows.Forms.Label 864 | Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox 865 | Friend WithEvents Button11 As System.Windows.Forms.Button 866 | Friend WithEvents Button12 As System.Windows.Forms.Button 867 | Friend WithEvents Button13 As System.Windows.Forms.Button 868 | Friend WithEvents Button14 As System.Windows.Forms.Button 869 | Friend WithEvents Button15 As System.Windows.Forms.Button 870 | Friend WithEvents Button16 As System.Windows.Forms.Button 871 | Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip 872 | Friend WithEvents AboutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem 873 | Friend WithEvents AndroidControlByToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem 874 | Friend WithEvents Version010ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem 875 | 876 | End Class 877 | -------------------------------------------------------------------------------- /Form1.resx: -------------------------------------------------------------------------------- 1 |  2 | 3 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | 107 | 108 | 109 | text/microsoft-resx 110 | 111 | 112 | 2.0 113 | 114 | 115 | System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 116 | 117 | 118 | System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 119 | 120 | 121 | 122 | 123 | iVBORw0KGgoAAAANSUhEUgAAADUAAAAyCAYAAAD845PIAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 124 | YQUAAAKbSURBVGhD3Zi7aypBFIfjIz4QiQga1DqFpLVQYmVhqyA2NsFSENTGJqCtBm0s8hCfEf03J55z 125 | 7y6b5Ocj++B6buCL2c/ZmfmdGWeTXLlcLuVyuffQqxHkrEJ9any/1tx3jO8Z22ruZ9u/oRCHbjyFdo+Z 126 | e09h7BP1T24fav9F3/43oJQOlNKBUjpQSgdK6UApHSilA6V0oJQOlNKBUjpQSgdK6UApHSilA+VR6A8y 127 | 5C8IKA9CgR4fH9VgMGCi0Shs94+BEkKByuWy+vj4YO7v7y911aD8AU0+n89zmO12qx4eHi55G0L5BZo8 128 | rcpms2FotS44EAGlDk0+lUqp1Wql1uu1qtfrjgeyoX8odcLhsHp/f9dDvby8OMZoNOJDiIqI5vILoGSo 129 | YsVikT9HFOrt7U0/JJyAirZYLPhnKmQ8Hje7alDqUKe1Wk0fOJ1Oq2AwqAKBgO3c3t6qUqmkptMpF5E+ 130 | v8lk0kwwKL9AnTabTR5ouVyqWCzGzgnc7j//eW00Gjxev9/nazSvI0D5A+q41+txqNfXVxUKhcwMdjY+ 131 | n4+3IG3JRCLx27GghHi9XjUejznYcDjkgVE7O6AV63a7vAUzmQxfo3YHgPIgNzc3fFJRBZ+enpTH44Ht 132 | rEIr0+l0OFQ2m3U2FEED0CoRToZ6fn7mw+nu7s657WeEBvnlQGdDRcvlchxoMpmYKRyUtqAFPweauN/v 133 | V5FIRFUqFf0RUigU+H3U/xGgtAxVmx4D9MyZzWYnmc/nfITvdjt+JarVqplABJSWoVCtVotPSm2Sx6B2 134 | FIx+a2m322aOcSNQ2sL19bV+oJyC2tIWpGJYCKMBpa3QJE+B7rMAlNKBUjpQSgdK6UApHSilA6V0oJQO 135 | lNKBUjpQSgdKwVypT+r9UzpVw88MAAAAAElFTkSuQmCC 136 | 137 | 138 | 139 | 140 | iVBORw0KGgoAAAANSUhEUgAAADUAAAAyCAYAAAD845PIAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 141 | YQUAAAKjSURBVGhD7ZfNS2pBGIc7foYbQQVtK0IQuBE/0J0rFy3CdRtXpdAmaBsIIq6MFomKmmUp6j/5 142 | 3t6JGc61n92oc669kfDo8Tkz4/ubGfWcPcvykGVZDsDj2EFtNtHttr3qYzvv+dfjjVD2Rnb/3rnNdsjZ 143 | +9iPN887w97Lg59+GlBKB0rpQCkdKKUDpXSglA6U0oFSOlBKB0rpQCkdKKUDpXSgdBSPR90OvNwWWG/O 144 | uQSUX0YHYUqlEl1cXFA8Hlfv9X2UPu8CUH4Ke5DDw0NqNpv0+PhI9/f3Cj6+u7ujk5MT8vv9b/o4CJQf 145 | xj7riURCrQgHeHh4oOl0SvP5nHq9Hl1dXdF6vTYhn56eqNvtUj6fN2M5GBDKf6ILCAaDVK1Wqd/vm4Jn 146 | s5kqularUTgcJq/Xq9pz23Q6Te12m5bLpQqu219fX1MymTTjf3F7Qgmxz2SxWKTb21t6fn6myWSiAq1W 147 | K7UiBwcH5PP54MzrYvf396lcLqvtuFgs1Krq1T0/P6dIJGLafyIglAb7gKlUilqtltpSeotxkE6nQ0dH 148 | RybIR4vQBYdCITo9PVUrxvAk8WQNh0M6Pj5W43J7NElbgNIQjUap0WioD9Pbi0MNBgOqVCoUCARMcaj/ 149 | R+GCmVgsRpeXl+b7xwH5825ubiiTycC+ACgN9XpdbQkOxbPH3xOeWSeCbEMH1DuDA+qtqScR9bMBpeHs 150 | 7EwFKhQK6r1bQRB64viHZjQaqVD8V+BYqFwu918D2eFVcyVUNpv9DeUkv6FegdLwG8olXAv1I3/9dKhd 151 | 4Mr/lL5cGY/HO4Nr4KsKR0LxFTMPqAfdFY6G4itkvt76LqAaAVD+hd7b3wFUHwBK6UApHSilA6V0oJQO 152 | lNKBUjpQSgdK6UApHSilA6Vg9ugPlvGutprIwcMAAAAASUVORK5CYII= 153 | 154 | 155 | 156 | 157 | iVBORw0KGgoAAAANSUhEUgAAADAAAAAyCAYAAAAayliMAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 158 | YQUAAAF/SURBVGhD7dhBboJAFMZxEDS6cQHeRTfexBWuOIQHgANoghjFiz5900JYfAbbzsN8SU1+Nv1r 159 | ZuY10ESDMJxIOHnSn96FoPnlBpiYDWCjf97g+dAnZjAygZEJjExgZAIjExiZwMgERiYwMoGRCYxMYGQC 160 | IxMYmcDIBEYmMA7K81zKspSiKExNp1O4fw+Mgw6Hg9zvdzNN08jtdnMD6GdrdIZvMA5aLpeSJIl3aZrK 161 | arWS8/ks1+vVbgD19a2Df1EUjTOAFf3W4c8D7HY7OZ1Ocjwezek+s9ms29vLAFmWuRsJ3WA+tTerDtAe 162 | 1NsAusF2u5X5fG5isVhIVVW2A2w2G7eABT2o+QDr9XpogV/Tdf8HAMH59AB1XbsbnHIApQdX/fe/AOPH 163 | B2hf7//+AozdAJ/4L/RDMHYDXC4Xdz1a0etceR9gv993i+tfyIrZAHEcu0XHgs7wJhid9lodA9r/TTAy 164 | gZEJjExgZAIjExiZwMgERiYwMoGRCYxMYCQRyAOSIerucFwnzAAAAABJRU5ErkJggg== 165 | 166 | 167 | 168 | 17, 17 169 | 170 | -------------------------------------------------------------------------------- /Form1.vb: -------------------------------------------------------------------------------- 1 | Imports System.IO 2 | Imports System.Threading 3 | Imports System.Windows.Forms.DialogResult 4 | 5 | Public Class Form1 6 | Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 7 | If Not Directory.Exists("Tools") Then 8 | Directory.CreateDirectory("Tools") 9 | Else 10 | If Not File.Exists("Tools\adb.exe") Then 11 | File.WriteAllBytes("Tools\adb.exe", My.Resources.adb) 12 | End If 13 | If Not File.Exists("Tools\AdbWinApi.dll") Then 14 | File.WriteAllBytes("Tools\AdbWinApi.dll", My.Resources.AdbWinApi) 15 | End If 16 | If Not File.Exists("Tools\AdbWinUsbApi.dll") Then 17 | File.WriteAllBytes("Tools\AdbWinUsbApi.dll", My.Resources.AdbWinUsbApi) 18 | End If 19 | If Not File.Exists("Tools\droidAtScreen-1.1.jar") Then 20 | File.WriteAllBytes("Tools\droidAtScreen-1.1.jar", My.Resources.droidAtScreen_1_1) 21 | End If 22 | Shell("cmd.exe /c" & "start Tools\droidAtScreen-1.1.jar") 23 | End If 24 | End Sub 25 | 26 | Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click 27 | Select Case ComboBox1.Text 28 | Case "1440x2560" 29 | Shell("""Tools\adb.exe"" shell input swipe 562 1800 1440 1800") 30 | Case "1080x1920" 31 | Shell("""Tools\adb.exe"" shell input swipe 722 1390 1340 1390") 32 | Case "800x1280" 33 | Shell("""Tools\adb.exe"" shell input swipe 400 900 740 900") 34 | Case "768x1280" 35 | Shell("""Tools\adb.exe"" shell input swipe 300 900 720 900") 36 | Case "720x1280" 37 | Shell("""Tools\adb.exe"" shell input swipe 359 907 660 907") 38 | Case "720x1200" 39 | Shell("""Tools\adb.exe"" shell input swipe 360 850 660 850") 40 | Case "540x960" 41 | Shell("""Tools\adb.exe"" shell input swipe 270 680 509 676") 42 | Case "480x800" 43 | Shell("""Tools\adb.exe"" shell input swipe 240 570 560 570") 44 | Case "400x800" 45 | Shell("""Tools\adb.exe"" shell input swipe 200 570 560 570") 46 | Case "240x320" 47 | Shell("""Tools\adb.exe"" shell input swipe 120 230 213 230") 48 | Case Else 49 | MsgBox("Choose you're devices resolution") 50 | End Select 51 | End Sub 52 | Private Sub Button16_Click_1(sender As Object, e As EventArgs) Handles Button16.Click 53 | Select Case ComboBox1.Text 54 | Case "1440x2560" 55 | Shell("""Tools\adb.exe"" shell input swipe 562 1800 1440 1800") 56 | Case "1080x1920" 57 | Shell("""Tools\adb.exe"" shell input swipe 722 1390 1340 1390") 58 | Case "800x1280" 59 | Shell("""Tools\adb.exe"" shell input swipe 400 900 740 900") 60 | Case "768x1280" 61 | Shell("""Tools\adb.exe"" shell input swipe 300 900 720 900") 62 | Case "720x1280" 63 | Shell("""Tools\adb.exe"" shell input swipe 359 907 660 907") 64 | Case "720x1200" 65 | Shell("""Tools\adb.exe"" shell input swipe 360 850 660 850") 66 | Case "540x960" 67 | Shell("""Tools\adb.exe"" shell input swipe 270 680 509 676") 68 | Case "480x800" 69 | Shell("""Tools\adb.exe"" shell input swipe 240 570 560 570") 70 | Case "400x800" 71 | Shell("""Tools\adb.exe"" shell input swipe 200 570 560 570") 72 | Case "240x320" 73 | Shell("""Tools\adb.exe"" shell input swipe 120 230 213 230") 74 | Case Else 75 | MsgBox("Choose you're devices resolution") 76 | End Select 77 | End Sub 78 | 79 | Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown 80 | If e.KeyCode = Keys.Enter Then 81 | Shell("""Tools\adb.exe"" shell input text '" & TextBox1.Text & "'") 82 | TextBox1.Clear() 83 | End If 84 | End Sub 85 | 'numerki 86 | Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 87 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" & Button1.Text) 88 | End Sub 89 | Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 90 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button2.Text) 91 | End Sub 92 | Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 93 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button3.Text) 94 | End Sub 95 | Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click 96 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button4.Text) 97 | End Sub 98 | Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click 99 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button5.Text) 100 | End Sub 101 | Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click 102 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button6.Text) 103 | End Sub 104 | Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click 105 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button7.Text) 106 | End Sub 107 | Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click 108 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button8.Text) 109 | End Sub 110 | Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click 111 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button9.Text) 112 | End Sub 113 | Private Sub Button0_Click(sender As Object, e As EventArgs) Handles Button0.Click 114 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Button0.Text) 115 | End Sub 116 | 117 | 'literki 118 | Private Sub Buttonq_Click(sender As Object, e As EventArgs) Handles Buttonq.Click 119 | Shell("""Tools\adb.exe"" input keyevent KEYCODE_" + Buttonq.Text) 120 | End Sub 121 | Private Sub Buttonw_Click(sender As Object, e As EventArgs) Handles Buttonw.Click 122 | Shell("""Tools\adb.exe"" input keyevent KEYCODE_" + Buttonw.Text) 123 | End Sub 124 | Private Sub Buttone_Click(sender As Object, e As EventArgs) Handles Buttone.Click 125 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttone.Text) 126 | End Sub 127 | Private Sub Buttonr_Click(sender As Object, e As EventArgs) Handles Buttonr.Click 128 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonr.Text) 129 | End Sub 130 | Private Sub Buttont_Click(sender As Object, e As EventArgs) Handles Buttont.Click 131 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttont.Text) 132 | End Sub 133 | Private Sub Buttony_Click(sender As Object, e As EventArgs) Handles Buttony.Click 134 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttony.Text) 135 | End Sub 136 | Private Sub Buttonu_Click(sender As Object, e As EventArgs) Handles Buttonu.Click 137 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonu.Text) 138 | End Sub 139 | Private Sub Buttoni_Click(sender As Object, e As EventArgs) Handles Buttoni.Click 140 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttoni.Text) 141 | End Sub 142 | Private Sub Buttono_Click(sender As Object, e As EventArgs) Handles Buttono.Click 143 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttono.Text) 144 | End Sub 145 | Private Sub Buttonp_Click(sender As Object, e As EventArgs) Handles Buttonp.Click 146 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonp.Text) 147 | End Sub 148 | Private Sub Buttona_Click(sender As Object, e As EventArgs) Handles Buttona.Click 149 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttona.Text) 150 | End Sub 151 | Private Sub Buttons_Click(sender As Object, e As EventArgs) Handles Buttons.Click 152 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttons.Text) 153 | End Sub 154 | Private Sub Buttond_Click(sender As Object, e As EventArgs) Handles Buttond.Click 155 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttond.Text) 156 | End Sub 157 | Private Sub Buttonf_Click(sender As Object, e As EventArgs) Handles Buttonf.Click 158 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonf.Text) 159 | End Sub 160 | Private Sub Buttong_Click(sender As Object, e As EventArgs) Handles Buttong.Click 161 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttong.Text) 162 | End Sub 163 | Private Sub Buttonh_Click(sender As Object, e As EventArgs) Handles Buttonh.Click 164 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonh.Text) 165 | End Sub 166 | Private Sub Buttonj_Click(sender As Object, e As EventArgs) Handles Buttonj.Click 167 | Shell("""Tools\adb.exe""b shell input keyevent KEYCODE_" + Buttonj.Text) 168 | End Sub 169 | Private Sub Buttonk_Click(sender As Object, e As EventArgs) Handles Buttonk.Click 170 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonk.Text) 171 | End Sub 172 | Private Sub Buttonl_Click(sender As Object, e As EventArgs) Handles Buttonl.Click 173 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonl.Text) 174 | End Sub 175 | Private Sub Buttonz_Click(sender As Object, e As EventArgs) Handles Buttonz.Click 176 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonz.Text) 177 | End Sub 178 | Private Sub Buttonx_Click(sender As Object, e As EventArgs) Handles Buttonx.Click 179 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonx.Text) 180 | End Sub 181 | Private Sub Buttonc_Click(sender As Object, e As EventArgs) Handles Buttonc.Click 182 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonc.Text) 183 | End Sub 184 | Private Sub Buttonv_Click(sender As Object, e As EventArgs) Handles Buttonv.Click 185 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonv.Text) 186 | End Sub 187 | Private Sub Buttonb_Click(sender As Object, e As EventArgs) Handles Buttonb.Click 188 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonb.Text) 189 | End Sub 190 | Private Sub Buttonn_Click(sender As Object, e As EventArgs) Handles Buttonn.Click 191 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonn.Text) 192 | End Sub 193 | Private Sub Buttonm_Click(sender As Object, e As EventArgs) Handles Buttonm.Click 194 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_" + Buttonm.Text) 195 | End Sub 196 | 'specials 197 | 198 | Private Sub Buttonback_Click(sender As Object, e As EventArgs) Handles Buttonback.Click 199 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_DEL") 200 | End Sub 201 | 202 | Private Sub Buttonspace_Click(sender As Object, e As EventArgs) Handles Buttonspace.Click 203 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_SPACE") 204 | End Sub 205 | 206 | Private Sub Buttonenter_Click(sender As Object, e As EventArgs) Handles Buttonenter.Click 207 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_ENTER") 208 | End Sub 209 | 210 | Private Sub Buttoncomma_Click(sender As Object, e As EventArgs) Handles Buttoncomma.Click 211 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_COMMA") 212 | End Sub 213 | 214 | Private Sub Buttondot_Click(sender As Object, e As EventArgs) Handles Buttondot.Click 215 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_PERIOD") 216 | End Sub 217 | 218 | Private Sub Button16_Click(sender As Object, e As EventArgs) Handles GoBack.Click 219 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_BACK") 220 | End Sub 221 | 222 | Private Sub Home_Click(sender As Object, e As EventArgs) Handles Home.Click 223 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_HOME") 224 | End Sub 225 | 226 | Private Sub Apps_Click(sender As Object, e As EventArgs) Handles Apps.Click 227 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_APP_SWITCH") 228 | End Sub 229 | 230 | Private Sub Up_Click(sender As Object, e As EventArgs) Handles Up.Click 231 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_DPAD_UP") 232 | End Sub 233 | 234 | Private Sub Left_Click(sender As Object, e As EventArgs) Handles bLeft.Click 235 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_DPAD_LEFT") 236 | End Sub 237 | 238 | Private Sub Down_Click(sender As Object, e As EventArgs) Handles Down.Click 239 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_DPAD_DOWN") 240 | End Sub 241 | 242 | Private Sub Right_Click(sender As Object, e As EventArgs) Handles bRight.Click 243 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_DPAD_RIGHT") 244 | End Sub 245 | 246 | Private Sub Center_Click(sender As Object, e As EventArgs) Handles Center.Click 247 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_DPAD_CENTER") 248 | End Sub 249 | 250 | Private Sub bsym_Click(sender As Object, e As EventArgs) Handles bsym.Click 251 | Form2.Show() 252 | Me.Hide() 253 | End Sub 254 | 255 | Private Sub Powerbtn_Click(sender As Object, e As EventArgs) Handles Powerbtn.Click 256 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_POWER") 257 | End Sub 258 | 259 | Private Sub adb_Click(sender As Object, e As EventArgs) Handles adb.Click 260 | Shell("cmd.exe /k cd Tools && color 02 && title adb path") 261 | End Sub 262 | 263 | Private Sub Buttoncaps_Click(sender As Object, e As EventArgs) Handles Buttoncaps.Click 264 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_CAPS_LOCK") 265 | End Sub 266 | 267 | Private Sub Buttonslash_Click(sender As Object, e As EventArgs) Handles Buttonslash.Click 268 | Shell("""Tools\adb.exe"" shell input text '/'") 269 | End Sub 270 | 271 | Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click 272 | Shell("""Tools\adb.exe"" shell su -c " & """rm /data/system/*.key""") 273 | Shell("""Tools\adb.exe"" shell su -c " & """rm /data/system/*.db""") 274 | Shell("""Tools\adb.exe"" shell su -c " & """rm /data/system/*.db-shm""") 275 | Shell("""Tools\adb.exe"" shell su -c " & """rm /data/system/*.db-wal""") 276 | End Sub 277 | 278 | Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click 279 | Shell("""Tools\adb.exe"" reboot") 280 | End Sub 281 | 282 | Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click 283 | Shell("""Tools\adb.exe"" reboot recovery") 284 | End Sub 285 | 286 | Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click 287 | Shell("""Tools\adb.exe"" shell su -c " & """poweroff""") 288 | End Sub 289 | 290 | Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click 291 | Gestures.Show() 292 | End Sub 293 | 294 | Private Sub AndroidControlByToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AndroidControlByToolStripMenuItem.Click 295 | 'ShellExecute ByVal 0&, "open", _ 296 | '"http://forum.xda-developers.com/showthread.php?t=2786395", _ 297 | 'vbNullString, vbNullString, 298 | System.Diagnostics.Process.Start("http://forum.xda-developers.com/showthread.php?t=2786395") 299 | End Sub 300 | 301 | Private Sub Version010ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles Version010ToolStripMenuItem.Click 302 | System.Diagnostics.Process.Start("https://github.com/kjanku1/WindowsApplication1/commits/master") 303 | End Sub 304 | End Class 305 | -------------------------------------------------------------------------------- /Form2.Designer.vb: -------------------------------------------------------------------------------- 1 |  _ 2 | Partial Class Form2 3 | Inherits System.Windows.Forms.Form 4 | 5 | 'Form overrides dispose to clean up the component list. 6 | _ 7 | Protected Overrides Sub Dispose(ByVal disposing As Boolean) 8 | Try 9 | If disposing AndAlso components IsNot Nothing Then 10 | components.Dispose() 11 | End If 12 | Finally 13 | MyBase.Dispose(disposing) 14 | End Try 15 | End Sub 16 | 17 | 'Required by the Windows Form Designer 18 | Private components As System.ComponentModel.IContainer 19 | 20 | 'NOTE: The following procedure is required by the Windows Form Designer 21 | 'It can be modified using the Windows Form Designer. 22 | 'Do not modify it using the code editor. 23 | _ 24 | Private Sub InitializeComponent() 25 | Me.ABC = New System.Windows.Forms.Button() 26 | Me.Buttonat = New System.Windows.Forms.Button() 27 | Me.buttonsemi = New System.Windows.Forms.Button() 28 | Me.buttoncolon = New System.Windows.Forms.Button() 29 | Me.buttonrightbra = New System.Windows.Forms.Button() 30 | Me.buttonleftbra = New System.Windows.Forms.Button() 31 | Me.buttonequal = New System.Windows.Forms.Button() 32 | Me.buttonminus = New System.Windows.Forms.Button() 33 | Me.buttonunder = New System.Windows.Forms.Button() 34 | Me.buttonbackslash = New System.Windows.Forms.Button() 35 | Me.buttonapos = New System.Windows.Forms.Button() 36 | Me.buttoncudzy = New System.Windows.Forms.Button() 37 | Me.buttonstar = New System.Windows.Forms.Button() 38 | Me.buttonpro = New System.Windows.Forms.Button() 39 | Me.buttondolar = New System.Windows.Forms.Button() 40 | Me.Buttonnet = New System.Windows.Forms.Button() 41 | Me.buttonwat = New System.Windows.Forms.Button() 42 | Me.buttonexcla = New System.Windows.Forms.Button() 43 | Me.buttonspace = New System.Windows.Forms.Button() 44 | Me.buttoncoma = New System.Windows.Forms.Button() 45 | Me.buttondot = New System.Windows.Forms.Button() 46 | Me.buttonslash = New System.Windows.Forms.Button() 47 | Me.SuspendLayout() 48 | ' 49 | 'ABC 50 | ' 51 | Me.ABC.Location = New System.Drawing.Point(93, 168) 52 | Me.ABC.Name = "ABC" 53 | Me.ABC.Size = New System.Drawing.Size(42, 39) 54 | Me.ABC.TabIndex = 20 55 | Me.ABC.Text = "ABC" 56 | Me.ABC.UseVisualStyleBackColor = True 57 | ' 58 | 'Buttonat 59 | ' 60 | Me.Buttonat.Location = New System.Drawing.Point(45, 78) 61 | Me.Buttonat.Name = "Buttonat" 62 | Me.Buttonat.Size = New System.Drawing.Size(42, 39) 63 | Me.Buttonat.TabIndex = 21 64 | Me.Buttonat.Text = "@" 65 | Me.Buttonat.UseVisualStyleBackColor = True 66 | ' 67 | 'buttonsemi 68 | ' 69 | Me.buttonsemi.Location = New System.Drawing.Point(285, 124) 70 | Me.buttonsemi.Name = "buttonsemi" 71 | Me.buttonsemi.Size = New System.Drawing.Size(42, 39) 72 | Me.buttonsemi.TabIndex = 22 73 | Me.buttonsemi.Text = ";" 74 | Me.buttonsemi.UseVisualStyleBackColor = True 75 | ' 76 | 'buttoncolon 77 | ' 78 | Me.buttoncolon.Location = New System.Drawing.Point(237, 123) 79 | Me.buttoncolon.Name = "buttoncolon" 80 | Me.buttoncolon.Size = New System.Drawing.Size(42, 39) 81 | Me.buttoncolon.TabIndex = 23 82 | Me.buttoncolon.Text = ":" 83 | Me.buttoncolon.UseVisualStyleBackColor = True 84 | ' 85 | 'buttonrightbra 86 | ' 87 | Me.buttonrightbra.Location = New System.Drawing.Point(429, 79) 88 | Me.buttonrightbra.Name = "buttonrightbra" 89 | Me.buttonrightbra.Size = New System.Drawing.Size(42, 39) 90 | Me.buttonrightbra.TabIndex = 24 91 | Me.buttonrightbra.Text = ")" 92 | Me.buttonrightbra.UseVisualStyleBackColor = True 93 | ' 94 | 'buttonleftbra 95 | ' 96 | Me.buttonleftbra.Location = New System.Drawing.Point(381, 78) 97 | Me.buttonleftbra.Name = "buttonleftbra" 98 | Me.buttonleftbra.Size = New System.Drawing.Size(42, 39) 99 | Me.buttonleftbra.TabIndex = 25 100 | Me.buttonleftbra.Text = "(" 101 | Me.buttonleftbra.UseVisualStyleBackColor = True 102 | ' 103 | 'buttonequal 104 | ' 105 | Me.buttonequal.Location = New System.Drawing.Point(333, 79) 106 | Me.buttonequal.Name = "buttonequal" 107 | Me.buttonequal.Size = New System.Drawing.Size(42, 39) 108 | Me.buttonequal.TabIndex = 26 109 | Me.buttonequal.Text = "=" 110 | Me.buttonequal.UseVisualStyleBackColor = True 111 | ' 112 | 'buttonminus 113 | ' 114 | Me.buttonminus.Location = New System.Drawing.Point(285, 79) 115 | Me.buttonminus.Name = "buttonminus" 116 | Me.buttonminus.Size = New System.Drawing.Size(42, 39) 117 | Me.buttonminus.TabIndex = 27 118 | Me.buttonminus.Text = "-" 119 | Me.buttonminus.UseVisualStyleBackColor = True 120 | ' 121 | 'buttonunder 122 | ' 123 | Me.buttonunder.Location = New System.Drawing.Point(141, 168) 124 | Me.buttonunder.Name = "buttonunder" 125 | Me.buttonunder.Size = New System.Drawing.Size(42, 39) 126 | Me.buttonunder.TabIndex = 28 127 | Me.buttonunder.Text = "_" 128 | Me.buttonunder.UseVisualStyleBackColor = True 129 | ' 130 | 'buttonbackslash 131 | ' 132 | Me.buttonbackslash.Location = New System.Drawing.Point(237, 79) 133 | Me.buttonbackslash.Name = "buttonbackslash" 134 | Me.buttonbackslash.Size = New System.Drawing.Size(42, 39) 135 | Me.buttonbackslash.TabIndex = 29 136 | Me.buttonbackslash.Text = "\" 137 | Me.buttonbackslash.UseVisualStyleBackColor = True 138 | ' 139 | 'buttonapos 140 | ' 141 | Me.buttonapos.Location = New System.Drawing.Point(189, 123) 142 | Me.buttonapos.Name = "buttonapos" 143 | Me.buttonapos.Size = New System.Drawing.Size(42, 39) 144 | Me.buttonapos.TabIndex = 30 145 | Me.buttonapos.Text = "'" 146 | Me.buttonapos.UseVisualStyleBackColor = True 147 | ' 148 | 'buttoncudzy 149 | ' 150 | Me.buttoncudzy.Location = New System.Drawing.Point(141, 123) 151 | Me.buttoncudzy.Name = "buttoncudzy" 152 | Me.buttoncudzy.Size = New System.Drawing.Size(42, 39) 153 | Me.buttoncudzy.TabIndex = 31 154 | Me.buttoncudzy.Text = """" 155 | Me.buttoncudzy.UseVisualStyleBackColor = True 156 | ' 157 | 'buttonstar 158 | ' 159 | Me.buttonstar.Location = New System.Drawing.Point(93, 123) 160 | Me.buttonstar.Name = "buttonstar" 161 | Me.buttonstar.Size = New System.Drawing.Size(42, 39) 162 | Me.buttonstar.TabIndex = 32 163 | Me.buttonstar.Text = "*" 164 | Me.buttonstar.UseVisualStyleBackColor = True 165 | ' 166 | 'buttonpro 167 | ' 168 | Me.buttonpro.Location = New System.Drawing.Point(189, 78) 169 | Me.buttonpro.Name = "buttonpro" 170 | Me.buttonpro.Size = New System.Drawing.Size(42, 39) 171 | Me.buttonpro.TabIndex = 33 172 | Me.buttonpro.Text = "%" 173 | Me.buttonpro.UseVisualStyleBackColor = True 174 | ' 175 | 'buttondolar 176 | ' 177 | Me.buttondolar.Location = New System.Drawing.Point(141, 78) 178 | Me.buttondolar.Name = "buttondolar" 179 | Me.buttondolar.Size = New System.Drawing.Size(42, 39) 180 | Me.buttondolar.TabIndex = 34 181 | Me.buttondolar.Text = "$" 182 | Me.buttondolar.UseVisualStyleBackColor = True 183 | ' 184 | 'Buttonnet 185 | ' 186 | Me.Buttonnet.Location = New System.Drawing.Point(93, 78) 187 | Me.Buttonnet.Name = "Buttonnet" 188 | Me.Buttonnet.Size = New System.Drawing.Size(42, 39) 189 | Me.Buttonnet.TabIndex = 35 190 | Me.Buttonnet.Text = "#" 191 | Me.Buttonnet.UseVisualStyleBackColor = True 192 | ' 193 | 'buttonwat 194 | ' 195 | Me.buttonwat.Location = New System.Drawing.Point(381, 123) 196 | Me.buttonwat.Name = "buttonwat" 197 | Me.buttonwat.Size = New System.Drawing.Size(42, 39) 198 | Me.buttonwat.TabIndex = 36 199 | Me.buttonwat.Text = "?" 200 | Me.buttonwat.UseVisualStyleBackColor = True 201 | ' 202 | 'buttonexcla 203 | ' 204 | Me.buttonexcla.Location = New System.Drawing.Point(333, 124) 205 | Me.buttonexcla.Name = "buttonexcla" 206 | Me.buttonexcla.Size = New System.Drawing.Size(42, 39) 207 | Me.buttonexcla.TabIndex = 37 208 | Me.buttonexcla.Text = "!" 209 | Me.buttonexcla.UseVisualStyleBackColor = True 210 | ' 211 | 'buttonspace 212 | ' 213 | Me.buttonspace.Location = New System.Drawing.Point(237, 168) 214 | Me.buttonspace.Name = "buttonspace" 215 | Me.buttonspace.Size = New System.Drawing.Size(90, 39) 216 | Me.buttonspace.TabIndex = 38 217 | Me.buttonspace.Text = "&" 218 | Me.buttonspace.UseVisualStyleBackColor = True 219 | ' 220 | 'buttoncoma 221 | ' 222 | Me.buttoncoma.Location = New System.Drawing.Point(333, 168) 223 | Me.buttoncoma.Name = "buttoncoma" 224 | Me.buttoncoma.Size = New System.Drawing.Size(42, 39) 225 | Me.buttoncoma.TabIndex = 39 226 | Me.buttoncoma.Text = "," 227 | Me.buttoncoma.UseVisualStyleBackColor = True 228 | ' 229 | 'buttondot 230 | ' 231 | Me.buttondot.Location = New System.Drawing.Point(381, 168) 232 | Me.buttondot.Name = "buttondot" 233 | Me.buttondot.Size = New System.Drawing.Size(42, 39) 234 | Me.buttondot.TabIndex = 40 235 | Me.buttondot.Text = "." 236 | Me.buttondot.UseVisualStyleBackColor = True 237 | ' 238 | 'buttonslash 239 | ' 240 | Me.buttonslash.Location = New System.Drawing.Point(189, 168) 241 | Me.buttonslash.Name = "buttonslash" 242 | Me.buttonslash.Size = New System.Drawing.Size(42, 39) 243 | Me.buttonslash.TabIndex = 41 244 | Me.buttonslash.Text = "/" 245 | Me.buttonslash.UseVisualStyleBackColor = True 246 | ' 247 | 'Form2 248 | ' 249 | Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) 250 | Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font 251 | Me.ClientSize = New System.Drawing.Size(527, 239) 252 | Me.Controls.Add(Me.buttonslash) 253 | Me.Controls.Add(Me.buttondot) 254 | Me.Controls.Add(Me.buttoncoma) 255 | Me.Controls.Add(Me.buttonspace) 256 | Me.Controls.Add(Me.buttonexcla) 257 | Me.Controls.Add(Me.buttonwat) 258 | Me.Controls.Add(Me.Buttonnet) 259 | Me.Controls.Add(Me.buttondolar) 260 | Me.Controls.Add(Me.buttonpro) 261 | Me.Controls.Add(Me.buttonstar) 262 | Me.Controls.Add(Me.buttoncudzy) 263 | Me.Controls.Add(Me.buttonapos) 264 | Me.Controls.Add(Me.buttonbackslash) 265 | Me.Controls.Add(Me.buttonunder) 266 | Me.Controls.Add(Me.buttonminus) 267 | Me.Controls.Add(Me.buttonequal) 268 | Me.Controls.Add(Me.buttonleftbra) 269 | Me.Controls.Add(Me.buttonrightbra) 270 | Me.Controls.Add(Me.buttoncolon) 271 | Me.Controls.Add(Me.buttonsemi) 272 | Me.Controls.Add(Me.Buttonat) 273 | Me.Controls.Add(Me.ABC) 274 | Me.Name = "Form2" 275 | Me.Text = "Form2" 276 | Me.ResumeLayout(False) 277 | 278 | End Sub 279 | Friend WithEvents ABC As System.Windows.Forms.Button 280 | Friend WithEvents Buttonat As System.Windows.Forms.Button 281 | Friend WithEvents buttonsemi As System.Windows.Forms.Button 282 | Friend WithEvents buttoncolon As System.Windows.Forms.Button 283 | Friend WithEvents buttonrightbra As System.Windows.Forms.Button 284 | Friend WithEvents buttonleftbra As System.Windows.Forms.Button 285 | Friend WithEvents buttonequal As System.Windows.Forms.Button 286 | Friend WithEvents buttonminus As System.Windows.Forms.Button 287 | Friend WithEvents buttonunder As System.Windows.Forms.Button 288 | Friend WithEvents buttonbackslash As System.Windows.Forms.Button 289 | Friend WithEvents buttonapos As System.Windows.Forms.Button 290 | Friend WithEvents buttoncudzy As System.Windows.Forms.Button 291 | Friend WithEvents buttonstar As System.Windows.Forms.Button 292 | Friend WithEvents buttonpro As System.Windows.Forms.Button 293 | Friend WithEvents buttondolar As System.Windows.Forms.Button 294 | Friend WithEvents Buttonnet As System.Windows.Forms.Button 295 | Friend WithEvents buttonwat As System.Windows.Forms.Button 296 | Friend WithEvents buttonexcla As System.Windows.Forms.Button 297 | Friend WithEvents buttonspace As System.Windows.Forms.Button 298 | Friend WithEvents buttoncoma As System.Windows.Forms.Button 299 | Friend WithEvents buttondot As System.Windows.Forms.Button 300 | Friend WithEvents buttonslash As System.Windows.Forms.Button 301 | End Class 302 | -------------------------------------------------------------------------------- /Form2.resx: -------------------------------------------------------------------------------- 1 |  2 | 3 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | 107 | 108 | 109 | text/microsoft-resx 110 | 111 | 112 | 2.0 113 | 114 | 115 | System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 116 | 117 | 118 | System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 119 | 120 | -------------------------------------------------------------------------------- /Form2.vb: -------------------------------------------------------------------------------- 1 | Public Class Form2 2 | 3 | Private Sub ABC_Click(sender As Object, e As EventArgs) Handles ABC.Click 4 | Form1.Show() 5 | Me.Hide() 6 | End Sub 7 | 8 | Private Sub Buttonat_Click(sender As Object, e As EventArgs) Handles Buttonat.Click 9 | Shell("""Tools\adb.exe"" shell input text '@'") 10 | End Sub 11 | 12 | Private Sub Buttonnet_Click(sender As Object, e As EventArgs) Handles Buttonnet.Click 13 | Shell("""Tools\adb.exe"" shell input text '#'") 14 | End Sub 15 | 16 | Private Sub buttondolar_Click(sender As Object, e As EventArgs) Handles buttondolar.Click 17 | Shell("""Tools\adb.exe"" shell input text '$'") 18 | End Sub 19 | 20 | Private Sub buttonpro_Click(sender As Object, e As EventArgs) Handles buttonpro.Click 21 | Shell("""Tools\adb.exe"" shell input text '%'") 22 | End Sub 23 | 24 | Private Sub buttonbackslash_Click(sender As Object, e As EventArgs) Handles buttonbackslash.Click 25 | Shell("""Tools\adb.exe"" shell input text '\'") 26 | End Sub 27 | 28 | Private Sub buttonminus_Click(sender As Object, e As EventArgs) Handles buttonminus.Click 29 | Shell("""Tools\adb.exe"" shell input text '-'") 30 | End Sub 31 | 32 | Private Sub buttonequal_Click(sender As Object, e As EventArgs) Handles buttonequal.Click 33 | Shell("""Tools\adb.exe"" shell input text '='") 34 | End Sub 35 | 36 | Private Sub buttonleftbra_Click(sender As Object, e As EventArgs) Handles buttonleftbra.Click 37 | Shell("""Tools\adb.exe"" shell input text '('") 38 | End Sub 39 | 40 | Private Sub buttonrightbra_Click(sender As Object, e As EventArgs) Handles buttonrightbra.Click 41 | Shell("""Tools\adb.exe"" shell input text ')'") 42 | End Sub 43 | 44 | Private Sub buttonstar_Click(sender As Object, e As EventArgs) Handles buttonstar.Click 45 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_STAR") 46 | End Sub 47 | 48 | Private Sub buttoncudzy_Click(sender As Object, e As EventArgs) Handles buttoncudzy.Click 49 | Shell("""Tools\adb.exe"" shell input text '\""'") 50 | End Sub 51 | 52 | Private Sub buttonapos_Click(sender As Object, e As EventArgs) Handles buttonapos.Click 53 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_APOSTROPHE") 54 | End Sub 55 | 56 | Private Sub buttoncolon_Click(sender As Object, e As EventArgs) Handles buttoncolon.Click 57 | Shell("""Tools\adb.exe"" shell input text ':'") 58 | End Sub 59 | 60 | Private Sub buttonsemi_Click(sender As Object, e As EventArgs) Handles buttonsemi.Click 61 | Shell("""Tools\adb.exe"" shell input text ';'") 62 | End Sub 63 | 64 | Private Sub buttonexcla_Click(sender As Object, e As EventArgs) Handles buttonexcla.Click 65 | Shell("""Tools\adb.exe"" shell input text '!'") 66 | End Sub 67 | 68 | Private Sub buttonwat_Click(sender As Object, e As EventArgs) Handles buttonwat.Click 69 | Shell("""Tools\adb.exe"" shell input text '?'") 70 | End Sub 71 | 72 | Private Sub buttonunder_Click(sender As Object, e As EventArgs) Handles buttonunder.Click 73 | Shell("""Tools\adb.exe"" shell input text '_'") 74 | End Sub 75 | 76 | Private Sub buttonslash_Click(sender As Object, e As EventArgs) Handles buttonslash.Click 77 | Shell("""Tools\adb.exe"" shell input text '/'") 78 | End Sub 79 | 80 | Private Sub buttonspace_Click(sender As Object, e As EventArgs) Handles buttonspace.Click 81 | Shell("""Tools\adb.exe"" shell input text ' '") 82 | End Sub 83 | 84 | Private Sub buttoncoma_Click(sender As Object, e As EventArgs) Handles buttoncoma.Click 85 | Shell("""Tools\adb.exe"" shell input text ','") 86 | End Sub 87 | 88 | Private Sub buttondot_Click(sender As Object, e As EventArgs) Handles buttondot.Click 89 | Shell("""Tools\adb.exe"" shell input text '.'") 90 | End Sub 91 | End Class -------------------------------------------------------------------------------- /Gestures.Designer.vb: -------------------------------------------------------------------------------- 1 | Imports System.Threading 2 | 3 | _ 4 | Partial Class Gestures 5 | Inherits System.Windows.Forms.Form 6 | 7 | 'Form overrides dispose to clean up the component list. 8 | _ 9 | Protected Overrides Sub Dispose(ByVal disposing As Boolean) 10 | Try 11 | If disposing AndAlso components IsNot Nothing Then 12 | components.Dispose() 13 | End If 14 | Finally 15 | MyBase.Dispose(disposing) 16 | End Try 17 | End Sub 18 | 19 | 'Required by the Windows Form Designer 20 | Private components As System.ComponentModel.IContainer 21 | 22 | 'NOTE: The following procedure is required by the Windows Form Designer 23 | 'It can be modified using the Windows Form Designer. 24 | 'Do not modify it using the code editor. 25 | _ 26 | Private Sub InitializeComponent() 27 | Me.components = New System.ComponentModel.Container() 28 | Me.Label2 = New System.Windows.Forms.Label() 29 | Me.Label3 = New System.Windows.Forms.Label() 30 | Me.Label4 = New System.Windows.Forms.Label() 31 | Me.Label5 = New System.Windows.Forms.Label() 32 | Me.Label6 = New System.Windows.Forms.Label() 33 | Me.Panel1 = New System.Windows.Forms.Panel() 34 | Me.Label7 = New System.Windows.Forms.Label() 35 | Me.ComboBox1 = New System.Windows.Forms.ComboBox() 36 | Me.Label1 = New System.Windows.Forms.Label() 37 | Me.Timer1 = New System.Windows.Forms.Timer(Me.components) 38 | Me.Button1 = New System.Windows.Forms.Button() 39 | Me.Button2 = New System.Windows.Forms.Button() 40 | Me.Button3 = New System.Windows.Forms.Button() 41 | Me.SuspendLayout() 42 | ' 43 | 'Label2 44 | ' 45 | Me.Label2.AccessibleName = "x-loc" 46 | Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 47 | Me.Label2.AutoSize = True 48 | Me.Label2.Location = New System.Drawing.Point(54, 198) 49 | Me.Label2.Name = "Label2" 50 | Me.Label2.Size = New System.Drawing.Size(13, 13) 51 | Me.Label2.TabIndex = 1 52 | Me.Label2.Text = "0" 53 | ' 54 | 'Label3 55 | ' 56 | Me.Label3.AccessibleName = "y-loc" 57 | Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 58 | Me.Label3.AutoSize = True 59 | Me.Label3.Location = New System.Drawing.Point(147, 198) 60 | Me.Label3.Name = "Label3" 61 | Me.Label3.Size = New System.Drawing.Size(13, 13) 62 | Me.Label3.TabIndex = 3 63 | Me.Label3.Text = "0" 64 | ' 65 | 'Label4 66 | ' 67 | Me.Label4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 68 | Me.Label4.AutoSize = True 69 | Me.Label4.Location = New System.Drawing.Point(104, 198) 70 | Me.Label4.Name = "Label4" 71 | Me.Label4.Size = New System.Drawing.Size(37, 13) 72 | Me.Label4.TabIndex = 2 73 | Me.Label4.Text = "Y pos:" 74 | ' 75 | 'Label5 76 | ' 77 | Me.Label5.AccessibleName = "y-loc" 78 | Me.Label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 79 | Me.Label5.AutoSize = True 80 | Me.Label5.Location = New System.Drawing.Point(226, 198) 81 | Me.Label5.Name = "Label5" 82 | Me.Label5.Size = New System.Drawing.Size(13, 13) 83 | Me.Label5.TabIndex = 5 84 | Me.Label5.Text = "0" 85 | ' 86 | 'Label6 87 | ' 88 | Me.Label6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 89 | Me.Label6.AutoSize = True 90 | Me.Label6.Location = New System.Drawing.Point(180, 198) 91 | Me.Label6.Name = "Label6" 92 | Me.Label6.Size = New System.Drawing.Size(40, 13) 93 | Me.Label6.TabIndex = 4 94 | Me.Label6.Text = "Status:" 95 | ' 96 | 'Panel1 97 | ' 98 | Me.Panel1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ 99 | Or System.Windows.Forms.AnchorStyles.Left) _ 100 | Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) 101 | Me.Panel1.BackColor = System.Drawing.Color.Red 102 | Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D 103 | Me.Panel1.Location = New System.Drawing.Point(5, 33) 104 | Me.Panel1.Name = "Panel1" 105 | Me.Panel1.Size = New System.Drawing.Size(296, 162) 106 | Me.Panel1.TabIndex = 6 107 | ' 108 | 'Label7 109 | ' 110 | Me.Label7.AutoSize = True 111 | Me.Label7.Location = New System.Drawing.Point(2, 9) 112 | Me.Label7.Name = "Label7" 113 | Me.Label7.Size = New System.Drawing.Size(63, 13) 114 | Me.Label7.TabIndex = 7 115 | Me.Label7.Text = "Resolution: " 116 | ' 117 | 'ComboBox1 118 | ' 119 | Me.ComboBox1.FormattingEnabled = True 120 | Me.ComboBox1.Items.AddRange(New Object() {"1440x2560", "1080x1920", "800x1280", "768x1280", "720x1280", "720x1200", "480x800", "400x800", "540x960", "240x320"}) 121 | Me.ComboBox1.Location = New System.Drawing.Point(64, 6) 122 | Me.ComboBox1.Name = "ComboBox1" 123 | Me.ComboBox1.Size = New System.Drawing.Size(79, 21) 124 | Me.ComboBox1.TabIndex = 8 125 | ' 126 | 'Label1 127 | ' 128 | Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 129 | Me.Label1.AutoSize = True 130 | Me.Label1.Location = New System.Drawing.Point(11, 198) 131 | Me.Label1.Name = "Label1" 132 | Me.Label1.Size = New System.Drawing.Size(37, 13) 133 | Me.Label1.TabIndex = 0 134 | Me.Label1.Text = "X pos:" 135 | ' 136 | 'Timer1 137 | ' 138 | Me.Timer1.Enabled = True 139 | Me.Timer1.Interval = 10 140 | ' 141 | 'Button1 142 | ' 143 | Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 144 | Me.Button1.AutoSize = True 145 | Me.Button1.BackgroundImage = Global.AndroidControl.My.Resources.Resources.back 146 | Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch 147 | Me.Button1.Location = New System.Drawing.Point(4, 214) 148 | Me.Button1.Name = "Button1" 149 | Me.Button1.Size = New System.Drawing.Size(58, 40) 150 | Me.Button1.TabIndex = 9 151 | Me.Button1.UseVisualStyleBackColor = True 152 | ' 153 | 'Button2 154 | ' 155 | Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 156 | Me.Button2.AutoSize = True 157 | Me.Button2.BackgroundImage = Global.AndroidControl.My.Resources.Resources.home 158 | Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch 159 | Me.Button2.Location = New System.Drawing.Point(86, 214) 160 | Me.Button2.Name = "Button2" 161 | Me.Button2.Size = New System.Drawing.Size(58, 40) 162 | Me.Button2.TabIndex = 10 163 | Me.Button2.UseVisualStyleBackColor = True 164 | ' 165 | 'Button3 166 | ' 167 | Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) 168 | Me.Button3.AutoSize = True 169 | Me.Button3.BackgroundImage = Global.AndroidControl.My.Resources.Resources.apps 170 | Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch 171 | Me.Button3.Location = New System.Drawing.Point(168, 214) 172 | Me.Button3.Name = "Button3" 173 | Me.Button3.Size = New System.Drawing.Size(58, 40) 174 | Me.Button3.TabIndex = 11 175 | Me.Button3.UseVisualStyleBackColor = True 176 | ' 177 | 'Gestures 178 | ' 179 | Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) 180 | Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font 181 | Me.BackColor = System.Drawing.Color.White 182 | Me.ClientSize = New System.Drawing.Size(305, 255) 183 | Me.Controls.Add(Me.Button3) 184 | Me.Controls.Add(Me.Button2) 185 | Me.Controls.Add(Me.Button1) 186 | Me.Controls.Add(Me.ComboBox1) 187 | Me.Controls.Add(Me.Label7) 188 | Me.Controls.Add(Me.Panel1) 189 | Me.Controls.Add(Me.Label5) 190 | Me.Controls.Add(Me.Label6) 191 | Me.Controls.Add(Me.Label3) 192 | Me.Controls.Add(Me.Label4) 193 | Me.Controls.Add(Me.Label2) 194 | Me.Controls.Add(Me.Label1) 195 | Me.Name = "Gestures" 196 | Me.Text = "Gestures" 197 | Me.ResumeLayout(False) 198 | Me.PerformLayout() 199 | 200 | End Sub 201 | Friend WithEvents Label2 As System.Windows.Forms.Label 202 | Friend WithEvents Label3 As System.Windows.Forms.Label 203 | Friend WithEvents Label4 As System.Windows.Forms.Label 204 | Friend WithEvents Label5 As System.Windows.Forms.Label 205 | Friend WithEvents Label6 As System.Windows.Forms.Label 206 | Friend WithEvents Panel1 As System.Windows.Forms.Panel 207 | Friend WithEvents Label7 As System.Windows.Forms.Label 208 | Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox 209 | 210 | 211 | 212 | 213 | Private Sub Gestures_Load(sender As Object, e As EventArgs) Handles MyBase.Load 214 | 'Call New Thread(AddressOf MouseCheck).Start() 215 | ' Process.GetCurrentProcess.WaitForExit() 216 | 'MsgBox("Mouse moved 20 pixels!") 217 | Timer1.Interval = 10 218 | Timer1.Start() 219 | Me.Panel1.BackColor = Color.Red 220 | Me.TransparencyKey = Color.Red 221 | End Sub 222 | 223 | Private Shared Sub MouseCheck() 224 | 'While True 225 | 'If Cursor.Position.X > Gestures.Panel1.Location.X And Cursor.Position.X < Gestures.Panel1.Location.X + Gestures.Panel1.Width And Cursor.Position.Y > Gestures.Panel1.Location.Y And Cursor.Position.Y < Gestures.Panel1.Location.Y + Gestures.Panel1.Height Then 226 | Gestures.Label2.Text = Cursor.Position.X 227 | Gestures.Label4.Text = Cursor.Position.Y 228 | 229 | 'End If 230 | 231 | 'Thread.Sleep(1000 / 60) 232 | 'End While 233 | End Sub 234 | Friend WithEvents Label1 As System.Windows.Forms.Label 235 | Friend WithEvents Timer1 As System.Windows.Forms.Timer 236 | 237 | 'Private Sub Gestures_MouseHover(sender As Object, e As EventArgs) Handles Me.MouseHover 238 | ' Me.Label2.Text = Cursor.Position.X 239 | 'Me.Label4.Text = Cursor.Position.Y 240 | 'End Sub 241 | 242 | 243 | 244 | Dim pos As Point 245 | Public dest As Point 246 | Public coordinates_1 As Point 247 | Public coordinates_2 As Point 248 | Dim resX As String 249 | Dim resY As String 250 | Public complete_flag As Boolean 251 | Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick 252 | 'Call MouseCheck() 253 | 'MsgBox("tic") 254 | Dim BorderWidth As Integer 255 | 'obliczenia pozycji kursora wewnatrz panelu aktywnego 256 | BorderWidth = (Me.Width - Me.ClientSize.Width) / 2 257 | pos.X = Cursor.Position.X - Me.Location.X - Me.Panel1.Location.X - BorderWidth 258 | pos.Y = Cursor.Position.Y - Me.Location.Y - Me.Panel1.Location.Y - (Me.Height - Me.ClientSize.Height - BorderWidth) 259 | 260 | ' sprawdzenie czy kursor jest w obrebie pola 261 | If pos.X > 0 And pos.X < Me.Panel1.Width And pos.Y > 0 And pos.Y < Me.Panel1.Height Then 262 | 263 | 'przeliczenie do pozycji docelowej w wybranej rozdzielczosci 264 | 'zmienilem wartosc 768 i 1280 na string resX oraz resY 265 | dest.X = pos.X / Panel1.Width * resX 266 | dest.Y = pos.Y / Panel1.Height * resY 267 | 268 | Me.Label1.Text = pos.X.ToString 269 | Me.Label4.Text = pos.Y.ToString 270 | 271 | Me.Label2.Text = dest.X.ToString 272 | Me.Label3.Text = dest.Y.ToString 273 | 274 | End If 275 | End Sub 276 | 'zmiana rozdzielczosci w combobox 277 | Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged 278 | Select Case ComboBox1.Text 279 | Case "1440x2560" 280 | resX = 1440 281 | resY = 2560 282 | Case "1080x1920" 283 | resX = 1080 284 | resY = 1920 285 | Case "800x1280" 286 | resX = 800 287 | resY = 1280 288 | Case "768x1280" 289 | resX = 768 290 | resY = 1280 291 | Case "720x1280" 292 | resX = 720 293 | resY = 1280 294 | Case "720x1200" 295 | resX = 720 296 | resY = 1200 297 | Case "540x960" 298 | resX = 540 299 | resY = 960 300 | Case "480x800" 301 | resX = 480 302 | resY = 800 303 | Case "400x800" 304 | resX = 400 305 | resY = 800 306 | Case "240x320" 307 | resX = 240 308 | resY = 320 309 | End Select 310 | End Sub 311 | 312 | Friend WithEvents Button1 As System.Windows.Forms.Button 313 | Friend WithEvents Button2 As System.Windows.Forms.Button 314 | Friend WithEvents Button3 As System.Windows.Forms.Button 315 | 316 | Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 317 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_BACK") 318 | End Sub 319 | 320 | Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 321 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_HOME") 322 | End Sub 323 | 324 | Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 325 | Shell("""Tools\adb.exe"" shell input keyevent KEYCODE_APP_SWITCH") 326 | End Sub 327 | 328 | ' method to handle mouse clicks (start gesture detection) 329 | Private Sub Panel1_MouseDown(sender As Object, e As EventArgs) Handles Panel1.MouseDown 330 | 'check if resolution selected 331 | If Me.ComboBox1.Text = "" Then 332 | MsgBox("Choose you're devices resolution") 333 | complete_flag = 0 334 | Else 335 | 'store mouse donwn coordinates 336 | coordinates_1.X = dest.X 337 | coordinates_1.Y = dest.Y 338 | complete_flag = True 339 | 'MsgBox(complete_flag.ToString) 340 | End If 341 | End Sub 342 | 'method to handle remaining part of mesture detection 343 | Private Sub Panel1_MouseUp(sender As Object, e As EventArgs) Handles Panel1.MouseUp 344 | 'run only when start/initial coordinates stored succcesfully 345 | 'MsgBox("test mouse up") 346 | If complete_flag = True Then 347 | 'store mouse up coordinates 348 | coordinates_2.X = dest.X 349 | coordinates_2.Y = dest.Y 350 | 'detect tap or swipe 351 | If coordinates_1.X = coordinates_2.X And coordinates_1.Y = coordinates_2.Y Then 352 | 'its a tap 353 | 'MsgBox("its a tap") 354 | 'MsgBox("""Tools\adb.exe"" shell input tap " & coordinates_1.X.ToString & " " & coordinates_1.Y.ToString) 355 | Shell("""Tools\adb.exe"" shell input tap " & coordinates_1.X.ToString & " " & coordinates_1.Y.ToString) 356 | Else 357 | 'its a swipe 358 | 'MsgBox("its a swipe") 359 | 'MsgBox("""Tools\adb.exe"" shell input swipe " & coordinates_1.X.ToString & " " & coordinates_1.Y.ToString & " " & coordinates_2.X.ToString & " " & coordinates_2.Y.ToString) 360 | Shell("""Tools\adb.exe"" shell input swipe " & coordinates_1.X.ToString & " " & coordinates_1.Y.ToString & " " & coordinates_2.X.ToString & " " & coordinates_2.Y.ToString) 361 | 362 | End If 363 | Else 364 | 'MsgBox("condition not met") 365 | End If 366 | End Sub 367 | 'errorproofing 368 | 'method to handle situation when window is out of focus, clearing variables to avoid errors 369 | Private Sub Panel1_MouseCaptureChanged(sender As Object, e As EventArgs) Handles Panel1.MouseCaptureChanged 370 | 'clear data and abort 371 | complete_flag = 0 372 | 373 | 'clear mouse up coordinates 374 | coordinates_1.X = 0 375 | coordinates_1.Y = 0 376 | coordinates_2.X = 0 377 | coordinates_2.Y = 0 378 | 379 | End Sub 380 | 381 | End Class 382 | -------------------------------------------------------------------------------- /Gestures.resx: -------------------------------------------------------------------------------- 1 |  2 | 3 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | 107 | 108 | 109 | text/microsoft-resx 110 | 111 | 112 | 2.0 113 | 114 | 115 | System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 116 | 117 | 118 | System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 119 | 120 | 121 | 17, 17 122 | 123 | -------------------------------------------------------------------------------- /Gestures.vb: -------------------------------------------------------------------------------- 1 | Public Class Gestures 2 | 3 | 4 | End Class -------------------------------------------------------------------------------- /My Project/Application.Designer.vb: -------------------------------------------------------------------------------- 1 | '------------------------------------------------------------------------------ 2 | ' 3 | ' This code was generated by a tool. 4 | ' Runtime Version:4.0.30319.18444 5 | ' 6 | ' Changes to this file may cause incorrect behavior and will be lost if 7 | ' the code is regenerated. 8 | ' 9 | '------------------------------------------------------------------------------ 10 | 11 | Option Strict On 12 | Option Explicit On 13 | 14 | 15 | Namespace My 16 | 17 | 'NOTE: This file is auto-generated; do not modify it directly. To make changes, 18 | ' or if you encounter build errors in this file, go to the Project Designer 19 | ' (go to Project Properties or double-click the My Project node in 20 | ' Solution Explorer), and make changes on the Application tab. 21 | ' 22 | Partial Friend Class MyApplication 23 | 24 | _ 25 | Public Sub New() 26 | MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) 27 | Me.IsSingleInstance = false 28 | Me.EnableVisualStyles = true 29 | Me.SaveMySettingsOnExit = true 30 | Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses 31 | End Sub 32 | 33 | _ 34 | Protected Overrides Sub OnCreateMainForm() 35 | Me.MainForm = Global.AndroidControl.Form1 36 | End Sub 37 | End Class 38 | End Namespace 39 | -------------------------------------------------------------------------------- /My Project/Application.myapp: -------------------------------------------------------------------------------- 1 |  2 | 3 | true 4 | Form1 5 | false 6 | 0 7 | true 8 | 0 9 | 0 10 | true 11 | 12 | -------------------------------------------------------------------------------- /My Project/AssemblyInfo.vb: -------------------------------------------------------------------------------- 1 | Imports System 2 | Imports System.Reflection 3 | Imports System.Runtime.InteropServices 4 | 5 | ' General Information about an assembly is controlled through the following 6 | ' set of attributes. Change these attribute values to modify the information 7 | ' associated with an assembly. 8 | 9 | ' Review the values of the assembly attributes 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 'The following GUID is for the ID of the typelib if this project is exposed to COM 21 | 22 | 23 | ' Version information for an assembly consists of the following four values: 24 | ' 25 | ' Major Version 26 | ' Minor Version 27 | ' Build Number 28 | ' Revision 29 | ' 30 | ' You can specify all the values or you can default the Build and Revision Numbers 31 | ' by using the '*' as shown below: 32 | ' 33 | 34 | 35 | 36 | -------------------------------------------------------------------------------- /My Project/Resources.Designer.vb: -------------------------------------------------------------------------------- 1 | '------------------------------------------------------------------------------ 2 | ' 3 | ' This code was generated by a tool. 4 | ' Runtime Version:4.0.30319.34209 5 | ' 6 | ' Changes to this file may cause incorrect behavior and will be lost if 7 | ' the code is regenerated. 8 | ' 9 | '------------------------------------------------------------------------------ 10 | 11 | Option Strict On 12 | Option Explicit On 13 | 14 | Imports System 15 | 16 | Namespace My.Resources 17 | 18 | 'This class was auto-generated by the StronglyTypedResourceBuilder 19 | 'class via a tool like ResGen or Visual Studio. 20 | 'To add or remove a member, edit your .ResX file then rerun ResGen 21 | 'with the /str option, or rebuild your VS project. 22 | ''' 23 | ''' A strongly-typed resource class, for looking up localized strings, etc. 24 | ''' 25 | _ 29 | Friend Module Resources 30 | 31 | Private resourceMan As Global.System.Resources.ResourceManager 32 | 33 | Private resourceCulture As Global.System.Globalization.CultureInfo 34 | 35 | ''' 36 | ''' Returns the cached ResourceManager instance used by this class. 37 | ''' 38 | _ 39 | Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager 40 | Get 41 | If Object.ReferenceEquals(resourceMan, Nothing) Then 42 | Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("AndroidControl.Resources", GetType(Resources).Assembly) 43 | resourceMan = temp 44 | End If 45 | Return resourceMan 46 | End Get 47 | End Property 48 | 49 | ''' 50 | ''' Overrides the current thread's CurrentUICulture property for all 51 | ''' resource lookups using this strongly typed resource class. 52 | ''' 53 | _ 54 | Friend Property Culture() As Global.System.Globalization.CultureInfo 55 | Get 56 | Return resourceCulture 57 | End Get 58 | Set 59 | resourceCulture = value 60 | End Set 61 | End Property 62 | 63 | ''' 64 | ''' Looks up a localized resource of type System.Byte[]. 65 | ''' 66 | Friend ReadOnly Property adb() As Byte() 67 | Get 68 | Dim obj As Object = ResourceManager.GetObject("adb", resourceCulture) 69 | Return CType(obj,Byte()) 70 | End Get 71 | End Property 72 | 73 | ''' 74 | ''' Looks up a localized resource of type System.Byte[]. 75 | ''' 76 | Friend ReadOnly Property AdbWinApi() As Byte() 77 | Get 78 | Dim obj As Object = ResourceManager.GetObject("AdbWinApi", resourceCulture) 79 | Return CType(obj,Byte()) 80 | End Get 81 | End Property 82 | 83 | ''' 84 | ''' Looks up a localized resource of type System.Byte[]. 85 | ''' 86 | Friend ReadOnly Property AdbWinUsbApi() As Byte() 87 | Get 88 | Dim obj As Object = ResourceManager.GetObject("AdbWinUsbApi", resourceCulture) 89 | Return CType(obj,Byte()) 90 | End Get 91 | End Property 92 | 93 | ''' 94 | ''' Looks up a localized resource of type System.Drawing.Bitmap. 95 | ''' 96 | Friend ReadOnly Property apps() As System.Drawing.Bitmap 97 | Get 98 | Dim obj As Object = ResourceManager.GetObject("apps", resourceCulture) 99 | Return CType(obj,System.Drawing.Bitmap) 100 | End Get 101 | End Property 102 | 103 | ''' 104 | ''' Looks up a localized resource of type System.Drawing.Bitmap. 105 | ''' 106 | Friend ReadOnly Property back() As System.Drawing.Bitmap 107 | Get 108 | Dim obj As Object = ResourceManager.GetObject("back", resourceCulture) 109 | Return CType(obj,System.Drawing.Bitmap) 110 | End Get 111 | End Property 112 | 113 | ''' 114 | ''' Looks up a localized resource of type System.Byte[]. 115 | ''' 116 | Friend ReadOnly Property droidAtScreen_1_1() As Byte() 117 | Get 118 | Dim obj As Object = ResourceManager.GetObject("droidAtScreen_1_1", resourceCulture) 119 | Return CType(obj,Byte()) 120 | End Get 121 | End Property 122 | 123 | ''' 124 | ''' Looks up a localized resource of type System.Drawing.Bitmap. 125 | ''' 126 | Friend ReadOnly Property home() As System.Drawing.Bitmap 127 | Get 128 | Dim obj As Object = ResourceManager.GetObject("home", resourceCulture) 129 | Return CType(obj,System.Drawing.Bitmap) 130 | End Get 131 | End Property 132 | End Module 133 | End Namespace 134 | -------------------------------------------------------------------------------- /My Project/Resources.resx: -------------------------------------------------------------------------------- 1 |  2 | 3 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | 107 | 108 | 109 | text/microsoft-resx 110 | 111 | 112 | 2.0 113 | 114 | 115 | System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 116 | 117 | 118 | System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 119 | 120 | 121 | 122 | ..\Resources\adb.exe;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 123 | 124 | 125 | ..\Resources\AdbWinApi.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 126 | 127 | 128 | ..\Resources\AdbWinUsbApi.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 129 | 130 | 131 | ..\Resources\apps.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a 132 | 133 | 134 | ..\Resources\back.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a 135 | 136 | 137 | ..\Resources\home.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a 138 | 139 | 140 | ..\Resources\droidAtScreen-1.1.jar;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 141 | 142 | -------------------------------------------------------------------------------- /My Project/Settings.Designer.vb: -------------------------------------------------------------------------------- 1 | '------------------------------------------------------------------------------ 2 | ' 3 | ' This code was generated by a tool. 4 | ' Runtime Version:4.0.30319.18444 5 | ' 6 | ' Changes to this file may cause incorrect behavior and will be lost if 7 | ' the code is regenerated. 8 | ' 9 | '------------------------------------------------------------------------------ 10 | 11 | Option Strict On 12 | Option Explicit On 13 | 14 | 15 | Namespace My 16 | 17 | _ 20 | Partial Friend NotInheritable Class MySettings 21 | Inherits Global.System.Configuration.ApplicationSettingsBase 22 | 23 | Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()), MySettings) 24 | 25 | #Region "My.Settings Auto-Save Functionality" 26 | #If _MyType = "WindowsForms" Then 27 | Private Shared addedHandler As Boolean 28 | 29 | Private Shared addedHandlerLockObject As New Object 30 | 31 | _ 32 | Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) 33 | If My.Application.SaveMySettingsOnExit Then 34 | My.Settings.Save() 35 | End If 36 | End Sub 37 | #End If 38 | #End Region 39 | 40 | Public Shared ReadOnly Property [Default]() As MySettings 41 | Get 42 | 43 | #If _MyType = "WindowsForms" Then 44 | If Not addedHandler Then 45 | SyncLock addedHandlerLockObject 46 | If Not addedHandler Then 47 | AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings 48 | addedHandler = True 49 | End If 50 | End SyncLock 51 | End If 52 | #End If 53 | Return defaultInstance 54 | End Get 55 | End Property 56 | End Class 57 | End Namespace 58 | 59 | Namespace My 60 | 61 | _ 64 | Friend Module MySettingsProperty 65 | 66 | _ 67 | Friend ReadOnly Property Settings() As Global.AndroidControl.My.MySettings 68 | Get 69 | Return Global.AndroidControl.My.MySettings.Default 70 | End Get 71 | End Property 72 | End Module 73 | End Namespace 74 | -------------------------------------------------------------------------------- /My Project/Settings.settings: -------------------------------------------------------------------------------- 1 |  2 | 3 | 4 | 5 | 6 | 7 | 8 | -------------------------------------------------------------------------------- /Resources/AdbWinApi.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/AdbWinApi.dll -------------------------------------------------------------------------------- /Resources/AdbWinUsbApi.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/AdbWinUsbApi.dll -------------------------------------------------------------------------------- /Resources/adb.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/adb.exe -------------------------------------------------------------------------------- /Resources/apps.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/apps.png -------------------------------------------------------------------------------- /Resources/back.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/back.png -------------------------------------------------------------------------------- /Resources/droidAtScreen-1.1.jar: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/droidAtScreen-1.1.jar -------------------------------------------------------------------------------- /Resources/home.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/kjanku1/ADBTouchScreenControl/1fec0e8156dacf570e1828a606baf6556a30d3fe/Resources/home.png -------------------------------------------------------------------------------- /WindowsApplication1.sln: -------------------------------------------------------------------------------- 1 |  2 | Microsoft Visual Studio Solution File, Format Version 12.00 3 | # Visual Studio 2012 4 | Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "WindowsApplication1", "WindowsApplication1.vbproj", "{21820ABE-8979-4B28-8DC1-BC849648AC6C}" 5 | EndProject 6 | Global 7 | GlobalSection(SolutionConfigurationPlatforms) = preSolution 8 | Debug|Any CPU = Debug|Any CPU 9 | Debug|x86 = Debug|x86 10 | Release|Any CPU = Release|Any CPU 11 | Release|x86 = Release|x86 12 | EndGlobalSection 13 | GlobalSection(ProjectConfigurationPlatforms) = postSolution 14 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU 15 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Debug|Any CPU.Build.0 = Debug|Any CPU 16 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Debug|x86.ActiveCfg = Debug|x86 17 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Debug|x86.Build.0 = Debug|x86 18 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Release|Any CPU.ActiveCfg = Release|Any CPU 19 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Release|Any CPU.Build.0 = Release|Any CPU 20 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Release|x86.ActiveCfg = Release|Any CPU 21 | {21820ABE-8979-4B28-8DC1-BC849648AC6C}.Release|x86.Build.0 = Release|Any CPU 22 | EndGlobalSection 23 | GlobalSection(SolutionProperties) = preSolution 24 | HideSolutionNode = FALSE 25 | EndGlobalSection 26 | EndGlobal 27 | -------------------------------------------------------------------------------- /WindowsApplication1.userprefs: -------------------------------------------------------------------------------- 1 |  2 | 3 | 4 | 5 | 6 | 7 | 8 | -------------------------------------------------------------------------------- /WindowsApplication1.vbproj: -------------------------------------------------------------------------------- 1 |  2 | 3 | 4 | 5 | Debug 6 | AnyCPU 7 | {21820ABE-8979-4B28-8DC1-BC849648AC6C} 8 | WinExe 9 | AndroidControl.My.MyApplication 10 | AndroidControl 11 | Android Control 12 | 512 13 | WindowsForms 14 | v4.5 15 | false 16 | C:\Users\Kamil\Desktop\App\ 17 | true 18 | Disk 19 | false 20 | Foreground 21 | 7 22 | Days 23 | false 24 | false 25 | true 26 | true 27 | 2 28 | 1.0.0.%2a 29 | false 30 | true 31 | true 32 | C:\Users\Kamil\Documents\Visual Studio 2012\Projects\WindowsApplication1\Resources 33 | 34 | 35 | AnyCPU 36 | true 37 | full 38 | true 39 | true 40 | bin\Debug\ 41 | Android Control.xml 42 | 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 43 | 44 | 45 | AnyCPU 46 | pdbonly 47 | false 48 | true 49 | true 50 | bin\Release\ 51 | Android Control.xml 52 | 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 53 | 54 | 55 | On 56 | 57 | 58 | Binary 59 | 60 | 61 | Off 62 | 63 | 64 | On 65 | 66 | 67 | 0F91B4CAAB2DB51D1CA25B7D3106784439FC1FDA 68 | 69 | 70 | WindowsApplication1_TemporaryKey.pfx 71 | 72 | 73 | true 74 | 75 | 76 | true 77 | 78 | 79 | x86 80 | bin\x86\Debug\ 81 | 82 | 83 | x86 84 | bin\x86\Release\ 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | 107 | 108 | 109 | 110 | 111 | 112 | Gestures.vb 113 | 114 | 115 | Form 116 | 117 | 118 | Form 119 | 120 | 121 | Form1.vb 122 | Form 123 | 124 | 125 | Form2.vb 126 | 127 | 128 | Form 129 | 130 | 131 | 132 | True 133 | Application.myapp 134 | 135 | 136 | True 137 | True 138 | Resources.resx 139 | 140 | 141 | True 142 | Settings.settings 143 | True 144 | 145 | 146 | 147 | 148 | Gestures.vb 149 | 150 | 151 | Form1.vb 152 | 153 | 154 | Form2.vb 155 | 156 | 157 | VbMyResourcesResXFileCodeGenerator 158 | Resources.Designer.vb 159 | My.Resources 160 | Designer 161 | 162 | 163 | 164 | 165 | MyApplicationCodeGenerator 166 | Application.Designer.vb 167 | 168 | 169 | SettingsSingleFileGenerator 170 | My 171 | Settings.Designer.vb 172 | 173 | 174 | 175 | 176 | 177 | 178 | 179 | 180 | 181 | 182 | 183 | 184 | 185 | 186 | 187 | 188 | 189 | 190 | 191 | 192 | 193 | 194 | 195 | 196 | 197 | 198 | 199 | 200 | 201 | 202 | 203 | 204 | 205 | 206 | 207 | 208 | False 209 | Microsoft .NET Framework 4.5 %28x86 and x64%29 210 | true 211 | 212 | 213 | False 214 | .NET Framework 3.5 SP1 Client Profile 215 | false 216 | 217 | 218 | False 219 | .NET Framework 3.5 SP1 220 | false 221 | 222 | 223 | 224 | 231 | --------------------------------------------------------------------------------