//뽫default_dict.txtŵpluginĿ¼˽űwindows xp²ͨ
VBS dim s
set aa=createobject("SimPlugOCR.OCR")  
//ʶģ鵽aa
aa.Dict="Default_Dict.txt" 
//ʹֿDefault_Dict.txt
aa.FontColor="FFFFFF" 
//ɫΪɫ
Delay 2000
s= aa.OCR(0,190,100,450) 
//ʶĻϴ0,190100,450
MessageBox len(s)&s 
//ʾֿܲ鵽ֲʾ

i=aa.FindChar("",0,0,500,500) 
//ѰĻϴ0,0500,500""ɹֵ
X = CInt(i / 8192)
Y = i Mod 8192
MessageBox x&","&y 
//1ȡֵ꣬öԻʾ
MoveTo aa.cx aa.cy 
//2ֱӴģcx,cyȡָƹȥ

Plugin s= SimPlugOCR.OCR(0,190,100,250) 
//ʹplugin ʶĻϴ0,190100,250
MessageBox len(s)&s 
//ʾСΧֿܲ鵽ֲʾ
 