次数
Function Get_RemainTime()
Dim a(9)
a(0)="0111010001100011000110001100011000101110=0"
a(1)="0010001100001000010000100001000010001110=1"
a(2)="0111010001100010001000100010001000011111=2"
a(3)="0111010001000010011000001000011000101110=3"
a(4)="0001000110010100101010010011110001000011=4"
a(5)="1111110000100001111000001000011000101110=5"
a(6)="0111010010100001011011001100011000101110=6"
a(7)="1111110010000100010000100001000010000100=7"
a(8)="0111010001100010111010001100011000101110=8"
a(9)="0111010001100011000101111000010100101110=9"
RemainTime = Plugin.RFNO.GetNumberEx(L+167,T+318,"010178",2,a,5,8,1)
RemainTime = Clng(RemainTime)  
End Function
//去猎场
Function Go_LC()
    KeyPress "M", 1
    Delay 300
    MoveTo L+640,T+120
    Delay 300
    LeftClick 1
    Delay 300
    SayString "传送"
    Delay 300
    MoveTo L+774,T+120
    Delay 300
    LeftClick 1
    Delay 300
    MoveTo L+676,T+448
    Delay 300
    LeftClick 1
    Delay 300
    KeyPress "M", 1
    Delay 300 
    i=0
    While i=0
    FindPic L,T,L+200,T+200,"Attachment:\传送中心广场.bmp",0.9,intX,intY
    If intX > 0 And intY > 0 Then
    i=1
    MoveTo L+92,T+220
    Delay 300
    LeftClick 1
    Delay 300
    MoveTo L+114,T+298
    Delay 300
    LeftClick 1
    End If
    Delay 3000
    Wend
    //判断是否在猎场
    i=0
    While i=0
    FindPic L+664,T,L+800,T+45,"Attachment:\猎场.bmp",0.9,intX,intY
    If intX > 0 And intY > 0 Then
    i=1
    End If
    Wend    
End Function
//去帮会NPC，并取得剩余跑商次数
Function Go_BH_gettime
    KeyPress "M", 1
    Delay 300
    MoveTo L+640,T+120
    Delay 300
    LeftClick 1
    Delay 300
    SayString "壹其座"
    Delay 300
    MoveTo L+774,T+120
    Delay 300
    LeftClick 1
    Delay 300
    MoveTo L+676,T+448
    Delay 300
    LeftClick 1
    Delay 300
    KeyPress "M", 1
    Delay 300
    //判断是否已经打开 帮会任务NPC 对话界面，并接取跑商任务
    i=0
    While i=0
    FindPic L,T,L+300,T+300,"Attachment:\帮会跑商NPC.bmp",0.9,intX,intY
    If intX > 0 And intY > 0 Then
    i=1
    MoveTo L+153,T+225
    Delay 300
    LeftClick 1
    Delay 300
    MouseWheel -6
    Delay 300
    MouseWheel -6
    Delay 300
    MouseWheel -6
    Delay 300
    MoveTo L+128,T+390
    Delay 300
    LeftClick 1
    Delay 300