联众打码写滑动

以下是源码 具体的答题类型和提分可以去联众查看

DimEnv 验证码路径,联众账号,联众密码,接口,验证码发送超时,答题类型,验证码最小长度,验证码最大长度

PutAttachment c:\ , FastVerCode.dll

验证码路径 C:\132.jpg

联众账号

联众密码

接口 75caf224e353531b8fd4c4b36da58f7e

验证码发送超时 30

验证码最小长度 0

验证码最大长度 0

答题类型 1

Call 联众答题(答题类型)

Sub 联众答题(答题类型)

IsFile Plugin.File.IsFileExist( c:\LZConfig.ini )

If IsFile True Then

Call Plugin.File.WriteINI( section , 验证码类型 , 答题类型, c:\LZConfig.ini )

Else

Call Plugin.File.WriteINI( section , 验证码发送超时 , 验证码发送超时, c:\LZConfig.ini )

Call Plugin.File.WriteINI( section , 验证码类型 , 答题类型, c:\LZConfig.ini )

Call Plugin.File.WriteINI( section , 验证码最小长度 , 验证码最小长度, c:\LZConfig.ini )

Call Plugin.File.WriteINI( section , 验证码最大长度 , 验证码最大长度, c:\LZConfig.ini )

End If

Delay 50

TID Plugin.FastVerCode.RecYZM_A(验证码路径,联众账号,联众密码,接口)

If Instr(TID, | ) 0 Then

ArrTmp Split(TID, | )

If UBound(ArrTmp) 2 Then

Answer ArrTmp(0)

TracePrint TID

MsgBox 收到的答题是: Answer

Else

MsgBox 答题异常

End If

ElseIf TID No Money! Then

TracePrint 后台没点数了返回

MessageBox 点数不足请充值

ElseIf TID No Reg! Then

TracePrint 未注册返回

MessageBox 未注册 请注册使用

ElseIf TID Error

ut Fail! Then

TracePrint 上传验证码失败

MessageBox 上传验证码失败,请核对“账号密码”后重试

ElseIf TID Error:TimeOut! Then

TracePrint 识别超时了

MessageBox 识别超时了

ElseIf TID Error:empty picture! Then

TracePrint 上传无效验证码

MessageBox 上传无效验证码

ElseIf TID 上传的ip跟锁定的ip不一致! Then

TracePrint 锁定ip

MessageBox 锁定ip

ElseIf TID No Money! Then

TracePrint 锁定点数

MessageBox 锁定点数

End If

End Sub

下面是我自己写的成品打码

链接 http://pan.baidu/s/1pLPKjjl 密码 qw0i