//初始化的工作
Dim hWnd
Dim ax,ay,bx,by
set TiShiObj = createobject("WScript.Shell")
Plugin File.DeleteFile("../qmacro.ini.bak")
Plugin File.MoveFile("../qmacro.ini","../qmacro.ini.bak")
//鼠标移到屏幕正中并保存位置,这样可以显示较长时间的鼠标移动轨迹
YiDongSuDu=3
Rem ==========以下是按键精灵录制的内容==========
MoveTo 549,611
Delay 16
MoveTo 539,597
MoveTo 519,571
Delay 15
MoveTo 487,537
Delay 16
MoveTo 463,502
MoveTo 430,466
Delay 16
MoveTo 400,432
Delay 15
MoveTo 376,397
Delay 16
MoveTo 356,364
Delay 16
MoveTo 345,341
MoveTo 337,321
Delay 15
MoveTo 331,304
Delay 16
MoveTo 328,292
Delay 15
MoveTo 326,284
Delay 16
MoveTo 325,281
MoveTo 323,276
Delay 16
MoveTo 322,272
Delay 15
MoveTo 321,270
Delay 16
MoveTo 319,265
Delay 16
MoveTo 315,259
MoveTo 314,252
Delay 15
MoveTo 313,249
MoveTo 310,246
Delay 16
MoveTo 305,241
Delay 15
MoveTo 304,238
Delay 16
MoveTo 299,234
MoveTo 299,233
Delay 16
MoveTo 298,231
Delay 15
MoveTo 297,222
Delay 16
MoveTo 293,212
MoveTo 293,203
Delay 16
MoveTo 293,196
Delay 15
MoveTo 293,182
Delay 16
MoveTo 293,167
MoveTo 293,162
Delay 15
MoveTo 293,144
Delay 16
MoveTo 293,136
Delay 16
MoveTo 293,130
MoveTo 293,128
Delay 15
MoveTo 293,124
Delay 16
MoveTo 293,120
MoveTo 293,117
Delay 16
MoveTo 293,112
Delay 15
MoveTo 293,109
MoveTo 294,106
Delay 16
MoveTo 294,103
Delay 15
MoveTo 294,101
Delay 16
MoveTo 294,99
Delay 16
MoveTo 294,98
Delay 31
MoveTo 294,97
MoveTo 294,96
Delay 16
MoveTo 294,95
Delay 15