2012体检表输入按键精灵脚本.doc

2012体检表输入按键精灵脚本.doc //输入121401211 Rem 开始 Delay 100 KeyPress "Num 1", 1 Delay 10 KeyPress "Num 2", 1 Delay 10 KeyPress "Num 1", 1 Delay 10 KeyPress "Num 4", 1 Delay 10 KeyPress "Num 0", 1 Delay 10 KeyPress "Num 1", 1 Delay 10 KeyPress "Num 2", 1 Delay 10 KeyPress "Num 1", 1 Delay 10 KeyPress "Num 1", 1 等待按?键进入视力输入 Rem 等待视力输入 key = GetLastKey() If key = 39 Then MoveTo 303, 374 Delay 100 LeftClick 1 Else Goto 等待视力输入 End If Rem 等待10 key = GetLastKey() If key = 39 Then MoveTo 301, 405 Delay 100 LeftClick 1 Else Goto 等待10 End If Rem 等待11 key = GetLastKey() If key = 13 Then MoveTo 482, 406 Delay 100 LeftClick 1 Else Goto 等待11 End If Rem 等待2 key = GetLastKey() If key = 13 Then MoveTo 655, 438 Delay 100 LeftClick 1 Else Goto 等待2 End If Rem 等待3 key = GetLastKey() If key = 13 Then MoveTo 296, 471 Delay 100 LeftClick 1 Else Goto 等待3 End If Rem 等待4 key = GetLastKey() If key = 13 Then MoveTo 684, 238 Delay 100 LeftClick 1 Else Goto 等待4 End If Delay 100 MoveTo 289, 271 Delay 50 LeftClick 1 Rem 等待5 key = GetLastKey() If key = 39 Then MoveTo 299, 366 Delay 100 LeftClick 1 Else Goto 等待5 End If Rem 等待6 key = GetLastKey() If key = 39 Then MoveTo 329, 524 Delay 100 LeftClick 1 Else Goto 等待6 End If Rem 等待7 key = GetLastKey() If key = 39 Then MoveTo 363, 525 Delay 100 LeftClick 1 Else Goto 等待7 End If Rem 等待8 key = GetLastKey() If key = 39 Then MoveTo 656, 526 Delay 100 LeftClick 1 Else Goto 等待8 End If Delay 200 MoveTo 711, 529 Delay 100 LeftClick 1 Rem 等待9 key = GetLastKey() If key = 13 Then MoveTo 651, 599 Delay 300 LeftClick 1 Else Goto 等待9 End If Goto 开始