在屏幕上查找Windows自带的扫雷程序里的笑脸图形 

脚本附件：winmine.bmp

运行环境：分辨率：1440×900 色深：32位 操作系统：Windows XP 按键精灵版本：7.00.4148

@兄弟工程师012009/4/16

MessageBox "这个例子会启动一个Windows自带的扫雷程序，然后查找扫雷程序里的笑脸图形"  
VBSCall RunApp("winmine.exe")  
//加入一点延时，让扫雷程序顺利启动  
Delay 2000  
VBSCall FindPic(0,50,1023,767,"winmine.bmp",0.9,intX,intY)  
If intX>0 and intY>0  
    MoveTo intX,intY  
    MessageBox "找到图形，鼠标已经移到图形上面"  
Else   
    MessageBox "没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统"  
EndIf   
MessageBox "下面把鼠标先移到0，0点，再用附件找图的方式继续查找笑脸"  
VBSCall FindPic(0,50,1023,767,"Attachment:\winmine.bmp",0.9,intX,intY)  
If intX>0 and intY>0  
    MoveTo intX,intY  
    MessageBox "找到图形，鼠标已经移到图形上面"  
Else   
    MessageBox "没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统"  
EndIf   
MessageBox "脚本演示结束，最好的脚本永远是您自己制作的。 :-)"  
EndScript