TC官方合作论坛

 找回密码
 立即注册
查看: 2013|回复: 0

传奇世界输入账号密码

[复制链接]
发表于 2014-2-16 17:44:16 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
//输入账号
function InputUsername(mycom,name,winhwnd)  //三个参数,插件对象,输入内容,窗口句柄
    traceprint(winhwnd)
    thread.entercritical(QianDao.criticalhandle)   // 进入临界区,防止同时抢账号,只有在输入一个后再输入另外一个
    window.activate(winhwnd)   //激活窗口,不然的话,没法输入
    myx,myy
    ret=PublicClass.FindS(mycom,"账号","fefefe-000000",myx,myy,10,309,286,447,490)  //调用了其他控件的函数
    if(ret ==0)
        thread.leavecritical(QianDao.criticalhandle)   //如果不是输入账号密码界面,就离开临界区,返回0
        return 0
    endif
    help.sleep(500)
    mycom.SetDict(1,"LOGIN.txt")    // 切换字库
    mycom.UseDict(1)
    retext=mycom.Ocr(myx+40,myy-4,myx+200,myy+25,"fefefe-000000",1.0)
    comptext=str.replace(name,"O","0")  //把字母o换成数字0,不然识别会出错
    if(retext == comptext)
        mycom.UseDict(0)  //如果输入内容和比对内容一样的话,切换字库,换回原先的
        thread.leavecritical(QianDao.criticalhandle)  //离开临界区返回1
        return 1
    else
        PublicClass.MClick(mycom,myx+150,myy+8)   
        window.activate(winhwnd)
        drivekeyboard.keypress(8,20)
        drivekeyboard.keystring(name,70)
        help.sleep(500)
        retext=mycom.Ocr(myx+40,myy-4,myx+200,myy+25,"fefefe-000000",1.0)
        comptext=str.replace(name,"O","0")
        if(retext == comptext)
            mycom.UseDict(0)
            thread.leavecritical(QianDao.criticalhandle)
            return 1
        endif
    endif



    mycom.UseDict(0)
    thread.leavecritical(QianDao.criticalhandle)
    return 0

endfunction

//输入密码
function InpitPassword(mycom,name,winhwnd)
    thread.entercritical(QianDao.criticalhandle)
    window.activate(winhwnd)
    myx,myy
    ret=PublicClass.FindS(mycom,"密码","fefefe-000000",myx,myy,10,331,329,427,435)
    if(ret ==0)
        return 0
        thread.leavecritical(QianDao.criticalhandle)
    endif
    PublicClass.MClick(mycom,myx+150,myy+8)
    window.activate(winhwnd)
    drivekeyboard.keystring(name,70)
    help.sleep(500)
    len=str.strleng(name)
    mycom.SetDict(1,"LOGIN.txt")
    mycom.UseDict(1)
    retext=mycom.Ocr(myx+40,myy-4,myx+200,myy+25,"fefefe-000000",1.0)
    complen = str.strleng(retext)
    if(len== complen)
        mycom.UseDict(0)
        thread.leavecritical(QianDao.criticalhandle)
        return 1
    endif
    mycom.UseDict(0)
    thread.leavecritical(QianDao.criticalhandle)
    return 0
endfunction
其他的就不加注释了



回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-5-20 04:14 , Processed in 0.033944 second(s), 22 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表