机组PID投入辅助脚本源码

【功能说明】 

这个脚本主要是为部分机组无功不稳定而写的.脚本运行时候要切换到机组PID调节界面 

【使用说明】         启动热键:Ctrl+1      停止热键:F12 

【制作日期】         2009年12月20日~~~12月21日,12月29日修改完毕 

其中自定义选项解释如下: 

大家分别输入需要修改的无功个位,十位,百位,千位自然数。 

脚本附件：3g.bmp

运行环境：分辨率：1280x800 色深：32位 操作系统：Microsoft Windows XP 按键精灵版本：9.20.10818

@yu42412012/3/30

Delay 3000  
dim aong,bcdb,caby  
UserVar aong=1 "百位"  
UserVar bcdb=5 "十位"  
UserVar caby=0 "个位"  
Call FindPic(0,0,1280,1024,"Attachment:\3g.bmp",1,x,y)  
If x>0 and y>0 Then  
    IfColor 145,272,"ff",1 Then  
        Goto QMScript_2  
    Else  
    End if  
    Rem QMScript_3  
    IfColor 297,569,"8200",3 Then  
        Goto QMScript_1  
    Else  
    End if  
    IfColor 297,569,"8200",1 Then  
        Goto QMScript_2  
    Else  
    End if  
    Rem QMScript_1  
    MoveTo 297,569  
    Delay 500  
    LeftClick 1  
    Delay 500  
    MoveTo 629,517  
    Delay 500  
    LeftClick 1  
    Delay 500  
    MoveTo 747,447  
    Delay 500  
    LeftClick 1  
    MoveTo 285,669  
    Delay 500  
    LeftClick 1  
    Delay 500  
    MoveTo 653,549  
    Delay 500  
    LeftClick 1  
    Delay 500  
    KeyPress 8,1  
    Delay 500  
    KeyPress 8,1  
    Delay 500  
    KeyPress 8,1  
    Delay 500  
    KeyPress asc(aong),1  
    Delay 500  
    KeyPress asc(bcdb),1  
    Delay 500  
    KeyPress asc(caby),1  
    Delay 500  
    MoveTo 695,551  
    Delay 500  
    LeftClick 1  
    Delay 500  
    Rem QMScript_2  
    Delay 1000  
Else  
    Delay 1200  
End if